Graphic Show

Developer(s): Eric Boisvert
Date: 1986
Type: Program
Platform(s): TS 2068

This program is to show the graphic capabilities of the TIMEX SINCLAIR 2068 and… well… show off a bit too!

Content

Related Products

Related Articles

This program is to show the graphic capabilities of the TIMEX SINCLAIR 2068 and… well… show off a bit too!...

Related Content

Image Gallery

Graphic Show

Source Code

    0 REM !@  THEN ON ERR  THEN <=+w#>EXP  DIM # READ <>PNOT INT  RUN <>QRNOT RETURN OY ARE YOU SURE?Q U I T RESTORE FOR FOR LLIST s#r+<> RESTORE ATN FOR GO SUB B PAUSE RESTORE >bkLN  CLS EXP  SAVE STOP ATN RESTORE FOR B0 CLS MERGE !j\>w STEP REM !▌h FOR STEP CODE h!▄hP STEP CODE h!▙h GO SUB [▌h FOR GO SUB \q FOR 6*▄h:▙hw!▄h GO SUB [▄h STEP CODE h!▌h GO SUB [▌h STEP CODE h*▄hWATN GO SUB R LINE <iNOT COPY h!▄h STEP CODE h:▄hG GO SUB STEP GO SUB \kh STEP FLASH ! STEP \h!!▄h GO SUB [▄h STEP CODE h*▄hATN GO SUB R LINE ▀iNOT Hi!\ahk STEP CODE h!\ch STEP CODE h!\eh STEP CODE h!▄h STEP CODE h!▌h GO SUB [▄h GO SUB K\ah STEP CODE h!\gh GO SUB [▄h@ STEP CODE h!▌h GO SUB [▌h FOR GO SUB \q FOR 6*\gh:▌hw!▄h GO SUB [▄h STEP CODE h*▄h GO SUB R LINE RETURN iNOT COS i*\ehATN GO SUB RCHR$ TAN STEP DIM 0 STEP FOR !▄h GO SUB [▄h STEP EXP h STEP [h*▄hATN GO SUB R LINE 2jNOT !▄h:\w#6*▄hATN GO SUB RCHR$ KjNOT \qj!\eh GO SUB [\eh STEP CODE h!\ah GO SUB [\ah STEP CODE h*\ehATN GO SUB R LINE tjNOT PIi!\ah GO SUB [\ah LPRINT STEP CODE h!\ch GO SUB [\ch STEP EXP h*\chATN GO SUB R LINE \njNOT \liNOT ▀i STEP REM \lh STEP FLASH ! STEP \h! STEP DIM 0 STEP FOR !\ih:\w#6*\ihATN GO SUB R LINE CIRCLE jNOT OVER h STEP REM FN h STEP FLASH ! STEP \h!< STEP DIM 0 STEP FOR STEP KE DEF FN AWKWARDNES OPEN #AWFU TO BACHELO ERASE BAC THEN BACO DEF FN BAGGAG OR BAILIF AND BAI CLOSE #BAK OR BALANC\m DRAW \m\m\m\p DRAW \m\m\m\p\m\m\m\m DRAW \m\m\m\p BRIGHT \m\m\mPEEK \m\m\m\n DRAW \m\m\m COPY COPY DRAW \m BORDER COPY COPY \m\p? COPY DRAW \mEXP COPY COPY DRAW \n CAT COPY COPY \m\o© CLS COPY COPY s COPY COPY BRIGHT \mIN CODE RETURN \m\n CLEAR © DRAW \m\p FOR COPY \m\m COPY _ DRAW \m\p IF COPY RUN COPY RETURN NOT RETURN ? GO TO RETURN IN DRAW \p LOAD COPY DRAW \m\p© COPY BRIGHT \m CLS COPY RETURN \m\p OUT COPY DRAW \m\r COPY CLEAR \h COPY ▜ OUT COPY COPY IN COPY DRAW DRAW ! COPY OUT LLIST SAVE FREE \p©NOT DRAW SAVE C SAVE © CLS CAT COPY COPY IN COPY RETURN CLS COPY COPY LPRINT ▜ DRAW ?\m\m\m\m\m\m\m\m\m\m\m\m\m\m\m\m\p COPY COPY © BRIGHT COPY IN COPY COPY OUT POKE IN GO TO \m\m\m\m BORDER COPY \m\m\p? DRAW \m\mEXP  \m\n DEF FN COPY \n COPY © OVER COPY IN GO TO © OUT POKE ? LOAD \p DRAW \m COPY COPY OUT DRAW \p COPY RETURN COPY DRAW \p© COPY LOAD \m COPY COPY IN CLEAR COPY © BRIGHT COPY IN LOAD © THEN COPY COPY © COPY © DRAW RUN COPY RUN RUN RUN RUN COPY RUN RUN RUN COPY COPY RUN RUN RUN COPY RUN RUN RUN RUN COPY RUN RUN RUN COPY COPY RUN RUN RUN COPY RUN RUN RANDOMIZE COPY COPY RUN RUN CAT COPY COPY RUN RETURN © COPY COPY RUN NEXT COPY COPY RUN RUN \p COPY COPY RUN DRAW COPY CLS COPY COPY g COPY COPY RUN RUN COPY _ COPY RUN RUN IF COPY RUN RUN COPY BEEP COPY RUN RUN RETURN IN COPY RUN COPY PRINT COPY RUN COPY RETURN \p LIST IN BORDER CLEAR © COPY RUN NEXT COPY COPY RUN COPY \p COPY RUN RUN DRAW COPY COPY RUN COPY BORDER COPY COPY RUN LOAD COPY CLEAR ▜ DRAW 9 OUT COPY COPY © CAT COPY RUN RETURN W COPY COPY RUN PAUSE IN COPY COPY COPY \f COPY COPY RUN DRAW CODE NOT COPY CLS LOAD COPY COPY IN COPY RETURN CLS COPY COPY DIM _ COPY COPY RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN OUT COPY COPY © VERIFY COPY IN COPY COPY OUT RUN IN BORDER RUN RUN RUN RUN <= COPY RUN RUN RETURN ? COPY RUN RUN LIST ? BORDER RUN RUN ▙ COPY ASN COPY © OVER COPY IN BORDER © OUT LET COPY COPY RUN COPY COPY LOAD COPY RUN COPY COPY © RUN COPY © COPY LOAD RUN COPY COPY OUT LLIST COPY © OVER COPY IN CONTINUE © OPEN # COPY COPY © COPY IN COPY TAB RUN COPY TAB TAB CODE IN CLEAR TAB TAB ABS COPY TAB TAB TAB LOAD CLEAR TAB TAB CODE © GO SUB TAB TAB SQR COPY TAB TAB TAB OUT CLEAR TAB RUN COPY IN CLEAR CODE IN CLEAR COPY GO SUB ABS COPY LOAD COPY TAB LOAD COPY © CLEAR CODE © CLS COPY GO SUB SQR COPY FLASH COPY COPY _ RETURN COPY CLEAR TAB RETURN IN COPY TAB CODE PRINT COPY CLEAR TAB COPY CODE COPY TAB CODE CLEAR © CLEAR TAB IN FOR COPY BORDER COPY RETURN _ RUN IN LOAD IF COPY CLEAR CODE RUN COPY COPY TAB COPY IN COPY CLEAR CODE CLEAR COPY COPY TAB IN LOAD COPY CLEAR TAB LOAD COPY CLEAR IN LLIST CLS OUT COPY COPY ? OUT COPY CLEAR PEEK / COPY COPY TAB LET © COPY CLEAR CODE ▛ COPY COPY GO SUB DRAW _ OUT COPY CLS SAVE COPY IN COPY RETURN NOT RETURN ? CONTINUE IN COPY COPY TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB TAB \p COPY COPY © TO COPY IN COPY COPY OUT PRINT IN GO SUB TAB TAB TAB CODE \p COPY TAB TAB SGN COPY CLEAR TAB TAB LLIST COPY GO SUB TAB CODE > COPY TAB COPY © OVER COPY IN GO SUB © OUT COPY COPY .© COPY TAB COPY LOAD BEEP COPY CODE COPY PEEK IN CLEAR IN © COPY LOAD TAB COPY LOAD CODE SAVE © BRIGHT COPY IN READ RETURN COPY COPY ©CODE _ CLEAR BORDER COPY ? RETURN 9 COPY AND CAT RETURN COPY ▗\p RETURN © COPY OUT RETURN COPY RETURN COPY NEW COPY RUN COPY COPY COPY IN RETURN COPY CLEAR COPY AND ? COPY FOR COPY COPY COPY © PLOT CLEAR © RETURN FOR COPY PLOT ©_ COPY ▚ IF COPY RETURN BEEP COPY BORDER COPY RETURN \p RUN ? BORDER PRINT COPY RETURN COPY COPY COPY COPY COPY COPY RETURN COPY COPY COPY AND ? COPY COPY RETURN LOAD COPY CLEAR IN LOAD COPY NOT COPY COPY © COPY COPY RETURN W COPY COPY PAUSE IN COPY RETURN \f COPY COPY AND <CODE OUT COPY CLS ©CHR$ COPY IN COPY RETURN OUT LIST IN DIM _ COPY RETURN LET COPY © AND COPY IN DRAW © OUT PLOT ? NEW / COPY AND 9© RETURN COPY NEW OVER COPY IN BORDER © OUT COPY COPY IN COPY © LOAD RETURN RETURN ©© PLOT © COPY ▚ RETURN CIRCLE © CLS © OVER COPY IN COPY RETURN NEXT COPY SAVE FREE ?IN RETURN <><= COPY <><> DEF FN ? CLEAR <><> LET COPY DIM <> THEN █ COPY <><> BRIGHT © RANDOMIZE <><> READ COPY STR$ COPY O COPY <> COPY COPY LOAD COPY THEN COPY COPY © RANDOMIZE OUT COPY CLS COPY <> COPY COPY OUT CLEAR CAT COPY RETURN COPY DIM SAVE NEXT COPY COPY LOAD COPY IN RANDOMIZE CAT PAUSE COPY CLEAR <> COPY \h COPY DIM <> DRAW IN COPY <> CAT RESTORE COPY RANDOMIZE <> COPY / COPY <= COPY RETURN _ RUN IN LOAD THEN COPY RANDOMIZE COPY COPY COPY <> SAVE © COPY CLEAR CAT NOT COPY COPY DIM RETURN COPY COPY THEN LOAD COPY CLEAR IN LOAD ▜ CLS COPY COPY STICK? COPY COPY DEF FN / COPY COPY <> LET © COPY RANDOMIZE THEN ▛ COPY COPY <> BRIGHT _ OUT COPY RANDOMIZE © OVER COPY IN COPY RETURN OUT RUN IN CONTINUE IN COPY RANDOMIZE <><><><><><><><><><><><><><><>>= COPY ▝ COPY ©>= COPY IN LLIST © OUT LET IN DIM <><><> DEF FN © COPY DIM <> NEXT COPY COPY <> THEN RESET COPY DIM <> BRIGHT RETURN COPY ▞ COPY © OVER COPY IN LOAD © OUT COPY COPY y COPY COPY <> CLEAR OUT BEEP COPY <> DIM RETURN IN RANDOMIZE CAT © SAVE ©<> RANDOMIZE COPY ▀ COPY CLS © BRIGHT COPY IN COPY RETURN FOR COPY STR$ RANDOMIZE COPY _ RANDOMIZE '\p COPY PI'< COPY COPY '' BORDER COPY BORDER ''? COPY ''9 COPY COPY '' CAT COPY COPY .© COPY '© BORDER BEEP COPY ' COPY >IN RUN ? COPY PRINT COPY PI COPY BORDER CODE COPY ' COPY =© BORDER RETURN FOR COPY COPY LOAD CODE _ COPY ' RESTORE COPY COPY '?/ COPY BORDER ' RANDOMIZE © COPY '/ THEN COPY COPY 'FREE P BORDER COPY RETURN OUT POKE ? LOAD \h COPY RUN FREE  BORDER LIST IN COPY COPY ?▐ COPY COPY RUN DRAW / COPY COPY PI LOAD COPY DRAW ? LOAD CLS COPY COPY _ COPY COPY 'W COPY COPY ':IN COPY BORDER ' MERGE COPY COPY '.CODE OUT COPY CLS © OVER COPY IN COPY RETURN OUT RUN ? GO SUB _ COPY RUN '©'''' BORDER '''?'''' RETURN COPY RND COPY © AND COPY IN BORDER © OUT RUN ? BORDER RUN ''< COPY COPY RUN ' BORDER COPY COPY PI'© COPY LOAD '9 RETURN COPY RND COPY © OVER COPY IN INPUT © OUT COPY COPY s COPY COPY BORDER '?CODE COPY '' CLEAR © RUN  ©NOT COPY PI'©_ COPY CLS © PAPER COPY IN COPY RETURN OPEN # RETURN ' RETURN IN COPY _/ COPY INK Yy© COPY YY THEN COPY RANDOMIZE Y^_ COPY INK Yr COPY CLEAR Y[\h SAVE © COPY \IN COPY Y©_ LOAD COPY [ RANDOMIZE ©© RANDOMIZE _ FLASH CLS COPY INK COPY _ OUT CLEAR _ RANDOMIZE RETURN COPY SAVE RETURN NEXT COPY COPY GO SUB ©IN RANDOMIZE _ FOR COPY CLEAR Y©_ COPY RANDOMIZE Y IF COPY COPY Y_ BEEP COPY RANDOMIZE YFREE ▜ CLEAR BEEP COPY RETURN OUT LET COPY CODE COPY RANDOMIZE FREE / COPY CLEAR FLASH LET © COPY LOAD _▛ COPY COPY y DRAW _ COPY LPRINT LOAD COPY COPY IN CONTINUE CLS COPY COPY CONTINUE IN COPY RUN Y LOAD COPY RANDOMIZE Y_© COPY YYON ERR COPY RANDOMIZE YY OUT OUT COPY SAVE © OVER COPY IN COPY RETURN LET ? FOR IN COPY INK Y© RANDOMIZE YYY COPY INK YY_ CLEAR YYYFREE  COPY \j COPY © OVER COPY IN DIM © OUT LET ? DIM COPY INK Yy COPY COPY RANDOMIZE Y CAT COPY COPY INK ^© COPY GO SUB Ys RETURN 9 COPY © OVER COPY IN GO TO ©NOT COPY COPY g COPY COPY INK Y COPY _ COPY Y_ IF COPY RANDOMIZE [ RETURN Y RETURN \p COPY RANDOMIZE © CLOSE # COPY IN COPY RETURN FN Y[ CLEAR © RANDOMIZE .© COPY FOR +s COPY COPY ++\p COPY CLS +< COPY COPY FOR + BORDER COPY COPY +/? CLS COPY COPY 9 COPY COPY ATTR ?? BEEP COPY + FOR RETURN IN CLS // PRINT COPY ATTR ON ERR?CODE COPY + FOR CLEAR © LPRINT COPY RETURN FOR COPY COPY FOR ©_ CLS / RUN COPY COPY +?IN COPY FOR + CLEAR COPY COPY +/ LOAD COPY CLS +STICK? CLEAR BORDER COPY LIST OUT COPY COPY ? OUT COPY CLS zW COPY NEXT FOR ERASE IN COPY \p>\f COPY DRAW CLS POKE CODE COPY CLS CODE COPY COPY IN READ RETURN CLS COPY COPY DIM _ COPY CAT +? COPY +++ COPY CLS ++/ COPY FOR ++? OUT COPY COPY © OVER COPY IN COPY COPY OUT NEXT ? FOR © COPY ++w COPY +++IN CLS ++= COPY ATTR ++ INPUT COPY POINT COPY © OVER COPY IN FOR © OUT NEXT ? FOR OUT CLS +w COPY IN COPY +IN CLEAR COPY FOR =© COPY LOAD + LOAD COPY © RANDOMIZE COPY © PAPER COPY IN FOR © FLASH COPY COPY _ RETURN COPY CLS + RETURN IN COPY +/ PRINT COPY CLS + RETURN CODE COPY ATTR + CLEAR _ COPY CLS © LINE COPY ▜ COPY RETURN _ COPY +/ IF COPY CLS \n CLEAR © RETURN \m\p FOR COPY DRAW \l RETURN _ COPY \m\p IF OUT COPY SAVE © VERIFY COPY ATN COPY RETURN IN COPY \m\p PRINT COPY DRAW \p COPY COPY © COPY COPY RUN COPY LOAD SAVE © RETURN $\cI$\cI© CLEAR DRAW \p COPY COPY COPY \m COPY COPY COPY DRAW \oW COPY © COPY STOP IN COPY © OUT A COPY COPY COPY COPY COPY COPY LIST @ COPY DRAW \p+ COPY COPY \m RANDOMIZE _ COPY DRAW \m\m\m\mIN GO TO \m\l RETURN \i\m\m\m\m\m\m\m\m\m\m\p/ COPY BRIGHT IN DIM © OUT LIST \l RETURN \m\p\h COPY DRAW \m\mIN COPY \m COPY \p LOAD RETURN IN GO TO COPY _ POKE \p© COPY \m RETURN \p OUT DRAW \p DRAW RETURN COPY DRAW IN \p RUN COPY \n DRAW IN IN DRAW \p FOR COPY DRAW IN LOAD ^ COPY SGN \n IF COPY COPY \m\p BEEP COPY DRAW \m RETURN IN COPY BRIGHT \p PRINT COPY RETURN \m\pCODE COPY DRAW RETURN / COPY CLEAR IN LLIST © COPY INPUT \p▛ COPY COPY STICK DRAW _ COPY CLS \p STOP COPY COPY BRIGHT IN CLEAR SAVE IN COPY RUN RUN PAUSE COPY COPY RUN USR COPY LPRINT RETURN IN COPY RUN COPY RESTORE OUT COPY CLS © DEF FN COPY ATN COPY RETURN © COPY RUN COPY THEN COPY RUN COPY COPY © COPY COPY RUN COPY LOAD CLS © COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR COPY COPY ▜ COPY COPY RUN DRAW ? COPY COPY RETURN / COPY © COPY LLIST © COPY © BEEP ▛ CHR$ !B COPY RUN RUN RUN SAVE IN COPY COPY RUN RUN RUN RUN IN BORDER RUN NEXT RETURN NEXT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN RUN RUN RUN RUN RUN RUN RUN RUN RUN RETURN © COPY RUN IN READ COPY OUT RUN NEXT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN RUN ? COPY RUN RUN RANDOMIZE COPY COPY RUN COPY COPY BEEP COPY IN BORDER RETURN RUN COPY © SAVE © RUN COPY COPY CODE COPY RUN RUN CLEAR © RUN COPY COPY FOR COPY RUN RUN COPY _ COPY RUN RUN COPY COPY IN LOAD PEEK COPY ATN RUN CLEAR COPY COPY RUN COPY LOAD COPY COPY RUN COPY © COPY RUN RUN CLS COPY COPY RUN COPY OUT COPY RUN IF W COPY NEXT IN STOP IN COPY \p RETURN \f COPY DRAW RUN POKE CODE COPY BORDER RUN RND© COPY ? CLEAR + COPY RANDOMIZE RUN DIM _ COPY CAT CODE RESTORE COPY CLEAR AT RUN COPY LOAD CLS RETURN ? COPY COPY COPY COPY COPY COPY COPY FORMAT COPY PI COPY RETURN COPY COPY TAB IN \h COPY CLEAR RETURN COPY COPY RUN COPY LOAD CLS © DRAW CLEAR CLEAR IN COPY COPY GO SUB SAVE _ COPY COPY CODE W COPY ? REM IN COPY © STEP MERGE ▀ COPY COPY COPY COPY COPY COPY DRAW  COPY GO SUB CODE ATTR COPY COPY TAB ABS _ COPY CLEAR TAB CLEAR TAB TAB IN LOAD GO SUB ATTR RETURN ATTR LPRINT TAB TAB IN TAB TAB TAB TAB CLEAR TAB TAB SGN COPY COPY CLEAR IN BORDER COPY OUT PRINT ATTR COPY COPY GO SUB TAB EXP COPY COPY GO SUB TAB CAT COPY COPY TAB VAL$ © COPY CLEAR TAB NEXT COPY COPY GO SUB TAB IN CODE COPY IN GO SUB DRAW COPY ▐TAB ©NOT COPY TAB TAB COPY _ CLEAR TAB CODE IF COPY GO SUB TAB IN BEEP COPY TAB TAB RETURN IN CLEAR CODE LOAD COPY CLEAR IN LOAD FREE  COPY TAB TAB CLS COPY COPY TAB CODE OUT COPY CLEAR TAB PEEK COPY COPY TAB TAB RUN COPY CLEAR TAB CODE IN COPY GO SUB DRAW ! COPY IN LLIST SAVE ©IN ©NOT CLEAR SAVE C RETURN CODE CHR$ LIST CLEAR PEEK ▜ GO SUB LIST ▜ DRAW ? FOR COPY RETURN COPY RUN COPY LOAD CLS RETURN ?USR <= DRAW COPY RETURN COPY RETURN CODE COPY PLOT FREE / COPY © COPY COPY RUN COPY CLS © SAVE CLEAR OVER ? BORDER SAVE IN COPY RUN LOAD COPY NEW ? BORDER © COPY © AND ;B!B FREE w COPY PLOT IN COPY ▚? PLOT ? BORDER COPY ▀ RETURN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN RETURN COPY AND 9 COPY COPY PLOT ? LOAD COPY OUT PLOT © COPY INPUT s COPY COPY NEW \p COPY COPY COPY COPY RETURN BORDER COPY COPY AND COPY _ RETURN ? BORDER IF COPY ACS RETURN IN RETURN PRINT COPY NEW ©CODE COPY CLEAR © RETURN NEXT COPY RETURN ? LOAD \o COPY INKEY$ DRAW COPY COPY BORDER COPY RETURN ©? COPY AND RANDOMIZE COPY RETURN CAT COPY PLOT FREE W COPY COPY IN STOP IN COPY RETURN \f COPY COPY PLOT DRAW CODE COPY COPY ▜ RESTORE © COPY RETURN ?+ COPY COPY BORDER RANDOMIZE _ COPY COPY CAT RUN COPY CLEAR ▜ COPY RUN COPY LOAD CLS COPY COPY NOT PRINT T COPY CLEAR <= COPY LIST COPY COPY <> OUT OUT COPY RANDOMIZE IF W COPY © COPY COPY ▜ COPY ©CHR$ © LIST COPY COPY COPY COPY RETURN COPY COPY CLEAR = CLEAR + COPY RANDOMIZE DIM DIM _ COPY CAT <> OUT COPY <>IN DIM COPY RANDOMIZE ©<> DEF FN COPY COPY COPY COPY COPY COPY RETURN  y<><> CAT COPY <><><> COPY CLEAR <><> RUN COPY <>IN FOR IN CLS RETURN THEN SAVE <><> CLS COPY <><><> OUT RANDOMIZE <> RUN COPY IN CLEAR IN LOAD CLEAR OUT LET INVERSE © COPY LOAD <> LOAD COPY © RANDOMIZE CAT © CLS COPY <> CLS COPY OUT COPY <> OUT RETURN COPY RANDOMIZE <> RETURN IN COPY IN LOAD POKE COPY EXP <> COPY CODE COPY <> THEN CLEAR © CLEAR <> OUT FOR COPY DIM <> COPY _ COPY <> CAT IF COPY RANDOMIZE CAT RUN COPY COPY IN LOAD PEEK 9 THEN CLEAR COPY COPY <> OUT LOAD COPY CLEAR <> COPY © COPY DIM CAT CLS COPY COPY <> COPY OUT COPY RANDOMIZE RETURN / COPY COPY  © COPY CLEAR CAT ▛ COPY COPY DIM DRAW _ COPY COPY THEN STOP COPY COPY RANDOMIZE OUT <> SAVE IN COPY COPY ' LOAD COPY DRAW ? COPY RUN COPY LOAD CLS COPY COPY ▜ REM FN COPY CLEAR PI COPY ▜ COPY COPY '/IN COPY BORDER STICK! COPY © COPY DRAW SAVE © OUT © LIST !B! LPRINT COPY >▜ BORDER LIST ▜ DRAW ?''''? BORDER ' ©<=& DRAW DRAW '''''''''''' BORDER COPY '? BORDER ? CLS RETURN # DRAW COPY COPY ''s COPY PI''\p COPY '© COPY OUT COPY ? LOAD RETURN OUT RUN ?© COPY LOAD ' COPY COPY IN COPY ' COPY CLEAR COPY BORDER ? COPY LOAD COPY ' COPY COPY © RUN ' CLEAR © COPY ? LOAD REM COPY ATN '©_ COPY PI' IF COPY COPY '? BEEP COPY BORDER ' RETURN IN COPY '' PRINT COPY COPY ? COPY COPY COPY ? LOAD COPY COPY COPY ' COPY COPY COPY BORDER ? COPY COPY COPY ' COPY COPY COPY RUN / COPY COPY COPY PI© COPY COPY COPY >W COPY COPY ' PAUSE IN COPY COPY '\f COPY COPY BORDER <CODE COPY COPY ' RESTORE © COPY RUN /+ COPY COPY PIy_ COPY COPY _ NEXT COPY LLIST COPY COPY RUN COPY LOAD CLS COPY COPY COPY CLEAR BEEP DRAW 9 COPY COPY Y_ CAT COPY RANDOMIZE FREE W COPY © COPY LPRINT IN COPY © OUT © LPRINT © COPY COPY COPY COPY COPY USR   CLEAR ©+ COPY COPY RANDOMIZE RANDOMIZE _ COPY COPY YYYY? DIM Y[ RETURN \ COPY COPY COPY COPY RETURN YYYYYYYYYYY<= COPY INK ? INPUT ? CLS RETURN [ DRAW YY READ COPY INK Y_ COPY Y© COPY LOAD COPY ? LOAD COPY _ LET _© COPY LOAD INK COPY COPY OUT CLEAR _ COPY RETURN COPY RANDOMIZE © COPY RUN COPY Y COPY COPY IN RANDOMIZE _ PAUSE COPY CLEAR ? LOAD \g COPY EXP Y DRAW IN COPY Y_ RESTORE COPY RANDOMIZE Y©/ COPY INK [ RANDOMIZE © COPY Y_ THEN COPY RANDOMIZE © COPY COPY IN CONTINUE © COPY CLEAR _NOT COPY COPY RANDOMIZE FREE  COPY COPY [ LIST COPY COPY RANDOMIZE _▜ COPY COPY INK DRAW ? COPY COPY ^/ COPY COPY Yq© COPY RANDOMIZE [▛ COPY COPY INK \_ COPY CLEAR Y STOP COPY COPY RANDOMIZE _YxIN COPY RANDOMIZE / RUN COPY COPY COPY RUN COPY LOAD CLS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR LPRINT CLS COPY COPY +? OUT COPY CLS >/ COPY © COPY LLIST © COPY © CAT © LPRINT ▗!B  © CLS ? FOR SAVE IN COPY COPY ++++? FOR ++ RETURN +( COPY COPY COPY COPY DRAW +++++++++++\p COPY ATTR ? GO TO COPY NOT RETURN + RETURN ++ CAT COPY FOR +.© COPY +© FOR BEEP COPY ? LOAD >\p NEXT ?© COPY LOAD ATTR COPY LOAD CODE COPY / COPY =© FOR ? CLS FOR COPY + COPY CODE _ CLS / RESTORE COPY COPY ? LOAD . COPY ATTR + RANDOMIZE © COPY +/ THEN COPY CLS +FREE _ COPY FOR + PAUSE COPY COPY +?\h COPY CLS FREE IN LPRINT IN COPY COPY ?▐ COPY COPY CLS DRAW / COPY COPY CODE LLIST © COPY COPY ? COPY COPY FOR SAVE _ COPY COPY /W COPY COPY +:IN COPY FOR + MERGE COPY COPY +.CODE COPY CLS +u© COPY FOR +ATTR COPY COPY +=_ COPY CLS \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a RETURN > SAVE © FORMAT \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a RETURN o REM H@)BEEP S DRAW \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\h COPY CLEAR GO TO H@STICK DRAW o▌\r COPY SAVE \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\iQBIN pH▀y LLIST THEN <>G+ COPY COPY FORMAT \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a PLAY = CLS COPY COPY RETURN \a\a\a\a\a\a\a\a\a\a\a\a\a\a\i @SCREEN$ \p LLIST 0 FLASH IF IN O COPY COPY \a\a\a\a\a\akkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk©LEN ▝ COPY ▚©kkkkkkkkkkkkkkkkkkkkkkkk COPY OUT \fL0 CODE (ON ERRkkkkkkkkkkkkkkkkkkko COPY RANDOMIZE $ IF ▘ LPRINT  kkkkkkkkkkkkkkkkkkl' DIM RANDOMIZE ▘▗PEEK 7 LPRINT ?G FOR kkkkkkkkkkkkkkkkk$STR$ r▀CHR$ 0 ? COPY CLS kkkkkkkkkkkkkkkk`B▗ COPY OUT ▜ COPY m\hATN kkkkkkkk\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l RETURN TO ` TO CLS \l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l COPY PEEK u$@ RESTORE / CLS \l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\p COPY RETURN \c0 CLEAR  ?USR COPY COPY \l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l▖6 @ COPY COPY LPRINT ▜\i COPY COPY CLS \l\l\l\l\l\l\l\l\l\l\l\l\l\lTAN  \oUSTICK@@@ COPY © OUT COPY COPY \l\l\l\l\l\l\l\l\l\l\l\l\l\l\lUSR "! C COPY COPY \fh LOAD COPY COPY \l\l\l\l\l\lLEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN COS CLEAR &? COPY COPY LET LET LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN COS COPY CLEAR FN " LPRINT <\dLEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN IN COPY SAVE h\s DRAW OVER LIST COPY LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN VAL S DRAW ▗AR`7\qOPI LET LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN \qx"AUSR ▞ OUT COPY RANDOMIZE LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN VERIFY T AND Z BEEP ELEN LEN LEN LEN LEN LEN LEN LEN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY PLOT \d SAVE STICK< STOP JFREE  RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY CLEAR COPY CHR$ \c P\hH COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN SAVE ©\nzON ERR.▜8g COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN DRAW SAVE DATA "q DATA ▗? OUT COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN CONTINUE @▗PEEK RNDIN  0 COPY RETURN COPY █ COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY DIM !H▖`USR bJ(IN COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN IN j_fUSR !\a▜FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN CODE RETURN PLOT \bB$  NEW xFN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN CODE COPY LOAD DATA IN .gCHR$ B]\lFN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN COS ( AND STICK$▀@ LLIST SAVE FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN VAL !S>=$© DATA ` COPY OVER OUT © SAVE FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN CODE USR Bpx\d,FN FN FN FN FN FN FN FN VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVFREE  MERGE CLEAR #B" DRAW * PLOT VVVVVVVVVVVVVVVVVVVVW CAT CLEAR POKE @  DRAW  D LET COPY VVVVVVVVVVVVVVVVVX? BEEP ▝Q INVERSE ; COPY USR VAL$ / COPY RETURN VVVVVVVVVVVVVVVX  SAVE q\h!BIN \qC`\p COPY COPY COPY RETURN VVVVVVVVVVVVVVg>H▄ COPY AND kIN COPY █ COPY COPY VERIFY VVVVVVVVVVVV_ LIST \q  COPY VERIFY VVVVVFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFG COPY COPY COPY AND FFFFFFFFFFFFFFFFFFFFFFFFF COPY ATN PEEK \b ▗D▜USR FFFFFFFFFFFFFFFG RUN IF  ▀ SAVE "< READ FFFFFFFFFFFFFFFFFFG█; TO BIN █USR  LIST MERGE AND FFFFFFFFFFFFFFFFDQ>I INPUT ▖P▘o BEEP PLOT FFFFFFFFFFFFFFFFp$▗\aS LET qASN oh PLOT FFFFFFFFFFFFFFF_@  \a!\fVFFFFFFFF\a\a\a\a\a\a\aIN ▙▗PW+ COPY COPY FORMAT \a\a\a\a\a\a\a\a\a\a\a\h COPY LLIST H\b COPY COPY LIST \a\a\a\a\a\a\a\a\a\a\a\nIN @0 3© COPY LIST \a\a\a\a\a\a\a\a\a\a\a\gPOINT COPY \a !!@\p COPY COPY LIST \a\a\a\a\a\a\a\a\a\a\a\d RETURN KUSR @ ▘$A COPY COPY COPY \a\a\a\a\a\a\a\a\a\a\a\a\a\cI()? DHT COPY CLS COPY COPY COPY FORMAT \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\r COPY LPRINT qSQR COPY COPY COPY FORMAT \a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\a\p COPY ? COPY COPY COPY COPY DRAW \a\a\a\a\akkkkkkk©`@@  CHR$ ▖PIkkkkkkkkkkkkkko RUN ▗H2akkkkkkkkkkkkkkFREE ^▘ ▖@@\c\a\pkkkkkkkkkkkkkkR LPRINT  SCREEN$ 1 CONTINUE g FOR kkkkkkkkkkkkkkkCHR$ %t▗B▝▘ COPY kkkkkkkkkkkkkkkk$▝UBI DRAW  0% COPY ©©kkkkkkkkkkkkkkkkkkmI"okkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk\l\l\l\l\l\l\l CLEAR \b  DbB1C COPY COPY FLASH \l\l\l\l\l\l\l\l\l\l\l\p CLS CLOSE # \a CHR$ B▗ COPY COPY CLS \l\l\l\l\l\l\l\l\l\l\l\lIN x %\b LOAD COPY CLS \l\l\l\l\l\l\l\l\l\l\l\lAT FREE p@  \s FLASH COPY COPY CLS \l\l\l\l\l\l\l\l\l\l\l\lUSR !A$ OVER © COPY COPY COPY \l\l\l\l\l\l\l\l\l\l\l\l\l\l\cO LIST @ RETURN RETURN OUT COPY COPY COPY CLS \l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l ERASE D00M* COPY COPY COPY COPY \l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\l\p COPY COPY COPY COPY COPY COPY COPY COPY \l\l\l\l\l\lLEN LEN LEN LEN LEN LEN LEN COPY USR "@  !(▚\lLEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN IN COPY \s \aB=LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN SGN g▝  AHJ▘NIN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN MOVE ▝ BRIGHT @ LPRINT LET LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN SGN  UUSR  IN INVERSE LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LN BSCREEN$ ▐$\b\p DRAW  ▀© INK BEEP  COPY CLEAR LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN  H▖@USR CHR$ &ASN LET LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN LEN RETURN RETURN RETURN RETURN RETURN RETURN COPY CLEAR \q▝\i p g COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY COPY  @" !*▝ COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY FLASH BIN ▖B▗@,( BEEP COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN NEW 7   ▄ CONTINUE <= COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY ▗I*SGN FN !w© COPY COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN COPY ((I"!▜ COPY COPY COPY <=&SCREEN$ LOAD COPY COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN RETURN DATA \b?a 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 RETURN RETURN COPY COPY COPY COPY COPY COPY RETURN RETURN RETURN RETURN RETURN RETURN RETURN FN FN FN FN FN FN ATTR COPY TO "@`K"FN FN FN FN FN FN FN FN FN FN FN FN FN FN IN COPY USR LIST   @!$DRFN FN FN FN FN FN FN FN FN FN FN FN FN FN CODE $p@▘@ MOVE CODE FN FN FN FN FN FN FN FN FN FN FN FN FN FN LN ©USR  0J! SAVE FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN STOP $▐WCHR$ \a \s▌© RETURN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN ▝UF COPY SAVE 1\kUIN SAVE FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN POINT "!USR SAVE <>FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN VVVVVVW PRINT \cAH \f COPY COPY COPY PLOT VVVVVVVVVVV_ COPY 9  USR COPY COPY PLOT VVVVVVVVVVV\\l IF LPRINT @ B & FLASH COPY COPY VERIFY VVVVVVVVVVVW  STOP p▞@H© COPY COPY RETURN VVVVVVVVVVVVVQSTICK▗▌YATN COPY COPY VERIFY VVVVVVVVVVVVVVTP\cH▖``I]w COPY COPY COPY VERIFY VVVVVVVVVVVVVVVVVV© AND PLOT VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVFFFFFFG CLS  !B X^FFFFFFFFFFFFFF_ COPY ▗D@! pI TO PLOT FFFFFFFFFFFFFGD▄@ AND FFFFFFFFFFFFFH T▖@I COPY RETURN FFFFFFFFFFFFFFFL BSCREEN$ \h LPRINT LIST Ao COPY NFFFFFFFFFFFFFFFFFFSCREEN$ ▝ CHR$ $SCREEN$ OUT AND FFFFFFFFFFFFFFFFFFFFFFF` LPRINT NOT FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,/ COPY COPY DRAW ,,,,,,,,,,,,,,,,,,,,,,,, IF F PRINT READ \e DEF FN TO ON ERRIN RETURN RETURN ,,,,,,,,,,,,,,,,,,?? RETURN ^18▄ THEN U PLOT LIST ▗> NEXT SQR GO TO ,,,,,,,,,,,,,,,u INPUT COPY COPY FLASH RETURN \j MERGE o COPY POKE ?,,,,,,,,,,,,,.SQR =v GO TO COPY COPY COPY GO SUB COPY d!BSCREEN$ T THEN DRAW ,,,,,,,,,,,,,7I©ACS REM BEEP OUT IN COPY RETURN OUT COS 8B TO TO CODE AT ,,,,,,,,,,,,> REM G RUN CODE COPY COPY SQR COPY CLS COPY COPY CLS COPY BIN !▖\j+VAL$ AT ,,,, THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN OUT COPY DRAW ? COPY COPY THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN CAT COPY CLEAR \o DRAW NEXT LEN 7 CLEAR STEP ▟ COPY THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN RANDOMIZE DATA ▐ BORDER * INK M3Z OUT IN RETURN m FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN CLS 5BEEP  LOAD RETURN COPY <>SIN © LIST █!<> DEF FN -USQR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN DEF FN INVERSE © RUN STEP STEP COPY COPY COPY BEEP  DRAW !CL STEP [ THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN COPY IIN ACS LOAD g COPY RUN COPY NEW © RANDOMIZE RETURN BDLSQR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN IF \kg CLEAR COPY COPY © COPY COPY COPY BEEP COPY COPY COPY DRAW 1\e▞+ FOR FOR THEN THEN THEN THEN 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 COPY RETURN c OUT NEXT COPY RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN COPY NEXT \r\meINKEY$:<= RETURN © COPY OUT RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN COPY IN COPY \m AND 5S4\n CLEAR COPY NEXT LET n\p RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IF j COPY COPY COPY CLS COPY \d COPY FORMAT ▗ LIST TAN cm RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN m©SGN DEF FN W COPY COPY COPY FREE N!B\c\iBIN E RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN INK =BEEP \hg RETURN RUN COPY COPY RUN COPY \l▘DDIN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK INT \kTAB CLS COPY PAPER LOAD COPY CLEAR CLS COPY RUN COPY COPY RETURN 1\f\jkPEEK PEEK PEEK PEEK PEEK PEEK DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CAT COPY COPY ?\p COPY OVER © COPY DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CLEAR d^rb\i STEP TO ATTR LOAD IN COPY COPY RETURN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CAT ATN MOVE CLS ATN 2#)CODE COPY /\n▙PEEK DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CAT RETURN CAT CAT VERIFY COPY COPY \p RUN RUN ▖▘▄9 MOVE \j$ INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN OUT I RUN ABS DRAW © COPY COPY COPY DRAW _ LLIST BR▖FDPEEK DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CLEAR FLASH LOAD INVERSE © RETURN COPY IN COPY ]© COPY BIN !▄fd COPY INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN IF ERASE \k COPY CLS VAL$ NEW © COPY © RETURN OUT OUT COPY COPY <>UZ CLS INPUT INPUT DEF FN DEF FN DEF FN DEF FN PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY TAB GO SUB \i DRAW BORDER w█ COPY POKE PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY RND LOAD COPY ▞ TO 1\f1\d5 PRINT COPY CLEAR RUN DRAW PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PI RANDOMIZE ? COPY ▙ TO DEF FN 4 LINE w COPY COPY \r FOR AND e\ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PI MERGE M CLS _ COPY COPY PAUSE COPY CLS ▖B'0▖\g DATA PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY IN INK BEEP ASN BRIGHT BORDER COPY COPY COPY DRAW dqB1▄ff RETURN PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY ASN FOR AT BRIGHT LOAD CLEAR INVERSE COPY COPY CLS FLASH COPY TAN !\e\gf COPY VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY SQR MOVE \k COPY DRAW TO INPUT GO SUB COPY COPY RUN RUN COPY COPY COPY REM Uf CLS VAL$ VAL$ PLAY PLAY PLAY PLAY © RETURN g>\i READ DRAW NEXT COPY COPY RANDOMIZE ATN Jc*f[ OUT BRIGHT CLEAR THEN READ COPY RANDOMIZE VAL$ MT\g© COPY IF x\mcSGN TAB v\l PRINT FOR CAT COPY SQR © COPY ▖ANOT \b\i TO FLASH RANDOMIZE INK u RUN OUT <= RUN LOAD COPY RUN BORDER COPY BUf COPY \j5dIN COPY GO TO LOAD ATN NEXT COPY LOAD COPY \p COPY SAVE AR\jV CLS SQR \j? INK ABS ATN INVERSE v RUN COPY COPY COPY ABS IN CLS COPY IF ef COPY SQR SQR hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhk COPY RANDOMIZE DATA NOT ATN ABS CAT < COPY COPY CONTINUE hhhhhhhhhhhhhhhhhho OUT COPY 2 PLAY INK VAL$ y COPY SAVE ©IN hhhhhhhhhhhhhhhhFREE \o? COPY COPY YAT >= NEW IN G\h▜9f VERIFY hhhhhhhhhhhhhho DATA CLS \pCODE COPY COPY LOAD COPY RETURN ▗!rp▖JCODE SAVE hhhhhhhhhhhhhBEEP ku6 GO SUB O RUN COPY COPY COPY PLOT %▖B<>UUVAL$ CONTINUE hhhhhhhhhhhhBEEP dCODE l RETURN COPY COPY RUN COPY FOR COPY RETURN COPY RETURN BQ▞\g FOR REM CONTINUE hhhhhhhhhhh©EXP \i█ DRAW INPUT ©© COPY COPY COPY © COPY CLEAR © DRAW f$CODE REM REM hhhhFN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN IN COPY ?TAN c:3 CAT © COPY SAVE FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN SGN STOP " LLIST ERASE OR LE# CLEAR CODE COPY CAT & OUT FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN IN 5 COPY COPY COPY GO TO SCREEN$ STEP + COPY COPY CHR$ pBIN BORDER FN FN FN FN FN FN FN FN FN FN FN FN FN FN CODE GO SUB ABS ; OVER w COPY RETURN CLEAR COPY BIN !Ne\n SAVE FN FN FN FN FN FN FN FN FN FN FN FN FN ASN mw> RETURN w COPY CODE COPY COPY COPY ? CONTINUE BL MERGE VAL$ FN FN FN FN FN FN FN FN FN FN FN FN FN ABS dO RETURN COPY IN COPY IN COPY DRAW COPY COPY IN COPY B1▖\k FOR SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN PEEK ASN \e█ COPY CLS ww CLEAR CLS OUT OUT CLEAR IN COPY RETURN BdCODE SCREEN$ SCREEN$ FN FN FN FN ,,,,,,,>\dSO NEXT BEEP  BRIGHT LOAD CLEAR CLS COPY COPY CLEAR COPY © OUT INKEY$dATTR VAL$ VAL$ ,,,,,,,,,,,- CLS ]\eINKEY$3 TO CLEAR COPY COPY [z▖ RETURN COPY 7 COPY /FREE VAL$ VAL$ AT ,,,,,,,,,,,. BORDER \m COPY COPY COPY COPY COPY COPY LOAD COPY COPY © PLOT ON ERR©\fVAL$ VAL$ VAL$ AT ,,,,,,,,,,,,/ COPY COPY v OVER NEXT \l© PLOT COPY THEN OUT COPY FREE VAL$ VAL$ VAL$ AT ,,,,,,,,,,,,,.CODE >=ATN S COPY IN NEXT <> OR BEEP RETURN VAL$ VAL$ VAL$ VAL$ AT ,,,,,,,,,,,,,,VAL$ VAL$ VAL$ ▝ COPY BEEP ? COPY COPY COPY INPUT VAL$ VAL$ VAL$ VAL$ AT ,,,,,,,,,,,,,,,,VAL$ VAL$ VAL$ VAL$ LPRINT FREE VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ AT ,,,,,,,,,,,,,,,,,,VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ AT ,,,,, THEN THEN THEN THEN THEN THEN THEN PAPER FLASH 3* COPY CODE DRAW BORDER COPY COPY ATN © RUN COPY COPY COPY SCREEN$ AT LOAD FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN RANDOMIZE COS r\nEXP COPY COPY CLEAR COPY CLS RETURN EXP COPY OUT PLOT COPY 5 CLS FOR FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN CAT \<= COPY COPY CAT g CLEAR IN LOAD CLS AT COPY AND LOAD © LOAD FOR FOR FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN COPY COPY <=: BEEP ▟ABS CLEAR CLEAR COPY RETURN SQR COPY FOR FOR FOR FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN FOR COPY SAVE RANDOMIZE < DIM \g] COPY COPY COPY COPY FOR FOR FOR FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN FOR FOR FOR USR ▝ COPY CLEAR LOAD COPY COPY COPY FOR FOR FOR FOR FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN FOR FOR FOR FOR USR COPY CLS FOR FOR FOR FOR FOR FOR FOR THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN THEN FOR FOR FOR FOR FOR FOR FOR FOR FOR FOR FOR FOR THEN THEN THEN THEN THEN THEN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK EXP 1 DRAW GO TO BORDER COPY COPY PAPER COPY RUN INPUT IN © REM TAB RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK GO TO INK wSQR COPY COPY COPY OUT POKE OUT IF COPY \kFREE -FREE PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN RUN t"© RETURN _? COPY COPY COPY COPY RETURN CAT BEEP ©IN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK ABS "; DIM 9i▟w COPY c\b▖ RUN COPY RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK IN COPY <= STEP PAPER <>ATTR IN COPY RETURN PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK PEEK \q`c COPY COPY COPY COPY RETURN 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 SGN 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 DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CAT ASN \b\bN OUT LOAD o COPY CLEAR COPY IN COPY NEXT OUT O NEXT 5 RETURN INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN PLOT TAB BRIGHT RESTORE ABS LOAD COPY COPY COPY CLS PRINT PEEK COPY CLS SIN FREE iFREE  INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN CAT IN LOAD COPY COPY © OVER ATN OUT IN COPY COPY DRAW POKE GO SUB COPY + INPUT INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN COPY COPY OUT LINE \d RANDOMIZE OVER © COPY PEEK COPY INPUT INPUT INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN INPUT INPUT COPY RETURN nLyw COPY COPY COPY COPY INPUT INPUT INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN INPUT INPUT INPUT LIST COPY COPY COPY INPUT INPUT INPUT INPUT INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN INPUT INPUT INPUT LOAD COPY RETURN INPUT INPUT INPUT INPUT INPUT INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN INPUT INPUT INPUT INPUT INPUT INPUT INPUT INPUT INPUT INPUT INPUT DEF FN DEF FN DEF FN DEF FN DEF FN DEF FN PLAY PLAY PLAY PLAY PLAY PLAY PLAY CODE \dY\i▜ RETURN LOAD o RUN COPY ASN COPY COPY LOAD 7o PAUSE &PEEK VAL$ VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY CLEAR [3\ms OUT COPY COPY COPY COPY COPY CLS COPY COPY OPEN # COPY Z INPUT VAL$ VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY COPY COPY COPY DRAW SQR PLOT ATN COPY COPY GO SUB COPY COPY OO COPY VVAL$ VAL$ VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY CODE COPY SAVE SGN INK ▄u\n COPY COPY RANDOMIZE q RUN RETURN VAL$ VAL$ VAL$ VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY INKEY$VAL$ VAL$ IN INK NEXT v GO SUB \oIN COPY COPY COPY VAL$ VAL$ VAL$ VAL$ VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY VAL$ VAL$ VAL$ AT LPRINT FREE VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ AT PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY PLAY INKEY$VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ VAL$ AT PLAY PLAY PLAY PLAY PLAY PLAY \jYV BORDER RANDOMIZE INT COPY BEEP COPY ? COPY IN COPY CLS ATN z&CODE SQR SQR \j. TO BRIGHT BORDER CLEAR IN COPY COPY COPY COPY COPY IN COPY CLEAR ERASE w OVER CLS SQR SQR EXP ; COPY COPY CAT RESTORE © NEXT _ LOAD COPY RETURN ▚\ RANDOMIZE LOAD COPY SQR SQR SQR EXP SQR DRAW ▞<=NVu STEP BEEP \m© COPY © COPY SQR SQR SQR SQR EXP SQR SQR IN COPY FOR \p\h©© COPY COPY COPY SQR SQR SQR SQR SQR SQR SQR SQR   LPRINT COPY CLS SQR SQR SQR SQR SQR SQR EXP ;SQR SQR SQR SQR SQR SQR SQR SQR SQR SQR SQR SQR EXP SQR SQR SQR SQR SQR SQR SQR SQR SQR EXP hhhhhhhoU51\f COPY OUT RETURN COPY COPY © CLEAR W COPY COPY ^ RETURN ePEEK REM REM CONTINUE hhhhhhhhhhhwON ERRSQR \m? COPY COPY PI COPY COPY COPY CLS CLEAR ©_©ON ERR REM REM REM CONTINUE hhhhhhhhhhhh©_ RETURN \n CLEAR SCREEN$ o RUN COPY COPY COPY COPY RUN CAT SQR IF REM REM REM CONTINUE hhhhhhhhhhhhhj COPY RETURN FREE <c DEF FN [_ COPY DEF FN - LOAD IF REM REM REM REM CONTINUE hhhhhhhhhhhhhj REM REM REM RETURN STICK SAVE PAUSE RUN COPY COPY RETURN REM REM REM REM REM hhhhhhhhhhhhhhhj REM REM REM USR ` REM REM REM REM REM REM REM CONTINUE hhhhhhhhhhhhhhhhhj REM REM REM REM REM REM REM REM REM REM REM REM CONTINUE hhhhhhhhhhhhhhhhhhhhhj REM REM REM REM REM REM REM REM CONTINUE hhhhhhFN FN FN FN FN FN FN ATTR GO SUB \d TO © COPY ©IN COPY CLEAR RANDOMIZE \f NEXT \h;PEEK TAB OVER SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN IN AT LOAD BORDER COPY RETURN w COPY OUT COPY COPY CODE OUT RETURN [ COPY OVER REM SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN FN CODE CONTINUE ▖ INPUT rASN EXP s RUN COPY ? COPY CLEAR y COPY INT SCREEN$ SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN FN FN SCREEN$ CODE COPY READ BORDER COS VAL$ $ LOAD COPY COPY RETURN COPY IF SCREEN$ SCREEN$ SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN FN FN SCREEN$ SCREEN$ SCREEN$ ATTR COPY CLS COPY OUT LOAD COPY COPY IF SCREEN$ SCREEN$ SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN SCREEN$ SCREEN$ SCREEN$ VAL COPY COPY SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN FN SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ FN FN FN FN FN FN FN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY © COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY OUT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN <=< READ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY © COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY ABS 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 COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY RETURN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY < COPY COPY COPY COPY COPY COPY 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 READ COPY RETURN ? COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY OUT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY BORDER COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <=f READ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <=▝ READ COPY SAVE COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY NOT COPY COPY IN COPY COPY CLS COPY COPY COPY COPY COPY COPY CLEAR COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR COPY 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 READ COPY COPY COPY COPY COPY ? COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <=▝ READ 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 COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR COPY COPY COPY NOT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY FREE  COPY COPY COPY © COPY COPY 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 READ COPY COPY COPY COPY  © COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <=▝ READ COPY ? COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY 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 COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY ▝ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY ▝ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <=\j READ COPY COPY COPY LIST COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY AND ▝c IF COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY CLS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY ▝ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD RUN COPY COPY COPY OUT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN CLEAR COPY COPY COPY COPY COPY COPY COPY COPY <=RND READ COPY COPY COPY © COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY AND ▝c REM COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RUN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY OUT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <= READ COPY COPY RETURN COPY COPY COPY COPY COPY COPY COPY COPY CLEAR COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <=▝ READ COPY COPY SAVE COPY COPY COPY COPY COPY COPY IN COPY COPY COPY COPY COPY COPY CLEAR COPY COPY COPY COPY COPY BIN ▝#SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY DRAW ▝>SCREEN$ ? COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY COPY RETURN ▝j© COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LPRINT ON ERR OVER SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY SAVE SCREEN$ SCREEN$ SCREEN$ \q COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN SCREEN$ * COPY COPY COPY COPY COPY COPY COPY SAVE    COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY >=▝ COPY COPY COPY COPY COPY COPY COPY COPY COPY © COPY COPY CLEAR COPY COPY DRAW ▝* COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR COPY COPY  O PAUSE SCREEN$   COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LIST SCREEN$ SCREEN$ SCREEN$   COPY COPY COPY COPY COPY COPY COPY COPY COPY SAVE (*IN COPY COPY COPY COPY COPY COPY USR    OUT COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY >=▝ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY SAVE \j COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY D COPY \sSCREEN$   COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY USR SCREEN$ SCREEN$ SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY LPRINT COPY COPY COPY COPY COPY COPY RETURN    COPY COPY CLEAR COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY FORMAT ▝SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY SAVE COPY COPY COPY COPY COPY LOAD COPY COPY COPY COPY COPY COPY COPY DRAW STICK RETURN PEEK SCREEN$ \q COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD SCREEN$ SCREEN$ SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY  \p COPY COPY COPY COPY COPY LIST    COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LPRINT ▝SCREEN$ ? COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY \j COPY IF COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LOAD COPY LIST DINT \sSCREEN$ \q COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY DRAW SCREEN$ SCREEN$ * COPY COPY COPY COPY COPY COPY COPY COPY RETURN ▝ COPY COPY COPY COPY COPY    COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY IN COPY USR ▝SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR USCREEN$ INT COPY COPY COPY COPY COPY COPY RUN COPY COPY COPY COPY COPY LPRINT RETURN INT COPY SCREEN$ \q COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY SAVE SCREEN$ ** COPY COPY COPY COPY COPY COPY COPY COPY SAVE   COPY COPY COPY LPRINT    COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY  ▝SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN ATTR MERGE j COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY  ▘SCREEN$ STR$ SCREEN$ \q COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LPRINT SCREEN$ * COPY COPY OUT COPY COPY COPY COPY COPY USR  ? COPY SAVE    COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY ▝SCREEN$ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLS MERGE ATTR REM COPY RETURN COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN FREE SCREEN$ PEEK SCREEN$ \q COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY  SCREEN$ * COPY COPY COPY COPY COPY COPY COPY COPY    COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU GO SUB ACS FLASH mACS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY mACS PAPER MERGE UUUUUUUUUUUU GO SUB ACS FLASH mIN COPY COPY COPY COPY COPY COPY COPY CLEAR ATN OUT COPY ACS PAPER MERGE UUUUUUUUUUUU GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY RETURN PAPER \cI$TAB RETURN PAPER MERGE UUUUUUUUUUUU GO SUB ACS FLASH © COPY COPY COPY COPY COPY CLEAR ACS PLAY \a\c_ PAPER MERGE UUUUUUUUUUUU GO SUB V FLASH COPY COPY COPY COPY COPY COPY BEEP ACS PLAY \a\cJ PAPER MERGE UUUUUUUUUUUU GO SUB V FLASH COPY COPY COPY COPY COPY COPY GO SUB ACS FLASH RmSCREEN$ PAPER MERGE UUUUUUUUUUUU GO SUB ACS FLASH COPY COPY COPY COPY COPY CLS COPY PLOT ATTR m@% GO SUB V PAPER MERGE UUUUU READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS FLASH mACS OUT COPY COPY COPY COPY COPY COPY COPY COPY CLS mACS PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS FLASH m COPY COPY COPY COPY COPY COPY COPY COPY LOAD IN OUT COPY ACS PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY RETURN CLOSE #\cI$\f RETURN PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ ERASE ACS FLASH © COPY COPY COPY COPY COPY CLEAR ASN $\a$ PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY mASN $\a PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY BEEP ACS FLASH jA$TAB J PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS FLASH COPY COPY COPY COPY COPY OUT BEEP  CLEAR +UFN % LOAD V PAPER COPY READ READ READ READ READ <><><><><><><> COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY <><><><><><><><><><><><><> GO SUB ACS FLASH mATN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY GO SUB ACS PAPER <><><><><><><><><><><><><> GO SUB ACS FLASH m COPY COPY COPY COPY COPY COPY COPY COPY COPY ACS CLS COPY PLOT PAPER <><><><><><><><><><><><><> GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY PLOT PLAY \cI$\fPEEK PAPER <><><><><><><><><><><><><> REM V FLASH COPY COPY COPY COPY COPY COPY CLEAR ACS PLAY  \cW PAPER <><><><><><><><><><><><><> REM V FLASH COPY COPY COPY COPY COPY COPY GO SUB ASN $  J PAPER <><><><><><><><><><><><><> REM ACS FLASH © COPY COPY COPY COPY COPY mASN +RH$TAB J PAPER <><><><><><><><><><><><><> GO SUB ACS FLASH COPY COPY COPY COPY COPY CLS © CLEAR $\fI%mV PAPER <><><><><><>,,,,,,, COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY GO TO ,,,,,,,,,,,, GO SUB ACS FLASH mACS COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY mACS PAPER COPY AT ,,,,,,,,,,, GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY COPY COPY LOAD ACS FLASH COPY PLOT PAPER COPY AT ,,,,,,,,,,, GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY ACS PLAY \cI$\fPEEK PAPER COPY AT ,,,,,,,,,,, GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY CLEAR ACS PLAY \c PAPER COPY AT ,,,,,,,,,,, GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY CLEAR ASN $\a\cK PAPER COPY AT ,,,,,,,,,,, GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY mACS ATTR j@%mSCREEN$ PAPER COPY AT ,,,,,,,,,,, GO SUB ACS FLASH COPY COPY COPY COPY COPY FLASH mASN $\f@mV PAPER COPY AT ,,,,ACS FLASH mACS FLASH COPY COPY COPY COPY COPY COPY COPY COPY FLASH mACS PAPER MOVE ACS FLASH mPEEK COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR ACS PAPER MOVE ACS FLASH m COPY COPY COPY COPY COPY COPY COPY CLS ©ACS COPY COPY RETURN PAPER MOVE ACS FLASH o COPY COPY COPY COPY COPY COPY ACS PLAY \a$\cIN PAPER MOVE ACS FLASH © COPY COPY COPY COPY COPY COPY ASN $\a$ IF MOVE ACS FLASH COPY COPY COPY COPY COPY COPY GO SUB POINT $\a$ IF MOVE ACS FLASH COPY COPY COPY COPY COPY COPY GO SUB ACS FLASH mI%mACS PAPER MOVE ACS FLASH COPY COPY COPY COPY COPY COPY mASN $\fPOINT $TAB ASN Z MOVE DIM DIM DIM DIM DIM DIM DIM GO SUB ACS FLASH mACS FLASH COPY COPY COPY COPY COPY COPY COPY COPY FLASH mACS PAPER DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB ACS FLASH mIN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY GO SUB ACS PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB ACS FLASH m COPY COPY COPY COPY COPY COPY COPY COPY mACS OUT COPY PLOT PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY ACS PLAY \c\cIN PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB V FLASH © COPY COPY COPY COPY COPY GO SUB ACS PLAY  \cK PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM REM V FLASH COPY COPY COPY COPY COPY COPY BEEP ASN $ \cJ IF COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM REM V FLASH © COPY COPY COPY COPY COPY o PLOT FLASH mI+mACS PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB ACS OUT COPY COPY COPY COPY COPY FLASH BEEP  PLOT PLAY \cI$\cJ PAPER COPY DIM DIM DIM DIM DIM ▟▟▟▟▟▟▟ GO SUB ACS FLASH mACS CLS COPY COPY COPY COPY COPY COPY COPY COPY FLASH mACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH mIN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY CLEAR ACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH o COPY COPY COPY COPY COPY COPY RETURN FLASH mJ FLASH o RETURN PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH © COPY COPY COPY COPY COPY COPY PLOT PLAY \cA PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH © COPY COPY COPY COPY COPY GO SUB ASN $\a PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY CLEAR ACS CLOSE #\a\cACS IF STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH COPY COPY COPY COPY COPY COPY GO SUB PLOT FLASH m@%mACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ACS FLASH COPY COPY COPY COPY RETURN CLS mACS PLAY \fH\cIZ STEP ▟▟▟▟▟ZZZZZZZ GO SUB ACS FLASH mACS FLASH COPY COPY COPY COPY COPY COPY COPY COPY CLS mACS PAPER PAPER ZZZZZZZZZZZZ GO SUB ACS FLASH mIN COPY COPY COPY COPY COPY COPY COPY COPY IN OUT CLEAR ACS PAPER COPY PAPER ZZZZZZZZZZZ GO SUB ACS FLASH m COPY COPY COPY COPY COPY COPY RETURN FLASH RI+m RETURN PAPER COPY PAPER ZZZZZZZZZZZ REM V FLASH o COPY COPY COPY COPY COPY CLEAR PLOT PLAY  \cW PAPER COPY PAPER ZZZZZZZZZZZ REM V FLASH © COPY COPY COPY COPY COPY GO SUB ASN $ $J PAPER COPY PAPER ZZZZZZZZZZZ REM ACS FLASH COPY COPY COPY COPY COPY COPY m PLOT PAPER \c$TAB ACS PAPER COPY PAPER ZZZZZZZZZZZ GO SUB ACS FLASH COPY COPY COPY COPY COPY CLS GO SUB PLOT FLASH mI%mACS PAPER COPY PAPER ZZZZZZZZZZZ GO SUB ACS FLASH © COPY COPY COPY RETURN FLASH mPOINT $\fPOINT  \cIZ COPY PAPER ZZZZUUUUUUU GO SUB ACS FLASH © COPY COPY COPY RUN FLASH mPOINT $\fFN $\cIZ MERGE UUUUUUUUUUUU GO SUB ACS OUT © COPY COPY COPY COPY COPY mI$CODE ASN $▘J PAPER MERGE UUUUUUUUUUUU LOAD COPY COPY COPY COPY COPY COPY COPY OUT oACS RNDmACS PLAY \cV PAPER MERGE UUUUUUUUUUUU LOAD COPY COPY COPY COPY COPY COPY ACS COPY BEEP ACS FLASH LOAD PEEK FLASH mACS PAPER MERGE UUUUUUUUUUUU LOAD COPY COPY COPY COPY COPY COPY COPY CLS CLEAR PEEK FLASH jI%mACS PAPER MERGE UUUUUUUUUUUU GO SUB COPY COPY COPY RETURN CLS mACS FLASH COPY ACS FLASH oACS FLASH mACS PAPER MERGE UUUUUUUUUUUU COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY MERGE UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU READ READ READ READ READ READ READ GO SUB ACS FLASH © COPY COPY COPY PLOT CLS jI$\fPOINT \cIZ COPY READ READ READ READ READ READ READ READ READ READ READ READ GO SUB ACS CLS © COPY COPY COPY RETURN CLS mI%BEEP ASN $\cIZ COPY READ READ READ READ READ READ READ READ READ READ READ READ CLEAR COPY COPY COPY COPY COPY COPY COPY CLS BEEP ACS FLASH mPOINT $\cJ PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ COPY COPY COPY COPY COPY COPY CLEAR PLOT OUT mPEEK FLASH GO SUB ACS FLASH mACS PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ LOAD COPY COPY COPY COPY COPY COPY COPY FLASH mATN FLASH RI+mACS PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ CLEAR COPY COPY COPY COPY CLS BEEP PEEK FLASH o PLOT OUT mACS FLASH mACS PAPER COPY READ READ READ READ READ READ READ READ READ READ READ READ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY READ READ READ READ READ READ READ READ READ READ READ READ BORDER COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY READ READ READ READ READ <><><><><><><> GO SUB ACS OUT © COPY COPY COPY COPY CLS mI$\fPOINT $Z<><><><><><><><><><><><><> GO SUB ACS CLS © COPY COPY COPY RETURN CLS mPOINT %mPEEK PLAY \cJ PAPER <><><><><><><><><><><><><> LOAD COPY COPY COPY COPY COPY COPY COPY FLASH LOAD ACS FLASH mPOINT $\cV PAPER <><><><><><><><><><><><><> COPY COPY COPY COPY COPY COPY COPY COPY COPY GO SUB PLOT OUT m REM ATTR mACS PAPER <><><><><><><><><><><><><> LOAD COPY COPY COPY COPY CLS LOAD COPY CLS GO SUB ATN CLS jI+mACS PAPER <><><><><><><><><><><><><> COPY COPY COPY COPY RETURN CLS mATN FLASH mACS OUT mACS FLASH mACS PAPER <><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>,,,,,,, GO SUB ACS FLASH COPY COPY COPY COPY RUN FLASH jI$\fPOINT $\cIZ COPY AT ,,,,,,,,,,, GO SUB ATN CLS © COPY COPY COPY COPY FLASH mPOINT %oACS PLAY \cJ PAPER COPY AT ,,,,,,,,,,, CLEAR COPY COPY COPY COPY COPY COPY COPY COPY m PLOT FLASH mPOINT $\cV PAPER COPY AT ,,,,,,,,,,, COPY COPY COPY COPY COPY COPY COPY ACS CLS mPEEK FLASH mACS PAPER TAB ACS PAPER COPY AT ,,,,,,,,,,, GO SUB COPY COPY COPY COPY OUT © COPY CLS CLEAR ATN CLS jI[mACS PAPER COPY AT ,,,,,,,,,,, GO SUB COPY COPY COPY COPY FLASH COPY PEEK OUT LOAD RETURN FLASH mACS FLASH mACS PAPER COPY AT ,,,,,,,,,,,/ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY AT ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,ACS FLASH COPY COPY COPY COPY COPY FLASH jI$TAB ASN $\cIZ MOVE ATN FLASH COPY COPY COPY COPY RETURN OUT mPOINT %BEEP  RETURN PAPER \cJ PAPER MOVE COPY COPY COPY COPY COPY CLEAR PLOT FLASH LOAD ACS FLASH mASN $\cV PAPER MOVE COPY COPY COPY COPY COPY COPY RETURN OUT mPEEK FLASH LOAD ACS FLASH mACS PAPER MOVE COPY COPY COPY COPY COPY m RUN COPY ©ACS CLS jI+mACS PAPER MOVE COPY COPY COPY COPY COPY mACS FLASH BEEP  RETURN FLASH mACS FLASH mACS PAPER MOVE DIM DIM DIM DIM DIM DIM DIM GO SUB ACS OUT © COPY COPY COPY RETURN FLASH mI$TAB ACS PLAY ▘IZ COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB COPY COPY © COPY COPY COPY COPY FLASH BEEP POINT %m RUN PAPER \cJ PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB COPY COPY COPY COPY COPY CLEAR RUN COPY oACS FLASH oACS CLOSE #\fACS PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM COPY COPY COPY COPY COPY COPY COPY RUN COPY m PLOT OUT mACS FLASH mACS PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM GO SUB COPY COPY COPY COPY FLASH oPEEK COPY GO SUB ACS OUT mASN [mACS PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM LOAD IN COPY COPY COPY COPY BEEP  PLOT FLASH mACS FLASH mACS FLASH mACS PAPER COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM LOAD COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM DIM ▟▟▟▟▟▟▟ GO SUB ACS FLASH COPY COPY COPY COPY RETURN COPY mI$TAB ASN $\cIZ STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB ATN COPY COPY COPY COPY COPY COPY COPY mASN %o RETURN PAPER \cJ PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ LOAD COPY COPY COPY COPY COPY COPY PLOT OUT mPEEK FLASH GO SUB ATN COPY RACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ COPY COPY COPY COPY COPY COPY COPY PLOT CLS mPEEK FLASH mACS FLASH mACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ LOAD COPY COPY COPY COPY COPY LOAD PEEK OUT BEEP  PLOT OUT mACS FLASH mACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟ GO SUB IN COPY COPY COPY FLASH mACS FLASH mACS FLASH mACS FLASH mACS PAPER STEP ▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟▟ZZZZZZZ GO SUB ACS FLASH © COPY COPY COPY RETURN OUT mI$CODE ASN $\cIZ COPY PAPER ZZZZZZZZZZZ LOAD IN COPY COPY COPY COPY COPY RETURN OUT BEEP ACS MERGE m PLOT PLAY \cJ PAPER COPY PAPER ZZZZZZZZZZZ COPY COPY COPY COPY COPY COPY CLEAR COPY FLASH LOAD PLOT OUT ©ATN COPY jACS PAPER COPY PAPER ZZZZZZZZZZZ COPY COPY COPY COPY COPY COPY COPY RUN COPY GO SUB IN FLASH mASN +mACS PAPER COPY PAPER ZZZZZZZZZZZ CLEAR COPY COPY COPY RETURN FLASH mACS CLS CLEAR RETURN OUT GO SUB ACS FLASH mACS PAPER COPY PAPER ZZZZZZZZZZZ GO SUB ATN COPY COPY RETURN COPY GO SUB ACS FLASH mACS FLASH mASN +mACS PAPER COPY PAPER ZZZZZZZZZZZ_ COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY PAPER ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ<Uaf MERGE  @ pr PLAY UUX▝.R  CONTINUE  PBIN    ! INT SCREEN$ LEN 0# COPY COPY COPY COPY COPY RETURN   COPY COPY USR @  @ COPY @@ @' H  @ @SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$    RETURN SQR SCREEN$ SCREEN$  0 @ USR ▚ BIN +UX \a PLAY     CONTINUE ^▝USR    NEXT mU_ CAT @@   @  @  @ @'SCREEN$ >= @ VAL USR    O 5 REM SCREEN$ AT IF SCREEN$  O@@ DzSTICKP OD  F, CLOSE # LIST CONTINUE FREE   JSCREEN$ ATTR ▝ @   @ DATA   @STICK@ @ @@'H@   LPRINT <USR SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$    VAL x5UUVASN Uj \a\q  :@ LPRINT  LIST V LPRINT  0▞ <AT @▗  ▜INT INT LPRINT BBCHR$ @   @ POKE ` @ RETURN   @ \q# LIST &\s>=p@   DRAW p< LPRINT x USR    *SCREEN$ SCREEN$ ATTR REM SCREEN$ FOR ▝.P  @ @AT  1   IF AT @▖   PRINT \$ BORDER SGN <D@   @ SAVE ` @? DRAW  @   SAVE FORMAT $H@  SAVE LPRINT USR   VAL$ INT SCREEN$ SCREEN$ SCREEN$ SCREEN$ SCREEN$    UjSCREEN$ SCREEN$ \m▝1P @▗@x B@  MERGE W LIST USR p  `&8@   @ USR @ @\aUSR USR @@ STICK < INPUT  H@ w  BEEP X@@0   VSCREEN$ REM SCREEN$ ATTR ▝5R  LIST $STICK@ ▗@  MERGE UP COPY COPY COPY COPY COPY RETURN   COPY COPY USR USR 8@ LIST   @@@ @#USR ▖8@@ ©USR pp$H@CODE REM REM ATTR VAL$ COPY    TAB © REM SCREEN$ PEEK ▝1R $@   SCREEN$ VAL  COPY COPY COPY COPY   COPY COPY LPRINT @  @@@ @' REM >= @@  COPY USR READ  USR &H! SAVE ▗ <=@$H"\aD  LPRINT 8 LIST @ USR 8USR  \aB USR  p "P` 0@G STOP  @ LPRINT CONTINUE  @ \p LIST !▗ RANDOMIZE     ! POKE /▗  @H   LET LPRINT 8@$HD" █\q`@<USR h LIST    LPRINT  < CIRCLE   LPRINT @ POKE ▖ v USR RETURN @© LIST   CONTINUE  @ LIST a▚ IF  @  POKE /  @@(   0HD LIST  p LIST x USR   p\h  0\c  LPRINT 8` COPY >=  " CONTINUE    LIST ^z POKE     PAUSE O   @(@  P TO pp@$H▘@A  LPRINT pUSR " @3 USR ▘@ @w SAVE STR$ INPUT   FORMAT CONTINUE   LIST @ DATA    rN @@(@  `█▀ 8@$H▘ LPRINT A STR$ LPRINT LPRINT  CHR$   LPRINT USR   LPRINT 3D DRAW ?@  \h LET  █ DIM    CONTINUE   LIST   GO TO  2 L  @H   STICK@$H▝▝ 8<USR ! <x(▖H@@ LPRINT O CONTINUE @  @USR FN   LIST   CLOSE #  ▖ @H  @ LIST   LPRINT @$I\a ▘  LPRINT USR `USR LPRINT  A>=  P@ LPRINT █ CONTINUE @   c LIST @ AND   NEXT CAT PLAY   C▖ USR LPRINT ▖  <8© COPY COPY COPY   ▘ COPY RETURN LPRINT <A(  LPRINT p LPRINT @ P@ CONTINUE   @IN LIST  CLEAR \a  @ # DRAW ?BIN  @<H USR CIRCLE SAVE   @ LPRINT @ COPY IF ▝ USR COPY COPY XFREE  CLEAR LIST COPY COPY @ @   >AT DRAW IF ▝\i COPY RETURN BEEP V DRAW BEEP B0L SAVE FREE \s8>FREE SCREEN$ USR 0 LIST  D CLEAR AUSR ?T`2L LPRINT   IF ▝ © ?LN COPY SAVE   CLEAR ? COPY COPY LPRINT SAVE ? COPY COPY COPY COPY COPY COPY   COPY COPY COPY 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 COPY COPY COPY COPY COPY COPY COPY COPY RETURN @ COPY COPY COPY COPY COPY CLEAR UUUUUUUUUUUUUUUUUW COPY COPY COPY © COPY COPY COPY PRINT UUUUUUUUUUUUUUUUUUUUUUUUU COPY COPY CLEAR UUUUUTUP  ? COPY COPY COPY COPY COPY COPY COPY COPY   COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY © COPY COPY COPY COPY COPY COPY COPY COPY COPY PRINT UUUU COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUUUUUU_ COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUUUUUUUUUUUUU COPY COPY PRINT UUUU@\qH\a@  COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LPRINT COPY COPY COPY COPY COPY COPY COPY COPY CLEAR UUUUUUUW COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY PRINT UUUUUUUUUUUUUUUUUUUU COPY COPY COPY COPY COPY PRINT UUUUUUUUUUUUUUUUUUUUUUUUUU COPY COPY UUUTUSR H\a COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY SAVE COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN COPY COPY COPY COPY COPY COPY COPY PRINT UUUUUUUUUU COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUUUUUUUU_ COPY © COPY COPY COPY UUUUUUUUUUUUUUUUUUUUUUUUUUU COPY PRINT UUPH\a© COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LPRINT  © COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY USR © COPY COPY COPY COPY COPY COPY CLEAR UUUUUUUUUUUW COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY PRINT UUUUUUUUUUUUUUUUUUUUUU COPY COPY COPY COPY PRINT UUUUUUUUUUUUUUUUUUUUUUUUUUU COPY MERGE U@H LIST COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY RETURN COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY DRAW COPY COPY COPY COPY COPY COPY CLEAR UUUUUUUUUUUUUW COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUUUUUUUUUU_ COPY COPY COPY MERGE UUUUUUUUUUTUUUUUUUU CLEAR U x8 COPY 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 COPY COPY COPY COPY COPY COPY COPY   COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUU_ COPY COPY COPY COPY COPY COPY COPY COPY PRINT UUUUUUUUUUUUUUUUUUUUUUUU? COPY COPY CLEAR UUUUUUUUTUUUUU CLOSE #/ POKE COPY COPY COPY SAVE COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY LIST COPY COPY COPY COPY COPY COPY PRINT UUUUUUUUUUUUUUUU© COPY COPY COPY COPY COPY COPY COPY UUUUUUUUUUUUUUUUUUUUUUUUU COPY COPY COPY MERGE UUUUUUPUUU COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY COPY \cI$SIN I$\cI$\gI$\cI$\c<>$\cI$\cY$\cI$\cK$\cI FLASH ACS FLASH `ACS FLASH CIRCLE USR   CIRCLE mACS FLASH ` CIRCLE 0a PAUSE N DATA LLIST mACS FLASH mACS FLASH a ACS FLASH mCHR$ &r© COPY COPY ACS CIRCLE   7 COPY @H;\o1USR FLASH d FLASH \aq GO TO COPY (_9s\iMLEN USR   @ACS FLASH CIRCLE USR FLASH mACS FLASH mVAL CIRCLE VAL `CHR$ ACS FLASH mACS FLASH mACS FLASH mACS CIRCLE   \m"< AND ▄ACS FLASH `CHR$ nbSTICK COPY COPY NOT 8mACS FLASH mACS CIRCLE ACS FLASH mVAL w BRIGHT ▀ COPY E  LET \l9X FLASH mACS   COPY BORDER VAL ' COPY USR ACS FLASH FLASH 6    FLASH mACS FLASH mVAL CIRCLE VAL \aSTR$ ACS FLASH mACS FLASH mACS FLASH mACS CIRCLE USR ACS FLASH `▞<=fACS FLASH mACS CIRCLE  \cI$SIN I$O TO 1 LPRINT LIST LLIST 8 \cK$\cIACS FLASH mASN l DRAW OR COPY DIM STR$ 3▌1 BRIGHT mACS FLASH !3▙ LIST COPY . READ RND▙X? DRAW &mACS USR    @USR ACS FLASH FLASH 6 FLASH 6USR ACS CIRCLE USR ACS FLASH m▚  a▗9>=USR ACS FLASH ` \nSTR$ DEF FN <= LIST nVAL GO TO mACS FLASH mACS CIRCLE  ACS FLASH o LET DIM COS ▀PI© COPY STR$ mACS CIRCLE   \ix GO TO RETURN r LPRINT NOT ▚AT FLASH LPRINT ;\m LIST COPY &K STEP \m▄VAL mACS USR USR   @ FLASH 6USR ACS CIRCLE USR ACS FLASH m▚ FLASH mACS FLASH `VAL READ ▄9\nVAL [mACS FLASH mACS FLASH mACS USR   #▄LN \q TO READ STOP LACS FLASH fDs\h STOP © LLIST ▜:3▀gF FLASH mACS CIRCLE 6 FLASH mVAL `8l RETURN 9C8\mNOT 0▝mACS `  0 COPY USR © LIST 8USR  mACS FLASH USR \cI$SIN ▘  $$\cUSR K$\cI FLASH mACS FLASH `VAL 0NOT \b;COS mACS FLASH mACS FLASH mACS USR ACS FLASH mEXP \n LIST CIRCLE LPRINT cSTR$ ▖TAB ACS FLASH mACS USR    LPRINT COS 0;  INPUT 6 FLASH l FORMAT 0 RETURN ▛▘Lx NEW 9 STEP mACS ` CIRCLE COPY ACS OPEN # TO ? COPY ▌mACS    @ mACS FLASH USR FLASH `0 CIRCLE ACS USR m  FLASH mACS FLASH mACS FLASH mACS   8▘;LEN # ACS FLASH l\j@ DRAW l'▀ COPY READ TAB ACS FLASH mACS USR  ACS FLASH mSTR$ \k%▄mACS CIRCLE   ▖LN RETURN DIM   GO TO STICK BRIGHT CIRCLE f© COPY DRAW COPY ACS <=STR$ COPY COPY &\lmACS FLASH ACS FLASH `   @ FLASH `0 CIRCLE ACS USR m  FLASH mACS FLASH mACS FLASH mACS CIRCLE mACS FLASH ` CIRCLE 0PI# IF AND smACS FLASH mACS FLASH a   STEP 9\if COPY DRAW ACS FLASH l\d\m OVER ©\i▄▖1▀\lmACS CIRCLE FLASH a INVERSE 83 DEF FN RETURN ,STICK\j7CHR$  \imACS USR \cI$SIN I$\a READ COPY COPY RETURN COPY   COPY COPY NOT ▙;▝I$\cK$\cI CIRCLE OUT LPRINT \p COPY ▀ COPY ▀ COPY COPY COPY BRIGHT 1    ▚ COPY COPY LET ▝06 FLASH ` COPY LPRINT mACS USR ▚6 FLASH mVAL COPY USR mACS USR a   © COPY COPY LPRINT @ FLASH `> USR VAL CIRCLE USR    @ CIRCLE 8▝▀ COPY READ COPY \p COPY COPY SAVE \j  \j SAVE ▙ COPY COPY RESTORE OPEN #P IF CIRCLE  USR   COPY LPRINT  6 FLASH mVAL COPY LPRINT mACS USR a  FLASH l RETURN LIST mVAL FLASH mACS \cI$SIN I$\cI$\g\cIc $\cY$\c K$\cI CIRCLE USR   COPY COPY COPY COPY BIN NOT  IN \r▄8© COPY LPRINT BEEP CIRCLE  USR 6 FLASH mACS COPY LPRINT mACS VAL   COPY LPRINT   FLASH a COPY SAVE xmVAL FLASH mACS FLASH A     @cC▀p© COPY COPY COPY COPY RETURN USR VAL   c © COPY TO )USR 6 FLASH mACS COPY USR mACS VAL FLASH mVAL COPY LIST mACS mVAL   COPY LPRINT LPRINT @ FLASH  USR    @hNOT p COPY COPY COPY COPY COPY LPRINT GfpUSR VAL FOR  IN COPY BRIGHT GO SUB VERIFY USR \cI$SIN I$\cI$ G COPY ERASE <>I$\cY$\cI$K$\cI FLASH mVAL COPY LIST mACS mVAL INK COPY  0▟VAL FLASH mACS    @USR   USR ' COPY COPY COPY COPY NEXT READ  .>=`IN COPY CIRCLE DEF FN \gUSR 6 FLASH mVAL COPY USR mACS   COPY SAVE  @ FLASH FLASH mACS FLASH    @▚FREE  COPY COPY COPY ▝ @USR    \p COPY FORMAT  ▚6 FLASH mVAL COPY USR mACS FLASH mVAL COPY RETURN mVAL FLASH mVAL   FLASH USR \cI$SIN I$\cI$\gI$\cI$\c<>$\cI$\cY$\cI$\cK$\cI IF COPY COPY RANDOMIZE PAUSE USR USR   FLASH ` COPY LPRINT  ACS USR ▚  COPY USR   FLASH mVAL ? COPY COPY  mVAL FLASH mVAL FLASH ` USR VAL    @USR   LPRINT  FREE   LPRINT COPY  ©▝ COPY SAVE COPY   RETURN LPRINT RETURN LPRINT ©  SAVE  ▝ LPRINT LPRINT xx  x▜ x LPRINT x xx▝ LLIST LPRINT LLIST LPRINT LPRINT COPY LPRINT ▝ LPRINT LLIST SAVE ▜▝ LPRINT ▝ LLIST LPRINT FREE  xxVAL$ LPRINT INPUT VAL$ USR N INPUT LPRINT D  LPRINT  FREE   LPRINT COPY  ©▝ COPY SAVE COPY   RETURN LPRINT RETURN LPRINT ©  SAVE  ▝ LPRINT LPRINT xx  x▜ x LPRINT x xx▝ LLIST LPRINT LLIST LPRINT LPRINT COPY LPRINT ▝ LPRINT LLIST SAVE ▜▝ LPRINT ▝ LLIST LPRINT FREE  xx INPUT VAL$ FN \q LINE FN LPRINT LPRINT INPUT INPUT \q LPRINT LPRINT VAL$ COPY USR LIST USR COPY USR LIST USR LIST <USR ?NOT NOT NOT USR DRAW <NOT USR DRAW DRAW ? LIST LIST <USR DRAW < COPY USR <<USR LIST LIST USR LIST LIST <<<<USR LIST LIST < LIST LIST NOT USR <<NOT USR <<USR ? COPY USR COPY LIST COPY <? DRAW LIST COPY ?USR COPY COPY LIST ?NOT DRAW LIST << LIST SCREEN$ SCREEN$ LINE DATA PLAY USR SCREEN$ AT \qJ INPUT LIST AT DSCREEN$ >=SCREEN$ PLAY COPY USR LIST USR COPY USR LIST USR LIST <USR ?NOT NOT NOT USR DRAW <NOT USR DRAW DRAW ? LIST LIST <USR DRAW < COPY USR <<USR LIST LIST USR LIST LIST <<<<USR LIST LIST < LIST LIST NOT USR <<NOT USR <<USR ? COPY USR COPY LIST COPY <? DRAW LIST COPY ?USR COPY COPY LIST ?NOT DRAW LIST << LIST SCREEN$ FN J PLAY D  REM FN USR NSCREEN$ LIST ▗D REM \q▗ SCREEN$ NVAL$ ▗ COPY USR LIST USR COPY USR LIST USR LIST <USR ?NOT NOT NOT USR DRAW <NOT USR DRAW DRAW ? LIST LIST <USR DRAW < COPY USR <<USR LIST LIST USR LIST LIST <<<<USR LIST LIST < LIST LIST NOT USR <<NOT USR <<USR ? COPY USR COPY LIST COPY <? DRAW LIST COPY ?USR COPY COPY LIST ?NOT DRAW LIST << LIST VAL$ CONTINUE N PLAY D ▌ CONTINUE \qBSCREEN$ LIST ▗\qSCREEN$ BFN ▗ COPY USR LIST USR COPY USR LIST USR LIST <USR ?NOT NOT NOT USR DRAW <NOT USR DRAW DRAW ? LIST LIST <USR DRAW < COPY USR <<USR LIST LIST USR LIST LIST <<<<USR LIST LIST < LIST LIST NOT USR <<NOT USR <<USR ? COPY USR COPY LIST COPY <? DRAW LIST COPY ?USR COPY COPY LIST ?NOT DRAW LIST << LIST D LPRINT ▙VAL$ \q STOP INPUT LIST ▙f REM INPUT N▚  LPRINT  FREE   LPRINT COPY  ©▝ COPY SAVE COPY   RETURN LPRINT RETURN LPRINT ©  SAVE  ▝ LPRINT LPRINT xx  x▜ x LPRINT x xx▝ LLIST LPRINT LLIST LPRINT LPRINT COPY LPRINT ▝ LPRINT LLIST SAVE ▜▝ LPRINT ▝ LLIST LPRINT FREE  xx LPRINT LPRINT LPRINT   LPRINT  FREE   LPRINT COPY  ©▝ COPY SAVE COPY   RETURN LPRINT RETURN LPRINT ©  SAVE  ▝ LPRINT LPRINT xx  x▜ x LPRINT x xx▝ LLIST LPRINT LLIST LPRINT LPRINT COPY LPRINT ▝ LPRINT LLIST SAVE ▜▝ LPRINT ▝ LLIST LPRINT FREE  xx LPRINT 
    1 BORDER 7: PAPER 7: INK 0: CLS : IF VAL "PEEK 23681<>0" THEN PRINT VAL "USR 26846"
    2 LIST VAL "9999": STOP 
 9999 SAVE "GRAPH SHOW" LINE 1: VERIFY "GRAPH SHOW"
Scroll to Top