Sorry your browser is not supported!

Rem Project: Space Runner
Rem Created: Tuesday, October 12, 2010

Rem ***** Main Source File *****



rem load our Tutorial lvl (1)
load object "media\SpaceRunnerTut lvl.x",1
position object 1,0,0,0

rem Make our Camera
make camera 1


rem Make our Character (99)
make object sphere 99,10
position object 99,50,295,80

rem Lights
set ambient light 100



Rem Collision
make object sphere 98,.5
make mesh from object 99,98
make mesh from object 1,1
add limb 99,0,99
offset limb 99,0,px#,py#,pz#
add limb 1,1,1
offset limb 1,1,0,0,0

Do


rem Our Character's Position
px# = object position x(99)
py# = object position y(99)
pz# = object position z(99)


rem Move our Player
if KEYSTATE(32)=1 and limb collision (99,0,1,1)

move object right 99,1
position camera 1,px#,py#,pz# - 30
endif



Loop

add limb 99,0,99
add limb 1,1,1

Rem Project: Dark Basic Pro Project
Rem Created: Monday, November 01, 2010

Rem ***** Main Source File *****
sync on
sync rate 60

make object sphere 1,1
make object sphere 2,0.1

AddLimbToObject(1,2)

offset limb 1,1,1,0,0

do
   yrotate object 1,object angle y(1)+2
   sync
loop

Function AddLimbToObject(obj1,obj2)
   make mesh from object 1,obj2
   delete object obj2

   while limb exist(obj1,l)=1 : inc l : endwhile

   add limb obj1,l,1
   
   delete mesh 1   
Endfunction