Является частью релиза: | 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