AL: SEG: ,(() ) @: SEG : ,:: (2,2),2,,,,$ (2,2),:  ,: "THINGS":  ,: "IN": ,: " THE DARK"P( "MB T64 O3 L8 CBA# O2DFL7F# O1 G"2 N :A(()):B(()): B,A: ".": TD ::: TD :< SEG: 6: |: :A:PX:PY >F SEG : ,(): SEG:FL: PY,PX: BL$;:NMNM: NM ,: " ": P PY,PX: BL$;: SEG : DS,: ,: "GC:": ,: "SCORE:": ,: "T:": ,:"LV:"LVZ ,: " ":PX:PY :PPX:PPY :N: A NM: ,A: SEG: DS,: ()::TU7LV:T1TUId ,:"________________________________________"nT1T1N1: SEG: DS,: ,: SC: ,: T1: ,: GC: : : FL : F : T1 NM: F x SCSNSC SF:SNSCSNSC: SY,SX : BL$;:SXN1:SY((N1)N7N10): GX,GY: BL$:GR1 SF B GR vl SCEXMSC NMNM:EXMSCEXMSC  SCHSCL HSCLHSCL:LVLV: P:: nN$: N$""  : N(((N$,N1))G) N ,,,,,,,,:TYPY:TXPX: :PYTY:PXTX:-PYPYN1:<PXPXN1:KPXPXN1:ZPYPYN1:PE(PY,PX): PE PEN128 ,,,,,, "FL: "SCSCN100:LSLSN100:T1TU: "SCSCN10:LSLSN10:T1TU: "tSCSC:LSLSN200:T1TU:GRN1:SF:GCN50N6LV:CGN3:GX(N10)N10:GYGX: SF SF: SX,SY: BL$: ":: "SCSCN400:LSLSN400:T1TU:GR: GX,GY: BL$;: " : : F" PPY,PPX: BL$;: PY,PX: SEG: DS,N3: RO$;:PPXPX:PPYPY, (N1)NP4 : X((N1)N18)N6:Y((N1)N40)N1: (X,Y) : C((N1)N4)N1: X,Y: SEG: DS,A(C,N2): (A(C,N1));:6@ SEG : DOTPOS  O: DOTDATA: DOTPOS,DOTDATA:J SEG T VECTOR : ( |VECTOR),:: , ^h 24,36,24,126,90,90,24,60,126,153,255,195,90,126,36,102,126,90,126,255,24,60,36,102,24,36,24,60,126,60,66,195r 0,0,12,190,245,67,0,0,0,0,48,121,175,194,0,0,66,126,90,60,231,129,195,0,66,126,90,60,255,129,195,0,65,93,42,28,42,73,20,54,0,0,0,0,255,0,0,0/| set up variablesV A : B : A(A,B): B,At 129,3,130,1,131,1,136,2NDS N:N1:N2:N3:N4:N5:N6:N7:N25:N40(:NP4 :RO$():BL$( ):N10 :N100d:N200:N400:N502:NM:CG:N18:N128:HSCL:GR$():SC:DX:SNSC:SF:GR:SN$():GC}N23:EXMSC :SX:SY:GX :GY ::: " Land the robot "()" on the ": " Gremlins "()".. 10 pts": " Blockheads "()".. 100 pts"G: " Snakes "()".. 200 pts"y: " Blue Graps "()".. 400 pts"::" Avoid the norfs ";();" and the purple"" graps A dinit "()" is not worth any ": " points but a norf cannot land on a dinit."B: " Hit any key to continue"YN$: N$"" :: " You must score before the turn counter T: reaches 0. The graps remain blue until the grap counter gc:reaches 0."X:" You earn one chance at a snake every 1000 points and at a grap every snake.":" Use cursor keys to move."&:" Hit any key to start"0N$: N$"" 0:: ,: "ADVANCE OR NO ADVANCE A/N"DN$: N$"A" AD : N$"N" AD : DHN ,: "LEVEL ? (1-6) 1 IS THE EASIEST"vXN$: N$"1" N$"6" X : LV(N$)|bl SEG: VECTOR : ( |VECTOR),OLDVEC(VECTOR):vTYGX:TXGY:TXTX((N1)N2N1): :PG(TY,TX): PG  : GX,GY: BL$;:GXTY:GYTX: GX,GY: SEG: DS,N1: GR$;yGCGC: GC GR:GC: GX,GY: SEG: DS,N2: ();TXSX:TYSY:TXTXN1: TX TX( TYTY :SP(TY,TX): SP TYTY:TXTX: :SP(TY,TX): SP TYTY: :SP(TY,TX): SP ; SY,SX: BL$;:SXTX:SYTYP SY,SX: SN$;:x SEG: DS,: ,: "PLAY AGAIN?"N$: N$"Y" :: :: F:: N$"N" :"SUPERDIR",d::  TXN1 TXN40:TYTYN1:: TXN40 TXN1:TYTYN1+ TYN6 TYN23 : TYN23 TYN61b A : BZ ( : B,L~: B,A: