i'm using pro and it is in the same folder, i did what you said using the browse to add the file i wanted included but when it does not work!
Here is my code!
set display mode 1024,768,32
sync on
fastsync
sync rate 0
set ambient light 10
set camera range 0,1,8000
load object "C:\Documents and Settings\Admin\Desktop\terrain.x",1
load object "C:\Documents and Settings\Admin\Desktop\Dark Basic Project Media\water layer1.x",2
make object sphere 3,100,30,30
load object "C:\Documents and Settings\Admin\Desktop\Dark Basic Project Media\skybox.x",4
load image "C:\Documents and Settings\Admin\Desktop\Default\0.bmp",1,1
load image "C:\Documents and Settings\Admin\Desktop\Dark Basic Project Media\Equalibrium\glass02.jpg",2,1
load image "C:\Documents and Settings\Admin\Desktop\Dark Basic Project Media\Equalibrium\water01.png",3,1
load image "C:\Documents and Settings\Admin\Desktop\Dark Basic Project Media\Equalibrium\space.bmp",5
rotate object 1,90,0,180
position object 2,-300,0,0
hide object 4
scale object 4,5000,5000,5000
texture object 1,1
texture object 2,2
texture object 4,5
set cube mapping on 2,3,3,3,3,3,3
ghost object on 2,0
set object collision to polygons 2
set object collision to spheres 3
#include "control.dba"
do
controls()
text 10,10,str$(screen fps())
x# = object position x(3)
y# = object position y(3)
z# = object position z(3)
if upkey()=1 then z#=z#+1
if downkey()=1 then z#=z#-1
if leftkey()=1 then x#=x#-1
if rightkey()=1 then x#=x#+1
d#=intersect object(1,x#,y#+1000,z#,x#,y#-1000,z#)
position object 3,x#,y#+1000-d#+50,z#
sync
loop
And my function code again!
function control()
if upkey()=1 then move camera 0,5
if downkey()=1 then move camera 0,-5
inc mx#,mousemovex()
inc my#,mousemovey()
rotate camera my#,mx#,0
endfunction
