In this game what you have to do is drive around a randomly created city and find a orb,ball whatever you call it. You can choose you speed so you can move faster but if you hit any buildings you lose.
to steer you have to be moving
you will not start with a building on top of you but there may be one very near to you and you can see behind you as of yet
the highest speed i beat it at is 400
start:
sync off : backdrop off : input "how fast do you want to move(at least 100)",movespeed
if movespeed<100 then goto start
sync on : sync rate 0 : hide mouse : text screen width()/2, screen height()/2, "loading..." : sync : backdrop on : make object box 1,4,3,5 : color object 1,rgb(000,000,255) : position object 1,0,object size y(1)/2,0 : turnspeed=125 : time=timer()
make matrix 1,10000,10000,200,200 : position matrix 1,-5000,0,-5000 : set matrix wireframe off 1 : for o= 2 to 10000 : size=rnd(80)+20 : make object box o,size,rnd(180)+20,size : position object o,rnd(10000)-5000,object size y(o)/2, rnd(10000)-5000 : next
for o=2 to 10000 : if object collision(1,o)then position object o,rnd(10000)-1,object size y(o)/2, rnd(10000)-1
color object o,rgb (255,000,000) : next : Make object box 10001,20,1000,10000 : position object 10001,5000,object size y(10001)/2,0 : Make object box 10002,20,1000,10000
position object 10002,-5000,object size y(10002)/2,0 : Make object box 10003,10000,1000,20 : position object 10003,0,object size y(10003)/2,5000 : Make object box 10004,10000,1000,20 : position object 10004,0,object size y(10004)/2,-5000 :
make object sphere 10005,20 : position object 10005,rnd(10000)-5020,object size y(10005)/2,rnd(10000)-5020 : color object 10005,rgb(000,255,000) : for o=2 to 10004 :
if object collision(10005,o)then position object o,rnd(10000)-1,object size y(o)/2, rnd(10000)-1
next : fog on : fog distance 500 : fog color rgb(200,200,200) : MAKE OBJECT SPHERE 99999,0.001 : MAKE MESH FROM OBJECT 1,99999 : DELETE OBJECT 99999 : ADD LIMB 1,1,1 : OFFSET LIMB 1,1,0,0,-OBJECT SIZE Z(1)/2 : HIDE LIMB 1,1 : delete mesh 1 : MAKE OBJECT sphere 999999,2
MAKE MESH FROM OBJECT 2,999999 : make object cube 10006,2 : DELETE OBJECT 999999 : ADD LIMB 10006,1,2 : OFFSET LIMB 10006,1,0,0,2 : delete mesh 2 : do : for o=2 to 10004 : if Object hit(1,o) : text screen width()/2,screen height()/2,"YOU CRASHED! (Press any key to quit)"
sync : wait key : for o = 1 to 10006 : delete object o : next : delete matrix 1 : sync : goto start : endif : next : if Object hit(1,10005) : text screen width()/2,screen height()/2,"YOU WIN (Press any key to quit)"
sync : wait key : for o = 1 to 10006 : delete object o : next : delete matrix 1 : sync : goto start : endif : gameTime=timer()-time : msframe#=gameTime*(movespeed/1000.0) : tsframe#=gameTime*(turnspeed/1000.0)
if upkey()then move object 1,msframe#
if downkey() then move object 1,-msframe#
if rightkey() and upkey() or rightkey() and downkey() then inc a#,tsframe#
if leftkey() and upkey() or leftkey() and downkey() then dec a#,tsframe#
yrotate object 1,a# : posx#=cos(270-a#)* 30 + object position x(1) : posz#=sin(270-a#)* 30 + object position z(1) : position object 10006,object position x(1),object position y(1)+10,object position z(1)
point object 10006,object position x(10005),object position y(10005),object position z(10005) : position camera posx#,object position y(1)+6,posz# : point camera object position x(1),object position y(1)+6,object position z(1) : time=timer() : sync : loop
P.S. if you make something neat from my code post it here i want to see you improvments.
it's Sad no one is posting
I'm a noob help will be accepted
