CASSETTE LABEL
FILE INFORMATION
FILENAME(S): CASSETTE LABEL
FILE TYPE(S): PRG
FILE SIZE: 7.8K
FIRST SEEN: 2025-10-19 22:48:40
APPEARS ON: 1 disk(s)
FILE HASH
c6ec766785ef9165a3f14f6b6631399a01766208f90e5701622270b27729c28a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| QL APPLICATIONS | CASSETTE LABEL | PRG | Radd Maxx | 12 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..(.... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 14 00 8F 20 2A |********.O.... *| 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 00000050: 76 08 1E 00 8F 20 2A 20 20 20 20 20 20 43 41 53 |v.... * CAS| 00000060: 53 45 54 54 45 20 46 4F 52 4D 41 54 54 45 52 20 |SETTE FORMATTER | 00000070: 20 20 20 20 20 2A 00 9D 08 28 00 8F 20 2A 20 20 | *...(.. * | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 42 59 20 20 | BY | 00000090: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 C4 08 | *...| 000000A0: 32 00 8F 20 2A 20 20 20 20 20 20 20 20 41 4C 45 |2.. * ALE| 000000B0: 58 20 52 2E 20 47 41 52 43 49 41 20 20 20 20 20 |X R. GARCIA | 000000C0: 20 20 20 2A 00 EB 08 3C 00 8F 20 2A 20 20 20 20 | *...<.. * | 000000D0: 20 20 20 20 4E 4F 56 2E 20 31 38 2C 20 31 39 38 | NOV. 18, 198| 000000E0: 36 20 20 20 20 20 20 20 20 20 2A 00 12 09 46 00 |6 *...F.| 000000F0: 8F 20 2A 20 20 20 20 20 20 20 20 20 43 4F 4D 4D |. * COMM| 00000100: 4F 44 4F 52 45 20 36 34 20 20 20 20 20 20 20 20 |ODORE 64 | 00000110: 20 2A 00 39 09 50 00 8F 20 2A 2A 2A 2A 2A 2A 2A | *.9.P.. *******| 00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 58 09 64 00 97 35 |*********.X.d..5| 00000140: 33 32 38 30 2C 31 32 3A 97 35 33 32 38 31 2C 36 |3280,12:.53281,6| 00000150: 3A 97 36 34 36 2C 31 35 00 66 09 69 00 97 35 33 |:.646,15.f.i..53| 00000160: 32 37 32 2C 32 33 00 8A 09 6E 00 4C 4D 54 B2 33 |272,23...n.LMT.3| 00000170: 36 3A 86 20 53 49 44 45 24 28 32 2C 4C 4D 54 29 |6:. SIDE$(2,LMT)| 00000180: 2C 50 52 24 28 32 2C 32 35 29 00 BC 09 78 00 55 |,PR$(2,25)...x.U| 00000190: 53 24 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |S$."............| 000001A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................| 000001B0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 00 FC 09 82 |..........."....| 000001C0: 00 42 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.BL$." | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 41 | ":A| 000001F0: 53 41 56 B2 31 3A 42 53 41 56 B2 31 00 2F 0A C8 |SAV.1:BSAV.1./..| 00000200: 00 99 22 93 11 20 12 A6 B7 B7 B7 B7 B7 B7 B7 B7 |..".. ..........| 00000210: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................| 00000220: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 A6 92 22 00 |..............".| 00000230: 60 0A CD 00 99 22 20 12 A6 20 20 20 20 20 20 20 |`...." .. | 00000240: 20 20 C3 41 53 53 45 54 54 45 20 C6 4F 52 4D 41 | .ASSETTE .ORMA| 00000250: 54 54 45 52 20 20 20 20 20 20 20 20 20 A6 92 22 |TTER .."| 00000260: 00 91 0A CF 00 99 22 20 12 A6 AF AF AF AF AF AF |......" ........| 00000270: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................| 00000280: AF AF AF AF AF AF AF AF AF AF AF AF AF AF A6 92 |................| 00000290: 22 00 BE 0A D2 00 99 22 11 22 3B A3 35 29 3B 22 |"......".";.5);"| 000002A0: 31 20 20 20 C5 4E 54 45 52 20 D3 49 44 45 20 27 |1 .NTER .IDE '| 000002B0: C1 27 20 D3 45 4C 45 43 54 49 4F 4E 53 22 00 EB |.' .ELECTIONS"..| 000002C0: 0A DC 00 99 22 11 22 3B A3 35 29 3B 22 32 20 20 |....".";.5);"2 | 000002D0: 20 C5 4E 54 45 52 20 D3 49 44 45 20 27 C2 27 20 | .NTER .IDE '.' | 000002E0: D3 45 4C 45 43 54 49 4F 4E 53 22 00 0F 0B E6 00 |.ELECTIONS".....| 000002F0: 99 22 11 22 3B A3 35 29 3B 22 33 20 20 20 C4 49 |.".";.5);"3 .I| 00000300: 53 50 4C 41 59 20 D3 49 44 45 20 27 C1 27 22 00 |SPLAY .IDE '.'".| 00000310: 33 0B F0 00 99 22 11 22 3B A3 35 29 3B 22 34 20 |3....".";.5);"4 | 00000320: 20 20 C4 49 53 50 4C 41 59 20 D3 49 44 45 20 27 | .ISPLAY .IDE '| 00000330: C2 27 22 00 62 0B FA 00 99 22 11 22 3B A3 35 29 |.'".b....".";.5)| 00000340: 3B 22 35 20 20 20 C3 48 41 4E 47 45 20 D3 45 4C |;"5 .HANGE .EL| 00000350: 45 43 54 49 4F 4E 20 27 C1 27 20 4F 52 20 27 C2 |ECTION '.' OR '.| 00000360: 27 22 00 89 0B 04 01 99 22 11 22 3B A3 35 29 3B |'"......".";.5);| 00000370: 22 36 20 20 20 D0 52 49 4E 54 20 C3 41 53 53 45 |"6 .RINT .ASSE| 00000380: 54 54 45 20 CD 45 4E 55 22 00 B3 0B 0E 01 99 22 |TTE .ENU"......"| 00000390: 11 22 3B A3 35 29 3B 22 37 20 20 20 C5 58 49 54 |.";.5);"7 .XIT| 000003A0: 20 C6 4F 52 4D 41 54 54 45 52 20 D0 52 4F 47 52 | .ORMATTER .ROGR| 000003B0: 41 4D 22 00 DE 0B 18 01 99 22 11 22 3B A3 35 29 |AM"......".";.5)| 000003C0: 3B 22 38 20 20 20 D2 45 53 45 54 20 D3 49 44 45 |;"8 .ESET .IDE| 000003D0: 53 20 27 C1 27 20 41 4E 44 20 27 C2 27 22 00 00 |S '.' AND '.'"..| 000003E0: 0C 1D 01 99 22 11 22 3B A3 35 29 3B 22 39 20 20 |....".";.5);"9 | 000003F0: 20 CC 4F 41 44 20 D4 45 53 54 20 C4 41 54 41 22 | .OAD .EST .ATA"| 00000400: 00 22 0C 22 01 99 22 11 22 3B A3 31 30 29 3B 22 |."."..".";.10);"| 00000410: C5 4E 54 45 52 20 CF 50 54 49 4F 4E 3A 20 AF 9D |.NTER .PTION: ..| 00000420: 22 3B 00 43 0C 2C 01 A1 53 45 4C 24 3A 8B 53 45 |";.C.,..SEL$:.SE| 00000430: 4C 24 B3 22 31 22 B0 53 45 4C 24 B1 22 39 22 A7 |L$."1".SEL$."9".| 00000440: 33 30 30 00 7D 0C 36 01 91 C5 28 53 45 4C 24 29 |300.}.6...(SEL$)| 00000450: 89 31 30 30 30 2C 32 30 30 30 2C 33 30 30 30 2C |.1000,2000,3000,| 00000460: 34 30 30 30 2C 35 30 30 30 2C 36 30 30 30 2C 37 |4000,5000,6000,7| 00000470: 30 30 30 2C 38 30 30 30 2C 39 30 30 30 00 A2 0C |000,8000,9000...| 00000480: E8 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************| 00000490: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000004A0: 2A 2A 00 C7 0C F2 03 8F 20 2A 20 20 45 4E 54 45 |**...... * ENTE| 000004B0: 52 20 53 49 44 45 20 27 41 27 20 53 45 4C 45 43 |R SIDE 'A' SELEC| 000004C0: 54 49 4F 4E 20 20 2A 00 EC 0C FC 03 8F 20 2A 2A |TION *...... **| 000004D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000004E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 30 0D 4C |************.0.L| 000004F0: 04 8B 41 46 4C 47 B2 30 A7 53 49 44 45 24 B2 22 |..AFLG.0.SIDE$."| 00000500: C1 22 3A 53 49 44 45 B2 31 3A 41 44 54 B2 31 3A |.":SIDE.1:ADT.1:| 00000510: 53 41 56 B2 41 53 41 56 3A 8D 32 32 30 30 3A 41 |SAV.ASAV:.2200:A| 00000520: 53 41 56 B2 53 41 56 3A 41 46 4C 47 B2 46 4C 47 |SAV.SAV:AFLG.FLG| 00000530: 00 39 0D 56 04 89 32 30 30 00 5E 0D D0 07 8F 20 |.9.V..200.^.... | 00000540: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 83 |**************..| 00000560: 0D DA 07 8F 20 2A 20 20 45 4E 54 45 52 20 53 49 |.... * ENTER SI| 00000570: 44 45 20 27 42 27 20 53 45 4C 45 43 54 49 4F 4E |DE 'B' SELECTION| 00000580: 20 20 2A 00 A8 0D E4 07 8F 20 2A 2A 2A 2A 2A 2A | *...... ******| 00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 00 EC 0D 34 08 8B 42 46 |********...4..BF| 000005B0: 4C 47 B2 30 A7 53 49 44 45 24 B2 22 C2 22 3A 53 |LG.0.SIDE$.".":S| 000005C0: 49 44 45 B2 32 3A 42 44 54 B2 31 3A 53 41 56 B2 |IDE.2:BDT.1:SAV.| 000005D0: 42 53 41 56 3A 8D 32 32 30 30 3A 42 53 41 56 B2 |BSAV:.2200:BSAV.| 000005E0: 53 41 56 3A 42 46 4C 47 B2 46 4C 47 00 F5 0D 3E |SAV:BFLG.FLG...>| 000005F0: 08 89 32 30 30 00 30 0E 98 08 99 22 93 12 20 20 |..200.0....".. | 00000600: 20 20 20 20 20 C5 4E 54 45 52 20 D3 49 44 45 20 | .NTER .IDE | 00000610: 27 22 3B 53 49 44 45 24 3B 22 27 20 D3 45 4C 45 |'";SIDE$;"' .ELE| 00000620: 43 54 49 4F 4E 53 20 20 20 20 20 20 20 20 92 22 |CTIONS ."| 00000630: 00 41 0E 9A 08 8B 53 41 56 B2 31 A7 8D 32 35 30 |.A....SAV.1..250| 00000640: 30 00 7F 0E 9D 08 8B 41 44 54 B2 30 B0 42 44 54 |0......ADT.0.BDT| 00000650: B2 30 A7 85 22 C5 4E 54 45 52 20 D2 45 43 4F 52 |.0..".NTER .ECOR| 00000660: 44 49 4E 47 20 C4 41 54 45 20 20 4D 4D 44 44 59 |DING .ATE MMDDY| 00000670: 59 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 57 52 4B 24 00 |Y........";WRK$.| 00000680: A2 0E 9E 08 8B 28 41 44 54 B2 30 B0 42 44 54 B2 |.....(ADT.0.BDT.| 00000690: 30 29 AF C3 28 57 52 4B 24 29 B3 B1 36 A7 32 32 |0)..(WRK$)..6.22| 000006A0: 30 30 00 D4 0E A0 08 44 41 54 45 24 B2 C8 28 57 |00.....DATE$..(W| 000006B0: 52 4B 24 2C 32 29 AA 22 2F 22 AA CA 28 57 52 4B |RK$,2)."/"..(WRK| 000006C0: 24 2C 33 2C 32 29 AA 22 2F 22 AA C9 28 57 52 4B |$,3,2)."/"..(WRK| 000006D0: 24 2C 32 29 00 F0 0E A2 08 99 22 CE 4F 2E 22 3B |$,2)......".O.";| 000006E0: A3 31 37 29 3B 22 D3 45 4C 45 43 54 49 4F 4E 22 |.17);".ELECTION"| 000006F0: 00 FA 0E AC 08 46 4C 47 B2 30 00 35 0F FC 08 81 |.....FLG.0.5....| 00000700: 20 53 45 4C B2 53 41 56 20 A4 20 4C 4D 54 20 20 | SEL.SAV . LMT | 00000710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.| 00000720: 20 4C 49 4D 49 54 20 4F 46 20 33 36 20 50 45 52 | LIMIT OF 36 PER| 00000730: 20 53 49 44 45 00 49 0F 06 09 4E 4F 24 B2 C9 28 | SIDE.I...NO$..(| 00000740: C4 28 53 45 4C 29 2C 32 29 00 64 0F 10 09 99 4E |.(SEL),2).d....N| 00000750: 4F 24 3B 3A 85 53 49 44 45 24 28 53 49 44 45 2C |O$;:.SIDE$(SIDE,| 00000760: 53 45 4C 29 00 95 0F 24 09 8B C3 28 53 49 44 45 |SEL)...$...(SIDE| 00000770: 24 28 53 49 44 45 2C 53 45 4C 29 29 B1 48 49 A7 |$(SIDE,SEL)).HI.| 00000780: 48 49 B2 C3 28 53 49 44 45 24 28 53 49 44 45 2C |HI..(SIDE$(SIDE,| 00000790: 53 45 4C 29 29 00 C6 0F 56 09 8B 53 49 44 45 24 |SEL))...V..SIDE$| 000007A0: 28 53 49 44 45 2C 53 45 4C 29 B2 22 22 A7 53 49 |(SIDE,SEL)."".SI| 000007B0: 44 45 24 28 53 49 44 45 2C 53 45 4C 29 B2 22 22 |DE$(SIDE,SEL).""| 000007C0: 3A 89 32 34 31 30 00 CF 0F 60 09 82 53 45 4C 00 |:.2410...`..SEL.| 000007D0: EA 0F 6A 09 53 41 56 B2 53 45 4C 3A 8B 53 41 56 |..j.SAV.SEL:.SAV| 000007E0: B2 4C 49 4D A7 46 4C 47 B2 31 00 F0 0F BA 09 8E |.LIM.FLG.1......| 000007F0: 00 2F 10 C4 09 99 22 13 11 11 20 20 20 20 20 20 |./...."... | 00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000810: 20 20 20 20 20 20 20 20 20 20 2D 20 20 20 20 20 | - | 00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 22 00 | )".| 00000830: 53 10 CE 09 85 22 13 11 11 C5 4E 54 45 52 20 C1 |S...."....NTER .| 00000840: 4C 42 55 4D 22 3B 53 49 44 45 24 28 53 49 44 45 |LBUM";SIDE$(SIDE| 00000850: 2C 30 29 00 79 10 E2 09 53 49 44 45 24 28 53 49 |,0).y...SIDE$(SI| 00000860: 44 45 2C 30 29 B2 C8 28 53 49 44 45 24 28 53 49 |DE,0)..(SIDE$(SI| 00000870: 44 45 2C 30 29 2C 33 38 29 00 7F 10 EC 09 8E 00 |DE,0),38).......| 00000880: A4 10 B8 0B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********| 00000890: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000008A0: 2A 2A 2A 2A 00 C9 10 C2 0B 8F 20 2A 20 20 20 20 |****...... * | 000008B0: 20 20 44 49 53 50 4C 41 59 20 53 49 44 45 20 27 | DISPLAY SIDE '| 000008C0: 41 27 20 20 20 20 20 20 2A 00 EE 10 CC 0B 8F 20 |A' *...... | 000008D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000008E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 14 |**************..| 000008F0: 11 1C 0C 53 49 44 45 24 B2 22 41 22 3A 53 49 44 |...SIDE$."A":SID| 00000900: 45 B2 31 3A 53 41 56 B2 41 53 41 56 AB 31 3A 8D |E.1:SAV.ASAV.1:.| 00000910: 34 35 30 30 00 1D 11 26 0C 89 32 30 30 00 42 11 |4500...&..200.B.| 00000920: A0 0F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************| 00000930: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000940: 2A 2A 00 67 11 AA 0F 8F 20 2A 20 20 20 20 20 20 |**.g.... * | 00000950: 44 49 53 50 4C 41 59 20 53 49 44 45 20 27 42 27 |DISPLAY SIDE 'B'| 00000960: 20 20 20 20 20 20 2A 00 8C 11 B4 0F 8F 20 2A 2A | *...... **| 00000970: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B2 11 04 |************....| 00000990: 10 53 49 44 45 24 B2 22 42 22 3A 53 49 44 45 B2 |.SIDE$."B":SIDE.| 000009A0: 32 3A 53 41 56 B2 42 53 41 56 AB 31 3A 8D 34 35 |2:SAV.BSAV.1:.45| 000009B0: 30 30 00 BB 11 0E 10 89 32 30 30 00 F6 11 94 11 |00......200.....| 000009C0: 99 22 93 12 20 20 20 20 20 20 C4 49 53 50 4C 41 |.".. .ISPLA| 000009D0: 59 20 D3 49 44 45 20 27 22 3B 53 49 44 45 24 3B |Y .IDE '";SIDE$;| 000009E0: 22 27 20 D3 45 4C 45 43 54 49 4F 4E 53 20 20 20 |"' .ELECTIONS | 000009F0: 20 20 20 20 92 22 00 13 12 98 11 99 22 C1 4C 42 | ."......".LB| 00000A00: 55 4D 3A 20 22 3B 53 49 44 45 24 28 53 49 44 45 |UM: ";SIDE$(SIDE| 00000A10: 2C 30 29 00 2B 12 9A 11 99 22 D2 45 43 2E C4 41 |,0).+....".EC..A| 00000A20: 54 45 3A 20 22 3B 44 41 54 45 24 00 47 12 9E 11 |TE: ";DATE$.G...| 00000A30: 99 22 CE 4F 2E 22 3B A3 31 37 29 3B 22 D3 45 4C |.".O.";.17);".EL| 00000A40: 45 43 54 49 4F 4E 22 00 56 12 F8 11 81 53 45 4C |ECTION".V....SEL| 00000A50: B2 31 A4 53 41 56 00 68 12 02 12 8B 53 45 4C B2 |.1.SAV.h....SEL.| 00000A60: 31 39 A7 8D 34 39 30 30 00 7C 12 0C 12 4E 4F 24 |19..4900.|...NO$| 00000A70: B2 C9 28 C4 28 53 45 4C 29 2C 32 29 00 99 12 16 |..(.(SEL),2)....| 00000A80: 12 99 4E 4F 24 3B 22 20 22 3B 53 49 44 45 24 28 |..NO$;" ";SIDE$(| 00000A90: 53 49 44 45 2C 53 45 4C 29 00 A2 12 52 12 82 53 |SIDE,SEL)...R..S| 00000AA0: 45 4C 00 E8 12 C0 12 99 22 13 11 11 11 11 11 11 |EL......".......| 00000AB0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000AC0: 11 11 20 20 20 20 C8 49 54 20 12 3C D2 C5 D4 D5 |.. .IT .<....| 00000AD0: D2 CE 3E 92 20 54 4F 20 D2 45 54 55 52 4E 20 54 |..>. TO .ETURN T| 00000AE0: 4F 20 CD 45 4E 55 22 3B 00 06 13 CA 12 A1 52 45 |O .ENU";......RE| 00000AF0: 53 50 24 3A 8B 52 45 53 50 24 B3 B1 C7 28 31 33 |SP$:.RESP$...(13| 00000B00: 29 A7 34 38 31 30 00 0C 13 E8 12 8E 00 51 13 24 |).4810.......Q.$| 00000B10: 13 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............| 00000B20: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 20 |............ | 00000B30: 20 20 20 C8 49 54 20 12 3C D2 C5 D4 D5 D2 CE 3E | .IT .<......>| 00000B40: 92 20 46 4F 52 20 CE 45 58 54 20 D0 41 47 45 22 |. FOR .EXT .AGE"| 00000B50: 3B 00 6F 13 2E 13 A1 52 45 53 50 24 3A 8B 52 45 |;.o....RESP$:.RE| 00000B60: 53 50 24 B3 B1 C7 28 31 33 29 A7 34 39 31 30 00 |SP$...(13).4910.| 00000B70: AA 13 38 13 99 22 93 12 20 20 20 20 20 20 C4 49 |..8..".. .I| 00000B80: 53 50 4C 41 59 20 D3 49 44 45 20 27 22 3B 53 49 |SPLAY .IDE '";SI| 00000B90: 44 45 24 3B 22 27 20 D3 45 4C 45 43 54 49 4F 4E |DE$;"' .ELECTION| 00000BA0: 53 20 20 20 20 20 20 20 92 22 00 C7 13 42 13 99 |S ."...B..| 00000BB0: 22 20 4E 4F 2E 22 3B A3 31 37 29 3B 22 53 45 4C |" NO.";.17);"SEL| 00000BC0: 45 43 54 49 4F 4E 22 00 CD 13 4C 13 8E 00 F2 13 |ECTION"...L.....| 00000BD0: 88 13 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************| 00000BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000BF0: 2A 2A 00 17 14 92 13 8F 20 2A 20 43 48 41 4E 47 |**...... * CHANG| 00000C00: 45 20 53 45 4C 45 43 54 49 4F 4E 20 27 41 27 20 |E SELECTION 'A' | 00000C10: 4F 52 20 27 42 27 2A 00 3C 14 9C 13 8F 20 2A 2A |OR 'B'*.<.... **| 00000C20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000C30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 6F 14 EC |************.o..| 00000C40: 13 99 22 93 12 20 20 20 20 20 C3 48 41 4E 47 45 |..".. .HANGE| 00000C50: 20 D3 45 4C 45 43 54 49 4F 4E 20 27 C1 27 20 4F | .ELECTION '.' O| 00000C60: 52 20 27 C2 27 20 20 20 20 20 20 20 20 92 22 00 |R '.' .".| 00000C70: 84 14 F1 13 53 49 44 45 24 B2 22 22 3A 41 52 47 |....SIDE$."":ARG| 00000C80: 24 B2 22 22 00 AA 14 F6 13 85 22 11 20 20 C5 4E |$.""......". .N| 00000C90: 54 45 52 20 D3 49 44 45 20 27 C1 27 20 4F 52 20 |TER .IDE '.' OR | 00000CA0: 27 C2 27 22 3B 53 49 44 45 24 00 BC 14 FA 13 8B |'.'";SIDE$......| 00000CB0: 53 49 44 45 24 B2 22 22 A7 32 30 30 00 E7 14 FB |SIDE$."".200....| 00000CC0: 13 8B 53 49 44 45 24 B2 22 41 22 B0 53 49 44 45 |..SIDE$."A".SIDE| 00000CD0: 24 B2 22 C1 22 A7 53 41 56 B2 41 53 41 56 AB 31 |$.".".SAV.ASAV.1| 00000CE0: 3A 53 49 44 45 B2 31 00 12 15 FC 13 8B 53 49 44 |:SIDE.1......SID| 00000CF0: 45 24 B2 22 42 22 B0 53 49 44 45 24 B2 22 C2 22 |E$."B".SIDE$."."| 00000D00: A7 53 41 56 B2 42 53 41 56 AB 31 3A 53 49 44 45 |.SAV.BSAV.1:SIDE| 00000D10: B2 32 00 3B 15 00 14 85 22 11 20 20 C5 4E 54 45 |.2.;....". .NTE| 00000D20: 52 20 D3 45 4C 45 43 54 49 4F 4E 20 54 4F 20 D3 |R .ELECTION TO .| 00000D30: 45 41 52 43 48 22 3B 41 52 47 24 00 4C 15 0A 14 |EARCH";ARG$.L...| 00000D40: 8B 41 52 47 24 B2 22 22 A7 32 30 30 00 5B 15 50 |.ARG$."".200.[.P| 00000D50: 14 4C 4E B2 C3 28 41 52 47 24 29 00 6D 15 55 14 |.LN..(ARG$).m.U.| 00000D60: 81 20 50 53 4E B2 31 A4 48 49 AB 4C 4E 00 7D 15 |. PSN.1.HI.LN.}.| 00000D70: 57 14 81 20 53 45 4C B2 31 A4 53 41 56 00 A6 15 |W.. SEL.1.SAV...| 00000D80: 5A 14 8B CA 28 53 49 44 45 24 28 53 49 44 45 2C |Z...(SIDE$(SIDE,| 00000D90: 53 45 4C 29 2C 50 53 4E 2C 4C 4E 29 B2 41 52 47 |SEL),PSN,LN).ARG| 00000DA0: 24 A7 35 33 30 30 00 B4 15 64 14 82 53 45 4C 3A |$.5300...d..SEL:| 00000DB0: 82 50 53 4E 00 EE 15 6E 14 8D 35 39 30 30 3A 89 |.PSN...n..5900:.| 00000DC0: 35 31 30 30 20 20 20 20 20 20 20 20 20 20 20 20 |5100 | 00000DD0: 20 20 20 20 3A 8F 20 4E 4F 54 20 46 4F 55 4E 44 | :. NOT FOUND| 00000DE0: 20 45 52 52 4F 52 20 4D 45 53 53 41 47 45 00 10 | ERROR MESSAGE..| 00000DF0: 16 B4 14 99 22 11 49 53 20 27 22 3B 53 49 44 45 |....".IS '";SIDE| 00000E00: 24 28 53 49 44 45 2C 53 45 4C 29 3B 22 27 20 22 |$(SIDE,SEL);"' "| 00000E10: 00 44 16 BE 14 85 22 54 48 45 20 D3 45 4C 45 43 |.D...."THE .ELEC| 00000E20: 54 49 4F 4E 20 D9 4F 55 20 D7 49 53 48 20 54 4F |TION .OU .ISH TO| 00000E30: 20 C3 48 41 4E 47 45 20 20 59 9D 9D 9D 22 3B 52 | .HANGE Y...";R| 00000E40: 45 53 50 24 00 5E 16 C8 14 8B C8 28 52 45 53 50 |ESP$.^.....(RESP| 00000E50: 24 2C 31 29 B3 B1 22 59 22 A7 35 31 30 30 00 8E |$,1).."Y".5100..| 00000E60: 16 D2 14 99 22 11 D2 45 2D 45 4E 54 45 52 20 D3 |...."..E-ENTER .| 00000E70: 45 4C 45 43 54 49 4F 4E 22 3A 85 22 11 22 3B 53 |ELECTION":.".";S| 00000E80: 49 44 45 24 28 53 49 44 45 2C 53 45 4C 29 00 B8 |IDE$(SIDE,SEL)..| 00000E90: 16 DC 14 53 49 44 45 24 28 53 49 44 45 2C 53 45 |...SIDE$(SIDE,SE| 00000EA0: 4C 29 B2 C8 28 53 49 44 45 24 28 53 49 44 45 2C |L)..(SIDE$(SIDE,| 00000EB0: 53 45 4C 29 2C 33 36 29 00 DC 16 E6 14 85 22 11 |SEL),36)......".| 00000EC0: CD 4F 52 45 20 D3 45 4C 45 43 54 49 4F 4E 53 20 |.ORE .ELECTIONS | 00000ED0: 20 59 9D 9D 9D 22 3B 52 45 53 50 24 00 F5 16 F0 | Y...";RESP$....| 00000EE0: 14 8B C8 28 52 45 53 50 24 2C 31 29 B3 B1 22 59 |...(RESP$,1).."Y| 00000EF0: 22 A7 32 30 30 00 FF 16 18 15 89 35 31 30 30 00 |".200......5100.| 00000F00: 47 17 0C 17 99 22 13 11 11 11 11 11 11 11 11 11 |G...."..........| 00000F10: 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 |............. | 00000F20: 20 20 D3 49 44 45 20 27 22 3B 53 49 44 45 24 3B | .IDE '";SIDE$;| 00000F30: 22 27 20 D3 45 4C 45 43 54 49 4F 4E 20 CE 4F 54 |"' .ELECTION .OT| 00000F40: 20 C6 4F 55 4E 44 22 00 74 17 16 17 99 22 11 20 | .OUND".t....". | 00000F50: 20 20 20 20 C8 49 54 20 12 3C D2 C5 D4 D5 D2 CE | .IT .<......| 00000F60: 3E 92 20 D4 4F 20 D3 45 4C 45 43 54 20 C1 47 41 |>. .O .ELECT .GA| 00000F70: 49 4E 22 3B 00 92 17 20 17 A1 52 45 53 50 24 3A |IN";... ..RESP$:| 00000F80: 8B 52 45 53 50 24 B3 B1 C7 28 31 33 29 A7 35 39 |.RESP$...(13).59| 00000F90: 32 30 00 98 17 2A 17 8E 00 BD 17 70 17 8F 20 2A |20...*.....p.. *| 00000FA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000FB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E2 17 |*************...| 00000FC0: 7A 17 8F 20 2A 20 20 20 20 50 52 49 4E 54 20 43 |z.. * PRINT C| 00000FD0: 41 53 53 45 54 54 45 20 4D 45 4E 55 20 20 20 20 |ASSETTE MENU | 00000FE0: 20 2A 00 07 18 84 17 8F 20 2A 2A 2A 2A 2A 2A 2A | *...... *******| 00000FF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001000: 2A 2A 2A 2A 2A 2A 2A 00 3A 18 D4 17 99 22 93 12 |*******.:...."..| 00001010: 20 20 20 20 20 20 20 20 20 20 D0 52 49 4E 54 20 | .RINT | 00001020: C3 41 53 53 45 54 54 45 20 CD 45 4E 55 20 20 20 |.ASSETTE .ENU | 00001030: 20 20 20 20 20 20 20 20 92 22 00 6D 18 DE 17 99 | .".m....| 00001040: 22 20 C8 49 54 20 98 12 A1 C6 31 92 A1 9B 20 54 |" .IT ....1... T| 00001050: 4F 20 D0 52 49 4E 54 20 C6 4F 52 4D 41 54 54 45 |O .RINT .ORMATTE| 00001060: 44 20 D3 45 4C 45 43 54 49 4F 4E 53 22 00 99 18 |D .ELECTIONS"...| 00001070: E8 17 A1 52 45 53 50 24 3A 8B 52 45 53 50 24 B3 |...RESP$:.RESP$.| 00001080: B1 C7 28 31 33 33 29 AF 52 45 53 50 24 B3 B1 C7 |..(133).RESP$...| 00001090: 28 31 33 29 A7 36 31 32 30 00 AE 18 F2 17 8B 52 |(13).6120......R| 000010A0: 45 53 50 24 B2 C7 28 31 33 29 A7 32 30 30 00 DB |ESP$..(13).200..| 000010B0: 18 FC 17 99 22 11 20 20 20 CC 49 4E 45 20 C7 52 |....". .INE .R| 000010C0: 4F 55 50 20 C6 4F 52 4D 41 54 54 49 4E 47 20 49 |OUP .ORMATTING I| 000010D0: 4E 20 D0 52 4F 47 52 45 53 53 22 00 F1 18 06 18 |N .ROGRESS".....| 000010E0: 53 41 56 B2 41 53 41 56 AB 31 3A 53 49 44 45 B2 |SAV.ASAV.1:SIDE.| 000010F0: 31 00 06 19 38 18 3A 8F 20 46 4F 52 20 53 49 44 |1...8.:. FOR SID| 00001100: 45 3D 31 54 4F 32 00 2C 19 6A 18 50 52 24 28 53 |E=1TO2.,.j.PR$(S| 00001110: 49 44 45 2C 31 29 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 |IDE,1)."........| 00001120: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 44 19 9C |...........".D..| 00001130: 18 4C 4E B2 C3 28 53 49 44 45 24 28 53 49 44 45 |.LN..(SIDE$(SIDE| 00001140: 2C 30 29 29 00 76 19 A6 18 8B 4C 4E B1 B2 31 39 |,0)).v....LN..19| 00001150: A7 50 52 24 28 53 49 44 45 2C 32 29 B2 C8 28 53 |.PR$(SIDE,2)..(S| 00001160: 49 44 45 24 28 53 49 44 45 2C 30 29 2C 31 39 29 |IDE$(SIDE,0),19)| 00001170: 3A 89 36 33 33 30 00 8A 19 B0 18 54 42 B2 B5 28 |:.6330.....TB..(| 00001180: 28 31 39 AB 4C 4E 29 AD 32 29 00 C4 19 B5 18 50 |(19.LN).2).....P| 00001190: 52 24 28 53 49 44 45 2C 32 29 B2 C8 28 42 4C 24 |R$(SIDE,2)..(BL$| 000011A0: 2C 54 42 29 AA 53 49 44 45 24 28 53 49 44 45 2C |,TB).SIDE$(SIDE,| 000011B0: 30 29 AA C8 28 42 4C 24 2C 31 39 AB 28 4C 4E AA |0)..(BL$,19.(LN.| 000011C0: 54 42 29 29 00 E4 19 BA 18 53 49 44 45 24 B2 22 |TB)).....SIDE$."| 000011D0: C1 22 3A 8B 53 49 44 45 B2 32 A7 53 49 44 45 24 |.":.SIDE.2.SIDE$| 000011E0: B2 22 C2 22 00 26 1A C4 18 8B 53 49 44 45 24 28 |.".".&....SIDE$(| 000011F0: 53 49 44 45 2C 30 29 B2 22 22 A7 50 52 24 28 53 |SIDE,0)."".PR$(S| 00001200: 49 44 45 2C 33 29 B2 22 A6 20 22 AA 53 49 44 45 |IDE,3).". ".SIDE| 00001210: 24 AA 22 20 A6 22 AA C8 28 42 4C 24 2C 31 34 29 |$." ."..(BL$,14)| 00001220: 3A 89 36 34 30 30 00 56 1A CE 18 50 52 24 28 53 |:.6400.V...PR$(S| 00001230: 49 44 45 2C 33 29 B2 22 A6 20 22 AA 53 49 44 45 |IDE,3).". ".SIDE| 00001240: 24 AA 22 20 A6 20 22 AA 44 41 54 45 24 AA C8 28 |$." . ".DATE$..(| 00001250: 42 4C 24 2C 35 29 00 7C 1A 00 19 53 45 4C B2 31 |BL$,5).|...SEL.1| 00001260: 3A 50 52 24 28 53 49 44 45 2C 34 29 B2 53 49 44 |:PR$(SIDE,4).SID| 00001270: 45 24 28 53 49 44 45 2C 53 45 4C 29 00 8B 1A 0A |E$(SIDE,SEL)....| 00001280: 19 81 4C 49 4E 45 B2 34 A4 32 31 00 97 1A 1E 19 |..LINE.4.21.....| 00001290: 44 49 53 50 B2 32 30 00 D3 1A 28 19 8B C3 28 50 |DISP.20...(...(P| 000012A0: 52 24 28 53 49 44 45 2C 4C 49 4E 45 29 29 B3 32 |R$(SIDE,LINE)).2| 000012B0: 30 AF 53 49 44 45 24 28 53 49 44 45 2C 53 45 4C |0.SIDE$(SIDE,SEL| 000012C0: AA 31 29 B3 B1 22 22 A7 8D 36 39 30 30 3A 89 36 |.1)..""..6900:.6| 000012D0: 34 34 30 00 02 1B 32 19 8B C3 28 50 52 24 28 53 |440...2...(PR$(S| 000012E0: 49 44 45 2C 4C 49 4E 45 29 29 B3 31 39 AF 53 45 |IDE,LINE)).19.SE| 000012F0: 4C B1 B2 53 41 56 A7 8D 36 39 31 30 3A 89 36 35 |L..SAV..6910:.65| 00001300: 31 30 00 22 1B 3C 19 58 24 B2 CA 28 50 52 24 28 |10.".<.X$..(PR$(| 00001310: 53 49 44 45 2C 4C 49 4E 45 29 2C 44 49 53 50 2C |SIDE,LINE),DISP,| 00001320: 31 29 00 59 1B 46 19 8B 58 24 B3 B1 22 2F 22 AF |1).Y.F..X$.."/".| 00001330: 58 24 B3 B1 22 20 22 AF 58 24 B3 B1 22 A4 22 AF |X$.." ".X$..".".| 00001340: 58 24 B3 B1 22 2D 22 A7 44 49 53 50 B2 44 49 53 |X$.."-".DISP.DIS| 00001350: 50 AB 31 3A 89 36 34 36 30 00 79 1B 4A 19 58 24 |P.1:.6460.y.J.X$| 00001360: B2 CA 28 50 52 24 28 53 49 44 45 2C 4C 49 4E 45 |..(PR$(SIDE,LINE| 00001370: 29 2C 44 49 53 50 2C 31 29 00 A3 1B 4B 19 8B 28 |),DISP,1)...K..(| 00001380: 58 24 B2 22 2F 22 B0 58 24 B2 22 2D 22 29 AF 44 |X$."/".X$."-").D| 00001390: 49 53 50 B3 B1 32 30 A7 44 49 53 50 B2 44 49 53 |ISP..20.DISP.DIS| 000013A0: 50 AA 31 00 E5 1B 50 19 50 52 24 28 53 49 44 45 |P.1...P.PR$(SIDE| 000013B0: 2C 4C 49 4E 45 AA 31 29 B2 C9 28 50 52 24 28 53 |,LINE.1)..(PR$(S| 000013C0: 49 44 45 2C 4C 49 4E 45 29 2C C3 28 50 52 24 28 |IDE,LINE),.(PR$(| 000013D0: 53 49 44 45 2C 4C 49 4E 45 29 29 AB 28 44 49 53 |SIDE,LINE)).(DIS| 000013E0: 50 AB 31 29 29 00 20 1C 5A 19 50 52 24 28 53 49 |P.1)). .Z.PR$(SI| 000013F0: 44 45 2C 4C 49 4E 45 29 B2 C8 28 50 52 24 28 53 |DE,LINE)..(PR$(S| 00001400: 49 44 45 2C 4C 49 4E 45 29 2C 44 49 53 50 AB 31 |IDE,LINE),DISP.1| 00001410: 29 AA C8 28 42 4C 24 2C 32 30 AB 44 49 53 50 29 |)..(BL$,20.DISP)| 00001420: 00 4B 1C 64 19 8B C8 28 50 52 24 28 53 49 44 45 |.K.d...(PR$(SIDE| 00001430: 2C 4C 49 4E 45 AA 31 29 2C 31 29 B2 22 20 22 A7 |,LINE.1),1)." ".| 00001440: 8D 36 39 32 30 3A 89 36 35 30 30 00 55 1C 6E 19 |.6920:.6500.U.n.| 00001450: 82 4C 49 4E 45 00 68 1C C8 19 81 4C 49 4E 45 B2 |.LINE.h....LINE.| 00001460: 32 34 A4 32 30 A9 AB 31 00 8C 1C D2 19 50 52 24 |24.20..1.....PR$| 00001470: 28 53 49 44 45 2C 4C 49 4E 45 29 B2 50 52 24 28 |(SIDE,LINE).PR$(| 00001480: 53 49 44 45 2C 4C 49 4E 45 AB 33 29 00 96 1C DC |SIDE,LINE.3)....| 00001490: 19 82 4C 49 4E 45 00 B0 1C E6 19 8D 36 39 33 30 |..LINE......6930| 000014A0: 3A 8F 20 46 4F 52 4D 41 54 20 54 49 54 4C 45 53 |:. FORMAT TITLES| 000014B0: 00 D7 1C 18 1A 50 52 24 28 53 49 44 45 2C 32 35 |.....PR$(SIDE,25| 000014C0: 29 B2 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |).".............| 000014D0: A3 A3 A3 A3 A3 A3 22 00 0D 1D 22 1A 53 41 56 B2 |......"...".SAV.| 000014E0: 42 53 41 56 AB 31 3A 53 49 44 45 B2 53 49 44 45 |BSAV.1:SIDE.SIDE| 000014F0: AA 31 3A 8B 53 49 44 45 B3 B2 32 A7 36 32 30 30 |.1:.SIDE..2.6200| 00001500: 3A 20 8F 20 4E 45 58 54 20 53 49 44 45 00 42 1D |: . NEXT SIDE.B.| 00001510: 2C 1A 9F 34 2C 34 3A 9D 34 20 20 20 20 20 20 20 |,..4,4:.4 | 00001520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :| 00001530: 8F 20 50 52 49 4E 54 20 4C 49 4E 45 20 47 52 4F |. PRINT LINE GRO| 00001540: 55 50 00 51 1D 36 1A 81 4C 49 4E 45 B2 31 A4 31 |UP.Q.6..LINE.1.1| 00001550: 36 00 7F 1D 40 1A 4C 49 4E 45 24 B2 22 B5 22 AA |6...@.LINE$.".".| 00001560: 50 52 24 28 31 2C 4C 49 4E 45 29 AA 22 DD 22 AA |PR$(1,LINE).".".| 00001570: 50 52 24 28 32 2C 4C 49 4E 45 29 AA 22 B6 22 00 |PR$(2,LINE).".".| 00001580: 92 1D 4A 1A 98 34 2C C7 28 31 37 29 3B 4C 49 4E |..J..4,.(17);LIN| 00001590: 45 24 00 9C 1D 54 1A 82 4C 49 4E 45 00 AC 1D 5E |E$...T..LINE...^| 000015A0: 1A 81 4C 49 4E 45 B2 31 37 A4 31 39 00 C5 1D 68 |..LINE.17.19...h| 000015B0: 1A 98 34 2C C7 28 31 37 29 3B 50 52 24 28 31 2C |..4,.(17);PR$(1,| 000015C0: 4C 49 4E 45 29 00 CF 1D 72 1A 82 4C 49 4E 45 00 |LINE)...r..LINE.| 000015D0: DF 1D 7C 1A 81 4C 49 4E 45 B2 32 30 A4 32 35 00 |..|..LINE.20.25.| 000015E0: 0D 1E 86 1A 4C 49 4E 45 24 B2 22 B5 22 AA 50 52 |....LINE$.".".PR| 000015F0: 24 28 31 2C 4C 49 4E 45 29 AA 22 DD 22 AA 50 52 |$(1,LINE).".".PR| 00001600: 24 28 32 2C 4C 49 4E 45 29 AA 22 B6 22 00 20 1E |$(2,LINE).".". .| 00001610: 90 1A 98 34 2C C7 28 31 37 29 3B 4C 49 4E 45 24 |...4,.(17);LINE$| 00001620: 00 2A 1E 9A 1A 82 4C 49 4E 45 00 34 1E A4 1A 98 |.*....LINE.4....| 00001630: 34 3A A0 34 00 42 1E AE 1A 81 53 49 44 45 B2 31 |4:.4.B....SIDE.1| 00001640: A4 32 00 51 1E B8 1A 81 4C 49 4E 45 B2 31 A4 32 |.2.Q....LINE.1.2| 00001650: 35 00 67 1E C2 1A 50 52 24 28 53 49 44 45 2C 4C |5.g...PR$(SIDE,L| 00001660: 49 4E 45 29 B2 22 22 00 77 1E CC 1A 82 4C 49 4E |INE)."".w....LIN| 00001670: 45 3A 82 53 49 44 45 00 80 1E E0 1A 89 32 30 30 |E:.SIDE......200| 00001680: 00 C0 1E F4 1A 53 45 4C B2 53 45 4C AA 31 3A 50 |.....SEL.SEL.1:P| 00001690: 52 24 28 53 49 44 45 2C 4C 49 4E 45 29 B2 50 52 |R$(SIDE,LINE).PR| 000016A0: 24 28 53 49 44 45 2C 4C 49 4E 45 29 AA 22 2F 22 |$(SIDE,LINE)."/"| 000016B0: AA 53 49 44 45 24 28 53 49 44 45 2C 53 45 4C 29 |.SIDE$(SIDE,SEL)| 000016C0: 00 C6 1E F9 1A 8E 00 04 1F FE 1A 50 52 24 28 53 |...........PR$(S| 000016D0: 49 44 45 2C 4C 49 4E 45 29 B2 50 52 24 28 53 49 |IDE,LINE).PR$(SI| 000016E0: 44 45 2C 4C 49 4E 45 29 AA C8 28 55 53 24 2C 31 |DE,LINE)..(US$,1| 000016F0: 39 AB C3 28 50 52 24 28 53 49 44 45 2C 4C 49 4E |9..(PR$(SIDE,LIN| 00001700: 45 29 29 29 00 0A 1F 03 1B 8E 00 49 1F 08 1B 50 |E))).......I...P| 00001710: 52 24 28 53 49 44 45 2C 4C 49 4E 45 AA 31 29 B2 |R$(SIDE,LINE.1).| 00001720: C9 28 50 52 24 28 53 49 44 45 2C 4C 49 4E 45 AA |.(PR$(SIDE,LINE.| 00001730: 31 29 2C C3 28 50 52 24 28 53 49 44 45 2C 4C 49 |1),.(PR$(SIDE,LI| 00001740: 4E 45 AA 31 29 29 AB 31 29 00 4F 1F 0D 1B 8E 00 |NE.1)).1).O.....| 00001750: 89 1F 12 1B 50 52 24 28 31 2C 31 37 29 B2 22 B5 |....PR$(1,17).".| 00001760: 20 22 AA 53 49 44 45 24 28 31 2C 30 29 AA C8 28 | ".SIDE$(1,0)..(| 00001770: 42 4C 24 2C 33 38 AB C3 28 53 49 44 45 24 28 31 |BL$,38..(SIDE$(1| 00001780: 2C 30 29 29 29 AA 22 B6 22 00 C3 1F 17 1B 50 52 |,0))).".".....PR| 00001790: 24 28 31 2C 31 38 29 B2 22 B5 C0 C0 C0 C0 C0 C0 |$(1,18).".......| 000017A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000017B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000017C0: C0 B6 22 00 FD 1F 1C 1B 50 52 24 28 31 2C 31 39 |..".....PR$(1,19| 000017D0: 29 B2 22 B5 20 22 AA 53 49 44 45 24 28 32 2C 30 |).". ".SIDE$(2,0| 000017E0: 29 AA C8 28 55 53 24 2C 33 38 AB C3 28 53 49 44 |)..(US$,38..(SID| 000017F0: 45 24 28 32 2C 30 29 29 29 AA 22 B6 22 00 03 20 |E$(2,0))).".".. | 00001800: 21 1B 8E 00 28 20 58 1B 8F 20 2A 2A 2A 2A 2A 2A |!...( X.. ******| 00001810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001820: 2A 2A 2A 2A 2A 2A 2A 2A 00 4D 20 62 1B 8F 20 2A |********.M b.. *| 00001830: 20 20 20 45 58 49 54 20 43 41 53 53 45 54 54 45 | EXIT CASSETTE| 00001840: 20 50 52 4F 47 52 41 4D 20 20 20 20 2A 00 72 20 | PROGRAM *.r | 00001850: 6C 1B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |l.. ************| 00001860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001870: 2A 2A 00 A4 20 BC 1B 99 22 93 11 11 22 3B A3 35 |**.. ..."...";.5| 00001880: 29 3B 22 C8 49 54 20 12 3C D2 C5 D4 D5 D2 CE 3E |);".IT .<......>| 00001890: 92 20 54 4F 20 D2 45 54 55 52 4E 20 54 4F 20 CD |. TO .ETURN TO .| 000018A0: 45 4E 55 22 00 C4 20 EE 1B 99 A3 31 30 29 3B 22 |ENU".. ....10);"| 000018B0: C5 4C 53 45 20 C1 4E 59 20 CB 45 59 20 54 4F 20 |.LSE .NY .EY TO | 000018C0: C5 4E 44 22 00 DE 20 20 1C A1 52 45 53 50 24 3A |.ND".. ..RESP$:| 000018D0: 8B 52 45 53 50 24 B2 22 22 A7 37 32 30 30 00 F4 |.RESP$."".7200..| 000018E0: 20 52 1C 8B 20 52 45 53 50 24 B2 C7 28 31 33 29 | R.. RESP$..(13)| 000018F0: A7 32 30 30 00 04 21 84 1C 97 35 33 32 37 32 2C |.200..!...53272,| 00001900: 32 31 3A 80 00 29 21 40 1F 8F 20 2A 2A 2A 2A 2A |21:..)!@.. *****| 00001910: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001920: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4E 21 4A 1F 8F 20 |*********.N!J.. | 00001930: 2A 20 20 52 45 53 45 54 20 53 49 44 45 53 20 27 |* RESET SIDES '| 00001940: 41 27 20 41 4E 44 20 27 42 27 20 20 20 2A 00 73 |A' AND 'B' *.s| 00001950: 21 54 1F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |!T.. ***********| 00001960: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001970: 2A 2A 2A 00 A9 21 72 1F 85 22 93 11 11 C4 4F 20 |***..!r.."....O | 00001980: D9 4F 55 20 D7 41 4E 54 20 54 4F 20 D2 45 53 45 |.OU .ANT TO .ESE| 00001990: 54 20 D3 45 4C 45 43 54 49 4F 4E 53 20 20 59 9D |T .ELECTIONS Y.| 000019A0: 9D 9D 22 3B 52 45 53 50 24 00 C2 21 7C 1F 8B C8 |..";RESP$..!|...| 000019B0: 28 52 45 53 50 24 2C 31 29 B3 B1 22 59 22 A7 32 |(RESP$,1).."Y".2| 000019C0: 30 30 00 E7 21 81 1F 85 22 13 11 11 11 11 D2 45 |00..!..."......E| 000019D0: 53 45 54 20 D3 49 44 45 20 27 C1 27 20 20 59 9D |SET .IDE '.' Y.| 000019E0: 9D 9D 22 3B 52 31 24 00 1A 22 86 1F 8B C8 28 52 |..";R1$.."....(R| 000019F0: 31 24 2C 31 29 B2 22 59 22 A7 53 49 44 45 B2 31 |1$,1)."Y".SIDE.1| 00001A00: 3A 4D 41 58 B2 31 3A 41 46 4C 47 B2 30 3A 41 44 |:MAX.1:AFLG.0:AD| 00001A10: 54 B2 30 3A 41 53 41 56 B2 31 00 41 22 8B 1F 85 |T.0:ASAV.1.A"...| 00001A20: 22 13 11 11 11 11 11 11 D2 45 53 45 54 20 D3 49 |"........ESET .I| 00001A30: 44 45 20 27 C2 27 20 20 59 9D 9D 9D 22 3B 52 32 |DE '.' Y...";R2| 00001A40: 24 00 74 22 90 1F 8B C8 28 52 32 24 2C 31 29 B2 |$.t"....(R2$,1).| 00001A50: 22 59 22 A7 53 49 44 45 B2 32 3A 4D 41 58 B2 32 |"Y".SIDE.2:MAX.2| 00001A60: 3A 42 46 4C 47 B2 30 3A 42 44 54 B2 30 3A 42 53 |:BFLG.0:BDT.0:BS| 00001A70: 41 56 B2 31 00 A8 22 95 1F 8B C8 28 52 31 24 2C |AV.1.."....(R1$,| 00001A80: 31 29 B2 22 59 22 AF C8 28 52 32 24 2C 31 29 B2 |1)."Y"..(R2$,1).| 00001A90: 22 59 22 A7 53 49 44 45 B2 31 3A 48 49 B2 30 3A |"Y".SIDE.1:HI.0:| 00001AA0: 44 41 54 45 24 B2 22 22 00 CD 22 A4 1F 8B C8 28 |DATE$."".."....(| 00001AB0: 52 31 24 2C 31 29 B3 B1 22 59 22 AF C8 28 52 32 |R1$,1).."Y"..(R2| 00001AC0: 24 2C 31 29 B3 B1 22 59 22 A7 32 30 30 00 07 23 |$,1).."Y".200..#| 00001AD0: 08 20 99 22 13 11 11 11 11 11 11 11 11 12 D2 45 |. ."...........E| 00001AE0: 53 45 54 54 49 4E 47 20 D3 49 44 45 53 20 27 C1 |SETTING .IDES '.| 00001AF0: 27 20 41 4E 44 20 27 C2 27 20 49 4E 20 D0 52 4F |' AND '.' IN .RO| 00001B00: 47 52 45 53 53 92 22 00 16 23 1C 20 81 53 45 4C |GRESS."..#. .SEL| 00001B10: B2 30 A4 4C 4D 54 00 2D 23 26 20 53 49 44 45 24 |.0.LMT.-#& SIDE$| 00001B20: 28 53 49 44 45 2C 53 45 4C 29 B2 22 22 00 36 23 |(SIDE,SEL)."".6#| 00001B30: 30 20 82 53 45 4C 00 56 23 3A 20 53 49 44 45 B2 |0 .SEL.V#: SIDE.| 00001B40: 53 49 44 45 AA 31 3A 8B 53 49 44 45 B3 B2 4D 41 |SIDE.1:.SIDE..MA| 00001B50: 58 A7 38 32 32 30 00 5F 23 6C 20 89 32 30 30 00 |X.8220._#l .200.| 00001B60: 84 23 28 23 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.#(#. **********| 00001B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001B80: 2A 2A 2A 2A 00 A9 23 32 23 8F 20 2A 20 20 20 20 |****..#2#. * | 00001B90: 20 20 20 4C 4F 41 44 20 54 45 53 54 20 44 41 54 | LOAD TEST DAT| 00001BA0: 41 20 20 20 20 20 20 20 2A 00 CE 23 3C 23 8F 20 |A *..#<#. | 00001BB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001BC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FF |**************..| 00001BD0: 23 46 23 99 22 93 11 11 20 20 20 12 20 C4 41 54 |#F#."... . .AT| 00001BE0: 41 20 49 53 20 C2 45 49 4E 47 20 CC 4F 41 44 45 |A IS .EING .OADE| 00001BF0: 44 20 49 4E 54 4F 20 C1 52 52 41 59 20 92 22 00 |D INTO .RRAY .".| 00001C00: 36 24 50 23 44 41 54 45 24 B2 22 30 31 2F 32 35 |6$P#DATE$."01/25| 00001C10: 2F 38 35 22 3A 41 53 41 56 B2 31 35 3A 42 53 41 |/85":ASAV.15:BSA| 00001C20: 56 B2 31 35 3A 41 44 54 B2 31 3A 42 44 54 B2 31 |V.15:ADT.1:BDT.1| 00001C30: 3A 48 49 B2 32 38 00 4E 24 5A 23 81 53 49 44 45 |:HI.28.N$Z#.SIDE| 00001C40: B2 31 A4 32 3A 81 53 45 4C B2 30 A4 31 34 00 6E |.1.2:.SEL.0.14.n| 00001C50: 24 64 23 87 53 49 44 45 24 28 53 49 44 45 2C 53 |$d#.SIDE$(SIDE,S| 00001C60: 45 4C 29 3A 82 53 45 4C 3A 82 53 49 44 45 00 79 |EL):.SEL:.SIDE.y| 00001C70: 24 6E 23 8C 3A 89 32 30 30 00 92 24 8C 23 83 20 |$n#.:.200..$.#. | 00001C80: 4A 41 4D 45 53 20 42 4F 4E 44 20 2D 20 27 30 30 |JAMES BOND - '00| 00001C90: 37 27 00 CF 24 96 23 83 20 44 52 2E 20 4E 4F 2C |7'..$.#. DR. NO,| 00001CA0: 20 46 52 4F 4D 20 52 55 53 53 49 41 20 57 49 54 | FROM RUSSIA WIT| 00001CB0: 48 20 4C 4F 56 45 2C 20 47 4F 4C 44 46 49 4E 47 |H LOVE, GOLDFING| 00001CC0: 45 52 2C 20 54 48 55 4E 44 45 52 42 41 4C 4C 00 |ER, THUNDERBALL.| 00001CD0: 0A 25 A0 23 83 20 59 4F 55 20 4F 4E 4C 59 20 4C |.%.#. YOU ONLY L| 00001CE0: 49 56 45 20 54 57 49 43 45 2C 20 4F 4E 20 48 45 |IVE TWICE, ON HE| 00001CF0: 52 20 4D 41 4A 45 53 54 59 27 53 20 53 45 43 52 |R MAJESTY'S SECR| 00001D00: 45 54 20 53 45 52 56 49 45 45 00 54 25 AA 23 83 |ET SERVIEE.T%.#.| 00001D10: 20 44 49 41 4D 4F 4E 44 53 20 41 52 45 20 46 4F | DIAMONDS ARE FO| 00001D20: 52 45 56 45 52 2C 20 4C 49 56 45 20 41 4E 44 20 |REVER, LIVE AND | 00001D30: 4C 45 54 20 44 49 45 2C 20 54 48 45 20 4D 41 4E |LET DIE, THE MAN| 00001D40: 20 57 49 54 48 20 54 48 45 20 47 4F 4C 44 45 4E | WITH THE GOLDEN| 00001D50: 20 47 55 4E 00 99 25 B4 23 83 20 54 48 45 20 53 | GUN..%.#. THE S| 00001D60: 50 59 20 57 48 4F 20 4C 4F 56 45 44 20 4D 45 2C |PY WHO LOVED ME,| 00001D70: 20 4D 4F 4F 4E 52 41 4B 45 52 2C 20 46 4F 52 20 | MOONRAKER, FOR | 00001D80: 59 4F 55 52 20 45 59 45 53 20 4F 4E 4C 59 2C 20 |YOUR EYES ONLY, | 00001D90: 4F 43 54 4F 50 55 53 53 59 00 B5 25 BE 23 83 20 |OCTOPUSSY..%.#. | 00001DA0: 4E 45 56 45 52 20 53 41 59 20 4E 45 56 45 52 20 |NEVER SAY NEVER | 00001DB0: 41 47 41 49 4E 00 D0 25 F0 23 83 20 43 48 41 52 |AGAIN..%.#. CHAR| 00001DC0: 4C 49 45 20 44 41 4E 49 45 4C 53 20 42 41 4E 44 |LIE DANIELS BAND| 00001DD0: 00 14 26 FA 23 83 20 54 48 45 20 44 45 56 49 4C |..&.#. THE DEVIL| 00001DE0: 20 57 45 4E 54 20 44 4F 57 4E 20 54 4F 20 47 45 | WENT DOWN TO GE| 00001DF0: 4F 52 47 49 41 2C 20 54 48 45 20 53 4F 55 54 48 |ORGIA, THE SOUTH| 00001E00: 27 53 20 47 4F 4E 4E 41 20 44 4F 20 49 54 20 41 |'S GONNA DO IT A| 00001E10: 47 41 49 4E 00 54 26 04 24 83 20 53 54 52 4F 4B |GAIN.T&.$. STROK| 00001E20: 45 52 27 53 20 54 48 45 4D 45 2C 20 55 4E 45 41 |ER'S THEME, UNEA| 00001E30: 53 59 20 52 49 44 45 52 2C 20 52 4F 4C 4C 20 52 |SY RIDER, ROLL R| 00001E40: 4F 4C 4C 20 52 4F 4C 4C 2C 20 49 4E 20 41 4D 45 |OLL ROLL, IN AME| 00001E50: 52 49 43 41 00 86 26 0E 24 83 20 53 54 49 4C 4C |RICA..&.$. STILL| 00001E60: 20 49 4E 20 53 41 49 47 4F 4E 2C 20 4C 4F 4E 47 | IN SAIGON, LONG| 00001E70: 20 48 41 49 52 45 44 20 43 4F 55 4E 54 52 59 20 | HAIRED COUNTRY | 00001E80: 43 4F 57 42 4F 59 00 CB 26 18 24 83 20 54 48 45 |COWBOY..&.$. THE| 00001E90: 20 4C 45 47 45 4E 44 20 4F 46 20 57 4F 4F 4C 45 | LEGEND OF WOOLE| 00001EA0: 59 20 53 57 41 4D 50 2C 20 45 56 45 52 59 54 49 |Y SWAMP, EVERYTI| 00001EB0: 4D 45 20 49 20 53 45 45 20 48 49 4D 2C 20 4D 4F |ME I SEE HIM, MO| 00001EC0: 52 4E 49 4E 47 20 54 52 41 49 4E 00 05 27 22 24 |RNING TRAIN..'"$| 00001ED0: 83 20 44 4F 4E 27 54 20 53 45 4E 44 20 46 4C 4F |. DON'T SEND FLO| 00001EE0: 57 45 52 53 2C 20 44 4F 4E 27 54 20 43 52 59 20 |WERS, DON'T CRY | 00001EF0: 4F 55 54 20 4C 4F 55 44 2C 20 4D 4F 44 45 52 4E |OUT LOUD, MODERN| 00001F00: 20 47 49 52 4C 00 00 00 | GIRL... |
..(.... ********************************
.O.... * *.
V.... * CASSETTE FORMATTER *..
.(.. * BY *.D.
2.. * ALEX R. GARCIA *...<
.. * NOV. 18, 1986 *...F.
. * COMMODORE 64 *.9.P..
********************************.X.D..5
3280,12:.53281,6:.646,15.F.I..53272,23..
.N.LMT.36:. SIDE$(2,LMT),PR$(2,25)...X.U
S$."....................................
...".....BL$."
":ASAV.1:BSAV.1./.H..".. ..
......................................".
`.M.." .. CASSETTE FORMATTER
.."...O.." ........................
................"...R..".";.5);"1 ENTE
R SIDE 'A' SELECTIONS"......".";.5);"2
ENTER SIDE 'B' SELECTIONS"......".";.5)
;"3 DISPLAY SIDE 'A'".3....".";.5);"4
DISPLAY SIDE 'B'".B....".";.5);"5 CH
ANGE SELECTION 'A' OR 'B'"......".";.5);
"6 PRINT CASSETTE MENU"......".";.5);"
7 EXIT FORMATTER PROGRAM"......".";.5)
;"8 RESET SIDES 'A' AND 'B'"......".";
.5);"9 LOAD TEST DATA"."."..".";.10);"
ENTER OPTION: ..";.C.,..SEL$:.SEL$."1".S
EL$."9".300.}.6..E(SEL$).1000,2000,3000,
4000,5000,6000,7000,8000,9000...... ****
**************************.G.... * ENTE
R SIDE 'A' SELECTION *...... **********
********************.0.L..AFLG.0.SIDE$."
A":SIDE.1:ADT.1:SAV.ASAV:.2200:ASAV.SAV:
AFLG.FLG.9.V..200.^.P.. ****************
**************...Z.. * ENTER SIDE 'B' S
ELECTION *...... **********************
********...4..BFLG.0.SIDE$."B":SIDE.2:BD
T.1:SAV.BSAV:.2200:BSAV.SAV:BFLG.FLG...>
..200.0....".. ENTER SIDE '";SIDE$
;"' SELECTIONS .".A....SAV.1..250
0.....ADT.0.BDT.0.."ENTER RECORDING DAT
E MMDDYY........";WRK$......(ADT.0.BDT.
0).C(WRK$)..6.2200.T. .DATE$.H(WRK$,2)."
/".J(WRK$,3,2)."/".I(WRK$,2)......"NO.";
.17);"SELECTION".....FLG.0.5.... SEL.SAV
. LMT :. LIMIT OF 36 PER
SIDE.I...NO$.I(D(SEL),2).D....NO$;:.SID
E$(SIDE,SEL)...$..C(SIDE$(SIDE,SEL)).HI.
HI.C(SIDE$(SIDE,SEL)).F.V..SIDE$(SIDE,SE
L)."".SIDE$(SIDE,SEL)."":.2410.O.`..SEL.
..J.SAV.SEL:.SAV.LIM.FLG.1......./.D..".
.. -
)".S.N.."...ENTER ALBUM";SI
DE$(SIDE,0).Y...SIDE$(SIDE,0).H(SIDE$(SI
DE,0),38)........... ******************
************.I.B.. * DISPLAY SIDE '
A' *...L.. ************************
******.....SIDE$."A":SIDE.1:SAV.ASAV.1:.
4500...&..200.B. .. ********************
**********.G.... * DISPLAY SIDE 'B'
*...... **************************
****.....SIDE$."B":SIDE.2:SAV.BSAV.1:.45
00......200......".. DISPLAY SIDE '
";SIDE$;"' SELECTIONS ."......"ALB
UM: ";SIDE$(SIDE,0).+...."REC.DATE: ";DA
TE$.G...."NO.";.17);"SELECTION".V....SEL
.1.SAV.H....SEL.19..4900.|...NO$.I(D(SEL
),2)......NO$;" ";SIDE$(SIDE,SEL)...R..S
EL......"......................... HI
T .<RETURN>. TO RETURN TO MENU";...J..RE
SP$:.RESP$..G(13).4810.......Q.$..".....
.................... HIT .<RETURN>
. FOR NEXT PAGE";.O....RESP$:.RESP$..G(1
3).4910...8..".. DISPLAY SIDE '";SI
DE$;"' SELECTIONS .".G.B.." NO.";.
17);"SELECTION".M.L........ ************
******************...... * CHANGE SELECT
ION 'A' OR 'B'*.<.... ******************
************.O....".. CHANGE SELECTI
ON 'A' OR 'B' .".....SIDE$."":ARG
$.""......". ENTER SIDE 'A' OR 'B'";SID
E$......SIDE$."".200......SIDE$."A".SIDE
$."A".SAV.ASAV.1:SIDE.1......SIDE$."B".S
IDE$."B".SAV.BSAV.1:SIDE.2.;....". ENTE
R SELECTION TO SEARCH";ARG$.L....ARG$.""
.200.[.P.LN.C(ARG$).M.U.. PSN.1.HI.LN.}.
W.. SEL.1.SAV...Z..J(SIDE$(SIDE,SEL),PSN
,LN).ARG$.5300...D..SEL:.PSN...N..5900:.
5100 :. NOT FOUND ERROR M
ESSAGE......".IS '";SIDE$(SIDE,SEL);"' "
.D...."THE SELECTION YOU WISH TO CHANGE
Y...";RESP$.^.H..H(RESP$,1).."Y".5100..
.R..".RE-ENTER SELECTION":.".";SIDE$(SID
E,SEL).....SIDE$(SIDE,SEL).H(SIDE$(SIDE,
SEL),36)......".MORE SELECTIONS Y...";R
ESP$......H(RESP$,1).."Y".200......5100.
G...."....................... SIDE '
";SIDE$;"' SELECTION NOT FOUND".T....".
HIT .<RETURN>. TO SELECT AGAIN";...
..RESP$:.RESP$..G(13).5920...*.....P.. *
*****************************...Z.. *
PRINT CASSETTE MENU *...... *******
***********************.:.T.."..
PRINT CASSETTE MENU .".M....
" HIT ...F1... TO PRINT FORMATTED SELECT
IONS"......RESP$:.RESP$..G(133).RESP$..G
(13).6120......RESP$.G(13).200......".
LINE GROUP FORMATTING IN PROGRESS".....
SAV.ASAV.1:SIDE.1...8.:. FOR SIDE=1TO2.,
.J.PR$(SIDE,1)."...................".D..
.LN.C(SIDE$(SIDE,0)).V....LN..19.PR$(SID
E,2).H(SIDE$(SIDE,0),19):.6330.....TB..(
(19.LN).2).D...PR$(SIDE,2).H(BL$,TB).SID
E$(SIDE,0).H(BL$,19.(LN.TB)).....SIDE$."
A":.SIDE.2.SIDE$."B".&.D..SIDE$(SIDE,0).
"".PR$(SIDE,3).". ".SIDE$." .".H(BL$,14)
:.6400.V.N.PR$(SIDE,3).". ".SIDE$." . ".
DATE$.H(BL$,5).|...SEL.1:PR$(SIDE,4).SID
E$(SIDE,SEL)......LINE.4.21.....DISP.20.
S.(..C(PR$(SIDE,LINE)).20.SIDE$(SIDE,SEL
.1)..""..6900:.6440...2..C(PR$(SIDE,LINE
)).19.SEL..SAV..6910:.6510.".<.X$.J(PR$(
SIDE,LINE),DISP,1).Y.F..X$.."/".X$.." ".
X$..".".X$.."-".DISP.DISP.1:.6460.Y.J.X$
.J(PR$(SIDE,LINE),DISP,1)...K..(X$."/".X
$."-").DISP..20.DISP.DISP.1...P.PR$(SIDE
,LINE.1).I(PR$(SIDE,LINE),C(PR$(SIDE,LIN
E)).(DISP.1)). .Z.PR$(SIDE,LINE).H(PR$(S
IDE,LINE),DISP.1).H(BL$,20.DISP).K.D..H(
PR$(SIDE,LINE.1),1)." "..6920:.6500.U.N.
.LINE.H.H..LINE.24.20..1...R.PR$(SIDE,LI
NE).PR$(SIDE,LINE.3)......LINE......6930
:. FORMAT TITLES.W...PR$(SIDE,25).".....
.............."...".SAV.BSAV.1:SIDE.SIDE
.1:.SIDE..2.6200: . NEXT SIDE.B.,..4,4:.
4 :. PRINT LINE GRO
UP.Q.6..LINE.1.16..@.LINE$.".".PR$(1,LI
NE).".".PR$(2,LINE)."."...J..4,G(17);LIN
E$...T..LINE...^..LINE.17.19.E.H..4,G(17
);PR$(1,LINE).O.R..LINE...|..LINE.20.25.
....LINE$.".".PR$(1,LINE).".".PR$(2,LINE
).".". ....4,G(17);LINE$.*....LINE.4....
4: 4.B....SIDE.1.2.Q....LINE.1.25.G.B.PR
$(SIDE,LINE)."".W.L..LINE:.SIDE......200
.....SEL.SEL.1:PR$(SIDE,LINE).PR$(SIDE,L
INE)."/".SIDE$(SIDE,SEL).F.........PR$(S
IDE,LINE).PR$(SIDE,LINE).H(US$,19.C(PR$(
SIDE,LINE))).......I...PR$(SIDE,LINE.1).
I(PR$(SIDE,LINE.1),C(PR$(SIDE,LINE.1)).1
).O.........PR$(1,17).". ".SIDE$(1,0).H(
BL$,38.C(SIDE$(1,0))).".".C...PR$(1,18).
".......................................
..".....PR$(1,19).". ".SIDE$(2,0).H(US$,
38.C(SIDE$(2,0))).".".. !...( X.. ******
************************.M B.. * EXIT
CASSETTE PROGRAM *.R L.. ************
******************.. ..."...";.5);"HIT .
<RETURN>. TO RETURN TO MENU".D ....10);"
ELSE ANY KEY TO END".. ..RESP$:.RESP$."
".7200.. R.. RESP$.G(13).200..!...53272,
21:..)!@.. *****************************
*.N!J.. * RESET SIDES 'A' AND 'B' *.S
!T.. ******************************..!R.
."...DO YOU WANT TO RESET SELECTIONS Y.
..";RESP$.B!|..H(RESP$,1).."Y".200..!...
".....RESET SIDE 'A' Y...";R1$.."...H(R
1$,1)."Y".SIDE.1:MAX.1:AFLG.0:ADT.0:ASAV
.1.A"...".......RESET SIDE 'B' Y...";R2
$.T"...H(R2$,1)."Y".SIDE.2:MAX.2:BFLG.0:
BDT.0:BSAV.1.."...H(R1$,1)."Y".H(R2$,1).
"Y".SIDE.1:HI.0:DATE$."".M"...H(R1$,1)..
"Y".H(R2$,1).."Y".200..#. ."..........RE
SETTING SIDES 'A' AND 'B' IN PROGRESS.".
.#. .SEL.0.LMT.-#& SIDE$(SIDE,SEL)."".6#
0 .SEL.V#: SIDE.SIDE.1:.SIDE..MAX.8220._
#L .200..#(#. **************************
****..#2#. * LOAD TEST DATA
*.N#<#. ******************************..
#F#."... . DATA IS BEING LOADED INTO A
RRAY .".6$P#DATE$."01/25/85":ASAV.15:BSA
V.15:ADT.1:BDT.1:HI.28.N$Z#.SIDE.1.2:.SE
L.0.14.N$D#.SIDE$(SIDE,SEL):.SEL:.SIDE.Y
$N#.:.200..$.#. JAMES BOND - '007'.O$.#.
DR. NO, FROM RUSSIA WITH LOVE, GOLDFING
ER, THUNDERBALL..% #. YOU ONLY LIVE TWIC
E, ON HER MAJESTY'S SECRET SERVIEE.T%.#.
DIAMONDS ARE FOREVER, LIVE AND LET DIE,
THE MAN WITH THE GOLDEN GUN..%.#. THE S
PY WHO LOVED ME, MOONRAKER, FOR YOUR EYE
S ONLY, OCTOPUSSY..%.#. NEVER SAY NEVER
AGAIN.P%.#. CHARLIE DANIELS BAND..&.#. T
HE DEVIL WENT DOWN TO GEORGIA, THE SOUTH
'S GONNA DO IT AGAIN.T&.$. STROKER'S THE
ME, UNEASY RIDER, ROLL ROLL ROLL, IN AME
RICA..&.$. STILL IN SAIGON, LONG HAIRED
COUNTRY COWBOY.K&.$. THE LEGEND OF WOOLE
Y SWAMP, EVERYTIME I SEE HIM, MORNING TR
AIN..'"$. DON'T SEND FLOWERS, DON'T CRY
OUT LOUD, MODERN GIRL...
> CLICK IMAGE PREVIEW FOR FULL MODAL