10 REM" [205]ODPLAY 64 V1.1
20 [143]" (LEN) 1998 BY (null)ATE STR$ANNENBERG
30 REM" [193]LL [210]IGHTS [210]ESERVED
40 :
50 [151]53280,.:[151]53281,.:DV[178][194](186):[139]DV[179]8[176]DV[177]30[167]DV[178]8
60 MH[178][194](2024):[139]MH[178]20[167][151]53374,.:[151]53366,.:[151]53375,.:[151]53371,.
70 [153]"LOADLIST(null)EADING STR$ATA..."
80 [134] LT(1023),AJ(13),SL(31),IN$(31),C$(1),PM$(3,4),FR$(7),OO$(1)
90 [141]5000:[141]5050
100 [153]"CHR$ENERATING (null)(null)CHR$(X) (null)ABLE...":[129]X[178]0[164]31:LT(X)[178].:[130]
110 LG[178][188](2):[129]X[178]32[164]1023:LT(X)[178][188](X)[173]LG:[130]:L1[178]58880:L2[178]L1[170]1024
120 [129]X[178]0[164]31:[151]L1[170]X,.:[151]L2[170]X,.:[130]
130 [153]"CHR$ENERATING (null)ITCH (null)ABLE...":[141]2500
200 [159]1,DV,15:[132]1,Z$,Z$,Z$,Z$:[160]1
210 [153]"LOADLIST (null)ELCOME TO (null)ODFORPLSYSAY 64 CONTV1CLR.1 - SYS2/3/1998"
220 [153]"PRINT# (null) WAIT LIST(null)OAD (null)ODULE       PRINT# # WAIT LISTLENHANGE STR$EVICE"
230 [153]"PRINT# (null) WAIT LIST(null)LAY (null)ODULE       PRINT# $ WAIT LISTSTR$IRECTORY"
240 [153]"PRINT# (null) WAIT LISTLENHANGE (null)LAY (null)ODE  PRINT# @ WAIT LISTSTR$(null)(null) LENOMMAND"
250 [139]FI[177]0[167][153]"PRINT# RIGHT$ WAIT LIST(null)HOW (null)ODULE RIGHT$NFO  ";:[137]270
260 [153]"PRINT# RIGHT$ WAIT POKE(null)HOW (null)ODULE RIGHT$NFO  ";
270 [139]PM[178]3[176]SP[178]0[167][153]"PRINT# ATN WAIT POKE(null)RIGHT$STR$ #2 LIST[(null)/ATNLIST ]":[137]290
280 [153]"PRINT# ATN WAIT LIST(null)RIGHT$STR$ #2 [    ]"
290 [153]"PRINT# (null) WAIT LIST(null)TEREO [   ]      ";
300 [139]PM[178]1[167]A$[178]"PRINT# STR$ WAIT LISTSTR$ITHER [   ]":B$[178]"PRINT# (null) WAIT LIST(null)OL ASCIX [   ]":[137]320
310 A$[178]"PRINT# STR$ WAIT POKESTR$ITHER LIST[(null)/ATNLIST]":B$[178]"PRINT# (null) WAIT POKE(null)OL ASCIX LIST[(null)/ATNLIST]"
320 [153]A$:[153]B$"     PRINT# (null) WAIT LISTVALXIT (null)ODPLAY"
330 [139]PM[178]2[175]SP[178]1[167]A$[178]"PRINT# PEEK WAIT LISTPEEKALANCE ATNDJUST":[137]350
340 A$[178]"PRINT# PEEK WAIT POKEPEEKALANCE ATNDJUST"
350 [153]A$
360 [139]PM[178]1[167][153]""[163]13)OO$(VO)
370 [139]PM[178]1[167][153]""[163]34)OO$(DI)
380 [153]""[163]12)OO$(SP):[139]PM[179]3[175]SP[178]1[167][141]17020
390 [153]""
400 [153]"LISTLENOMPUTER SPEED ISSYS"MH"(null)LEFT$Z"
410 [139]FI[178]0[167][153]"LIST(null)O (null)ONG (null)OADED (STR$EVICESYS"DV"CMDLIST)":[137]440
420 [153]"LIST ASCILE:SYS "FI$" LISTON STR$EVICESYS"DV:[153]"LIST(null)ITLE: SYS"TL$
430 [153]"LIST (null)IZE:SYS"SZ[171]1500"LISTPEEKYTES"
440 [153]"LIST(null)LAYBACK STR$EV:PRINT "PM$(PM[171]1,0)" "PM$(PM[171]1,1);
450 [153]" IN "PM$(PM[171]1,2)" PEEKITS"
460 [153]"":[146]203,64:[161]K$
470 [139]K$[178]"X"[167][151]53280,14:[151]53281,6:[153]"RETURNCONTLOAD";:[128]
480 [139]K$[178]"#"[167][141]10000:[137]210
490 [139]K$[178]"@"[167][141]11000:[137]210
500 [139]K$[178]"L"[167][141]12000:[137]210
510 [139]K$[178]"$"[167][141]8000:[137]210
520 [139]K$[178]"P"[175]FI[177]0[167][141]1000:[137]210
530 [139]K$[178]"M"[167][141]2000:[137]210
540 [139]K$[178]"I"[175]FI[177]0[167]PG[178]0:[141]13000:[137]210
550 [139]K$[178]"V"[175]PM[178]1[167]VO[178]1[171]VO:[153]""[163]13)OO$(VO):[137]460
560 [139]K$[178]"D"[175]PM[178]1[167]DI[178]1[171]DI:[153]""[163]34)OO$(DI):[137]460
570 [139]K$[178]"S"[167]SP[178]1[171]SP:[153]""[163]12)OO$(SP):[137]460
580 [139]K$[178]"A"[175]PM[179]3[175]SP[178]1[167][141]17000:[137]460
590 [139]K$[178]"B"[175]PM[178]2[175]SP[178]1[167][141]18000:[137]210
600 [137]460
1000 [146]203,41,41
1010 [139](P0[178]PM)[175](S0[178]SP)[175](D0[178]DI)[167]1050
1020 S0[178]SP:D0[178]DI:P0[178]PM
1030 [153]"LIST(null)NE OR MORE (null)LAY (null)ETTINGS WERE CHANGED"
1040 [153]"ATN NEW (null)ITCH (null)ABLE IS BEING GENERATED...":[141]2500
1050 V[178]11:[139]PM[178]2[175]SP[178]1[167]V[178]13
1060 [151]994,PM:[151]995,V
1070 [143]: 996-1000 ARE RESERVED.
1080 [151]1001,DI:[151]1002,VO:[151]1003,SP:[151]1004,S2
1090 [151]1005,LV:[151]1006,RV
1100 [158]25091:[158]25088:[158]25097:[142]
2000 [153]"ON(null)ELECT (null)LAYBACK STR$EVICE:                "
2010 [153]"                                     "
2020 [153]"SYS1PRINT) LIST(null)RIGHT$STR$ LENHIP IN 4 BITS":[139]MH[178]20[167]2040
2030 [153]"PRINT#2) POKE(null)RIGHT$STR$ LENHIP IN 8 BIT (null)(null)(null)":[137]2050
2040 [153]"SYS2PRINT) LIST(null)RIGHT$STR$ LENHIP IN 8 BIT (null)(null)(null)"
2050 [153]"SYS3PRINT) LIST(null)SER (null)ORT STR$ATNLEN IN 8 BITS"
2060 [146]203,36,36
2070 [146]203,64,64:[161]K$:[139]K$[177]"0"[175]K$[179]"4"[167]2090
2080 [137]2070
2090 [139]MH[178]20[167]PM[178][197](K$):[142]
2100 [139]K$[178]"2"[167]2060
2110 PM[178][197](K$):[142]
2500 [139]MH[178]20[167]2550
2510 [139]PM[178]1[167]AJ[178]AJ(SP[170]DI[172]2):[137]2580
2520 [139]PM[178]2[167][153]"(null)(null)(null) (null)ODE NOT AVAILABLE ON 1(null)LEFT$Z SYSTEMS":[128]
2530 [139]PM[178]3[167]AJ[178]AJ(4[170]SP)
2540 [137]2580
2550 [139]PM[178]1[167]AJ[178]AJ(6[170]SP[170]DI[172]2):[137]2580
2560 [139]PM[178]2[167]AJ[178]AJ(10[170]SP):[137]2580
2570 [139]PM[178]3[167]AJ[178]AJ(12[170]SP)
2580 [129]X[178]32[164]1023:Z[178]2[174](AJ[171]LT(X)):[151]L1[170]X,Z[171][181](Z[173]BG)[172]BG:[151]L2[170]X,[181](Z[173]BG)
2590 [130]:[142]
3000 IS[178]IB[170]952:[129]X[178]IS[164]IS[170]127:A[178][194](X):[139]A[177]HP[167]HP[178]A
3010 [130]:HP[178]HP[171]1:NS[178]31:NP[178][194](IB[170]950)[171]1:[142]
3020 IS[178]IB[170]472:[129]X[178]IS[164]IS[170]127:A[178][194](X):[139]A[177]HP[167]HP[178]A
3030 [130]:HP[178]HP[171]1:NS[178]15:NP[178][194](IB[170]470)[171]1:[151]IB[170]950,[194](IB[170]470)
3040 [129]X[178]0[164]127:[151]IB[170]952[170]X,[194](IB[170]472[170]X):[130]:[142]
4000 [141]6000:[139]E[167][153]"VALRROR - "RS$;:[142]
4010 [159]1,DV,2,"0:"[170]FI$:Z8[178].:Z9[178]SZ[172]K1[170]K1
4020 [141]5000
4030 [153]"ONONON                                       "
4040 [153]"                                       "
4050 [153]"ONONLIST (null)OADING ASCILE:PRINT "FI$:[153]"LISTASCILE (null)IZE:SYS"SZ[171]1500"LISTPEEKYTES."
4060 [153]"TOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTO"
4070 [153]"THEN                    FN"
4080 [153]"TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(ON":ML[178]0
4090 [129]Z[178]0[164]31:IN$(Z)[178]"":SL(Z)[178].:[130]
4100 [158]24576:B$[178]"":[129]X[178]1[164]4:[161]#1,A$:B$[178]B$[170]A$:[130]:X[178]0:TL$[178]""
4110 A[178][194](AT[170][194](IB[170]X)):[139]A[178]0[167]4130
4120 TL$[178]TL$[170][199](A):X[178]X[170]1:[139]X[179]20[167]4110
4130 ML[178]ML[170]1000:[141]16000:MT$[178]"(null)OUND(null)RACKER: 15 (null)MP/4 (null)RK":Z1[178]600
4140 [139]B$[178]"M.K."[167][141]3000:MT$[178]"(null)RO(null)RACKER: 31 (null)MP/4 (null)RK":Z1[178]1080:[137]4210
4150 [139]B$[178]"FLT4"[167][141]3000:MT$[178]"(null)TAR(null)REKKER: 31 (null)MP/4 (null)RK":Z1[178]1080:[137]4210
4160 [139]B$[178]"M!K!"[167][141]7000:[142]
4170 [139]B$[178]"6CHN"[167][141]7020:[142]
4180 [139]B$[178]"8CHN"[167][141]7040:[142]
4190 [139]B$[178]"FLT8"[167][141]7060:[142]
4200 [160]1:[159]1,DV,2,"0:"[170]FI$:[158]24579:[141]3020
4210 ML[178]ML[170]Z1:[141]16000:Z8[178]Z8[170]Z1:[129]X[178]0[164]415:[151]DB[170]X,.:[130]
4220 [129]X[178]0[164]31:[151]DB[170]64[170]X,1:[151]DB[170]128[170]X,2:[151]DB[170]160[170]X,1:[130]
4230 [129]Z[178]0[164]31:IN$(Z)[178]"               ":[130]
4240 L$[178]"":[129]X[178]0[164]NS[171]1:ZZ$[178]"":AD[178]X[172]30[170]IB[170]20:A[178].
4250 [129]C[178]0[164]21:Z[178][194](AT[170][194](AD[170]C)):[139](Z[177]31)[167]A[178]A[176]Z:ZZ$[178]ZZ$[170][199](Z)
4260 [130]
4270 SL[178]([194](IB[170]X[172]IM[170]42)[172]BG[170][194](IB[170]X[172]IM[170]43))[172]2[171]1:[139]SL[179]3[175](A[178].[176]A[178]32[176]A[178]160)[167]4300
4280 [139](A[178].)[176](A[178]32)[176](A[178]160)[167]4300
4290 IN$(X[170]1)[178][200](ZZ$[170]"                       ",22)
4300 [130]:ML[178]ML[170]500:[141]16000
4310 [151]57098,.:[129]X[178]0[164]HP[170]1:[158]24582:ML[178]ML[170]K1:[141]16000
4320 TL[178]K1:CA[178]TB:RA[178](X[175]63)[172]K1:RB[178]0:[141]14000
4330 Z8[178]Z8[170]K1:[130]:SS[178](HP[170]2)[172]K1
4340 [129]X[178]0[164]1023:[151]TB[170]X,.:[130]
4350 TL[178]512:CA[178]TB:RA[178]SS[171][181](SS[173]HH)[172]HH:RB[178]SS[173]HH:[141]14000:SE[178]SS[170]512
4360 [129]X[178]0[164]31:[151]DB[170]X,SS[171][181](SS[173]BG)[172]BG:[151]DB[170]32[170]X,[181](SS[173]BG)[175]FF
4370 [151]DB[170]64[170]X,SS[173]HH:[151]DB[170]96[170]X,SE[171][181](SE[173]BG)[172]BG:[151]DB[170]128[170]X,[181](SE[173]BG)[175]FF
4380 [151]DB[170]160[170]X,SE[173]HH:[130]
4390 Z[178]0:[129]X[178]0[164]NS[171]1:Z[178]Z[170]([194](IB[170]X[172]IM[170]42)[172]BG[170][194](IB[170]X[172]IM[170]43))[172]2[171]1:[130]
4400 I2[178]32:SS[178]SS[170]512:[129]X[178]0[164]NS[171]1:SL[178]([194](IB[170]X[172]IM[170]42)[172]BG[170][194](IB[170]X[172]IM[170]43))[172]2[171]1
4410 Z8[178]Z8[170]SL
4420 [139]SL[177]2[167]IN[178]X[170]1
4430 SL(X[170]1)[178]0:[139]SL[179]2[167]4690
4440 SL(X[170]1)[178]SL
4450 V[178][194](IB[170]X[172]IM[170]45):RS[178]([194](IB[170]X[172]IM[170]46)[172]BG[170][194](IB[170]X[172]IM[170]47))[172]2[171]1
4460 RL[178]([194](IB[170]X[172]IM[170]48)[172]BG[170][194](IB[170]X[172]IM[170]49))[172]2[171]1:[139](RS[170]RL)[177]SL[167]RL[178]SL[171]RS
4470 [139]RS[179]2[167]RS[178]0
4480 [139]RL[179][178]2[167]RL[178]0:RS[178]0
4490 [151]DB[170]1[170]X,SS[171][181](SS[173]BG)[172]BG:[151]DB[170]33[170]X,(SS[173]BG)[175]FF:[151]DB[170]65[170]X,SS[173]HH
4500 SE[178]SS[170]SL:[151]DB[170]97[170]X,SE[171][181](SE[173]BG)[172]BG:[151]DB[170]129[170]X,(SE[173]BG)[175]FF
4510 [151]DB[170]161[170]X,SE[173]HH
4520 [151]DB[170]193[170]X,RS[171][181](RS[173]BG)[172]BG:[151]DB[170]225[170]X,(RS[173]BG)[175]FF:[151]DB[170]257[170]X,RS[173]HH
4530 [151]DB[170]289[170]X,RL[171][181](RL[173]BG)[172]BG:[151]DB[170]321[170]X,(RL[173]BG)[175]FF:[151]DB[170]353[170]X,RL[173]HH
4540 [151]DB[170]385[170]X,V
4550 Z1[178][181](SS[173]HH)[175]7:Z2[178][181]((SS[170]SL)[173]HH)[175]7
4560 [139](Z1[178]7)[175](Z2[178]0)[167][141]4750:[137]4590
4570 [151]57092,SS[171][181](SS[173]BG)[172]BG:[151]57093,(SS[173]BG)[175]FF:[151]57094,[181](SS[173]HH)
4580 [151]252,SL[171][181](SL[173]BG)[172]BG:[151]253,(SL[173]BG)[175]FF:[151]254,SL[173]HH:[158]24585
4590 SS[178]SS[170]SL:[139]RL[178]0[176]RL[177]K1[167]4690
4600 [151]57098,.:SS[178]SS[171]SL
4610 RL[178]RL[170]1:R1[178]SS[170]RS:TL[178]RL:CA[178]TB:RA[178]R1[171][181](R1[173]HH)[172]HH:RB[178]R1[173]HH:[141]14010
4620 NA[178][181](K1[173]RL)[170]1:SS[178]R1[170]RL
4630 [129]AD[178]1[164]NA:TL[178]RL:CA[178]TB:RA[178]SS[171][181](SS[173]HH)[172]HH:RB[178]SS[173]HH:[141]14000:SS[178]SS[170]RL
4640 [130]
4650 RZ[178]RL[172]NA:[151]DB[170]289[170]X,RZ[171][181](RZ[173]BG)[172]BG:[151]DB[170]321[170]X,(RZ[173]BG)[175]FF
4660 [151]DB[170]353[170]X,RZ[173]HH:SE[178]SS[171]1
4670 [151]DB[170]97[170]X,SE[171][181](SE[173]BG)[172]BG:[151]DB[170]129[170]X,(SE[173]BG)[175]FF:[151]DB[170]161[170]X,SE[173]HH
4680 [151]DB[170]193[170]X,RS[171][181](RS[173]BG)[172]BG:[151]DB[170]225[170]X,(RS[173]BG)[175]FF:[151]DB[170]257[170]X,RS[173]HH
4690 [139]SL[179][178]2[167]4730
4700 TL[178]O:CA[178]TB:Z[178]SS[171]2:RA[178]Z[171][181](Z[173]HH)[172]HH[171]1:RB[178]Z[173]HH:[141]14010:[129]I[178]0[164]8
4710 [151]TB[170]I,[194](TB):[130]:TL[178]8:CA[178]TB:RA[178]Z[171][181](Z[173]HH)[172]HH[171]1:RB[178]Z[173]HH
4720 [141]14000:SS[178]SS[170]8
4730 ML[178]ML[170]SL:[141]16000:[130]:[160]1:IN[178]1:MU[178]1
4740 [142]
4750 DF[178]([181](SS[173]HH)[172]HH[170]HH)[171]SS[171]1:RM[178]SL[171]DF
4760 [151]57092,SS[171][181](SS[173]BG)[172]BG:[151]57093,(SS[173]BG)[175]FF:[151]57094,SS[173]HH
4770 [151]252,DF[171][181](DF[173]BG)[172]BG:[151]253,(DF[173]BG)[175]FF:[151]254,DF[173]HH:[158]24585
4780 SS[178]SS[170]DF[170]1:[151]57092,SS[171][181](SS[173]BG)[172]BG:[151]57093,(SS[173]BG)[175]FF
4790 [151]57094,SS[173]HH:[151]252,RM[171][181](RM[173]BG)[172]BG:[151]253,(RM[173]BG)[175]FF
4800 [151]254,RM[173]HH:[158]24585:SS[178]SS[170]RM:[142]
4810 [128]
5000 QT[178]34:GT[178]65445:IM[178]30:FF[178]255:MN[178].
5010 HN[178]240:HD[178]16:O[178]1:T[178]2:TH[178]3:F[178]4:K8[178]8192:HH[178]65536:CK[178]53296
5020 VE[178]57098:K1[178]1024:S1[178]54272:HP[178].:Z1[178].:Z2[178].:I2[178].:NS[178].:BG[178]256:HM[178].
5030 C$(0)[178]" CMD":C$(1)[178]" WAITCMD":IB[178]23040:TB[178]22016:DB[178]58112:AT[178]24320
5040 SP$[178]"                    ":OO$(0)[178]"(null)FF":OO$(1)[178]"PRINT(null)N ":[142]
5050 [129]X[178]0[164]2:[129]Y[178]0[164]2:[135]PM$(X,Y):[130]:[130]
5060 [129]X[178]0[164]7:[135]FR$(X):[130]
5070 [129]X[178]0[164]13:[135]AJ(X):[130]
5080 DI[178]1:VO[178]1:LF[178]140:RF[178]40:LR[178].:RR[178].
5090 SP[178]1:S2[178]215:PM[178]3:SI$[178]"OPENSTR$700"
5100 LV[178]7:RV[178]15
5110 P0[178]PM:D0[178]DI:S0[178]SP:[142]
6000 [159]15,DV,15:[132]15,A$,B$,C$,D$:[160]15:RS$[178]A$[170]","[170]B$[170]","[170]C$[170]","[170]D$
6010 E[178][197](A$):[142]
7000 [153]"LOADLENAN'T PLAY (null)RO(null)RACKER 128-(null)ATTERN (null)OD:":[153]FI$:[160]1:[141]5000
7010 NS[178]0:MT$[178]"":E[178]1:[142]
7020 [153]"LOADLENAN'T PLAY (null)RO(null)RACKER 6 TRACK (null)ODULE: ":[153]FI$:[160]1:[141]5000
7030 NS[178]0:MT$[178]"":E[178]1:[142]
7040 [153]"LOADLENAN'T PLAY (null)RO(null)RACKER 8 TRACK (null)ODULE: ":[153]FI$:[160]1:[141]5000
7050 NS[178]0:MT$[178]"":E[178]1:[142]
7060 [153]"LOADLENAN'T PLAY (null)TAR(null)REKKER 8 TRACK (null)ODULE: ":[153]FI$:[160]1:[141]5000
7070 NS[178]0:MT$[178]"":E[178]1:[142]
8000 [153]"LOADSYS":@"$",DV:[153]
9000 [153]:[153]"SYS* (null)RESS ATNNY (null)EY SYS*"
9010 [146] 203,64:[146]203,64,64:[161]ZZ$:[142]
10000 [153]:[153]"(null)EW STR$EVICE (null)UMBER? PRINT";:IN$[178]"":C[178]0:MC[178]2:[141]15000
10010 [139]IN$[178]""[167][142]
10020 A[178][197](IN$):[139]A[177]7[175]A[179]31[167]DV[178]A:[142]
10030 [153]:[153]"RIGHT$LLEGAL STR$EVICE (null)UMBER":[137]9000
11000 IN$[178]"":[153]:[153]"LISTSTR$ISK LENOMMAND":[153]"@PRINT";:MC[178]38:C[178]0:[141]15000
11010 [139]IN$[178]""[167]E[178]0:[142]
11020 [159]1,DV,15,IN$:[160]1:[141]6000:IN$[178]"":[139]E[178]0[167][142]
11030 [153]:[153]"SYS"RS$:[137]9000
12000 [153]:[153]"(null)LEASE VALNTER A ASCILENAME OR (null)ATTERN"
12010 [153]"(null)N STR$EVICESYS"DV"-> PRINT";:IN$[178]"":MC[178]16:C[178]0:[141]15000
12020 [139]IN$[178]""[167]E[178]0:[142]
12030 F$[178]IN$:[141]12070:[139]E[178]0[167]12050
12040 [142]
12050 FI[178]0:[153]"":[141]4000:[160]1:[139]E[178]0[167]FI[178]1:[142]
12060 [137]9000
12070 [159]1,DV,0,"$":[160]1:[141]6000:[139]E[177]0[167][153]:[153]"FOR"RS$:[137]9000
12080 [159]1,DV,2,"0:"[170]F$:[160]1:[141]6000:[139]E[177]0[167][153]:[153]"FOR"RS$:[137]9000
12090 B$[178]"":Z[178].:E[178].:[159]1,DV,0,"$0:"[170]F$:[129]X[178]1[164]34:[161]#1,Z$:[130]
12100 [161]#1,L$,H$:SZ[178]([198](L$[170][199](0))[170][198](H$[170][199](0))[172]256)[172]254[170]1500
12110 [161]#1,A$:[139]A$[179][177][199](34)[167]12110
12120 [161]#1,A$:[139]A$[178][199](34)[167]FI$[178]B$:[160]1:[142]
12130 B$[178]B$[170]A$:Z[178]Z[170]1:[139]Z[179]16[167]12120
12140 FI$[178]B$:[160]1:[142]
13000 [153]"LOAD(null)AMPLE/RIGHT$NFO (null)CREEN";:[139]NS[178]31[167][153]" - (null)AGESYS"PG[170]1;
13010 [153]:[139]NS[178]31[167][153]"PRINT# (null)PC WAIT LIST(null)WITCH (null)AGES    PRINT# (null) WAIT LISTVALXIT TO (null)AIN"
13020 [139]NS[179][177]31[167][153]"PRINT# (null)PC WAIT POKE(null)WITCH (null)AGES    PRINT# (null) WAIT LISTVALXIT TO (null)AIN"
13030 [153]"LIST ASCILE (null)AME: SYS"FI$:[153]"LIST(null)ONG (null)ITLE: SYS"TL$
13040 [153]"":SX[178]PG[172]15[170]1:EX[178]SX[170]14:[139]EX[178]30[167]EX[178]31
13050 [129]X[178]SX[164]EX:[139]X[179]10[167][153]"";
13060 [153]"SYS"X"PRINTCMD) "IN$(X):[130]:[146]203,64:[146]203,64
13070 [161]Z$:[151]208,0:[139]Z$[178]" "[175]NS[178]31[167]PG[178]1[171]PG:[137]13000
13080 [139]Z$[178]"X"[167][142]
13090 [137]13070
14000 [141]14020:[151]57089,148:[142]
14010 [141]14020:[151]57089,149:[142]
14020 H[178][181](CA[173]BG):L[178]CA[171]H[172]256
14030 [151]57090,L:[151]57091,H
14040 H[178][181](RA[173]BG):L[178]RA[171]H[172]256
14050 [151]57092,L:[151]57093,H:[151]57094,RB
14060 H[178][181](TL[173]BG):L[178]TL[171]H[172]256
14070 [151]57095,L:[151]57096,H:[151]57098,0:[142]
15000 [161]A$:[139]A$[179][177]""[167]15030
15010 [139]TI[177](T2[170]30)[167]T2[178]TI:C[178][168]C:[153]C$([182](C));
15020 [137]15000
15030 [139]A$[178][199](13)[167][153]" ";:[142]
15040 [139]A$[179][177][199](20)[167]15070
15050 [139]([195](IN$)[177]0)[167][153]A$;:IN$[178][200](IN$,[195](IN$)[171]1)
15060 [137]15000
15070 [139][195](IN$)[178]MC[167]15000
15080 [139]A$[178][199](34)[167][153]A$[199](20);:[137]15120
15090 [139](A$[177][199](31)[175]A$[179][199](128))[176]A$[177][199](159)[167][153]A$;:[137]15120
15100 [139]A$[179]" "[167][153]""[199]([198](A$)[170]64)"WAIT";:[137]15120
15110 [139]A$[177][199](127)[175]A$[179][199](160)[167][153]""[199]([198](A$)[171]32)"WAIT";
15120 IN$[178]IN$[170]A$:[137]15000
16000 L[178][181](ML[173]SZ[172]160)[173]8
16010 FR[178](L[171][181](L))[172]8:[139]L[179]1[167]A$[178]FR$(FR)[170]"WAIT"[170][200](SP$,20[171][181](L)):[137]16030
16020 [139]L[179]20[167]A$[178]""[170][200](SP$,[181](L))[170]"WAIT"[170]FR$(FR)[170]"WAIT"[170][200](SP$,20[171][181](L))
16030 [153]"ON"A$"CMDFN":[142]
17000 [139]S2[178]215[167]S2[178]222:SI$[178]"CONTSTR$VAL00":[137]17020
17010 [139]S2[178]222[167]S2[178]215:SI$[178]"OPENSTR$700"
17020 [153]""[163]34)SI$:[142]
18000 C[178].:[153]"LIST(null)LEASE VALNTER PEEKALANCE (null)ETTING";:[139]SP[167][153]"S";
18010 [153]:[153]"LIST((null)ANGEPRINT: SYS0LIST..SYS15LIST)":IN$[178][202]([196](LV),2)
18020 [139]SP[178].[167][153]"--> PRINT"IN$;:MC[178]3:[141]15000:A[178][197](IN$):[137]18040
18030 IN$[178][202]([196](LV),2):[153]"SYS (null)EFT --> PRINT"IN$;:MC[178]3:[141]15000:A[178][197](IN$)
18040 [139]A[179]0[176]A[177]15[167]18080
18050 LV[178]A:[139]SP[178].[167][142]
18060 IN$[178][202]([196](RV),2):[153]:[153]"SYS(null)IGHT --> PRINT"IN$;
18070 MC[178]3:[141]15000:A[178][197](IN$):[139](A[177][171]1)[175](A[179]16)[167]RV[178]A:[142]
18080 [153]:[153]"RIGHT$NVALID (null)ETTING":[137]9000
63000 [131]"(null)TANDARD","(null)RIGHT$STR$","4"
63010 [131]"(null)(null)(null) (null)ODE","(null)RIGHT$STR$","8"
63020 [131]"(null)SER (null)ORT","STR$ATNLEN","8"
63030 [131]" ","FN","SGN","INT","GET","ABS","+","THEN"
63040 [131] 19.9,20.05,20.05,20.25,19.75,19.82
63050 [131] 16.61,16.74,16.82,17.05,17.32,17.73,16.72,17.39