160 PRINT CHR$(4)"-SQ"d"BYE"d SPEED= <CTRL-0x08> DEL h`8 <CTRL-0x1f><UNKNOWN TOKEN> GOSUB <CTRL-0x02> HGR2 <CTRL-0x01>` IF ^ TAB( IF ) TAB( <CTRL-0x09> PLOT ) TAB( `8 <CTRL-0x1f><UNKNOWN TOKEN> GOSUB <CTRL-0x02> HGR2 <CTRL-0x01>` IF _ TAB( IF ) TAB( ) SIN PLOT ) TAB( `"
36286 <UNKNOWN TOKEN><CTRL-0x0b> IF 1 GET PLOT <UNKNOWN TOKEN><CTRL-0x0b> SPEED= TAB( DEL
389 SPEED=
20653 TAB( IF R TAB( IF W TAB( SPEED= @ AT ASC = <CTRL-0x04> IF U TAB( `<CTRL-0x0a> DEL ASC IF T TAB( ` END FOR DATA READ VLIN FLASH NEW <UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN> TAN TAB( END
32896 END END END END END
32896 END END END END END
32896 END END END END END
32896 END END END END END (((((((( STORE STORE STORE STORE STORE STORE STORE STORE (((((((( STORE STORE STORE STORE STORE STORE STORE STORE (((((((( STORE STORE STORE STORE STORE STORE STORE STORE (((((((( STORE STORE STORE STORE STORE STORE STORE STORE PPPPPPPP = = = = = = = = PPPPPPPP = = = = = = = = PPPPPPPP = = = = = = = = PPPPPPPP = = = = = = = =
10080 GET A$: IF A$ = "n" OR A$ = "N" THEN GOSUB 10260: RETURN
10090 IF A$ = "y" OR A$ = "Y" THEN PRINT D$"BYE"
10100 GOTO 10080
10110 :
10120 CALL PEEK(121) + PEEK(122) *256 +32,IN$: REM GET COS LEN SIN l EXP DEL DEL INPUT DIM , USR COLOR= <CTRL-0x01> GR ROT= COLOR= <CTRL-0x02> VTAB PLOT RIGHT$ LEN SHLOAD SQR` SHLOAD SQR``
20180 IF K = 139 OR K = 136 THEN I = I -34: IF I <0 THEN I = 0
20190 IF I > = CN THEN 20050
20200 CALL TT:V = 2: GOTO 20130
20220 ONERR GOTO 20250
20230 CALL PEEK(121) + PEEK(122) *256 +32,IN$: REM GET COS LEN SIN l EXP DEL DEL INPUT DIM , USR COLOR= <CTRL-0x01> GR ROT= COLOR= <CTRL-0x02> VTAB PLOT RIGHT$ LEN SHLOAD SQR` SHLOAD SQR``
20240 GOTO 20320
20250 POKE 216,0
20260 PRINT CHR$(4);"CLOSE"
20270 GOTO 2
20290 PRINT CHR$(4);"OPEN SQ.STORY"
20300 PRINT CHR$(4);"READ SQ.STORY"
20310 GOTO 20220
20320 CN = CN +1:TX$(CN) = IN$: GOTO 20310
20330 GET A$
20340 IF A$ = "1" THEN GOTO 20090
20350 IF A$ = "2" THEN CLEAR : DIM TX$(2000),I(14): GOTO 10
601 )<CTRL-0x0f> STORE POKE Y<CTRL-0x02><CTRL-0x09> END SCALE= <CTRL-0x01><CTRL-0x02> GR = <UNKNOWN TOKEN> CALL <CTRL-0x0c> LIST IF i<CTRL-0x02> VTAB <CTRL-0x0e> + + EXP<UNKNOWN TOKEN> POKE <UNKNOWN TOKEN><CTRL-0x0b> + *<CTRL-0x10><UNKNOWN TOKEN> COLOR= <CTRL-0x13> SPEED= @ DEL ASC <UNKNOWN TOKEN><UNKNOWN TOKEN> SPEED= TRACE DEL
389 <CTRL-0x1f>/,P TAB( ,R TAB( ,U TAB( ,W TAB( ` ONERR ASC<CTRL-0x09><CTRL-0x04> DEL <CTRL-0x06> VTAB <CTRL-0x01> DIM <CTRL-0x04> COLOR=
1412 INPUT <CTRL-0x08> RETURN
230 = <CTRL-0x02> ASC<CTRL-0x01> RETURN
230 = <CTRL-0x02> ASC<CTRL-0x01> RETURN
1957 NOT <CTRL-0x08> LOMEM: <CTRL-0x02> HGR <CTRL-0x05> LEFT$ LEFT$ TAN TAB( HGR2 <CTRL-0x12> ASC<CTRL-0x02> LOMEM: <CTRL-0x02> TAB( ( HGR2 <CTRL-0x08> NOT <CTRL-0x04>0<CTRL-0x15> COLOR=
1190 y/ LOMEM: <CTRL-0x08> = POS ASC
486 = POKE ` PR# ) TAB( DEL <CTRL-0x05>JJ<CTRL-0x05><CTRL-0x05> DEL <CTRL-0x05> PR# DEL <CTRL-0x06><CTRL-0x0a><CTRL-0x0a><CTRL-0x0a>&<CTRL-0x06><CTRL-0x0a>&<CTRL-0x06><CTRL-0x0a>f<CTRL-0x05> ONERR <CTRL-0x06>)<CTRL-0x1f><CTRL-0x05> ASC DEL <CTRL-0x06>`
49055 <UNKNOWN TOKEN> GOTO LET PR# LET STORE STORE RESTORE NEW VLIN <CTRL-0x0e><CTRL-0x1a>* END END TAB( ^ ^
35969 SCALE= SCALE= CALL FOR
36088 TAB( <UNKNOWN TOKEN> END END LET
32527 |<CTRL-0x0e>|<CTRL-0x0e>| LET
49344 END END U END END FOR SCALE= SCALE= END END END <UNKNOWN TOKEN> HLIN HLIN HLIN INVERSE <UNKNOWN TOKEN>
36604 <UNKNOWN TOKEN> END END <UNKNOWN TOKEN>
39064 ROT= LIST
39320 <UNKNOWN TOKEN> END END USR<CTRL-0x01><CTRL-0x19><CTRL-0x19>O<CTRL-0x1c>OLOOL<CTRL-0x1f> USR
64170 <UNKNOWN TOKEN>x* END END DATA STOP STOP END END END FLASH DEF END END LIST READ
32927 READ LIST LIST READ
59068 <UNKNOWN TOKEN> LIST
62384 STOP <UNKNOWN TOKEN> END END LET sCs|y<CTRL-0x19><CTRL-0x19><CTRL-0x19><CTRL-0x19><CTRL-0x19><CTRL-0x1c> LET
54485 FOR END U END END END DIM GOSUB END END END <UNKNOWN TOKEN> HLIN HLIN HLIN INVERSE <UNKNOWN TOKEN>
36604 HLIN <UNKNOWN TOKEN> HLIN HLIN
52472 <UNKNOWN TOKEN><UNKNOWN TOKEN>
50883 LEN END END USRggg<CTRL-0x1c><CTRL-0x1c><CTRL-0x1c>303sss USR
43690 END END * END END DIM ASC ASC END END END FLASH DEF END END LIST READ
47263 DEF NEW DEF DEF
33264 FOR <UNKNOWN TOKEN>
58311 SPC( END END LET LLL333`ff||| LET END END END TAB(
63736 USR USR STORE END U END END END ^ CALL END END END HLIN HLIN <UNKNOWN TOKEN> HLIN HLIN HLIN
47246 TAN DEF HLIN HLIN
33665 DATA FOR END TAN GOSUB <UNKNOWN TOKEN> GOSUB END END STEP TAB( STEP END END USRyyyfpf|p|||| USR END END END LET NEXT NEXT NEXT PR#
33153 LET <UNKNOWN TOKEN><UNKNOWN TOKEN>x* END END END SCALE= ROT= END END END DEF DEF NEW DEF DEF DEF
36536 DATA HLIN DEF DEF
63640 ROT= <UNKNOWN TOKEN> END LEN ASC CHR$ ASC END TAB( > TO TO END END LET
24908 s
170 <CTRL-0x0f> END DEL INPUT FOR END U END END DATA DATA DATA END END END <UNKNOWN TOKEN> HLIN <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> READ READ <UNKNOWN TOKEN> READ READ END END <UNKNOWN TOKEN>
1536 END RETURN STOP FOR END
33152 <UNKNOWN TOKEN> SCALE= SCALE= END END USR
213 <CTRL-0x13> END * END END END ROT= ROT= END END END FLASH END READ LIST LIST READ END END VLIN NOTRACE INVERSE DATA
159 <CTRL-0x05> FOR
34438 DIM END END TAN TAN TAN END TAN<UNKNOWN TOKEN> LEN TAB( END END LET
170 <CTRL-0x13> END U END END END STOP STOP
255 <CTRL-0x04> READ END END <UNKNOWN TOKEN> HLIN HLIN HLIN INVERSE <UNKNOWN TOKEN>
45280 END TAN END TAN CHR$ TAN TAN END GOSUB STOP GOSUB STOP END END
4864 END * END END END DIM DIM
40079
47263 DEF DEF LIST READ
57539 ASC SPC( END END <UNKNOWN TOKEN> ^ TAB( END END LIST ASC LIST
63712 <UNKNOWN TOKEN><UNKNOWN TOKEN>
32853 END TAB( TAN GOSUB END END END <UNKNOWN TOKEN> HLIN <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> END END END <UNKNOWN TOKEN> READ <UNKNOWN TOKEN> VLIN <UNKNOWN TOKEN> END END INVERSE <UNKNOWN TOKEN><UNKNOWN TOKEN> HLIN HLIN HLIN
52423 ^ STEP END ROT= <UNKNOWN TOKEN> SCALE= SCALE= END END <UNKNOWN TOKEN> ^ ^
36739 VLIN READ
32810 END SCALE= CALL DIM END END END FLASH END READ LIST LIST READ END END END VLIN NOTRACE FLASH INVERSE DATA END END DEF DEF NEW NEW LIST DEF
33183 FOR FOR END TAN<UNKNOWN TOKEN> LEN SPC( END END <UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN>
32853 END TAB(
36604 HLIN INVERSE <UNKNOWN TOKEN> END END END <UNKNOWN TOKEN> VLIN <UNKNOWN TOKEN> END <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> HLIN <UNKNOWN TOKEN> END END <UNKNOWN TOKEN>
36031 CALL CALL END END LEN TAN<UNKNOWN TOKEN> END END SCALE= END ROT=
32810 END LEN LEN DATA
47263 DEF LIST READ END END END VLIN END VLIN INVERSE DATA END END FLASH END READ LIST LIST READ
59070 ASC GET END END DATA FOR FOR
192 . END U END END ^ ^ CALL END END END <UNKNOWN TOKEN><UNKNOWN TOKEN>
32896 END <UNKNOWN TOKEN><CTRL-0x07> VLIN <UNKNOWN TOKEN>
39100 ROT= LIST END END <UNKNOWN TOKEN> ROT= ROT= END DATA DATA LEN READ
32810 END SCALE= SCALE= ROT= END END END READ READ
40079 FLASH INVERSE DATA
34492 TAN LIST END END <UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN> END TAN GOSUB STOP TAN
85 <CTRL-0x04> END DATA END END END TAN<UNKNOWN TOKEN> TAN TAN TAN
127 <CTRL-0x04> READ END END <UNKNOWN TOKEN> HLIN HLIN HLIN INVERSE <UNKNOWN TOKEN>
60620 ^ ^ END END ATN LEN<UNKNOWN TOKEN> END SPC( ASC ASC SPC(
42 <CTRL-0x08> END FOR FLASH FOR FOR DATA INVERSE END END END VLIN
32896 FLASH DEF DEF DEF NEW STOP
32897 FOR FOR END END LEN<UNKNOWN TOKEN> ATN END READ ^ ^ READ
85 <CTRL-0x09> END HLIN OR <UNKNOWN TOKEN> GET HLIN END END <UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN> END END END
61598
52476 CALL CALL END END LEN CHR$ LEN END VLIN SCALE= SCALE= VLIN
32810 ABS USR USR USR
47544 NEW GET DEF END END END VLIN END END FOR VLIN END END
34748
39320 ROT= <UNKNOWN TOKEN> END END CHR$ TAN END END END TAB( >
32789 END LET LET LET
36604 HLIN INVERSE <UNKNOWN TOKEN> END END END <UNKNOWN TOKEN> VLIN <UNKNOWN TOKEN> END <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> HLIN <UNKNOWN TOKEN> HLIN HLIN <UNKNOWN TOKEN>
46067 STOP <UNKNOWN TOKEN> END END CALL ^ DATA END VLIN SCALE= SCALE= VLIN
54661 USR USR
47295 DEF DEF NEW END END END VLIN END VLIN INVERSE DATA END END NEW END READ END END NEW
59107 ASC LEN END END VLIN FLASH VLIN END INVERSE GOSUB GOSUB INVERSE
43688 LET LET
254 <CTRL-0x04> HLIN
36604 <UNKNOWN TOKEN> END END <UNKNOWN TOKEN>
49376 TAB( CHR$ END GOSUB GET STOP GET END CALL CALL CALL INVERSE END END END <UNKNOWN TOKEN>PPP<UNKNOWN TOKEN>
54721 USR USR
47263
32927 READ LIST LIST READ
45539 FOR LEN
49295 END END END j*** TAN
43658 LET LET
36604 <UNKNOWN TOKEN> INVERSE <UNKNOWN TOKEN>
254 <CTRL-0x05> TAN
57571 ASC LEN
39055 DIM FLASH END END ROT=
155 <CTRL-0x05> ROT= LET VTAB END LET VTAB END END LET VTAB END LET VTAB
1280 STORE <UNKNOWN TOKEN>
41642 END LET VTAB
47263 NEW LIST READ
159 <CTRL-0x05> FOR
36044 CALL ^
40862 STOP INVERSE
34180 END ABS AT END END ABS AT END ABS AT END END USR AT END USR AT END END USR AT END USR AT END END USR AT END USR AT END ABS AT END ABS AT
58343 LEN CHR$
59068 <UNKNOWN TOKEN> LIST
35496 END END STORE PR# END STORE PR# END END STORE PR# END STORE PR# END END STORE PR# END STORE PR# END END STORE PR# END STORE PR# END STORE PR# END STORE PR#
46000 LIST GOSUB
52364 <UNKNOWN TOKEN> TAB(
38353 END < XDRAW END END < XDRAW END < XDRAW END END < XDRAW END < XDRAW END END < XDRAW END < XDRAW END END < XDRAW END < XDRAW END < XDRAW END < XDRAW
34556 NOT <UNKNOWN TOKEN>
33153 FOR
33410 END VTAB LET END END VTAB LET END VTAB LET END END VTAB LET END VTAB LET END END VTAB LET END VTAB LET END END VTAB LET END VTAB LET END VTAB LET END VTAB LET
129 <CTRL-0x18> END TAB( TAB( END AT ABS END END AT ABS END AT ABS END END AT ABS END AT ABS END END AT ABS END AT ABS END END AT ABS END AT ABS END AT ABS END AT ABS
43146 END PR# STORE END END PR# STORE END PR# STORE END END LET VTAB END LET VTAB END END LET VTAB END LET VTAB END END LET VTAB END LET VTAB END PR# STORE END PR# STORE
33153 END XDRAW < END END XDRAW < END XDRAW < END END ABS AT END ABS AT END END ABS AT END ABS AT END END ABS AT END ABS AT END XDRAW < END XDRAW <
41120 END LET VTAB END END LET VTAB END LET VTAB END END STORE PR# END STORE PR# END END STORE PR# END STORE PR# END END STORE PR# END STORE PR# END LET VTAB END LET VTAB
50644 END ABS AT END END ABS AT END ABS AT END END < XDRAW END < XDRAW END END < XDRAW END < XDRAW END END < XDRAW END < XDRAW END ABS AT END ABS AT
10794
6656 COLOR=
21845
54741
54741
10794 END <UNKNOWN TOKEN> GOSUB GOSUB GOSUB
57568 TAN
43690
43690
57568 TAN<UNKNOWN TOKEN><UNKNOWN TOKEN> END TAB( TAB( TAB( END TAB( END END UU END DATA ASC TAN TAB(
49039 NEW / GOTO PR# PR# LET STORE RESTORE END FLASH <CTRL-0x0e><CTRL-0x1e>** END TAB( ^ ^ >
39047 ROT= ROT= READ
63692 ^ END END LET LET
32271 ~|<CTRL-0x0f>|~|<CTRL-0x0c>~ LET LET
129 <CTRL-0x06> END TAB( TAB( END END UU END FOR VLIN SCALE= VLIN END END <UNKNOWN TOKEN> INVERSE HLIN HLIN HLIN <UNKNOWN TOKEN>
40688 INVERSE <UNKNOWN TOKEN> END <UNKNOWN TOKEN>
39068 ROT=
39041 SCALE= END END USR USR<CTRL-0x19><CTRL-0x01><CTRL-0x19><CTRL-0x19><CTRL-0x1f>O|<CTRL-0x0f><CTRL-0x1f>OL<CTRL-0x1f><CTRL-0x1f>OL? USR USR
43690 <UNKNOWN TOKEN><UNKNOWN TOKEN>** END
32896 READ LIST END END DEF FLASH
32927 END FLASH DEF FLASH
59110 TAN
46000 STOP END END LET LET <CTRL-0x03>ss<CTRL-0x03><CTRL-0x18>y|<<CTRL-0x1f><CTRL-0x19><CTRL-0x18><CTRL-0x1c><CTRL-0x19><CTRL-0x19>0 LET LET
54741 FOR FOR UU END END LIST NOTRACE INVERSE END END <UNKNOWN TOKEN> INVERSE HLIN HLIN HLIN <UNKNOWN TOKEN>
40688 HLIN <UNKNOWN TOKEN> HLIN HLIN
52428 TAB(
34534 END END USR USR<CTRL-0x06>ggf0<CTRL-0x1c><CTRL-0x1c><83333ss8 USR USR
43690 END END ** END DIM GET ASC ASC END END READ LIST END END DEF FLASH
48263 DEF NEW DEF DEF
57753 SCALE=
59104 END END LET LET NLL<CTRL-0x1c>8338f`ff<CTRL-0x18>||x LET LET END END END
63728 USR USR STORE STORE UU END END <UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN> END END HLIN HLIN HLIN <UNKNOWN TOKEN> HLIN HLIN
40078 <UNKNOWN TOKEN><UNKNOWN TOKEN> NOTRACE HLIN
33155 DATA END END GOSUB GOSUB GOSUB END END END ^ ^ END END USR USRyyy|pfff@||@p||| USR USR END END END PR# NEXT NEXT NEXT LET
43649 LET <UNKNOWN TOKEN><UNKNOWN TOKEN>** END END <UNKNOWN TOKEN> SCALE= <UNKNOWN TOKEN> END END DEF DEF DEF NEW DEF DEF
40120 READ READ NOTRACE DEF
39064 ROT= END END ASC ASC ASC END END END SPC( TO END END LET LET
19532 ss
43690
34181 FOR FOR UU END
32896 <UNKNOWN TOKEN> INVERSE INVERSE <UNKNOWN TOKEN> END <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> READ READ <UNKNOWN TOKEN> READ READ END END <UNKNOWN TOKEN>
1792 END STOP LEN TAN END CALL CALL CALL END END END SCALE= <UNKNOWN TOKEN> ROT= END USR USR
54741
10794 END END <UNKNOWN TOKEN> ROT= <UNKNOWN TOKEN> END END FLASH END END FLASH DEF FLASH END END DATA INVERSE NOTRACE VLIN
159 <CTRL-0x05> FOR
34694 DATA END END TAN TAN END END TAN LEN ATN END END LET LET
43690
21845 END END <UNKNOWN TOKEN> STOP RETURN
255 <CTRL-0x04> READ END END <UNKNOWN TOKEN> INVERSE HLIN HLIN HLIN <UNKNOWN TOKEN>
57520 GOSUB END END END ATN TAN END END END GOSUB GOSUB END END
4608 END ** END END DATA DIM DIM
40579
48263 DEF DEF DEF FLASH
58342 ASC END END END ^<UNKNOWN TOKEN><UNKNOWN TOKEN> END END ASC ASC
63728 <UNKNOWN TOKEN> TAN
21845 END TAB( <UNKNOWN TOKEN><UNKNOWN TOKEN> GOSUB END END <UNKNOWN TOKEN> INVERSE INVERSE <UNKNOWN TOKEN> END <UNKNOWN TOKEN> END END END <UNKNOWN TOKEN> VLIN <UNKNOWN TOKEN> READ <UNKNOWN TOKEN> END END HLIN GET <UNKNOWN TOKEN> OR HLIN HLIN
52428 ^ END END ROT= SCALE= SCALE= END END END ^ ^
36743 VLIN DATA
10794 END SCALE= FLASH FLASH DIM END END FLASH END END FLASH DEF FLASH END END END DATA INVERSE FLASH END VLIN END END DEF DEF POKE NEW GET DEF
36737 FOR END END TAN LEN LEN END END END SCALE= TO
21845
32960 END END <UNKNOWN TOKEN> INVERSE HLIN HLIN <UNKNOWN TOKEN> END END END <UNKNOWN TOKEN> VLIN <UNKNOWN TOKEN> END <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> INVERSE INVERSE <UNKNOWN TOKEN> END <UNKNOWN TOKEN>
35980 CALL END END END GOSUB
39320
10794 END LEN LEN LEN READ END END END READ LIST DEF DEF FLASH END END END VLIN END DATA INVERSE VLIN END END FLASH END END FLASH DEF FLASH
59110 ASC
32899 END TAB(
21845 END TAB( ^ > CALL END END TAN<UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN> END END END <UNKNOWN TOKEN><CTRL-0x0f> READ <UNKNOWN TOKEN>
39064 ROT= END END END DEF ROT= END END DATA DATA DATA
10794 END FOR SCALE= FLASH ROT= END END READ END READ
40579 FLASH END VLIN
48358 ASC END END END ROT= ROT= END END GOSUB TAN GOSUB
21845
32899 END TAN<UNKNOWN TOKEN> TAN TAN TAN TAB( END END END
32896 <UNKNOWN TOKEN> INVERSE HLIN HLIN OR <UNKNOWN TOKEN>
64716 ^ END END END STOP END END END ASC LEN ASC
10794
40833 FOR FOR FOR FLASH END END END DATA INVERSE NOTRACE NOTRACE NOTRACE END END READ LIST DEF DEF POKE FLASH
32897 FOR END END END GOSUB STOP END END ^ ^ ^
21845
36494 OR <UNKNOWN TOKEN> INVERSE END END <UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN><UNKNOWN TOKEN> TAN END END
252 <CTRL-0x06> END ^<UNKNOWN TOKEN> CALL END END END ASC TAN END END SCALE= SCALE= SCALE=
10794 HGR2 USR USR USR
47288 POKE NEW LIST END END END VLIN END END END VLIN END END
159 <CTRL-0x06> END SCALE= ROT= ROT= END END END ATN TAB( END END TAB( END TAB(
5397 END VTAB LET LET
40688 HLIN HLIN <UNKNOWN TOKEN> END END END <UNKNOWN TOKEN> VLIN <UNKNOWN TOKEN> END <UNKNOWN TOKEN> END END <UNKNOWN TOKEN> HLIN HLIN <UNKNOWN TOKEN> HLIN <UNKNOWN TOKEN>
62387 STOP END END END ^ STEP END END SCALE= VLIN SCALE=
38273 USR USR
47295 DEF DEF NEW END END END VLIN END DATA INVERSE VLIN END END NEW END END READ END NEW
58342 ASC END END END SCALE= FOR END END STOP NOTRACE STOP
43680 LET LET
254 <CTRL-0x04> HLIN
40688 INVERSE <UNKNOWN TOKEN> END <UNKNOWN TOKEN>
49344 TAB( END END GOSUB STOP STOP END END HLIN CALL CALL
1024 P
54741 USR
48263
32927 END FLASH DEF FLASH
57777 RETURN
192 <CTRL-0x05> END FLASH ***^
43650 LET LET
40688 <UNKNOWN TOKEN> HLIN <UNKNOWN TOKEN>
254 <CTRL-0x05> TAN
58342 ASC
35993 DATA END END END NOTRACE <CTRL-0x15><CTRL-0x15><CTRL-0x15><CTRL-0x1d>
32938 VTAB LET END VTAB LET LET END VTAB LET END VTAB LET
1024 STORE <UNKNOWN TOKEN><UNKNOWN TOKEN>
41600 LET END VTAB LET END END READ LIST NEW END FLASH
159 <CTRL-0x05> FOR
36748 CALL
45955 STOP
32900 DEL INPUT END AT ABS ABS END AT ABS END AT ABS USR END AT USR END AT USR USR END AT USR END AT USR USR END AT USR END AT USR END AT ABS END AT ABS
58339 LEN
59110 TAN
43146 STORE END PR# STORE END PR# STORE STORE END PR# STORE END PR# STORE STORE END PR# STORE END PR# STORE STORE END PR# STORE END PR# STORE END PR# STORE END PR# STORE
46769 DEF
52428 TAB(
32977 XDRAW < END XDRAW < < END XDRAW < END XDRAW < < END XDRAW < END XDRAW < < END XDRAW < END XDRAW < < END XDRAW < END XDRAW < END XDRAW < END XDRAW <
59078 NOT
33153 FOR
32898 NEXT NEXT END LET VTAB VTAB END LET VTAB END LET VTAB VTAB END LET VTAB END LET VTAB VTAB END LET VTAB END LET VTAB VTAB END LET VTAB END LET VTAB END LET VTAB END LET VTAB
33153 FOR
32960 TAB( TAB( END ABS AT AT END ABS AT END ABS AT AT END ABS AT END ABS AT AT END ABS AT END ABS AT AT END ABS AT END ABS AT END ABS AT END ABS AT
32906 STORE PR# END STORE PR# PR# END STORE PR# END STORE PR# LET END VTAB LET END VTAB LET LET END VTAB LET END VTAB LET LET END VTAB LET END VTAB LET END STORE PR# END STORE PR#
32897 FOR FOR END < XDRAW XDRAW END < XDRAW END < XDRAW ABS END AT ABS END AT ABS ABS END AT ABS END AT ABS ABS END AT ABS END AT USR END < XDRAW END < XDRAW
32928 COLOR= COLOR= END VTAB LET LET END VTAB LET END VTAB LET STORE END PR# STORE END PR# STORE STORE END PR# STORE END PR# STORE STORE END PR# STORE END PR# LET END VTAB LET END VTAB LET
32980 AT ABS END AT ABS ABS END AT ABS END AT ABS < END XDRAW < END XDRAW < < END XDRAW < END XDRAW < < END XDRAW < END XDRAW USR END AT ABS END AT ABS END <UNKNOWN TOKEN> CONT NORMAL <UNKNOWN TOKEN> CONT h SCALE= <UNKNOWN TOKEN> CONT CLEAR <UNKNOWN TOKEN> CONT H POKE <UNKNOWN TOKEN> CONT NORMAL <UNKNOWN TOKEN> CONT h SCALE= <UNKNOWN TOKEN> CONT SPEED=
43455 ^ p GET GOSUB ' P VTAB ,N GET <CTRL-0x10><CTRL-0x0b>H SPEED=
36286 N GET h` OR M GET ` RESTORE M GET <UNKNOWN TOKEN><CTRL-0x0c> HLIN N GET CLEAR <UNKNOWN TOKEN> CONT <CTRL-0x15> WAIT HGR2 <UNKNOWN TOKEN>` SPEED=
43454 <CTRL-0x07> PLOT DRAW NEW SPEED= ^Lp GET VLIN ON GOSUB h PLOT FRE GET PLOT SGN GET ,G GET 0^ IF W GET )<CTRL-0x03><UNKNOWN TOKEN>T -<CTRL-0x03><UNKNOWN TOKEN>P)<CTRL-0x01><UNKNOWN TOKEN><CTRL-0x0c> IF e GET PLOT c GET IF f GET PLOT d GET SPEED= <UNKNOWN TOKEN> PLOT POS GET SPEED=
36286 SCRN( GET SPEED= <CTRL-0x02> PLOT PDL GET SPEED= PLOT INT GET SPEED= - p GET GOSUB $ IF c GET <CTRL-0x0d>d GET <CTRL-0x18><UNKNOWN TOKEN><CTRL-0x1c> SPEED= * p GET GOSUB <CTRL-0x14> IF c GET RIGHT$
44478 d GET RIGHT$
45246 COS SPEED= <CTRL-0x0b>8` IF <UNKNOWN TOKEN> CONT PLOT <CTRL-0x0a> LIST IF