A View to a Kill: PARIS007.B

Является частью релиза: A View to a Kill
Размер файла: 46848
md5: 40421b6b6c95f5c52fedbac63839fd75
  0 REM 1deCODE !@ GO SUB [ POKE / STEP =CODE !ee GO SUB [ POKE /[L] STEP =NOT 6p
  1 BORDER NOT PI: PAPER NOT PI: CLS : PRINT #NOT PI;"  DISK VERSION BY NORTON ©1993": RANDOMIZE USR 0: LOAD "paris"
  18005 REM FUCK YOUSCREEN$ 5619: REM : SAVE "ASKO LTD" LINE 1 LINE  BEEP ^ BEEP ^9 DEF FN H FORMAT  DEF FN ASN SGN c[R] BRIGHT 5{[S]{ INVERSE 0STR$ STR$ |1BIN >=8CODE  COPY  CLS  COPY  COPY < COPY  COPY  COPY  COPY #▖BIN BB FLASH !USR 3<=nUSR xUSR  DRAW L LIST  LPRINT J# [O]9 DEF FN RND(wCHR$  RETURN  COPY  BORDER STR$  BORDER  COPY  COPY  COPY 'USR r OUT ABS  BEEP  CLS  FLASH [I]USR  READ d1BIN  CLS ▞VAL WG COPY  COPY ▗ THEN [Q]2▗ GO SUB  COPY  DRAW  RUN [P] COPY  COPY  COPY BIN  PRINT 2USR ▝ RETURN 'tUSR USR |USR  SAVE L NEXT  COPY  LPRINT $[G]' !08@ LPRINT x© CAT 9 DEF FN P[U]o CONTINUE = LIST USR ©▗q=[M] GO SUB }ATN 0USR  READ `1BIN ~USR PIN  ! LPRINT ▖ CLOSE #xEuc ERASE  TO ▖%-[I]8USR lUSR  LIST f| LPRINT H[C]QF@HSTR$ ▚`0 LIST  DRAW © CAT  COPY USR 9 DEF FN @TAB d0 READ [O] DRAW  OVER  RETURN  NEXT <= COPY  REM INT  DEF FN [O]ABS vl ` READ `hq[Q]  BEEP P(▖f LPRINT [K]J▙ GO TO  `nUSR  LIST ' LPRINT ? CIRCLE Q ERASE [E][U]@[F]8a RANDOMIZE  RETURN © CAT  COPY USR 9 DEF FN <>` PAUSE " OVER Y CAT ~ TO ba▘ LIST  LLIST BIN @ RETURN  LOAD / OVER  ` READ `h5A LIST "@61 FOR P,P0RND CLS ▛ACS fUSR [J]%OtL `fUSR  LPRINT GUSR ? BRIGHT [D] PAUSE R▙qD2#▖9 DEF FN cUSR  RANDOMIZE  RETURN >8X RANDOMIZE SCREEN$ © LOAD mCODE ATN ▝STR$ `a▘BIN qVAL @ BRIGHT  RETURN  CLS [M] INPUT  `vbx.0,}P&FN `[K][F]USR R PAPER lUSR ?[I] LIST 20:3p@ `g CHR$  STOP ▜©IN _ STOP LN +▝SCREEN$ BIN   READ @9 DEF FN GUSR  LIST  DRAW >>INKEY$; PAPER }[O]Z MERGE  LOAD ACS ws▝STR$ `a▘[A]?▖@ DRAW © RANDOMIZE  OUT p LIST v RETURN 0K▘ LPRINT @PEEK PV[A] LPRINT ▗dBIN 8. GO TO lUSR ©L(@LN STR$ BIN <p LIST c LLIST  RETURN  LPRINT ©©© STOP [U]D9 DEF FN  LPRINT x>[J]}k LPRINT  CLEAR IN ~Z BORDER n RUN EXP  LPRINT ▝STR$ d1BIN @xATN  COPY SGN ~F LPRINT < OUT   STEP PUSR <>NOT <= INPUT xUSR ~M INVERSE  LOAD USR ▙ [Q] RESTORE ▘c STOP 8 COPY © COPY  LLIST ATTR q DJ@ COPY  DRAW  RUN  CAT  COPY  COPY  COPY  LPRINT !USR  RETURN  COPY ©STR$ [Q] DRAW  ▘B  CIRCLE ▚? COPY  COPY  SAVE 0▖[C]Q@© CLEAR [O] COPY  COPY  COPY IN  COPY  LIST  SAVE @ POKE B CIRCLE NOT ( COPY  COPY  COPY  COPY  COPY IN  COPY vSCREEN$ ASN  COPY p TO Y> COPY  COPY  COPY  COPY  COPY ©[P]USR [P] CLOSE #ACS @q COPY  COPY  COPY  COPY  COPY  COPY  LOAD  COPY >=<= LPRINT BIN   COPY  COPY  COPY  COPY  COPY  COPY  CLS  COPY >= SAVE  OUT  DRAW @ COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY USR U LOAD NOT [Q] BRIGHT H CONTINUE   DRAW  COPY  COPY STR$ AT [T]USR (@POINT >"8 GO TO D>© COPY © DRAW )0PI "8">pp© RETURN [N] COPY  COPY  COPY  COPY  COPY  LPRINT @ IF [C]▛ LIST [U]▜CHR$ # COPY  COPY  COPY  COPY  COPY  OUT  COPY {uno LET 8> COPY  COPY  COPY  COPY  COPY © COPY BIN  COPY RNDn LPRINT q COPY  COPY  COPY  COPY  COPY  COPY  LOAD  COPY >=<= LPRINT ▜CHR$  COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY  FORMAT 0 DRAW % OUT  SAVE @| COPY  COPY  COPY  COPY  COPY  COPY  RETURN  COPY USR U LOAD MCOS  COPY 88▖( LPRINT F CLEAR  COPY  COPY  LLIST [U]@0`POINT $▖"  PRINT Hx COPY  COPY IN  DRAW [A]*▖@@  $6$"@H© RETURN  CLS  COPY  COPY  COPY IN  RETURN USR  CLS "bXT@[J]D#b COPY  COPY  COPY  COPY  RETURN  LOAD  COPY | CLS  RUN [O] STOP YB©© COPY  COPY  COPY  COPY IN  COPY BIN  RETURN E.0p▘ COPY  COPY  COPY  COPY  COPY  COPY  RUN  COPY >=▜ LIST AUSR ▘ COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY  FORMAT  DRAW  DRAW (IN  LIST   COPY  COPY  COPY  COPY  COPY  COPY  RETURN  COPY USR *[P]"[D]<q LIST [A]F LIST B CLEAR  COPY © LPRINT 8QaD[E]▖>0? POKE  CIRCLE  RUN  COPY  COPY  COPY  DRAW R |  @B*$"`H© COPY  RUN  COPY  COPY  COPY  COPY  RETURN _ LLIST  CLS STR$ L TO B@D"[T] COPY  COPY  COPY  COPY  RETURN w COPY IN >=y GO SUB "<@8LEN ▖©© COPY  COPY  COPY  COPY IN  COPY BIN  LPRINT >= OVER p▝ COPY  COPY  COPY  COPY  COPY  COPY  RUN  COPY >= LIST A DATA ?@ COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY  FORMAT  INPUT  SAVE (W LPRINT [A][A] COPY  COPY  COPY  COPY  COPY  COPY  RETURN  COPY J*@%P6A ▝p RANDOMIZE  COPY  COPY  LIST USR ▜>=bSTR$ DJD" ? PLOT  [R] LOAD  COPY  COPY IN  RETURN [S]▘`H▘[A]`@B"8"@p© COPY  RUN  COPY  COPY  COPY IN  RETURN IN  COPY  CLEAR  PAUSE [E]b "@<= STOP " COPY  COPY  COPY  COPY  RETURN [L] COPY PEEK |p©© COPY  COPY  COPY  COPY IN  COPY BIN  OUT ▝ OUT  LPRINT @ COPY  COPY  COPY  COPY  COPY  COPY  RUN  COPY >= RANDOMIZE )r COPY ▘USR USR  COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY  FORMAT VAL$  PAUSE (3USR ?▖@ COPY  COPY  COPY  COPY  COPY  COPY  RETURN IN E*N@ AND ` CONTINUE ▘#BIN VAL ' NEXT  COPY © SAVE <>P[C]"1E*$" ? PLOT  C OUT  COPY  COPY  COPY  COPY 5 LIST PVAL ▗P $" "@H© COPY  COPY  COPY  COPY  COPY  COPY  RETURN INT IN  LLIST  CLEAR  DRAW [U] PRINT 2 D"" COPY  COPY  COPY  COPY  RETURN  GO SUB  COPY [M]; FORMAT T|©IN  COPY  COPY  COPY  COPY  OUT  COPY BIN  OUT ▝; DATA   COPY  COPY  COPY  COPY  COPY  COPY  CLS  COPY >= PAUSE )IN  COPY  COPY ▘a COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY  FORMAT SCREEN$  STOP PP?[A]▖@ COPY  COPY  COPY  COPY  COPY  COPY  RETURN IN E)NG RETURN  FORMAT ▘D8 VAL <= COPY  COPY  DRAW P[U]/@▘RND"@"<? CLS IN  COPY  COPY IN  COPY 2 SAVE   GO TO tP@" xD? COPY  COPY  COPY  COPY  COPY IN  CLEAR 7 NEW  DRAW  CLEAR  SAVE ,2▗"#USR  COPY  COPY  COPY  COPY  COPY s COPY USR  RUN  FORMAT V~ COPY IN  COPY  COPY  COPY  COPY  LOAD  COPY BIN  OUT ▘'BIN   COPY  COPY  COPY  COPY  COPY  COPY  CLS  COPY >= LIST I© COPY  COPY ▗P▗ COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY  FORMAT UBIN P FORMAT ©DH ? COPY  COPY  COPY  COPY  COPY  COPY  RETURN IN D[U]LxQ POKE XD  FORMAT ▝[P][P] COPY © IF xD"[C]@© CLS  COPY ▝<= LPRINT  POKE ! COPY (0? COPY  COPY  COPY  COPY  COPY  COPY  RETURN © FLASH _ SAVE ,1 LIST > COPY  COPY  COPY  COPY  COPY |©USR o LPRINT ACS 0INT  COPY  COPY  COPY  COPY  COPY  COPY  LOAD  COPY >= COPY BIN BIN @ COPY  COPY  COPY  COPY  COPY  COPY  CLS  COPY >= LIST [F]o RETURN ?* COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  COPY USR UO!VAL ©H0? COPY  COPY  COPY  COPY  COPY  COPY  COPY ?B[Q]x@[T] ? COPY  COPY  COPY  COPY  COPY  COPY  COPY ?▘@ FORMAT ▜! COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN ©@@ "1 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  BRIGHT  LPRINT (@▖ CIRCLE  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CIRCLE  COPY  STOP >= LIST k ▗ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY [T] COPY  NEW  CLEAR ? LIST @ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY |LN USR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RUN  SAVE -qUSR USR @? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLS  SAVE a POKE USR © COPY  COPY  COPY  COPY  COPY  COPY  COPY ?▘[D] LLIST 0 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY PEEK }[M] 8#▖ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  BRIGHT  LIST )[Q]@ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CIRCLE  COPY  STOP  BORDER  LPRINT [M] LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY PI COPY >=|? LIST @ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW p FOR SGN  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LOAD  SAVE .p LPRINT   ? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  DRAW P LPRINT #[H]© COPY  COPY  COPY  COPY  COPY  COPY  COPY ?#,x"USR  OR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY PEEK xgUSR @A▗▗ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  BRIGHT   LET `  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  FORMAT  COPY  DIM  STOP USR c COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY CODE  RETURN |@ LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLS  LPRINT { OVER 0USR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LOAD  LIST  SAVE  LPRINT X© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  DRAW (`B`© COPY  COPY  COPY  COPY  COPY  COPY  COPY © AND E<> COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  OVER  SAVE [I]8[J]CHR$ q▘D? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  BRIGHT ?[A]xP! COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  FORMAT ? COPY  PLOT   LET < LIST  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN  SAVE > LPRINT  LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  NEW [ DEF FN @  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RUN  LIST [M]VAL ▚© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLEAR  RETURN (9▘[Q] COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN JP▖ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  OVER  LIST X@INKEY$ YaB? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CIRCLE  COPY [Q]80 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY VAL ? COPY TAB  SAVE ?P COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN  LPRINT [O] LPRINT USR a COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY [O]/ RUN  LIST   COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RUN  LIST ▙XSTR$  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  RETURN [I]@ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN ?fp1< ▗@ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  OVER  LPRINT #[R]>=i"© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CIRCLE  COPY  FORMAT >()? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY [Q]© COPY } DRAW ~[A]? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?USR [G]pUSR ▚? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN |. REM  RETURN @ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RUN  LPRINT F< LIST  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN ?[Q]ZUSR `▘  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  OVER  LPRINT <PrZ© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CIRCLE  COPY >=`60▖© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY [Q] COPY  DRAW  CLEAR  DRAW  DRAW  © COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ©W<© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RANDOMIZE  DRAW -w@ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLS  LIST # SAVE 8 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ©$ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN >USR b0[U]A COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  BRIGHT USR  P▟[F] COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CIRCLE  COPY BIN [I]8▗ FORMAT D COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY [T] COPY  RANDOMIZE  RETURN © SAVE   COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ~KLN   COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RUN  DRAW <SQR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CLS  SAVE [R]* RETURN   COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR NOT TAN ▚! [E]'@>@ MERGE  GO SUB VAL  MOVE  PRINT  STEP # LET =  LET <>!VAL SIN  [E]  RANDOMIZE 5[E]  RANDOMIZE NOT g MERGE @~# FOR  MERGE  MOVE  FOR  NEXT  MOVE <>J COPY ![D]:0 COPY  NEW (=  DRAW  MERGE ^#V# INVERSE *D COPY  INVERSE  MOVE  STEP f LOAD <> INVERSE ~PI(! RETURN 8 RETURN 8 RETURN 8 RETURN  8 RETURN $8 RETURN H8 RETURN P8><>CODE  IF > PLOT   STEP FN e* COPY aPI GO SUB B STEP kg STEP  CIRCLE e STEP FfNOT  MOVE f INVERSE !J COPY )[E]CODE 2H COPY 2I COPY  STEP tf INVERSE # SAVE ,[E]CODE 2H COPY <2I COPY  STEP tf INVERSE # SAVE <> INVERSE ~ RETURN ( RETURN (:H COPY PI F<2H COPY !VAL TAB !VAL FN CODE 2H COPY <>:I COPY PI( OR STR$ x=( OR @=  DRAW STR$ "F COPY  MERGE  OR @~# RESTORE ! FOR  LLIST  POKE STR$  MOVE <>*F COPY NOT LN f!([D]:0 COPY  NEW ( THEN ?=  DRAW ^#V# INVERSE *D COPY  INVERSE  INVERSE ~PI( RETURN 8# RETURN 8 RETURN 8 RETURN $8 RETURN H8 PAPER !*[E]@6#6 SAVE <>!;g#### IF ^#V#F#N FOR  RESTORE  OR 6 COPY # CLS STR$  LLIST   NEXT <>[F]1[F] CIRCLE [E]©[E] &[E](%[E],$[E]4"[E]8![E]< [E]@:0 COPY  THEN W : COPY [A]0 CLEAR ( RETURN  +#"D COPY <>: COPY ~[A]0 CLEAR ( RETURN   REM PI GO SUB R RESTORE  STOP :0 COPY 2j COPY * COPY  DIM ! COPY  COPY  COPY 6 GO SUB VAL !9h COPY ) GO SUB VAL !▙"n> STEP 2m!CHR$ ▝" COPY ! RESTORE h"▛"▛:[R]g2u COPY >2 BEEP  COPY 2 VERIFY  COPY 2 CIRCLE  COPY >2r COPY >2s COPY >2t COPY CODE 2[T]g GO SUB V STEP Yl STEP bh STEP  REM ▗ STEP p STEP T▞ STEP i STEP h STEP  RESTORE h STEP © STEP  STEP ▘ STEP SCREEN$ j STEP ' STEP .f STEP [A]e STEP ATN jNOT [D]▚3[P]=CSGN  PAPER LH"H100000100000zy=? ERASE .900! CONTINUE [C] INVERSE !>=[C] ^#V# INVERSE ~ INVERSE # RESTORE  FOR  VERIFY P(~  IF  LLIST  LPRINT <>G: COPY  AND [A]8F>G: COPY [A]0< RETURN  RETURN 8 GO SUB D THEN ' THEN ' THEN 'Oy2s COPY : COPY _: COPY  AND [D]8>_: COPY [D]0 RETURN  RETURN 8 GO SUB DGx2r COPY >2t COPY NOT biCODE 2t COPY <>:t COPY PI>=!v COPY  GO SUB [n COPY :r COPY O:s COPY G OR  MERGE  RESTORE VAL$ #  SAVE  LLIST  MOVE #### FOR  FOR STR$  NEW <>:q COPY !FN [B] RETURN  COPY ( NEW ($=  DRAW v COPY  RESTORE  INVERSE  LLIST :p COPY G INVERSE n INVERSE N0xPI(CODE  THEN < THEN  THEN  THEN  PLOT   PRINT |}y LET  INVERSE #STR$   CLOSE #<>: COPY G: COPY  AND [A]O! CIRCLE [K]: COPY G: COPY  AND [A](LN =  DRAW : INK  COPY PI(/"n COPY <>: INK  COPY  VERIFY 2 INK  COPY >=>2 INK  COPY : COPY =2 COPY <>: INK  COPY <2 INK  COPY  RETURN USR CODE 2 INK  COPY : COPY <2 COPY <>:p COPY  VERIFY 2p COPY >=>2p COPY : COPY =2 COPY <>:p COPY  AND 2p COPY  RETURN USR CODE 2p COPY : COPY <2 COPY <> STEP [E]iNOT  VERIFY i STEP [E]iNOT USR i STEP SCREEN$ iNOT  VERIFY i STEP SCREEN$ iNOT USR i:[S]gPICHR$ %k:u COPY =2u COPY USR :[R]g2u COPY  STEP Mj: BEEP  COPY =2 BEEP  COPY  : CIRCLE  COPY 2 BEEP  COPY <2 CIRCLE  COPY :q COPY  VERIFY  NEW 2q COPY  STEP =k: VERIFY  COPY =2 VERIFY  COPY USR >2 VERIFY  COPY NOT {j:q COPY !_jPI(#=  DRAW ^#V FOR  DIM [E]i GO SUB i VERIFY i RANDOMIZE iSCREEN$ i COPY iUSR i NEXT i STEP j STEP i STEP hNOT  RESTORE h!( COPY ~=w RETURN 00%>9w+~=w RETURN 00>9w+~=w RETURN 00!& COPY 60# CLS >2[T]g!& COPY CHR$ @NOT [A]▘s@:x/ NEW !k(##=  CLS ~2ASN j#~2ACS j<>!ASN j: COPY PEEK (8#: COPY PEEK (8!kyPI(#  DRAW xPI(### CLS ~2q COPY <> COPY y:ysys@s::u COPY =2u COPY USR :[R]g2u COPY  STEP  FORMAT j<BIN MjNOT :j!& COPY ~ RETURN 1USR #~ RETURN 8USR #~ RETURN 0USR >2[S]g<>:[T]gPIUSR :& COPY  RETURN 0 :' COPY  RETURN 4(CODE <>! COPY : COPY [G]0 GO SUB D RETURN 0 LOAD #: COPY [G]0 GO SUB D RETURN 0 STOP ><> INVERSE ^ INVERSE V INVERSE  RESTORE  LLIST  MERGE #  SAVE  READ  READ  MOVE  GO TO <> INVERSE ~!(▟ THEN ?(=  DRAW  INVERSE  RESTORE  CLEAR  RESTORE  RESTORE  CLEAR  LLIST  CLEAR ~ INVERSE w CLEAR ~ INVERSE w INVERSE 6 CLEAR # INVERSE # INVERSE # INVERSE # NEW  CLEAR  LLIST  INVERSE  LLIST NOT  MERGE l: COPY  VERIFY G INVERSE ~[A]O! CIRCLE [K]: COPY  VERIFY G INVERSE ~[A](LN =  DRAW  INVERSE u INVERSE t<> INVERSE !FN ▟ OR x2▖k INVERSE  THEN F( INVERSE  THEN N TO [H]m@ INVERSE STR$  NEW <> INVERSE !FN ▟ OR  INVERSE  THEN F( INVERSE  THEN N  STEP  CONTINUE k STEP TAB k STEP ▞k@ INVERSE STR$  STOP <>!FN ▟POINT ▟ COPY 6 GO SUB VAL !VAL ATN FN ▟ OR  GO SUB VAL  FOR w8 FOR STR$  REM <> INVERSE  RESTORE  LLIST 0CODE  GO SUB g# CLS <> INVERSE n INVERSE f#NOT l INVERSE n INVERSE f+ STEP lNOT l INVERSE n INVERSE f/NOT l INVERSE n INVERSE f/PI GO SUB RNOT l INVERSE n INVERSE fLN NOT l: COPY G INVERSE ~! CLS l STEP  INPUT l: COPY G INVERSE ~!mPI(##=  SAVE ^#V FOR  DIM R[P]lRlRRl[F]lRREXP lRAT lRRAT l>=lR INVERSE ~ VERIFY  INVERSE w>= INVERSE 6 INVERSE 5 INVERSE n INVERSE f~PI GO SUB RNOT [A]m INVERSE ~ AND  INVERSE w RETURN USR  INVERSE 6 INVERSE 4 INVERSE n INVERSE f~NOT [A]m INVERSE ~ VERIFY  INVERSE w>= INVERSE 6 INVERSE 5 INVERSE n INVERSE f+NOT [A]m INVERSE ~ AND  INVERSE w RETURN USR  INVERSE 6 INVERSE 4 INVERSE n INVERSE f# INVERSE u INVERSE t<> INVERSE ^ INVERSE V INVERSE  RESTORE  LLIST  MERGE #  SAVE  READ  READ  MOVE  GO TO <>! COPY  INVERSE ~ AND [G]8$~ AND  INVERSE [G]8+ INVERSE ~ AND [G]8~ AND  INVERSE [G]8 INVERSE  THEN NUSR  INVERSE  THEN  AND CODE <>CODE < INVERSE 6<>mwm>m]m INVERSE !FN ▟ OR  STEP n@ INVERSE STR$  POKE <> STEP SQR m INVERSE  THEN NUSR  STEP %n INVERSE ~! LET m THEN ? LINE ZjNOT Vj INVERSE n INVERSE f^n INVERSE ~ THEN ? THEN ?(=  CLS OG~PI>= RETURN 8 RETURN  CIRCLE  RETURN 8 RETURN   CIRCLE  INVERSE ~ AND  NEW  INVERSE w<>▘ COPY ~ COPY  COPY  THEN [S]A4:knPI>= INVERSE !FN ▟ INVERSE  THEN F(" INVERSE  THEN N :in INVERSE [G] RETURN 8 RETURN  RETURN 8[G] RETURN 8 RETURN  RETURN 0@ INVERSE  MOVE <> INVERSE  THEN  DEF FN CODE 2kn LLIST NOT  LINE o:knPI>=*fn~ INPUT w<>*fn~ NEW CHR$  OR o~ INPUT w<>*fnLN PI GO SUB B"fn:in=2in<>*fnLN "fn:in<2in<>*fn+"fn:jn=2jn<>*fn#"fn:jn<2jn<>:knPI>=:ln<2ln RETURN ( STEP mn:hn!Ao THEN ?( STEP VjNOT STR$ n STEP ZjNOT STR$ nCODE 2kn<> CAT no READ n PRINT n:2 COPY PIUSR :0 COPY  THEN OUSR :` COPY  THEN g>=:knPIUSR  STEP [A]▛CODE 2ln>2kn:0 COPY  NEW 2hn!▛o THEN ?(#=  DRAW ^#V GO SUB Sfn STEP [D]oNOT STR$ n{[O] GO TO [P][T][Q] REM [P]: COPY G: COPY O:0 COPY  NEW  THEN ? THEN ?!ABS oPI(##=  CLS ^#Vx2iny▘2jn<> COPY  COPY CODE 2kn<>!X~ INPUT @w#zCOS   PLOT   OR  STEP [A]▛STR$  DIM <> COPY  NEXT  PRINT  PRINT  OR  MERGE  RESTORE  INVERSE  RESTORE  CLEAR  RESTORE  INK  OR  MERGE  RESTORE  STEP -z LLIST  MOVE STR$  INK  CLEAR  LLIST  INVERSE  LLIST  LLIST  MOVE STR$  LET  LET  CLS <> NEXT !@{"9{CODE 2<{=2;{!LN LN 6e GO SUB VAL >NOT 2ee! DATA o"fe>LN  GO SUB G GO SUB ^ CLS <> STEP VAL$ g STEP © STEP l STEP  RESTORE h STEP SCREEN$  STEP TAN n STEP CODE ▗ STEP o STEP [U]g STEP D▚ STEP Io STEP W▜ STEP .fCODE 27 COPY  STEP  RANDOMIZE m STEP 4l STEP Y STEP oj STEP ' STEP [A]e STEP [Q]▜:6 COPY PI INT  STEP Tk:[T]gPI(CODE  RETURN  LINE 6p STEP P~! RESTORE g NEW gSIN 6 GO SUB VAL !P~Q~VAL ▝6 GO SUB VAL LN p" STEP <  GO SUB V<>PLEASE START YOUR TAPE RECORDERvj: BRIGHT pPI(24 COPY  ERASE qNOT cq>2 BRIGHT p>23 COPY :4 COPY  AND  NEW  STEP  RETURN q~O:0 COPY  THEN ? THEN ?< NEW  AND EXP USR :: COPY <2: COPY  RETURN  LINE 8r<> RESTORE  GO SUB K  COPY  GO SUB [" COPY y NEW ox THEN ' THEN ' NEW TAB  THEN ' THEN  THEN  THEN  GO SUB C  COPY  GO SUB S" COPY  LLIST <>:H/ THEN ? THEN ? THEN ?o COPY  OR  STEP "qy NEW ASN  OPEN # RETURN STR$  NEXT <> STEP  CIRCLE j OR  STEP Iq> OPEN # RETURN !X~ INPUT @w#xLEN   PLOT  STR$  RESTORE :26 COPY <> STEP  AND q STEP Iq:4 COPY  THEN ? THEN ? THEN ?_ NEW  SAVE W THEN ? THEN ? THEN ?O!bP"!VAL EXP  THEN ▜ THEN ' THEN 'O~# IF <>*$ CLS <>6[K] MERGE  OR  RESTORE !5[K]>[B] THEN ? THEN ? THEN ?PI2B COPY (>[A]2C COPY O" MOVE q~ LLIST STR$  MOVE <>* COPY  COPY ~ RETURN 8 RETURN  8!#~ RETURN 8 RETURN  8}~ RETURN 8 RETURN  8#~ RETURN 8 RETURN  0> VERIFY <>CODE  AND <>> COPY G: COPY O!~ NEW G! CONTINUE [C](##=  CLS ^#V!>=[C]xPI(# CLEAR ~ VERIFY P FOR (~ AND Pw DRAW <>CODE 2l COPY * COPY z( RETURN Q 6>2l COPY #  GO TO  BORDER <>2 COPY 2 COPY  STEP [L]j STEP  DIM e STEP  CIRCLE jNOT f GO SUB VAL  MOVE  PRINT  STEP COS e LET =  LET <>!VAL SIN  [E]'@>@ MERGE  GO SUB VAL  MOVE  PRINT  STEP COS e LET =  LET <>!VAL SIN  [E]  RANDOMIZE 5[E]  RANDOMIZE NOT Lt MERGE @~# FOR  MERGE  MOVE  FOR  NEXT  MOVE <>J COPY ![D]:0 COPY  NEW (=  DRAW  MERGE ^#V# INVERSE *D COPY  INVERSE  MOVE  STEP @s LOAD <> INVERSE ~PI(! RETURN 8 RETURN 8 RETURN 8 RETURN  8 RETURN $8 RETURN H8 RETURN P8><>CODE  IF > PLOT   STEP  CONTINUE r* COPY aPI GO SUB B STEP ATTR t STEP s STEP ▚sNOT t INVERSE !J COPY )[E]CODE 2H COPY 2I COPY  STEP TAN s INVERSE # SAVE ,[E]CODE 2H COPY <2I COPY  STEP TAN s INVERSE # SAVE <> INVERSE ~ RETURN ( RETURN (:H COPY PI F<2H COPY !VAL TAB !VAL FN CODE 2H COPY <>:I COPY PI( OR STR$ x=( OR @=  DRAW STR$ "F COPY  MERGE  OR @~# RESTORE ! FOR  LLIST  POKE STR$  MOVE <>*F COPY NOT  SAVE s!([D]:0 COPY  NEW ( THEN ?=  DRAW ^#V# INVERSE *D COPY  INVERSE  INVERSE ~PI( RETURN 8# RETURN 8 RETURN 8 RETURN $8 RETURN H8 PAPER !*[E]@6#6 SAVE <>!{t#### IF ^#V#F#N FOR  RESTORE  OR 6 COPY # CLS STR$  LLIST   NEXT <>[F]1[F] CIRCLE [E]©[E] &[E](%[E],$[E]4"[E]8![E]< [E]@:0 COPY  THEN W : COPY [A]0 CLEAR ( RETURN  +#"D COPY <>: COPY ~[A]0 CLEAR ( RETURN   REM PI GO SUB R RESTORE  STOP :0 COPY 2j COPY * COPY  DIM ! COPY  COPY  COPY 6 GO SUB VAL !ju COPY ) GO SUB VAL !Bp" RETURN e> STEP 2 CLEAR e!sg" COPY : LLIST t2u COPY >2 BEEP  COPY 2 VERIFY  COPY 2 CIRCLE  COPY >2r COPY >2s COPY >2t COPY CODE 2 READ t GO SUB V STEP [D]u STEP [L]j STEP o STEP Cv STEP ABS u STEP v STEP f STEP  CAT o STEP BIN g STEP  BEEP w STEP  CIRCLE j STEP ns STEP  FORMAT r STEP  DATA wNOT Jl3[P]=8SGN  PAPER LH"H100000100000zy=< ERASE .900! CONTINUE [C] INVERSE !>=[C] ^#V# INVERSE ~ INVERSE # RESTORE  FOR  VERIFY P(~  IF  LLIST  LPRINT <> VERIFY G: COPY [A]8D>G: COPY [A]0: RETURN  RETURN 8 GO SUB D THEN ' THEN ' THEN 'Oy2s COPY : COPY _: COPY [D]8>_: COPY [D]0 RETURN  RETURN 8 GO SUB DGx2r COPY >2t COPY NOT [B]vCODE 2t COPY <>:t COPY PI>=!v COPY  GO SUB [n COPY :r COPY O:s COPY G OR  MERGE  RESTORE VAL$ #  SAVE  LLIST  MOVE #### FOR  FOR STR$  NEW <>:q COPY !FN [B] NEW ( RETURN  COPY ($=  DRAW v COPY  RESTORE  INVERSE  LLIST :p COPY G INVERSE n INVERSE N0xPI(CODE  THEN < THEN  THEN  THEN  PLOT   PRINT |}y LET  INVERSE #STR$   CLOSE #<>: COPY G: COPY [A]O! CIRCLE [K]: COPY  VERIFY G: COPY [A](LN =  DRAW : INK  COPY PI(/"n COPY <>: INK  COPY  VERIFY 2 INK  COPY >=>2 INK  COPY : COPY =2 COPY <>: INK  COPY <2 INK  COPY  RETURN USR CODE 2 INK  COPY : COPY <2 COPY <>:p COPY  VERIFY 2p COPY >=>2p COPY : COPY =2 COPY <>:p COPY  AND 2p COPY  RETURN USR CODE 2p COPY : COPY <2 COPY <> STEP STR$ vNOT w STEP STR$ vNOT  GO SUB v STEP  BEEP vNOT w STEP  BEEP vNOT  GO SUB v: STOP tPICHR$ Rx:u COPY =2u COPY USR : LLIST t2u COPY  STEP zw: BEEP  COPY =2 BEEP  COPY  : CIRCLE  COPY 2 BEEP  COPY <2 CIRCLE  COPY :q COPY  VERIFY  NEW 2q COPY  STEP jx: VERIFY  COPY =2 VERIFY  COPY USR >2 VERIFY  COPY NOT FN w:q COPY !wPI(#=  DRAW ^#V FOR  DIM STR$ vww&w BEEP v,w GO SUB v w STEP 2w STEP Cv STEP ABS uNOT v!( COPY ~=w RETURN 00%>9w+~=w RETURN 00>9w+~=w RETURN 00!& COPY 60# CLS >2 READ t!& COPY CHR$ @NOT AhCxx/ NEW !Bx(## INVERSE !@x! LIST IN ;~ RETURN 8 RETURN 06#xLEN   LOAD <>[G]8 INVERSE  THEN  AND CODE <>CODE < INVERSE 6 INVERSE 6 INVERSE 6 INVERSE 6<>O7O+:<{ATN  LINE 8z2;{<>:;{ATN  LINE Rz>2;{>23{24{*9{"5{:3{=23{USR >23{:4{=24{CHR$ [O]z*5{~#F#"5{ATN  LINE -{ RETURN  LINE VAL$ zO THEN 'o&COS z~#fo"7{x24{y THEN ? THEN ? THEN ? THEN ?<2={*7{ THEN |USR :={_ STEP ASN <>&NOT z MERGE $CHR$ " STEP   POKE 5[A]▛( PAPER [O]t[RWk▛6 OVER @ATTR [K]INKEY$6 STEP jCOS ` AND = COPY BIN W% RUN  LINE [Q]yT1 LIST  OPEN #ATN [M]lVA-> COPY 2;{<>SIN }@{"$$$$""""%%%%$$$"$$$$""""%%%%$$$"$$$$""""%%%%$#"-,,)')"$$$$""""%%%%$$$"$$$$""""%%%%$$$"$$$$""""%%%%$#"-,,)'))"%-,%()))%'%$$"777.%-,%()))%'%$$!""""%-,%()))%'%$$"777"%-,%()))%'%$$!""""""$"$%%%$"$"""$"$%%%$"$)))))))))"$$$$""""%%%%$$$"$$$$""""%%%%$$$"$$$$""""%%%%$#"-,,)')! > OPEN # RETURN !▟/68!H/68 STEP k> STEP > BEEP > BEEP > BEEP !ABS ~F RESTORE  OR  STEP SCREEN$ ~>  BEEP STR$  PLOT   LLIST #~<(= RESTORE  BEEP  STEP SCREEN$ ~ STEP [R]▛ LLIST  LOAD  OR  STEP SCREEN$ ~>  BEEP > BEEP STR$  NEXT > RESTORE  BEEP  LLIST #~PI>=>=>_ BEEP  STEP v©> BEEP > BEEP  STEP v©> BEEP <>JAMES BOND 007 COPY ON LOCATION COPY  COPY 'M' COPY H.Q. COPY  COPY Your ref..AVTAK COPY  COPY Our ref..M/MP COPY  COPY  COPY WELL DONE 007 STOP COPY YOUR CODE FOR CITY HALL IS COPY QRS21 STOP COPY  COPY GOOD LUCK! STOP COPY  COPY END OF MESSAGE STOP COPY v CLEAR <>( INVERSE n|TAB g>7NOT %l POKE y THEN x RETURN 0B RETURN  OPEN # RETURN >  LOAD CODE < THEN CHR$  INVERSE #1>© FLASH  RETURN  FORMAT z<CHR$  RETURN ; RETURN <> PRINT :H/ NEW 8 OPEN # RETURN >© FLASH  RETURN  CLS 8 CAT  LET <> NEXT > OPEN # RETURN !? FOR  MERGE | NEW (%} NEW  LPRINT ( LPRINT | RETURN @(PI GO SUB R MOVE  FOR <>z NEW USR { AND  _?[P] NEW  SAVE ▘W<>  RESTORE  OR w#  CLS STR$  LLIST  POKE <>z NEW  PLOT  XW<>! LIST EXP X GO SUB VAL <> STEP VAL$  GO SUB [ COPY ( STEP ▙VAL$  STEP RND#  FOR  MOVE  DATA <> STEP VAL$  GO SUB [ COPY  STEP RND#  PLOT   MOVE  LOAD <> FOR  MERGE PI GO SUB R MOVE  FOR <> FOR  MERGE  MOVE  FOR <>! LIST SGN :3 COPY PI(=  DRAW :0 COPY PI>==  DRAW <>:0 COPY  VERIFY  NEW 20 COPY  THEN O >CODE 2k COPY NOT ▜▝:0 COPY  AND  NEW 20 COPY  THEN O >CODE 2k COPY NOT ▜▝:2 COPY PI : COPY  AND  RETURN @ FORMAT  RETURN  8O:2 COPY PIUSR y2 COPY :2 COPY PI  STOP : COPY  VERIFY 0 INPUT :2 COPY  INPUT 22 COPY  STEP z▝>2 COPY  STEP l▝: COPY _ NEW  SAVE W THEN ? THEN ? THEN ?!LHO" COPY G{[C] FOR !VAL EXP  THEN ▜ THEN ' THEN 'O~# IF <> GO SUB [ COPY CODE  STEP # RANDOMIZE <>!LY~ INPUT w# RANDOMIZE <>:< COPY PI(:1 COPY :0 COPY  NEW !0[U](![Q][U]EHNOT  CIRCLE ▚ RESTORE  OR  MERGE !<=  DRAW ~# IF  MOVE STR$  LLIST <>!` COPY CODE w RETURN  RETURN  GO SUB x/ THEN  THEN  RETURN  OUT  GO SUB x NEW   THEN  OVER  RETURN IN  GO SUB x NEW   THEN  VERIFY  RETURN © GO SUB x NEW  RETURN >= THEN  NEW <>!▘▝P STEP [A]▘NOT ▘DAMAGECODE  FLASH  NEW 2` COPY <>! COPY uH STEP )▘>: STEP FN ▝ STEP )▘>: STEP FN ▝~ STEP FN ▝# RANDOMIZE <>~<w RETURN :<>~<w RETURN 6<>:A COPY <2A COPY  RETURN 2 CIRCLE CODE 2A COPY ! COPY  STEP 3▘ PAPER ▘60+ STEP 9▘ PAPER ▘60+ STEP 3▘ PAPER ▘60+ STEP 9▘ PAPER ▘60+~<w RETURN 4 PAPER ▘+~ RETURN 2 PAPER ▘! COPY 60# CLS NOT ▘~ STEP FN ▝# RANDOMIZE <>! OPEN #[T]/[U] DRAW  GO SUB LN <>!4[L] CIRCLE [K] DRAW  GO SUB VAL <>! INPUT [K]h RESTORE   IF  MOVE  STEP RND FOR  LIST <>! CIRCLE [K]h RESTORE   IF  MOVE  STEP RND FOR  LIST <> RESTORE  OR  STEP }! CLS PI(=  DRAW ~# STEP RND SAVE STR$  LLIST <>! INPUT [K] RESTORE   IF  MOVE  STEP RND FOR  LIST <>!▙[T]NOT  RETURN ▘! CIRCLE [K] RESTORE   IF  MOVE  STEP RND FOR  LIST <>!x[T]NOT !J[L] INPUT [K]d~ STEP  RANDOMIZE <>! OPEN #[T]/[U]d~ STEP  RANDOMIZE <>!4[L] CIRCLE [K]NOT 9!ABS [T][U]NOT I STEP VAL ▘: COPY =2 COPY  RETURN (PIUSR >2 COPY * COPY #" COPY : COPY <2 COPY : COPY <2 COPY  STEP M STEP ▚: COPY  RETURN  LINE 3 RETURN USR NOT C STEP  AND ▘: COPY <2 COPY  RETURN (  RETURN USR >2 COPY * COPY +" COPY : COPY =2 COPY : COPY =2 COPY  STEP Y STEP >=: COPY  RETURN  LINE S RETURN USR NOT / STEP [U]▘: COPY =2 COPY  RETURN ("PIUSR >2 COPY * COPY ~" COPY : COPY <2 COPY : COPY <2 COPY  STEP e STEP ▙: COPY  RETURN  LINE  RETURN USR NOT - STEP [I]▘: COPY <2 COPY  RETURN (% RETURN USR >2 COPY * COPY ~PI GO SUB B" COPY : COPY =2 COPY : COPY =2 COPY  STEP q STEP X: COPY  RETURN  LINE  CLS ▘ RETURN USR NOT  STEP  STOP NOT [T] STEP #▗NOT [T] STEP  STOP NOT e STEP #▗NOT eNOT #▗NOT y▗NOT eNOT s▗NOT  STOP NOT g▗NOT [T]NOT m▗NOT #▗NOT y▗NOT eNOT s▗NOT  STOP NOT g▗NOT [T]NOT m▗: COPY =2 COPY USR : COPY  RETURN >8>2 COPY !©▗:2 COPY PI(:< COPY PI:1 COPY  :0 COPY  THEN ?PI(###=  IF  DIM * COPY  CIRCLE [K] INK [Q][J] INK  STEP cSTR$  LLIST ~ MOVE  STEP RND CLS   DIM <> OR  FOR  FOR STR$ <> OR PI GO SUB B FOR PI GO SUB B FOR STR$ <>![B][L]FN HX OR  MERGE  RESTORE  GO SUB VAL  LLIST  MOVE STR$  STEP # GO TO NOT - OR > COPY  STEP RND IF STR$  INK >r INK <>* COPY  CIRCLE [K] INK [Q][J] INK : COPY Oy RETURN A8 RETURN ABS 0: COPY  RETURN G8~ MERGE  STEP  BRIGHT ▘ MOVE # INK  INK  STOP <> MERGE  STEP F LIST * COPY  CONTINUE x[T] INK TAN [K] INK : COPY Oy RETURN A8 RETURN ABS 0: COPY  RETURN AT 0~ MERGE  STEP  BRIGHT ▘ MOVE # INK  INK  STOP <> MERGE  STEP F LIST * COPY  CIRCLE [K] INK [Q][J] INK : COPY Oy RETURN G8! RETURN SGN 0: COPY  RETURN A8~ STEP  BRIGHT ▘ OR ~ INK  FOR  FOR  INK STR$  FLASH <> STEP F DIM * COPY  INPUT [K] INK ACS [J] INK : COPY Oy RETURN G8! RETURN SGN 0: COPY  RETURN INKEY$0~ STEP  BRIGHT ▘ OR ~ INK  FOR  FOR  INK STR$  FLASH <> STEP F DIM :5 COPY PI(CODE 25 COPY <>:` COPY  NEW  CODE 2k COPY :` COPY  THEN G  THEN O(:k COPY PI  STEP  THEN  THEN O :k COPY PI  STEP  DATA :` COPY  THEN W  THEN _>= THEN WUSR NOT  CLEAR  THEN _USR NOT ▝!LN LN 6e GO SUB VAL >NOT 2ee!TAN ▚"fe NEXT >LN  GO SUB G GO SUB ^ CLS <> NEXT  PRINT  OR  MERGE  RESTORE  STEP ?▘ STEP  PLOT  ▚ STEP 0▜ STEP  BORDER ▜ LLIST  MOVE STR$  LET  CLS <>!pPI@ OR ~ STEP ##  RUN STR$  MOVE  LIST <>!VAL INKEY$ LLIST H CIRCLE ▚:2 COPY PI ! NEW J STEP ▜!FU RESTORE  THEN + CLS  LLIST 0 THEN  AND <> THEN ▚<>! LLIST J STEP ▜!AU RESTORE  THEN # CLS  LLIST 0 THEN  RETURN <> THEN PEEK <><>` COPY  THEN g>=!  :H/ OPEN # RETURN  INPUT  MERGE OzCOS y  RANDOMIZE  MOVE +O|ASN y  GO TO <>:< COPY PI :` COPY  THEN g>=: COPY  RETURN  CIRCLE :2 COPY PI>=CODE 2= COPY <2< COPY :0 COPY 21 COPY : COPY  RETURN USR :0 COPY  AND  NEW 20 COPY := COPY <2= COPY  RETURN  CIRCLE CODE 2< COPY 22 COPY NOT z▝! COPY : COPY  AND [G]0 GO SUB DG#: COPY  AND [G]0 GO SUB D THEN ? THEN ? THEN ? THEN ?<2@ COPY :$ COPY =2$ COPY USR :@ COPY 2$ COPY !X6N>2> COPY !@NOT <▜:> COPY PI>=:? COPY =2? COPY USR >2? COPY !X6JCODE 2> COPY <>DISKED BY NORTON1 KEY OPTION 12 KEY OPTION 23 KEMPSTON JOY4 INTERFACE II5 RESTART GAME OPTION 1 OPTION 2Caps Shift -left - MZ -right- Sym ShiftP - up  - QL -down - AB to Space -fire - Caps to V© HORRORSOFT▖ INPUT  STEP < ! LET ▖ REM PNOT [A]▘X NIXMUSR Y M> STEP  STEP k> STEP  STEP  CLEAR ▖!▞ OR ^#V#N#F#~# RESTORE  FOR  STEP 3 LLIST STR$  GO TO !IX THEN  RETURN <> STEP %▞ CLEAR  THEN VAL$  CLEAR  THEN n( IF :/ RETURN 18 LOAD  RETURN 60 FOR  RETURN 5 LINE  BRIGHT ▞ VERIFY 0 PRINT !IXM STEP 3 LET !X@_  DRAW  THEN  RETURN ![S]▞=(## RANDOMIZE ^#V GO SUB S COPY NOT W▞CHR$ ▝SCREEN$ ▞▘ REM ▞!` COPY CODE w RETURN © GO SUB x/ NEW w RETURN  CLS  GO SUB x NEW   THEN  OVER  RETURN  CLEAR  GO SUB x NEW   THEN  VERIFY  RETURN  RETURN  GO SUB x NEW  RETURN >= THEN  NEW <>!@@ COPY 6 GO SUB VAL <>!` COPY CODE w RETURN  LOAD  GO SUB x/ THEN  THEN  IF  THEN  THEN  THEN  THEN  THEN  THEN  THEN  THEN <>!RNDEH CIRCLE ▚ STEP M STEP  DEF FN ▚ STEP  DIM ▚ STEP  PLOT  ▝ STEP 8▝NOT FN Y OR  MERGE  RESTORE  GO SUB VAL  LLIST  MOVE  FOR   FOR STR$  DIM <>![R][J][Q][J]* GO SUB VAL <>!<>[K] LINE [K]* GO SUB LN <>!ATN [J][Q][J] GO SUB VAL <>!COS [K] LINE [K] GO SUB LN <> PRINT !EXP PI(#=  DRAW ~ INK  INK  LET <>:5 COPY PI(CODE 25 COPY <>:7 COPY PIUSR >27 COPY  STEP 29 COPY <>:7 COPY PI>=:9 COPY  RETURN q LINE I▛ STEP E LINE I▛:9 COPY  RETURN j(▛ STEP NOT :l COPY PI R:4 COPY  AND 24 COPY  LINE SCREEN$ ▛ RETURN d8>23 COPY  STEP  MOVE ▛:2 COPY  INPUT 22 COPY : COPY  VERIFY 0CODE 2 COPY :j COPY 20 COPY  STEP 8▝ STEP z▝ STEP  RESTORE h STEP © STEP ' STEP © STEP  RESTORE h: COPY  RETURN  FORMAT  STEP  OR ▗NOT  OR ▗:#▛PI(24 COPY  ERASE  MOVE ▛NOT SCREEN$ ▛>2#▛>23 COPY :4 COPY  AND  NEW  STEP E~O:0 COPY  THEN ? THEN ?< NEW  AND EXP USR :: COPY <2: COPY  RETURN  LINE ©<> RESTORE  GO SUB K  COPY  GO SUB [" COPY y NEW ox THEN ' THEN ' NEW TAB  THEN ' THEN  THEN  THEN  GO SUB C  COPY  GO SUB S" COPY  LLIST <>:H/ THEN ? THEN ? THEN ?o COPY  OR  STEP i▛y NEW ASN  OPEN # RETURN STR$  NEXT <> STEP ' OR  STEP [A]▛> OPEN # RETURN !X~ INPUT @w#xLEN   PLOT  STR$  RESTORE :26 COPY <> STEP  STEP [A]▛:4 COPY  THEN ? THEN ? THEN ?_ NEW  SAVE W THEN ? THEN ? THEN ?O!bP"!VAL EXP  THEN ▜ THEN ' THEN 'O~# IF <>*$ CLS <>M[K] MERGE  OR  RESTORE !5[K]>[B] THEN ? THEN ? THEN ?PI2B COPY (>[A]2C COPY O"~ LLIST STR$  MOVE <>* COPY  COPY ~ RETURN 8 RETURN  8!#~ RETURN 8 RETURN  8}~ RETURN 8 RETURN  8#~ RETURN 8 RETURN  0> VERIFY <>CODE  AND <>> COPY G: COPY O!~ NEW G! CONTINUE [C](##=  CLS ^#V!>=[C]xPI(# CLEAR ~ VERIFY P FOR (~ AND Pw DRAW <>CODE 2l COPY * COPY z( RETURN Q 6>2l COPY #  GO TO  BORDER : COPY  RETURN  CIRCLE >2 COPY 2 COPY  STEP  REM ▗ STEP Y STEP 'NOT © REM ▗ STEP Y STEP 'NOT © LPRINT  FORMAT  LIST  LIST 0 FORMAT P FORMAT 0 LIST [A] LPRINT ,+:+, SAVE tSGN SGN SGN t SAVE USR   LPRINT `[Q][Q][Q]` LPRINT  LPRINT [Q]USR .===. SAVE 4 CLOSE #/ CLOSE #4 SAVE <CHR$ H POKE <=$P<> STEP  DEF FN  BEEP  FORMAT "+▜ CAT U MOVE "`J VERIFY -4 BRIGHT  VERIFY .Hk INK 9mCOS  STOP FO BORDER OH AND  GO TO [© PRINT lg CIRCLE  PRINT mB[M] SAVE s&SI[U][C]<>[U]RI&8T THEN $[C]I$[C]IPIT8p>=$[E]J&[C]J$[E]>=p**JJjj> LPRINT VAL [Q]INKEY$SQR SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ INT  LINE USR [A] CONTINUE AT AT SCREEN$ SCREEN$ AT AT FN VAL [Q]USR < FLASH $I[C]$I[D]RNDI[C]$I[C]RND<>[C]$I[C]$ THEN <@@USR @USR @USR @@55UU55e INVERSE UUUUUUUUU]SPPP LPRINT `PXTTRRVV|H@@PQPQQPQPQPQQPQQQQQQPQPQQPQQQPPQQ OPEN # LINE [O]BIN [C] TO e STEP  FOR  MOVE ▚ MERGE G INK  BRIGHT  BRIGHT POINT  LPRINT J DATA  DRAW  DATA INKEY$ NEW C FOR  DRAW  GO SUB  CAT  LIST  POKE + SAVE @ SAVE ▞BIN [T] BEEP  BRIGHT R INPUT  FORMAT ▖ LOAD ▛ CONTINUE SGN STR$ <><>S ERASE SCREEN$  TO S FORMAT ACS <= STOP d NEW h REM lq PAUSE  PLOT  | LPRINT  LLIST  STOP  READ  DATA  RESTORE  BORDER  CONTINUE  REM  GO SUB  LIST  PAPER X VERIFY T ERASE PL LINE  AND  BRIGHT  FLASH  PAPER  INK  CIRCLE  BEEP  MERGE  CLOSE # ERASE  CAT  TO y NEXT  LOAD mi BORDER e READ a OUT © RANDOMIZE  PRINT so GO SUB k DIM g RESTORE  LET  INPUT  GO TO  FOR  DIM  CONTINUE  BORDER  NEW  RESTORE  DATA  DIM  NEW  DATA  READ  LLIST  LPRINT  OUT  OVER  INVERSE  BRIGHT C<>S MERGE W INK [ INVERSE =NOT M CAT Q OPEN #U BEEP  THEN  DEF FN  FORMAT  MOVE  OPEN # CLOSE # MERGE  VERIFY  BEEP  CIRCLE  OPEN # VERIFY  CIRCLE  INK  FLASH  BRIGHT  INVERSE  OVER  OUT  LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY 
  65535 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrkkkkkkrrrrrrrrrrrrrrrrrkkkkkkrrrrqrrrrrrrrrrrrkkkkkkrrrrrrrrrrrrrrrrrkkkkkkrrrrrrrrrrrrrrrrrkkkkkkrrrrrrrrrrrrrrrrrkkkkkkrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrqrrrrrrrrqrrrrrrrrrrrrrrrrrrrrrrrrr COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  SAVE 8? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  SAVE 0© COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LIST ` COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ▚ LIST a COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  OUT NOT  LIST NOT  CLS  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CAT NOT  LPRINT NOT  NEXT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY <= LLIST ▜ LLIST ▜ READ  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY NOT  LET ▜ LLIST NOT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR  SAVE NOT NOT  COPY  COPY  COPY < COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LPRINT |NOT NOT > COPY  COPY  COPY ~ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LIST <c AND < DRAW ? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW #BIN x? PAUSE O COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CAT  CONTINUE  LPRINT  NEXT  GO SUB ATN  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY NOT NOT [L] INK NOT NOT  FLASH k COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR  LET  BORDER  BORDER  VERIFY  FLASH  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR 8 INK [L] STEP COS  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR [T] OR 0 FOR g COPY @ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LIST CCHR$ USR  PLOT   CAT  COPY [Q] COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN CCHR$ © PRINT CODE  COPY VAL  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY CHR$ ▜ LLIST C COPY  FOR g COPY 0 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY IN  CLEAR  COPY  COPY  VERIFY  FLASH  COPY  LIST  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  STEP COS  COPY  LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  FLASH k COPY  COPY  COPY  COPY  COPY  COPY  COPY IN  CLEAR  COPY  COPY  NEW  BEEP  COPY  COPY  COPY  COPY  COPY  COPY CHR$ ▜ LLIST C COPY  PRINT CODE  COPY  COPY  COPY  COPY  COPY  RETURN CCHR$ © NEXT o COPY  COPY  COPY  COPY  COPY  LIST CCHR$ USR  NEW  BEEP  COPY  COPY  COPY  COPY  COPY USR [T] OR 0 STEP COS  COPY  COPY  COPY  COPY  COPY USR 8 INK [L] FLASH k COPY  COPY  COPY  COPY  COPY USR  LET  BORDER  BORDER  VERIFY  FLASH  COPY  COPY  COPY  COPY  COPY NOT NOT [L] INK NOT NOT  GO SUB ATN  COPY  COPY  COPY  COPY  COPY  CAT  CONTINUE  LPRINT  NEXT  NEXT O COPY  COPY  COPY  COPY  COPY  DRAW #BIN x? DRAW ? COPY  COPY  COPY  COPY  COPY  LIST <c AND < COPY  COPY  COPY  COPY  COPY  COPY  COPY  LPRINT |NOT NOT > COPY  COPY  COPY  COPY  COPY  COPY  COPY USR  SAVE NOT NOT  COPY  COPY  COPY  COPY  COPY  COPY  COPY NOT  LET ▜ LLIST NOT  COPY  COPY  COPY  COPY  COPY  COPY  COPY <= LLIST ▜ LLIST ▜ READ  COPY  COPY  COPY  COPY  COPY  COPY  COPY  CAT NOT  LPRINT NOT  NEXT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  OUT NOT  LIST NOT  CLS  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ▚ LIST a COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LIST ` COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  SAVE 0© COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  SAVE 8? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY < COPY  COPY  COPY 0 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ~ COPY  COPY  COPY ~ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ~ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY 0 COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?~ DRAW  SAVE  LIST  LLIST STR$ ~ DRAW  SAVE  LIST  LLIST NOT ?>} CLS  NEXT  DATA  CONTINUE  COPY ? COPY  RETURN  RANDOMIZE  NEW [I]0 CIRCLE  GO TO  PLOT   CLS  CLEAR ~ COPY  COPY  COPY  COPY  LPRINT  LPRINT 8lTl8USR  COPY  COPY  COPY  COPY  LIST 8lTl9 COPY  LPRINT  SAVE  RETURN  COPY ? CAT #<© CLS  POKE  CONTINUE  FORMAT  COPY ▝ LLIST  LET  SAVE  SAVE |PEEK [P]O/?~ DRAW  SAVE  LIST  LLIST STR$ ~ DRAW  SAVE  LIST  LLIST NOT ?>} CLS  NEXT  DATA  CONTINUE  COPY ? COPY  RETURN  RANDOMIZE  NEW [I]0USR [Q] COPY  COPY  COPY  COPY  LPRINT  LOAD ?o_o? COPY  COPY  COPY  COPY  LIST CODE [Q][Q]LN AT TAN AT LN [Q][Q] COPY  LPRINT  SAVE  RETURN  COPY ? CAT # COPY ▝ LLIST  LET  SAVE  SAVE |PEEK [P]O/?~ DRAW  SAVE  LIST  LLIST STR$ q RANDOMIZE aNOT ?>} CLS  NEXT  DATA  CONTINUE  COPY ? COPY  RETURN  RANDOMIZE  NEW [H] FORMAT  CIRCLE  GO TO  PLOT   CLS  CLEAR ~ COPY  COPY  COPY  COPY  LPRINT  LPRINT 8lTl8 THEN _ COPY  COPY  COPY  LIST 8lTl9 COPY  LPRINT  SAVE  RETURN  COPY 8#<© CLS  POKE  CONTINUE  FORMAT  COPY ▝ LLIST  LET  SAVE  SAVE |PEEK [P]O/ COPY ▝ COPY  COPY ]cc] COPY  COPY ]]]] COPY  COPY ]]]] COPY  COPY <N^N< COPY >.... COPY 8lTd8 COPY ▝▝ COPY  CLEAR  CLEAR  COPY  COPY  CLS  CLS  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  SAVE ~?▝[M]ACS SCREEN$ ACS [M]USR  LPRINT  LIST  SAVE  DRAW ~???USR  COPY [D][K][F][C][C][F] COPY USR ? COPY  CLS  CLS  CLS  CLS  COPY ?USR  COPY  RANDOMIZE  RESTORE  RESTORE  RANDOMIZE  COPY USR ? COPY  COPY ?USR @@@@@@@@@@@@@@USR ` COPY  COPY  COPY  COPY ?? COPY  COPY ?? COPY  COPY ?? COPY  COPY ?? COPY  COPY ?? COPY  COPY ?? COPY  COPY ?? COPY  COPY  COPY  COPY  COPY  COPY  RETURN  CLEAR  CLEAR  CLEAR  CLEAR  CLEAR  CLEAR  CLEAR  CLEAR  CLEAR  CLEAR  RETURN  COPY  COPY  COPY  COPY  COPY  COPY <n OUT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  BORDER NOT NOT  BORDER  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY <BB>< COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ~@|B< COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  RETURN  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY <BB< COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ; OUT  COPY  DRAW  DRAW  COPY  COPY  DRAW  DRAW  COPY  COPY  DRAW  DRAW  COPY  COPY  DRAW  DRAW  COPY  COPY  DRAW  DRAW  COPY  COPY  DRAW  DRAW  COPY  COPY  DRAW  DRAW  COPY  COPY  COPY  COPY  COPY  COPY ©IN IN IN IN IN IN IN IN IN IN © COPY NOT  FLASH NOT  COPY  COPY  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  CLS  DRAW  LIST USR  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  DRAW  LIST USR  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  GO TO  LIST USR PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN SGN VAL USR  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  DRAW  LIST USR ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS IN SGN VAL USR USR  LIST  GO TO  LOAD  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  INPUT  LOAD  GO TO  LIST USR USR  LIST  BRIGHT  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  BRIGHT  LIST USR USR p/WUUUUUUUUUUUUUUUUW/pUSR USR p/WUUUUUUUUW/pUSR  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT  OUT ? LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD ? RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN 7}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}} CLEAR = LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD  LOAD ?ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS ABS  CLEAR =7 RUN wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww RUN 7; FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH  FLASH ;SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$  REM :SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$  REM :~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN ~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~~ LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  COPY  LET  LET  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  COPY  LET  LET  COPY  TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN ~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~ RUN  RUN  RUN  RUN  RUN  RUN  RUN ~~~~~~~~ LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  COPY  LET  LET  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  LIST  LIST  LIST  LIST  COPY  COPY  COPY  LET  LET  COPY  TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 TO  TO 33 COPY  COPY  COPY  COPY [P] LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  SAVE ▜ COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW NOT IN  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  RANDOMIZE <=IN  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  LIST USR  COPY  COPY  COPY  COPY  COPY ©▝ RETURN  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?USR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW NOT ? COPY  COPY  COPY  COPY  COPY  COPY  RETURN  RANDOMIZE <=? COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  LIST USR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LIST  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  COPY  COPY  COPY  COPY  COPY  COPY  DRAW NOT ? COPY  COPY  COPY  COPY  COPY  COPY  SAVE <=? COPY  COPY  COPY  COPY  COPY  COPY  DRAW  LIST USR  LOAD  LET  RETURN  COPY  COPY  COPY  COPY  COPY ?USR  COPY  COPY  COPY  COPY  COPY  COPY  DRAW  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  COPY  COPY  COPY  COPY  COPY  DRAW NOT ? COPY  COPY  COPY  COPY  COPY  SAVE <=? COPY  COPY  COPY  COPY  COPY  DRAW  LIST USR  COPY  COPY  READ  DRAW  COPY  COPY  COPY  COPY  COPY  SAVE  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW NOT ? COPY  COPY  COPY  COPY  SAVE  BORDER  COPY  COPY  COPY  COPY  DRAW  LIST USR  COPY  COPY  COPY  COPY ©▜ SAVE  COPY  COPY  COPY  COPY  LPRINT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  DRAW NOT ? COPY  COPY  COPY  SAVE  BORDER  COPY  COPY  COPY  DRAW  LIST USR USR  LIST  DRAW  COPY  COPY  COPY  COPY  LLIST  RETURN  COPY  COPY  COPY  DRAW  COPY  COPY ?USR  COPY  COPY  COPY  COPY  COPY © COPY  DRAW NOT ? COPY  COPY  DRAW  READ  COPY  COPY  DRAW  LIST USR USR  LIST  DRAW  COPY  COPY ?<= SAVE  COPY  COPY  LIST  COPY  COPY  COPY  COPY  COPY  COPY USR ? DRAW NOT ? COPY  DRAW  READ  COPY  DRAW  LIST USR USR  LIST  DRAW © LET  RETURN ©▝ RETURN  DRAW  COPY  COPY USR <NOT ? DRAW  READ [P]| LIST USR USR  LIST  READ  DRAW  SAVE  COPY  READ #< READ [M]pUSR  COPY  COPY  COPY  COPY  COPY  LET  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?NOT  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  READ  CLEAR  COPY  COPY  COPY  COPY  COPY  COPY  COPY ? CAT  NEXT  CLEAR  COPY  COPY  COPY  COPY  COPY ? COPY  COPY  COPY  COPY  COPY  COPY  DRAW  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  SAVE  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?USR  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY © LET  RETURN  COPY  COPY  COPY  COPY  COPY  COPY ?<= RANDOMIZE  RETURN  COPY  COPY  COPY  COPY ? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY USR ? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY © COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?NOT  DRAW  COPY  COPY  COPY  COPY  COPY ©[P] READ  DRAW  COPY  COPY  COPY  COPY ? CLEAR NOT ? COPY  COPY  COPY  COPY  COPY  COPY  LIST  COPY  COPY  COPY  COPY  COPY  COPY © COPY  COPY  COPY  COPY  COPY  COPY © COPY  COPY  COPY  COPY  COPY  COPY  COPY © LET  RETURN  COPY  COPY  COPY  COPY ? CAT  LET  RETURN  COPY  COPY  COPY ? COPY  COPY  RETURN  LET  COPY  COPY  COPY  COPY  COPY  DRAW  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ?<= SAVE  COPY  COPY  COPY  COPY  BORDER  SAVE  COPY  COPY  COPY ? COPY  COPY  COPY  COPY  COPY  SAVE <=? COPY  COPY  COPY  COPY USR ? COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  LET  RETURN  COPY  COPY © NEXT  DRAW  COPY  COPY ?? COPY  COPY  COPY  COPY  DRAW  READ  COPY  COPY  COPY  LIST  COPY  COPY  COPY  DRAW  COPY  COPY  COPY  RETURN  COPY  COPY ?<= SAVE  COPY  COPY ?<= RANDOMIZE  RETURN  COPY ?? COPY  COPY  RETURN  LET © COPY  DRAW  COPY  COPY  COPY  COPY  COPY  RETURN  COPY  LLIST  RETURN ©[P] READ  DRAW  COPY ?? COPY  SAVE <=? COPY USR ? COPY USR ?<<= SAVE ? CAT  NEXT  DRAW ?> LLIST [P] LIST  COPY  LPRINT [M] BORDER  RANDOMIZE >:CHR$ F PAUSE <="N<> MOVE  STEP  PAPER  FORMAT ". MOVE "U MOVE "^N MERGE +4 PAPER  VERIFY .Fo CIRCLE 7m- DATA IO BORDER OFBIN  GO TO [ POKE jg VERIFY  PRINT m@[K] SAVE seeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeerrrrrjjjjjjjjjjjjjrrrrrrrrirqqqqjjjjkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkssssssssttUSR USR USR USR USR USR USR USR 00000000NNJNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNLLLLLNjjjjjjjjjjjjjjjjjjjjjjNNNNLLLLLNjjjjjjjjjjjjjjjjjjjjjjNNNNLLLLLNjjjjjjjjjjjjjjjjjjjjjjNNNNLLLLLNrrrrrrrrrrrrrrrrrrrrrrNNNNLLLLLNrrrrrrrrrrrrrrrrrrrrrrNNNNLNNNLNrrrrrrrrrrrrrrrrrrrrrrNNNNLLLLLNrrrrrrrrrrrrrrrrrrrrrrNNNNNNNNNNrrrrrrrrrrrrrrrrrrrrrrNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNKKKKKKK``hhppxxKKKKKKKKKKKNNNNNNKKKKKKKMMMMNJJJKNNNNNNNNMKNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNrrrrrrrrrrrrrrrrrrrrrNNNNNNNNNNNrrrrrrrrrrrrrrrrrrrrrNNNNiiiiiiNrrrrrrrrrrrrrrrrrrrrrNNNNiiiiiiNrrrrrrrrrrrrrrrrrrrrrNNNNiiiiiiNrrrrrrrrrrrrrrrrrrrrrNNNNiiiiiiNrrrrrrrrrrrrrrrrrrrrrNNNNffffffNrrrrrrrrrrrrrrrrrrrrrNNNNVVVVVVNrrrrrrrrrrrrrrrrrrrrrNNNNNNNNNNNrrrrrrrrrrrrrrrrrrrrrNNNNNNNNNNNrrrrrrrrrrrrrrrrrrrrrNNNNNNNNNNNrrrrrrrrrrrrrrrrrrrrrNNNUSR [Q] LPRINT `[Q][Q][Q]` LPRINT USR ` FORMAT  CONTINUE 8VAL [Q]@ LIST hLN LN h LIST @[Q]VAL 8 CONTINUE  FORMAT `USR  LPRINT `[Q][Q][Q]` LPRINT [Q]USR  LPRINT  LIST 0VAL [Q]@ LIST 8 CIRCLE  CIRCLE 8 LIST @[Q]VAL 0 LIST  LPRINT USR [Q] LPRINT `   ` LPRINT USR ` FORMAT  CONTINUE 80 @ LIST h88h LIST @ 08 CONTINUE  FORMAT `USR  LPRINT `   ` LPRINT [Q]USR  LPRINT  LIST 00 @ LIST 88 LIST @ 00 LIST  LPRINT USR [Q] LPRINT `   LPRINT ` FORMAT  CONTINUE 80[Q]@ LIST h88h LIST @[Q]08 CONTINUE  FORMAT ` LPRINT   ` LPRINT [Q]USR @USR @@@@USR @ ! !"#"#$'*-03%(+.14&),/25?BE69<@CF7:=ADG8;> COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY  RETURN  DRAW  IF  PRINT  LPRINT >=[E]+OIN ?© COPY  COPY ©?_CODE )▖ CLOSE # LPRINT  PAUSE  CLEAR  DRAW  RETURN  COPY  P P COPY  P P P P COPY !Q!Q[Q] FORMAT ▗[Q] FORMAT  COPY  COPY  CLEAR  CLS  LET  READ <>[F][B]ATTR <= OUT IN  COPY  COPY  COPY  RETURN  DRAW  IF  PRINT  LPRINT >= COPY  COPY +OIN ?© COPY <=>?@ABC COPY  COPY  COPY  COPY  COPY  COPY  COPY  COPY ~~~<0~~0<~ COPY !Q!Q COPY [Q] FORMAT ▗[Q] FORMAT !Q!Q COPY [Q] FORMAT ▗[Q] FORMAT  COPY  COPY  COPY  DRAW  RETURN  COPY  COPY  OUT  CAT <=NOT USR  LPRINT  LIST  DRAW  CAT NOT USR USR USR  LIST  RETURN  COPY  COPY  COPY  COPY  COPY ▚NOT NOT  LLIST  LET  SAVE |<NOT  LET 8CHR$  COPY  COPY  COPY  COPY ▜▜NOT NOT c#[L] BORDER  INK [T]CC▜IN  COPY  COPY  COPY  SAVE  SAVE  LIST  LIST  LIST  LPRINT  LLIST  LLIST NOT NOT  AND BIN  CONTINUE  INK  BORDER [L] OR CHR$ CHR$  LLIST  CLEAR  COPY  COPY  COPY 80`aNOT NOT ▜><x LPRINT NOT 0USR C COPY  COPY  COPY  COPY ?© COPY  COPY  CLS  NEXT  READ NOT ? NEXT NOT © COPY  COPY  COPY  COPY  CLEAR  LLIST CHR$ CHR$  OR [L] BORDER  INK  CONTINUE BIN  AND NOT NOT  LLIST  LLIST  LPRINT  LIST  LIST  LIST  SAVE  SAVE  COPY  COPY  COPY  COPY CUSR 0NOT  LPRINT x<>▜NOT NOT a`08 COPY  COPY  COPY  COPY  COPY ©NOT  NEXT ?NOT  READ  NEXT  CLS  COPY  COPY ©? COPY  COPY  COPY  COPY  COPY  RETURN  LIST USR USR USR NOT  CAT  DRAW  LIST  LPRINT USR NOT <= CAT  OUT  COPY  COPY  RETURN  DRAW  COPY  COPY  COPY  COPY CHR$ 8 LET NOT <| SAVE  LET  LLIST NOT NOT ▚ COPY  COPY  COPY IN ▜CC[T] INK  BORDER [L]#cNOT NOT ▜▜ COPY  COPY >]©©c]]]c©©><;;;< SAVE tSGN SGN SGN t SAVE | RETURN  RETURN  AND INT INT INT  AND  RETURN  RETURN INT |.===. SAVE < BRIGHT  BRIGHT  BRIGHT < SAVE  COPY ▝▝ COPY <$$$$$$<3[P]<C> PAPER CHR$ ▝LH"H100000100000yy<> ERASE .899 NEW  [ MERGE pSIN .[P]USR VAL H$[E])$2L[I]0P[I])$2L$[E](P[A](2L$[E])$HVAL USR 6ddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd