Sorry your browser is not supported!

REM ~Car game~
`~With explanations to the codes~`

`set up sync
sync on
sync rate 360

`Set up initial waypoint
waypoint#=1

`Set camera range
set camera range 1,100000

`**Make the matrix to walk on
make matrix 1,200,200,10,10
`Now we gonna position the matrix
position matrix 1,0,-5,0
`Now the matrix is ready and set up!

`Make a light
make light 1

`Make players cube
make object cube 1,3
color object 1,RGB(55,0,105)

`Make waypoints
for t=2 to 11
make object cube t,4
position object t,rnd(100),0,rnd(100)
next t

SET OBJECT TO CAMERA ORIENTATION 1

`**Now make the timer variable that we gonna use for the time. You can always change the
`Number to get a higher or lower time
time# = 3000

````````````````````````````````````````````````````````````````````````````````````````
do

move object 1,0.16

`position Camera
position camera object position x(1),object position y(1)+20,object position z(1)-50
point camera object position x(1),object position y(1),object position z(1)

`Waypoints

Remstart
Example Waypoint:
If (Waypoint equals the current waypoint)
If (The players box collides with the correct waypoint)
(Color that waypoint green)
(New Waypoint to go for)
Endif
Endif
Remend

`Waypoint 1
if waypoint#=1
if object collision(1,2)=1
delete object 2
waypoint#=2
endif
endif

`Waypoint 2
if waypoint#=2
if object collision(1,3)=1
delete object 3
waypoint#=3
endif
endif

`Waypoint 3
if waypoint#=3
if object collision(1,4)=1
delete object 4
waypoint#=4
endif
endif

`Waypoint 4
if waypoint#=4
if object collision(1,5)=1
delete object 5
waypoint#=5
endif
endif

`Waypoint 5
if waypoint#=5
if object collision(1,6)=1
waypoint#=6
delete object 6
endif
endif

`Waypoint 6
if waypoint#=6
if object collision(1,7)=1
waypoint#=7
delete object 7
endif
endif

`Waypoint 7
if waypoint#=7
if object collision(1,8)=1
waypoint#=8
delete object 8
endif
endif

`Waypoint 8
if waypoint#=8
if object collision(1,9)=1
waypoint#=9
delete object 9
endif
endif

`Waypoint 9
if waypoint#=9
if object collision(1,10)=1
waypoint#=10
delete object 10
endif
endif

`Waypoint 10
if waypoint#=10
if object collision(1,11)=1
waypoint#=11
delete object 11
endif
endif


`What happens when you win
if waypoint#=11
delete object 1
sleep 4000
end
endif

`turn block left/right with left/right keys
if rightkey()=1 then turn object right 1,1.05
if leftkey()=1 then turn object left 1,1.05

`Refresh
sync

loop
``````````````````````````````````````````````````````````````````````````````````
sync off

`load matrix texture
   load bitmap "IMAMGE NAME",1
   get image 1,X1,Y1,X2,Y2
   delete bitmap 1

`create and texture matrix
   make matrix 1,200,200,10,10
   prepare matrix texture 1,1,1,1

if object position X(1)<0 or object position X(1)>200 or object position Z(1)<0 or object position Z(1)>200
move object 1,-0.16
Endif

`Waypoint 1
if waypoint#=1
if object collision(1,2)=1
delete object 2
waypoint#=2
endif
endif

`Waypoint 2
if waypoint#=2
if object collision(1,3)=1
delete object 3
waypoint#=3
endif
endif

`Waypoint 3
if waypoint#=3
if object collision(1,4)=1
delete object 4
waypoint#=4
endif
endif

`Waypoint 4
if waypoint#=4
if object collision(1,5)=1
delete object 5
waypoint#=5
endif
endif

`Waypoint 5
if waypoint#=5
if object collision(1,6)=1
waypoint#=6
delete object 6
endif
endif

`Waypoint 6
if waypoint#=6
if object collision(1,7)=1
waypoint#=7
delete object 7
endif
endif

`Waypoint 7
if waypoint#=7
if object collision(1,8)=1
waypoint#=8
delete object 8
endif
endif

`Waypoint 8
if waypoint#=8
if object collision(1,9)=1
waypoint#=9
delete object 9
endif
endif

`Waypoint 9
if waypoint#=9
if object collision(1,10)=1
waypoint#=10
delete object 10
endif
endif

`Waypoint 10
if waypoint#=10
if object collision(1,11)=1
waypoint#=11
delete object 11
endif
endif


`What happens when you win
if waypoint#=11
delete object 1
sleep 4000
end
endif

   if object collision(1,waypoint#+1)=1
      color object waypoint#+2,RGB(225,0,0)
      delete object waypoint#+1
      waypoint#=waypoint#+1
      if waypoint#=11
         sleep 4000
         end
      endif
   endif

color object 2,RGB(225,0,0)