AMOS Basic V134 $REater (c) Stephen Harvey 1993 N& Eater.Abk >\>@\>\>\ FT>T > &Score: 0 >\>\>\>\  >\\>\\  >FT 4T >  >\\\\><Bl>>d<t>|\t>|F,vL movehima& B: Pause ; aa& Let R1=Joy 1 aa&$If R1=1 Jump Up ; If R1=2 Jump Down "aa&'If R1=4 Jump Left ; If R1=8 Jump Right aa& Jump Back aa&D: aa&Let Y=Y+2 ; Jump B aa&L: aa&Let X=X-2 ; Jump B aa&U: aa&Let Y=Y-2 ; Jump B aa&R: Let X=X+2 ; Jump Back b&B: For R3=1 To 20 ; Next R3 ; bb& Let R1=Joy 1 bb&$If R1=1 Jump Up ; If R1=2 Jump Down "bb&'If R1=4 Jump Left ; If R1=8 Jump Right bb& Jump Back bb&D: Anim 1,(1,5)(2,5)(3,5)(2,5) bb&Jump B bb&L: Anim 1,(4,5)(5,5)(6,5)(5,5) bb&Jump B bb&U: Anim 1,(7,1)(7,1) bb&Let A=7 ; Jump B *bb&7R: Anim 1,($8000+4,5)($8000+5,5)($8000+6,5)($8000+5,5) bb& Jump Back >\>\>\> >> >>  >\a  >\b)vd*keep_in_bob\x1\ y1\x2\y2xb t_bob|$yb t_bob|&xbx1xbx1&xbx2xbx2&$yb y1$yb y1&$yby2$yby2_bob\xb\$yb\vf mannumber a&AUtotest4aa&L(If X<10 Jump A ; If X>630 Jump F ; If Y<20 Jump C ; If Y>360 Jump E ; eXit -aa&>A: Let X=10 ; eXit ; F: Let X=630 ; eXit ; C: Let Y=20 ; eXit aa&E: Let Y=360 ; eXit ) +aa&:For R1=0 To Z(10)+1 ; Next R1 ; Back: Pause ; Let R0=Z(3) aa& If R0=0 Jump D ; If R0=1 Jump L $aa&+If R0=2 Jump U ; If R0=3 Jump R ; Jump Back aa&#D: Anim 0,(15,5)(14,5)(16,5)(14,5) aa&Move 0,50,20 ; Jump B aa& L: Anim 0,(8,5)(9,5)(10,5)(9,5) aa&Move -50,0,20 ; Jump B aa&#U: Anim 0,(12,5)(11,5)(13,5)(11,5) aa&Move 0,-50,20 ; Jump B *aa&8R: Anim 0,($8000+8,5)($8000+9,5)($8000+10,5)($8000+9,5) aa&Move 50,0,20 ; Jump Back number\>@\>\> number>number number>\a movehim num> <Hl>num> manlF>  time>=nnum> score>~ bc6t>| >2N time n>x\>& Time left:t time| n>> time>*bcX2t>|$_colRt>|$_col $_col> scorescore>d n>x\>&Score:tscore| n> 6>\ t>|>\ t>|>Nnumnum>keep_in>\>\>\>l\>| 6>\ t>|>\ t>|> AmBs