DISK EXAMINER

00000000: 01 1C 1E 1C 64 00 99 22  93 53 54 41 54 45 20 44  |....d..".STATE D|
00000010: 52 49 56 45 20 23 20 57  41 4E 54 45 44 22 00 3C  |RIVE # WANTED".<|
00000020: 1C 6E 00 85 44 24 3A 44  B2 C5 28 44 24 29 3A 8B  |.n..D$:D..(D$):.|
00000030: 44 B3 37 B0 44 B1 31 31  A7 31 31 30 00 4D 1C 78  |D.7.D.11.110.M.x|
00000040: 00 99 C7 28 31 34 32 29  3A 89 31 34 30 00 58 1C  |...(142):.140.X.|
00000050: 82 00 A0 32 3A A0 31 35  00 6A 1C 8C 00 9F 31 35  |...2:.15.j....15|
00000060: 2C 44 2C 31 35 2C 22 49  30 22 00 79 1C 96 00 84  |,D,15,"I0".y....|
00000070: 31 35 2C 41 3A 8B 41 A7  90 00 90 1C A0 00 9F 32  |15,A:.A........2|
00000080: 2C 44 2C 32 2C 22 23 22  3A 51 24 B2 C7 28 30 29  |,D,2,"#":Q$..(0)|
00000090: 00 A1 1C AA 00 49 44 B2  31 36 AA 36 3A 89 32 32  |.....ID.16.6:.22|
000000A0: 30 00 D7 1C B4 00 4D 48  B2 B5 28 4D 45 4D AD 32  |0.....MH..(MEM.2|
000000B0: 35 36 29 3A 4D 4C B2 4D  45 4D AB 4D 48 AC 32 35  |56):ML.MEM.MH.25|
000000C0: 36 3A 98 31 35 2C 22 4D  2D 52 22 3B C7 28 4D 4C  |6:.15,"M-R";.(ML|
000000D0: 29 3B C7 28 4D 48 29 00  F0 1C BE 00 A1 23 31 35  |);.(MH)......#15|
000000E0: 2C 41 24 3A 41 B2 C6 28  41 24 AA 51 24 29 3A 8E  |,A$:A..(A$.Q$):.|
000000F0: 00 17 1D C8 00 99 22 24  22 3B 3A 4E 4C B2 B5 28  |......"$";:NL..(|
00000100: 42 59 AD 31 36 29 3A 8D  32 31 30 3A 4E 4C B2 42  |BY.16):.210:NL.B|
00000110: 59 AB 31 36 AC 4E 4C 00  3C 1D D2 00 99 CA 28 22  |Y.16.NL.<.....("|
00000120: 30 31 32 33 34 35 36 37  38 39 41 42 43 44 45 46  |0123456789ABCDEF|
00000130: 22 2C 4E 4C AA 31 2C 31  29 3B 3A 8E 00 55 1D DC  |",NL.1,1);:..U..|
00000140: 00 99 22 93 44 49 53 4B  45 54 54 45 20 45 58 41  |..".DISKETTE EXA|
00000150: 4D 49 4E 45 22 00 6D 1D  E6 00 99 22 C0 C0 C0 C0  |MINE".m...."....|
00000160: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 22 00 88 1D  |............"...|
00000170: F0 00 99 22 11 20 20 20  20 2A 2A 2A 20 4D 45 4E  |...".    *** MEN|
00000180: 55 20 2A 2A 2A 22 3A 99  00 9F 1D FA 00 99 22 31  |U ***":......."1|
00000190: 2E 20 44 49 53 50 4C 41  59 20 49 44 27 53 22 00  |. DISPLAY ID'S".|
000001A0: B9 1D 04 01 99 22 32 2E  20 46 41 53 54 20 45 52  |....."2. FAST ER|
000001B0: 52 4F 52 20 4C 4F 4F 4B  22 00 D3 1D 0E 01 99 22  |ROR LOOK"......"|
000001C0: 33 2E 20 46 55 4C 4C 20  45 52 52 4F 52 20 4C 4F  |3. FULL ERROR LO|
000001D0: 4F 4B 22 00 E3 1D 18 01  99 22 34 2E 20 45 58 49  |OK"......"4. EXI|
000001E0: 54 11 22 00 1B 1E 22 01  99 22 12 4E 2E 42 2E 20  |T."..."..".N.B. |
000001F0: 46 4F 52 20 31 35 37 30  2F 31 35 34 31 20 44 52  |FOR 1570/1541 DR|
00000200: 49 56 45 53 20 55 53 45  20 4F 4E 4C 59 20 54 52  |IVES USE ONLY TR|
00000210: 41 43 4B 53 20 31 2D 33  35 92 22 00 31 1E 2C 01  |ACKS 1-35.".1.,.|
00000220: 99 22 11 49 4E 50 55 54  20 28 31 2D 34 29 3A 22  |.".INPUT (1-4):"|
00000230: 3B 00 46 1E 36 01 A1 F9  41 3A 8B 41 B3 31 B0 41  |;.F.6...A:.A.1.A|
00000240: B1 34 A7 33 31 30 00 81  1E 40 01 91 AB 28 28 41  |.4.310...@...((A|
00000250: B2 31 29 AA 32 AC 28 41  B2 32 29 AA 33 AC 28 41  |.1).2.(A.2).3.(A|
00000260: B2 33 29 AA 34 AC 28 41  B2 34 29 29 89 33 33 30  |.3).4.(A.4)).330|
00000270: 2C 35 30 30 2C 36 35 30  2C 38 39 30 3A 89 32 32  |,500,650,890:.22|
00000280: 30 00 94 1E 4A 01 99 22  93 49 44 20 44 49 53 50  |0...J..".ID DISP|
00000290: 4C 41 59 22 00 A6 1E 54  01 99 22 C0 C0 C0 C0 C0  |LAY"...T..".....|
000002A0: C0 C0 C0 C0 C0 22 00 D7  1E 5E 01 99 22 11 12 46  |....."...^.."..F|
000002B0: 4F 52 20 31 35 37 30 20  41 4E 44 20 31 35 34 31  |OR 1570 AND 1541|
000002C0: 20 44 52 49 56 45 53 20  54 52 41 43 4B 20 4E 55  | DRIVES TRACK NU|
000002D0: 4D 42 45 52 53 92 22 00  F1 1E 68 01 99 22 11 12  |MBERS."...h.."..|
000002E0: 4E 45 56 45 52 20 4F 56  45 52 20 33 35 21 21 92  |NEVER OVER 35!!.|
000002F0: 22 00 15 1F 72 01 99 22  11 31 2E 20 49 4E 50 55  |"...r..".1. INPU|
00000300: 54 20 46 49 52 53 54 20  54 52 41 43 4B 20 28 31  |T FIRST TRACK (1|
00000310: 2D 37 30 29 22 00 31 1F  7C 01 85 46 3A 8B 46 B3  |-70)".1.|..F:.F.|
00000320: 31 B0 46 B1 37 30 A7 99  22 91 91 22 3A 89 33 38  |1.F.70.."..":.38|
00000330: 30 00 53 1F 86 01 99 22  32 2E 20 49 4E 50 55 54  |0.S...."2. INPUT|
00000340: 20 4C 41 53 54 20 54 52  41 43 4B 20 28 31 2D 37  | LAST TRACK (1-7|
00000350: 30 29 22 00 6F 1F 90 01  85 4C 3A 8B 4C B3 31 B0  |0)".o....L:.L.1.|
00000360: 4C B1 37 30 A7 99 22 91  91 22 3A 89 34 30 30 00  |L.70.."..":.400.|
00000370: B1 1F 9A 01 8B 4C B3 46  A7 99 22 12 4C 41 53 54  |.....L.F..".LAST|
00000380: 20 54 52 41 43 4B 20 4E  45 56 45 52 20 4C 4F 57  | TRACK NEVER LOW|
00000390: 45 52 20 54 48 41 4E 20  46 49 52 53 54 20 4F 4E  |ER THAN FIRST ON|
000003A0: 45 21 92 22 3A 99 22 91  91 91 91 22 3A 89 33 39  |E!.":."....":.39|
000003B0: 30 00 C1 1F A4 01 99 22  11 22 3A 81 54 B2 46 A4  |0......".":.T.F.|
000003C0: 4C 00 DA 1F AE 01 98 31  35 2C 22 55 31 3A 32 2C  |L......15,"U1:2,|
000003D0: 30 2C 22 3B 54 3B 22 2C  30 22 00 FE 1F B8 01 4D  |0,";T;",0".....M|
000003E0: 45 4D B2 49 44 3A 8D 31  38 30 3A 49 5A B2 41 3A  |EM.ID:.180:IZ.A:|
000003F0: 4D 45 4D B2 49 44 AA 31  3A 8D 31 38 30 3A 00 31  |MEM.ID.1:.180:.1|
00000400: 20 C2 01 99 C9 28 C4 28  54 29 2C 32 29 3B 22 2E  | ....(.(T),2);".|
00000410: 20 49 44 3D 22 3B C7 28  33 34 29 3B C7 28 49 5A  | ID=";.(34);.(IZ|
00000420: 29 3B C7 28 41 29 3B C7  28 33 34 29 3B 22 20 22  |);.(A);.(34);" "|
00000430: 3B 00 50 20 CC 01 42 59  B2 49 5A 3A 8D 32 30 30  |;.P ..BY.IZ:.200|
00000440: 3A 99 22 2C 22 3B 3A 42  59 B2 41 3A 8D 32 30 30  |:.",";:BY.A:.200|
00000450: 00 69 20 D6 01 99 A3 32  30 29 3B 3A 8B 54 AD 32  |.i ....20);:.T.2|
00000460: B2 B5 28 54 AD 32 29 A7  99 00 70 20 E0 01 82 54  |..(T.2)...p ...T|
00000470: 00 79 20 EA 01 89 39 31  30 00 93 20 F4 01 99 22  |.y ...910.. ..."|
00000480: 93 46 41 53 54 20 45 52  52 4F 52 20 4C 4F 4F 4B  |.FAST ERROR LOOK|
00000490: 45 52 22 00 AC 20 FE 01  99 22 C0 C0 C0 C0 C0 C0  |ER".. ..."......|
000004A0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 22 00 DD 20 08  |...........".. .|
000004B0: 02 99 22 11 12 46 4F 52  20 31 35 37 30 20 41 4E  |.."..FOR 1570 AN|
000004C0: 44 20 31 35 34 31 20 44  52 49 56 45 53 20 54 52  |D 1541 DRIVES TR|
000004D0: 41 43 4B 20 4E 55 4D 42  45 52 53 92 22 00 F7 20  |ACK NUMBERS.".. |
000004E0: 12 02 99 22 11 12 4E 45  56 45 52 20 4F 56 45 52  |..."..NEVER OVER|
000004F0: 20 33 35 21 21 92 22 00  1B 21 1C 02 99 22 11 31  | 35!!."..!...".1|
00000500: 2E 20 49 4E 50 55 54 20  46 49 52 53 54 20 54 52  |. INPUT FIRST TR|
00000510: 41 43 4B 20 28 31 2D 37  30 29 22 00 37 21 26 02  |ACK (1-70)".7!&.|
00000520: 85 46 3A 8B 46 B3 31 B0  46 B1 37 30 A7 99 22 91  |.F:.F.1.F.70..".|
00000530: 91 22 3A 89 35 35 30 00  59 21 30 02 99 22 32 2E  |.":.550.Y!0.."2.|
00000540: 20 49 4E 50 55 54 20 4C  41 53 54 20 54 52 41 43  | INPUT LAST TRAC|
00000550: 4B 20 28 31 2D 37 30 29  22 00 75 21 3A 02 85 4C  |K (1-70)".u!:..L|
00000560: 3A 8B 4C B3 31 B0 4C B1  37 30 A7 99 22 91 91 22  |:.L.1.L.70..".."|
00000570: 3A 89 35 37 30 00 B7 21  44 02 8B 4C B3 46 A7 99  |:.570..!D..L.F..|
00000580: 22 12 4C 41 53 54 20 54  52 41 43 4B 20 4E 45 56  |".LAST TRACK NEV|
00000590: 45 52 20 4C 4F 57 45 52  20 54 48 41 4E 20 46 49  |ER LOWER THAN FI|
000005A0: 52 53 54 20 4F 4E 45 21  92 22 3A 99 22 91 91 91  |RST ONE!.":."...|
000005B0: 91 22 3A 89 35 36 30 00  C7 21 4E 02 99 22 11 22  |.":.560..!N.."."|
000005C0: 3A 81 54 B2 46 A4 4C 00  DC 21 58 02 99 C9 28 C4  |:.T.F.L..!X...(.|
000005D0: 28 54 29 2C 32 29 3B 22  2E 20 22 3B 00 F5 21 62  |(T),2);". ";..!b|
000005E0: 02 98 31 35 2C 22 55 31  3A 32 2C 30 2C 22 3B 54  |..15,"U1:2,0,";T|
000005F0: 3B 22 2C 30 22 00 2A 22  6C 02 84 31 35 2C 41 24  |;",0".*"l..15,A$|
00000600: 2C 42 24 2C 43 24 2C 44  24 3A 44 44 24 B2 41 24  |,B$,C$,D$:DD$.A$|
00000610: AA 22 2C 22 AA 42 24 AA  22 2C 22 AA 43 24 AA 22  |.",".B$.",".C$."|
00000620: 2C 22 AA 44 24 3A 99 44  44 24 00 31 22 76 02 82  |,".D$:.DD$.1"v..|
00000630: 54 00 3A 22 80 02 89 39  31 30 00 54 22 8A 02 99  |T.:"...910.T"...|
00000640: 22 93 46 55 4C 4C 20 45  52 52 4F 52 20 4C 4F 4F  |".FULL ERROR LOO|
00000650: 4B 45 52 22 00 6D 22 94  02 99 22 C0 C0 C0 C0 C0  |KER".m"...".....|
00000660: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 22 00 9E 22  |............".."|
00000670: 9E 02 99 22 11 12 46 4F  52 20 31 35 37 30 20 41  |..."..FOR 1570 A|
00000680: 4E 44 20 31 35 34 31 20  44 52 49 56 45 53 20 54  |ND 1541 DRIVES T|
00000690: 52 41 43 4B 20 4E 55 4D  42 45 52 53 92 22 00 B8  |RACK NUMBERS."..|
000006A0: 22 A8 02 99 22 11 12 4E  45 56 45 52 20 4F 56 45  |"..."..NEVER OVE|
000006B0: 52 20 33 35 21 21 92 22  00 DC 22 B2 02 99 22 11  |R 35!!.".."...".|
000006C0: 31 2E 20 49 4E 50 55 54  20 46 49 52 53 54 20 54  |1. INPUT FIRST T|
000006D0: 52 41 43 4B 20 28 31 2D  37 30 29 22 00 F8 22 BC  |RACK (1-70)"..".|
000006E0: 02 85 46 3A 8B 46 B3 31  B0 46 B1 37 30 A7 99 22  |..F:.F.1.F.70.."|
000006F0: 91 91 22 3A 89 37 30 30  00 1A 23 C6 02 99 22 32  |..":.700..#..."2|
00000700: 2E 20 49 4E 50 55 54 20  4C 41 53 54 20 54 52 41  |. INPUT LAST TRA|
00000710: 43 4B 20 28 31 2D 37 30  29 22 00 36 23 D0 02 85  |CK (1-70)".6#...|
00000720: 4C 3A 8B 4C B3 31 B0 4C  B1 37 30 A7 99 22 91 91  |L:.L.1.L.70.."..|
00000730: 22 3A 89 37 32 30 00 78  23 DA 02 8B 4C B3 46 A7  |":.720.x#...L.F.|
00000740: 99 22 12 4C 41 53 54 20  54 52 41 43 4B 20 4E 45  |.".LAST TRACK NE|
00000750: 56 45 52 20 4C 4F 57 45  52 20 54 48 41 4E 20 46  |VER LOWER THAN F|
00000760: 49 52 53 54 20 4F 4E 45  21 92 22 3A 99 22 91 91  |IRST ONE!.":."..|
00000770: 91 91 22 3A 89 37 31 30  00 88 23 E4 02 99 22 11  |..":.710..#...".|
00000780: 22 3A 81 54 B2 46 A4 4C  00 AB 23 EE 02 8B 54 B3  |":.T.F.L..#...T.|
00000790: 31 38 B0 28 54 B1 33 35  AF 54 B3 35 33 29 A7 81  |18.(T.35.T.53)..|
000007A0: 53 B2 30 A4 32 30 3A 89  37 39 30 00 D5 23 F8 02  |S.0.20:.790..#..|
000007B0: 8B 28 54 B1 31 37 AF 54  B3 32 35 29 B0 28 54 B1  |.(T.17.T.25).(T.|
000007C0: 35 32 AF 54 B3 36 30 29  A7 81 53 B2 30 A4 31 38  |52.T.60)..S.0.18|
000007D0: 3A 89 37 39 30 00 FF 23  02 03 8B 28 54 B1 32 34  |:.790..#...(T.24|
000007E0: AF 54 B3 33 31 29 B0 28  54 B1 35 39 AF 54 B3 36  |.T.31).(T.59.T.6|
000007F0: 36 29 A7 81 53 B2 30 A4  31 37 3A 89 37 39 30 00  |6)..S.0.17:.790.|
00000800: 1D 24 0C 03 8B 28 54 B1  33 30 AF 54 B3 33 36 29  |.$...(T.30.T.36)|
00000810: B0 54 B1 36 35 A7 81 53  B2 30 A4 31 36 00 36 24  |.T.65..S.0.16.6$|
00000820: 16 03 98 31 35 2C 22 55  31 3A 32 2C 30 2C 22 3B  |...15,"U1:2,0,";|
00000830: 54 3B 22 2C 22 53 00 73  24 20 03 84 31 35 2C 41  |T;","S.s$ ..15,A|
00000840: 24 2C 42 24 2C 43 24 2C  44 24 3A 44 44 24 B2 41  |$,B$,C$,D$:DD$.A|
00000850: 24 AA 22 2C 22 AA 42 24  AA 22 2C 22 AA 43 24 AA  |$.",".B$.",".C$.|
00000860: 22 2C 22 AA 44 24 3A 8B  41 24 B2 22 36 36 22 A7  |",".D$:.A$."66".|
00000870: 38 37 30 00 8E 24 2A 03  99 22 54 3D 22 54 3B 22  |870..$*.."T="T;"|
00000880: 9D 20 53 3D 22 3B 53 3B  22 9D 20 22 3B 3B 00 A5  |. S=";S;". ";;..|
00000890: 24 34 03 8B 41 24 B2 22  30 30 22 A7 99 22 91 22  |$4..A$."00".."."|
000008A0: 3A 89 38 34 30 00 AE 24  3E 03 99 44 44 24 00 C3  |:.840..$>..DD$..|
000008B0: 24 48 03 A1 41 24 3A 8B  41 24 B3 B1 22 20 22 A7  |$H..A$:.A$.." ".|
000008C0: 38 36 30 00 D8 24 52 03  A1 41 24 3A 8B 41 24 B3  |860..$R..A$:.A$.|
000008D0: B1 22 20 22 A7 38 35 30  00 DF 24 5C 03 82 53 00  |." ".850..$\..S.|
000008E0: E6 24 66 03 82 54 00 EF  24 70 03 89 39 31 30 00  |.$f..T..$p..910.|
000008F0: 0F 25 7A 03 A0 32 3A A0  31 35 3A 99 22 93 45 4E  |.%z..2:.15:.".EN|
00000900: 44 20 4F 46 20 50 52 4F  47 52 41 4D 22 3A 99 00  |D OF PROGRAM":..|
00000910: 2D 25 84 03 99 22 12 52  55 4E 92 20 54 4F 20 53  |-%...".RUN. TO S|
00000920: 54 41 52 54 20 41 47 41  49 4E 22 3A 80 00 4E 25  |TART AGAIN":..N%|
00000930: 8E 03 99 3A 99 22 11 50  52 45 53 53 20 12 53 50  |...:.".PRESS .SP|
00000940: 41 43 45 92 20 46 4F 52  20 4D 45 4E 55 22 00 63  |ACE. FOR MENU".c|
00000950: 25 98 03 A1 41 24 3A 8B  41 24 B3 B1 22 20 22 A7  |%...A$:.A$.." ".|
00000960: 39 32 30 00 78 25 A2 03  99 22 93 20 53 41 4D 45  |920.x%...". SAME|
00000970: 20 44 52 49 56 45 3F 22  00 98 25 AC 03 A1 59 4E  | DRIVE?"..%...YN|
00000980: 24 3A 8B 59 4E 24 B3 B1  22 59 22 AF 59 4E 24 B3  |$:.YN$.."Y".YN$.|
00000990: B1 22 4E 22 A7 39 34 30  00 B1 25 B6 03 8B 59 4E  |."N".940..%...YN|
000009A0: 24 B2 22 4E 22 A7 A0 31  35 3A A0 32 3A 89 31 30  |$."N"..15:.2:.10|
000009B0: 30 00 C2 25 C0 03 8B 59  4E 24 B2 22 59 22 A7 31  |0..%...YN$."Y".1|
000009C0: 33 30 00 00 00                                    |30...           |

....D..".STATE DRIVE # WANTED".<.N..D$:D
.E(D$):.D.7.D.11.110.M.X..G(142):.140.X.
.. 2: 15.J....15,D,15,"I0".Y....15,A:.A.
.... ..2,D,2,"#":Q$.G(0).....ID.16.6:.22
0.W...MH..(MEM.256):ML.MEM.MH.256:.15,"M
-R";G(ML);G(MH)......#15,A$:A.F(A$.Q$):.
...H.."$";:NL..(BY.16):.210:NL.BY.16.NL.
<.R..J("0123456789ABCDEF",NL.1,1);:..U..
..".DISKETTE EXAMINE".M...."............
...."......".    *** MENU ***":......."1
. DISPLAY ID'S"......"2. FAST ERROR LOOK
".S...."3. FULL ERROR LOOK"......"4. EXI
T."..."..".N.B. FOR 1570/1541 DRIVES USE
 ONLY TRACKS 1-35.".1.,..".INPUT (1-4):"
;.F.6...A:.A.1.A.4.310...@...((A.1).2.(A
.2).3.(A.3).4.(A.4)).330,500,650,890:.22
0...J..".ID DISPLAY"...T.."..........".W
.^.."..FOR 1570 AND 1541 DRIVES TRACK NU
MBERS."...H.."..NEVER OVER 35!!."...R.."
.1. INPUT FIRST TRACK (1-70)".1.|..F:.F.
1.F.70.."..":.380.S...."2. INPUT LAST TR
ACK (1-70)".O....L:.L.1.L.70.."..":.400.
.....L.F..".LAST TRACK NEVER LOWER THAN 
FIRST ONE!.":."....":.390.A....".":.T.F.
L.Z....15,"U1:2,0,";T;",0".....MEM.ID:.1
80:IZ.A:MEM.ID.1:.180:.1 B..I(D(T),2);".
 ID=";G(34);G(IZ);G(A);G(34);" ";.P L.BY
.IZ:.200:.",";:BY.A:.200.I V...20);:.T.2
..(T.2)...P ...T.Y ...910.. ...".FAST ER
ROR LOOKER".. ...".................".. .
.."..FOR 1570 AND 1541 DRIVES TRACK NUMB
ERS.".. ..."..NEVER OVER 35!!."..!...".1
. INPUT FIRST TRACK (1-70)".7!&..F:.F.1.
F.70.."..":.550.Y!0.."2. INPUT LAST TRAC
K (1-70)".U!:..L:.L.1.L.70.."..":.570..!
D..L.F..".LAST TRACK NEVER LOWER THAN FI
RST ONE!.":."....":.560.G!N..".":.T.F.L.
.!X..I(D(T),2);". ";..!B..15,"U1:2,0,";T
;",0".*"L..15,A$,B$,C$,D$:DD$.A$.",".B$.
",".C$.",".D$:.DD$.1"V..T.:"...910.T"...
".FULL ERROR LOOKER".M"...".............
....".."..."..FOR 1570 AND 1541 DRIVES T
RACK NUMBERS.".."..."..NEVER OVER 35!!."
.."...".1. INPUT FIRST TRACK (1-70)"..".
..F:.F.1.F.70.."..":.700..#F.."2. INPUT 
LAST TRACK (1-70)".6#P..L:.L.1.L.70.."..
":.720.X#Z..L.F..".LAST TRACK NEVER LOWE
R THAN FIRST ONE!.":."....":.710..#...".
":.T.F.L..#...T.18.(T.35.T.53)..S.0.20:.
790.U#...(T.17.T.25).(T.52.T.60)..S.0.18
:.790..#...(T.24.T.31).(T.59.T.66)..S.0.
17:.790..$...(T.30.T.36).T.65..S.0.16.6$
...15,"U1:2,0,";T;","S.S$ ..15,A$,B$,C$,
D$:DD$.A$.",".B$.",".C$.",".D$:.A$."66".
870..$*.."T="T;". S=";S;". ";;..$4..A$."
00"..".":.840..$>..DD$.C$H..A$:.A$.." ".
860.X$R..A$:.A$.." ".850..$\..S..$F..T..
$P..910..%Z. 2: 15:.".END OF PROGRAM":..
-%...".RUN. TO START AGAIN":..N%...:.".P
RESS .SPACE. FOR MENU".C%...A$:.A$.." ".
920.X%...". SAME DRIVE?"..%...YN$:.YN$..
"Y".YN$.."N".940..%...YN$."N". 15: 2:.10
0.B%...YN$."Y".130...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL