Sorry your browser is not supported!

level=0
score=0

next_game:
cls
load image "ship.JPG",1
make object BOX 1,0.3,0.3,0
Texture object 1,1
move object down 1,1.1

make object box 3,0.05,0.05,0
move object up 3,1.1
move object left 3,0.01
make object box 4,0.05,0.05,0
move object up 4,1.1
move object right 4,0.01
make object box 5,0.05,0.05,0
move object up 5,1.15
move object right 5,0.02
make object box 6,0.05,0.05,0
move object up 6,1.3
move object left 6,2.5
make object box 7,0.05,0.05,0
move object up 7,0.5
make object box 8,0.05,0.05,0
move object up 8,0.7
move object left 8,0.9
make object box 9,0.05,0.05,0
move object up 9,1.0
move object right 9,1
make object box 10,0.05,0.05,0
move object up 10,1.2
make object box 11,0.05,0.05,0
move object up 11,1.9
move object left 11,0.11
make object box 12,0.05,0.05,0
move object up 12,1.1
move object left 12,0.12
make object box 13,0.05,0.05,0
move object up 13,2.2
move object right 13,1
make object box 14,0.05,0.05,0
move object up 14,1.9
move object left 14,1
make object box 15,0.05,0.05,0
move object up 15,2.5
move object right 15,1

make object box 16,2.5,0.1,0
move object down 16,1.7
color object 16,rgb(0,0,0)


backdrop on : color backdrop rgb(0,0,0)
do

move object down 3,0.005
move object down 4,0.005
move object down 5,0.005
move object down 6,0.005
move object down 7,0.005
move object down 8,0.005
move object down 9,0.005
move object down 10,0.005
move object down 11,0.005
move object down 12,0.005
move object down 13,0.005
move object down 14,0.005
move object down 15,0.005

if leftkey()=1 then move object left 1,0.002
if rightkey()=1 then move object right 1,0.002


if object collision (1,3) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,4) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,5) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,6) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,7) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,8) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,9) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,10) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,11) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,12) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,13) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,14) then cls : print "YOU LOST!" : wait 1000 : goto endd
if object collision (1,15) then cls : print "YOU LOST!" : wait 1000 : goto endd

if object collision (15,16)
delete image 1
delete object 1
delete object 3
delete object 4
delete object 5
delete object 6
delete object 7
delete object 8
delete object 9
delete object 10
delete object 11
delete object 12
delete object 13
delete object 14
delete object 15
delete object 16
level=level+1
score=score+100
goto next_game
endif

loop

endd:
ink rgb(255,0,0),0
print "You lost"
print "your score was : "
print score
print "You also got to level : "
print level
print "press q to quit"
if inkey$()="q" then end
goto endd

if object collision(1,0)<>0
   cls
   print "you lost"
   wait 1000
   goto endd
      else
      rem check what was hit code here.
endif