Quote: "None of the objects show thru my skybox (see code snippet)."
Your code snippet doesn't show us how you are creating your objects or how you are using those functions. I can't see anything wrong with your snippet. Here's a complete working demo using your code (
Edit except I used some images I had handy

):
sync on: sync rate 60 : sync
autocam off
position camera 0, 0, 0
point camera 0, 0, 100
set camera range 1, 4000 ` need to increase this a bit this so skybox corners are visible - you can work out the exact value needed :)
global cx#
global cy#
global camStep#
cx# = camera angle x()
cy# = camera angle y()
camStep# = 1
CreateNewSkybox()
makeSomeSceneObjects()
repeat
positionCamera()
AdjustSkybox()
sync
until spacekey()
end
Function CreateNewSkybox()
// LOAD THE SKY MAP
r=1: LOAD IMAGE "images\ml1.bmp",1
l=2: LOAD IMAGE "images\ml2.bmp",2
u=3: LOAD IMAGE "images\ml3.bmp",3 :
d=4: LOAD IMAGE "images\ml4.bmp",4
f=5: LOAD IMAGE "images\ml5.bmp",5
b=6: LOAD IMAGE "images\ml6.bmp",6
// CREATE THE PLANES TO SHOW THE IMAGES
size# = 5000
for i = 1000 to 1005
obj=i
make object plain obj,size#,size#
if i = 1000 THEN position object obj,0,0,(-1*size#/2) : texture object obj,f
if i = 1001 THEN position object obj,0,0,(size#/2) : texture object obj,b
if i = 1002 THEN position object obj,(size#/2),0,0 : texture object obj,l
if i = 1003 THEN position object obj,(-1*size#/2),0,0 : texture object obj,r
if i = 1004 THEN position object obj,0,(size#/2),0 : texture object obj,u
if i = 1005 THEN position object obj,0,(-1*size#/2),0 : texture object obj,d
point object obj,0,0,0
`Make skybox less boxlike
//set object ambient obj,0
//set object texture obj,2,0
set object filter obj,2
SET OBJECT LIGHT obj, 0
DISABLE OBJECT ZWRITE obj
next i
ENDFUNCTION
Function AdjustSkybox()
//function MovSkybox()
iSkyboxSize# = 5000
position object 1000,camera position x(),camera position y(),camera position z()+(-1*iSkyboxSize#/2)
position object 1001,camera position x(),camera position y(),camera position z()+(iSkyboxSize#/2)
position object 1002,camera position x()+(iSkyboxSize#/2),camera position y(),camera position z()
position object 1003,camera position x()+(-1*iSkyboxSize#/2),camera position y(),camera position z()
position object 1004,camera position x(),camera position y()+(iSkyboxSize#/2),camera position z()
position object 1005,camera position x(),camera position y()+(-iSkyboxSize#/2),camera position z()
ENDFUNCTION
function positionCamera()
control camera using arrowkeys 0, camStep#, 0.0
cx# = cx# + 0.1*mousemovey(): cy# = cy# + 0.1*mousemovex()
rotate camera cx#, cy#, 0
endfunction
function makeSomeSceneObjects()
for obj = 1 to 200
shape = rnd(3)
select shape
case 0
make object cube obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
case 1
make object sphere obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
case 2
make object cone obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
case 3
make object cylinder obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
endselect
next obj
endfunction
In other words it seems likely that the problem is in the code you didn't show us.
Aside: thanks for reminding me of that disable zwrite trick.
Edit Not convinced this will always work. If distant objects are drawn first won't they get hidden by the skybox? Perhaps you need to change the draw order somehow?
Edit2 This should fix the draw order issue. Not convinced it's the best way to do it though.
sync on: sync rate 60 : sync
autocam off
position camera 0, 0, 0
point camera 0, 0, 100
set camera range 1, 4000 ` need to increase this a bit this so skybox corners are visible - you can work out the exact value needed :)
global cx#
global cy#
global camStep#
cx# = camera angle x()
cy# = camera angle y()
camStep# = 1
CreateNewSkybox()
makeSomeSceneObjects()
repeat
positionCamera()
AdjustSkybox()
text 20, 20, "fps = "+str$(screen fps())
sync
until spacekey()
end
Function CreateNewSkybox()
// LOAD THE SKY MAP
r=1: LOAD IMAGE "images\ml1.bmp",1
l=2: LOAD IMAGE "images\ml2.bmp",2
u=3: LOAD IMAGE "images\ml3.bmp",3 :
d=4: LOAD IMAGE "images\ml4.bmp",4
f=5: LOAD IMAGE "images\ml5.bmp",5
b=6: LOAD IMAGE "images\ml6.bmp",6
// CREATE THE PLANES TO SHOW THE IMAGES
size# = 1000
for i = 1000 to 1005
obj=i
make object plain obj,size#,size#
if i = 1000 THEN position object obj,0,0,(-1*size#/2) : texture object obj,f
if i = 1001 THEN position object obj,0,0,(size#/2) : texture object obj,b
if i = 1002 THEN position object obj,(size#/2),0,0 : texture object obj,l
if i = 1003 THEN position object obj,(-1*size#/2),0,0 : texture object obj,r
if i = 1004 THEN position object obj,0,(size#/2),0 : texture object obj,u
if i = 1005 THEN position object obj,0,(-1*size#/2),0 : texture object obj,d
point object obj,0,0,0
`Make skybox less boxlike
//set object ambient obj,0
//set object texture obj,2,0
set object filter obj,2
SET OBJECT LIGHT obj, 0
DISABLE OBJECT ZWRITE obj
next i
ENDFUNCTION
Function AdjustSkybox()
//function MovSkybox()
iSkyboxSize# = 1000
position object 1000,camera position x(),camera position y(),camera position z()+(-1*iSkyboxSize#/2)
position object 1001,camera position x(),camera position y(),camera position z()+(iSkyboxSize#/2)
position object 1002,camera position x()+(iSkyboxSize#/2),camera position y(),camera position z()
position object 1003,camera position x()+(-1*iSkyboxSize#/2),camera position y(),camera position z()
position object 1004,camera position x(),camera position y()+(iSkyboxSize#/2),camera position z()
position object 1005,camera position x(),camera position y()+(-iSkyboxSize#/2),camera position z()
ENDFUNCTION
function positionCamera()
control camera using arrowkeys 0, camStep#, 0.0
cx# = cx# + 0.1*mousemovey(): cy# = cy# + 0.1*mousemovex()
rotate camera cx#, cy#, 0
endfunction
function makeSomeSceneObjects()
for obj = 2000 to 2200
shape = rnd(3)
select shape
case 0
make object cube obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
case 1
make object sphere obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
case 2
make object cone obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
case 3
make object cylinder obj, 100
position object obj, rnd(5000)-2500, rnd(5000)-2500, rnd(5000)-2500
endcase
endselect
set object transparency obj, 2 ` make sure these are drawn after the skybox (not always a good idea though)
next obj
endfunction