_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

TRACK & SECTOR

FILE INFORMATION

FILENAME(S): TRACK & SECTOR

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-11-30 19:36:55

APPEARS ON: 1 disk(s)

FILE HASH

52c31c8162ef5ffbf80142a8c14b0d5abc3b43fa33a34572b4431c62279670a7

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ERIK SOFT TRACK & SECTOR PRG Curtcool, Bo 31 15 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 23 08 64 00 8F 20  44 49 53 50 4C 41 59 20  |..#.d.. DISPLAY |
00000010: 54 52 41 43 4B 20 26 20  53 45 4B 54 4F 52 20 27  |TRACK & SEKTOR '|
00000020: 36 34 27 00 4D 08 6E 00  8F 20 2A 2A 20 46 4F 52  |64'.M.n.. ** FOR|
00000030: 20 55 53 45 20 4F 4E 20  43 42 4D 2D 36 34 20 26  | USE ON CBM-64 &|
00000040: 20 31 35 34 31 20 44 52  49 56 45 20 2A 00 53 08  | 1541 DRIVE *.S.|
00000050: 78 00 3A 00 6F 08 82 00  8F 20 41 44 4A 55 53 54  |x.:.o.... ADJUST|
00000060: 20 4D 45 4D 4F 52 59 20  50 4F 49 4E 54 45 52 00  | MEMORY POINTER.|
00000070: 8B 08 8C 00 97 35 35 2C  30 3A 97 35 36 2C 31 31  |.....55,0:.56,11|
00000080: 32 3A 99 C7 28 31 34 32  29 3A 9C 00 91 08 96 00  |2:..(142):......|
00000090: 3A 00 AA 08 A0 00 8F 20  20 53 45 54 55 50 20 4D  |:......  SETUP M|
000000A0: 41 53 4B 49 4E 20 43 4F  44 45 00 B6 08 AA 00 41  |ASKIN CODE.....A|
000000B0: B2 32 38 36 37 32 00 C8  08 B4 00 87 42 3A 8B 42  |.28672......B:.B|
000000C0: B2 39 39 39 A7 32 37 30  00 DC 08 BE 00 97 41 2C  |.999.270......A,|
000000D0: 42 3A 41 B2 41 AA 31 3A  89 31 38 30 00 E2 08 C8  |B:A.A.1:.180....|
000000E0: 00 3A 00 E8 08 FA 00 3A  00 FF 08 04 01 8F 20 53  |.:.....:...... S|
000000F0: 43 52 45 45 4E 20 44 49  53 50 4C 41 59 20 2A 00  |CREEN DISPLAY *.|
00000100: 23 09 0E 01 99 22 93 11  11 11 1D 1D 1D 1D C0 C0  |#...."..........|
00000110: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000120: C0 C0 22 00 4A 09 18 01  99 22 20 20 20 20 12 20  |..".J...."    . |
00000130: 44 49 53 50 4C 41 59 20  54 52 41 43 4B 20 26 20  |DISPLAY TRACK & |
00000140: 53 45 4B 54 4F 52 20 11  11 22 00 74 09 4A 01 99  |SEKTOR ..".t.J..|
00000150: 22 11 11 44 49 53 50 4C  41 59 20 4F 4E 20 12 53  |"..DISPLAY ON .S|
00000160: 92 43 52 45 45 4E 20 4F  52 20 12 50 92 52 49 4E  |.CREEN OR .P.RIN|
00000170: 54 45 52 22 00 87 09 54  01 A1 4A 24 3A 8B 4A 24  |TER"...T..J$:.J$|
00000180: B2 22 22 A7 33 34 30 00  9D 09 5E 01 8B 4A 24 B2  |."".340...^..J$.|
00000190: 22 53 22 A7 9F 34 2C 33  3A 89 34 30 30 00 B3 09  |"S"..4,3:.400...|
000001A0: 68 01 8B 4A 24 B2 22 50  22 A7 9F 34 2C 34 3A 89  |h..J$."P"..4,4:.|
000001B0: 34 30 30 00 BC 09 72 01  89 33 34 30 00 D8 09 86  |400...r..340....|
000001C0: 01 8F 20 2A 20 4F 50 45  4E 20 46 49 4C 45 20 54  |.. * OPEN FILE T|
000001D0: 4F 20 44 49 53 4B 20 2A  00 04 0A 90 01 9F 31 35  |O DISK *......15|
000001E0: 2C 38 2C 31 35 3A 8D 37  37 30 3A 8F 20 2A 20 4F  |,8,15:.770:. * O|
000001F0: 50 45 4E 20 45 52 52 4F  52 20 43 48 41 4E 4E 45  |PEN ERROR CHANNE|
00000200: 4C 20 20 2A 00 33 0A 9A  01 9F 32 2C 38 2C 32 2C  |L  *.3....2,8,2,|
00000210: 22 23 22 AA 22 30 22 3A  8D 37 37 30 3A 8F 20 2A  |"#"."0":.770:. *|
00000220: 20 52 45 53 45 52 56 45  20 42 55 46 46 45 52 20  | RESERVE BUFFER |
00000230: 30 20 2A 00 39 0A A4 01  3A 00 56 0A AE 01 8F 20  |0 *.9...:.V.... |
00000240: 2A 20 47 45 54 20 54 52  41 43 4B 20 26 20 53 45  |* GET TRACK & SE|
00000250: 4B 54 4F 52 20 2A 00 7C  0A B8 01 97 31 39 38 2C  |KTOR *.|....198,|
00000260: 30 3A 99 22 20 54 52 41  43 4B 20 3A 20 22 3B 3A  |0:." TRACK : ";:|
00000270: 8D 38 31 30 3A 54 B2 C5  28 58 24 29 00 82 0A C2  |.810:T..(X$)....|
00000280: 01 3A 00 C8 0A CC 01 8F  20 2A 20 49 46 20 27 58  |.:...... * IF 'X|
00000290: 27 20 4F 52 20 4E 4F 4E  2D 56 41 4C 49 44 20 54  |' OR NON-VALID T|
000002A0: 52 41 43 4B 20 4E 4F 2E  20 49 53 20 45 4E 54 45  |RACK NO. IS ENTE|
000002B0: 52 45 44 20 54 48 45 4E  20 50 52 4F 47 52 41 4D  |RED THEN PROGRAM|
000002C0: 20 45 58 49 54 53 20 2A  00 F3 0A D6 01 8B 54 B2  | EXITS *......T.|
000002D0: 30 B0 54 B1 33 35 B0 58  24 B2 22 58 22 A7 A0 32  |0.T.35.X$."X"..2|
000002E0: 3A A0 34 3A A0 31 35 3A  99 22 93 20 45 4E 44 20  |:.4:.15:.". END |
000002F0: 22 3A 80 00 19 0B E0 01  99 2C 2C 22 91 53 45 43  |":.......,,".SEC|
00000300: 54 4F 52 20 3A 20 22 3B  3A 8D 38 31 30 3A 8B 58  |TOR : ";:.810:.X|
00000310: 24 B2 22 58 22 A7 34 34  30 00 25 0B EA 01 53 B2  |$."X".440.%...S.|
00000320: C5 28 58 24 29 00 47 0B  F4 01 8B 4A 24 B2 22 53  |.(X$).G....J$."S|
00000330: 22 A7 99 22 54 52 41 43  4B 22 54 22 53 45 43 54  |".."TRACK"T"SECT|
00000340: 4F 52 22 53 22 11 22 00  68 0B FE 01 8B 4A 24 B2  |OR"S".".h....J$.|
00000350: 22 50 22 A7 98 34 2C 22  54 52 41 43 4B 22 54 22  |"P"..4,"TRACK"T"|
00000360: 53 45 43 54 4F 52 22 53  00 6E 0B 08 02 3A 00 8E  |SECTOR"S.n...:..|
00000370: 0B 12 02 8F 20 2A 20 47  45 54 20 42 4C 4F 43 4B  |.... * GET BLOCK|
00000380: 20 49 4E 54 4F 20 4D 45  4D 4F 52 59 20 2A 00 CD  | INTO MEMORY *..|
00000390: 0B 1C 02 98 31 35 2C 22  55 31 3A 32 2C 22 30 3B  |....15,"U1:2,"0;|
000003A0: 54 3B 53 3A 8D 37 37 30  3A 8F 20 2A 20 52 45 41  |T;S:.770:. * REA|
000003B0: 44 20 42 4C 4F 43 4B 20  46 52 4F 4D 20 44 49 53  |D BLOCK FROM DIS|
000003C0: 4B 20 54 4F 20 42 55 46  46 45 52 20 2A 00 F6 0B  |K TO BUFFER *...|
000003D0: 26 02 98 31 35 2C 22 42  2D 50 3A 32 2C 31 22 3A  |&..15,"B-P:2,1":|
000003E0: 8F 20 53 45 54 20 42 55  46 46 45 52 20 50 4F 49  |. SET BUFFER POI|
000003F0: 4E 54 45 52 20 2A 00 0C  0C 30 02 98 31 35 2C 22  |NTER *...0..15,"|
00000400: 4D 2D 52 22 C7 28 30 29  C7 28 33 29 00 3F 0C 3A  |M-R".(0).(3).?.:|
00000410: 02 A1 23 31 35 2C 41 24  3A 41 24 B2 41 24 AA C7  |..#15,A$:A$.A$..|
00000420: 28 30 29 3A 8F 20 2A 20  47 45 54 20 31 53 54 20  |(0):. * GET 1ST |
00000430: 42 59 54 45 20 4F 46 20  42 4C 4F 43 4B 20 2A 00  |BYTE OF BLOCK *.|
00000440: 7C 0C 44 02 97 33 30 37  32 30 2C C6 28 41 24 29  ||.D..30720,.(A$)|
00000450: 3A 9E 32 38 36 37 32 3A  8F 20 2A 20 52 45 41 44  |:.28672:. * READ|
00000460: 20 52 45 53 54 20 4F 46  20 42 4C 4F 43 4B 20 49  | REST OF BLOCK I|
00000470: 4E 54 4F 20 4D 45 4D 4F  52 59 20 2A 00 82 0C 4E  |NTO MEMORY *...N|
00000480: 02 3A 00 AF 0C 58 02 8F  20 2A 20 44 49 53 50 4C  |.:...X.. * DISPL|
00000490: 41 59 20 42 4C 4F 43 4B  20 4F 4E 20 53 43 52 45  |AY BLOCK ON SCRE|
000004A0: 45 4E 20 4F 52 20 50 52  49 4E 54 45 52 20 2A 00  |EN OR PRINTER *.|
000004B0: DF 0C 62 02 9D 34 3A 9E  32 38 36 39 31 3A 8F 20  |..b..4:.28691:. |
000004C0: 2A 20 44 49 53 50 4C 41  59 20 46 49 52 53 54 20  |* DISPLAY FIRST |
000004D0: 48 41 4C 46 20 4F 46 20  42 4C 4F 43 4B 20 2A 00  |HALF OF BLOCK *.|
000004E0: EF 0C 6C 02 8B 4A 24 B2  22 50 22 A7 36 34 30 00  |..l..J$."P".640.|
000004F0: 2E 0D 76 02 A1 5A 24 3A  8B 5A 24 B2 22 22 A7 36  |..v..Z$:.Z$."".6|
00000500: 33 30 3A 8F 20 2A 20 57  41 49 54 20 4B 45 59 50  |30:. * WAIT KEYP|
00000510: 52 45 53 53 20 49 46 20  44 49 53 50 4C 41 59 49  |RESS IF DISPLAYI|
00000520: 4E 47 20 54 4F 20 53 43  52 45 45 4E 20 2A 00 58  |NG TO SCREEN *.X|
00000530: 0D 80 02 9E 32 38 36 39  39 3A 98 34 3A 8F 20 2A  |....28699:.4:. *|
00000540: 20 44 49 53 50 4C 41 59  20 52 45 53 54 20 4F 46  | DISPLAY REST OF|
00000550: 20 42 4C 4F 43 4B 20 2A  00 5E 0D 8A 02 3A 00 7E  | BLOCK *.^...:.~|
00000560: 0D 94 02 8F 20 2A 20 47  45 54 20 4E 45 58 54 20  |.... * GET NEXT |
00000570: 54 52 41 43 4B 20 26 20  53 45 43 54 4F 52 00 9A  |TRACK & SECTOR..|
00000580: 0D 9E 02 54 31 B2 C2 28  33 30 37 32 30 29 3A 53  |...T1..(30720):S|
00000590: 31 B2 C2 28 33 30 37 32  31 29 00 BA 0D A8 02 8B  |1..(30721)......|
000005A0: 54 31 B2 30 A7 99 22 11  11 45 4E 44 20 4F 46 20  |T1.0.."..END OF |
000005B0: 46 49 4C 45 22 3A 89 34  34 30 00 E0 0D B2 02 99  |FILE":.440......|
000005C0: 22 11 20 4E 45 58 54 20  54 52 41 43 4B 20 26 20  |". NEXT TRACK & |
000005D0: 53 45 43 54 4F 52 20 3A  20 22 3B 54 31 3B 53 31  |SECTOR : ";T1;S1|
000005E0: 00 0D 0E BC 02 99 22 44  4F 20 59 4F 55 20 57 41  |......"DO YOU WA|
000005F0: 4E 54 20 54 48 45 20 4E  45 58 54 20 54 52 41 43  |NT THE NEXT TRAC|
00000600: 4B 20 26 20 53 45 43 54  4F 52 20 3F 22 00 20 0E  |K & SECTOR ?". .|
00000610: C6 02 A1 5A 24 3A 8B 5A  24 B2 22 22 A7 37 31 30  |...Z$:.Z$."".710|
00000620: 00 42 0E D0 02 8B 5A 24  B2 22 59 22 B0 5A 24 B2  |.B....Z$."Y".Z$.|
00000630: 22 20 22 A7 54 B2 54 31  3A 53 B2 53 31 3A 89 35  |" ".T.T1:S.S1:.5|
00000640: 30 30 00 52 0E DA 02 8B  5A 24 B2 22 4E 22 A7 34  |00.R....Z$."N".4|
00000650: 34 30 00 5B 0E E4 02 89  37 31 30 00 61 0E EE 02  |40.[....710.a...|
00000660: 3A 00 83 0E F8 02 8F 20  2A 43 48 45 43 4B 20 44  |:...... *CHECK D|
00000670: 49 53 4B 20 45 52 52 4F  52 20 43 48 41 4E 4E 45  |ISK ERROR CHANNE|
00000680: 4C 20 2A 00 A0 0E 02 03  84 31 35 2C 45 4E 2C 45  |L *......15,EN,E|
00000690: 4D 24 2C 45 54 2C 45 53  3A 8B 45 4E B2 30 A7 8E  |M$,ET,ES:.EN.0..|
000006A0: 00 CD 0E 0C 03 99 22 12  44 49 53 4B 20 45 52 52  |......".DISK ERR|
000006B0: 4F 52 20 92 22 45 2C 2C  45 4D 24 2C 45 54 2C 45  |OR ."E,,EM$,ET,E|
000006C0: 53 3A A0 32 3A A0 34 3A  A0 31 35 3A 80 00 D3 0E  |S:.2:.4:.15:....|
000006D0: 16 03 3A 00 F5 0E 20 03  8F 20 2A 20 42 4F 4D 42  |..:... .. * BOMB|
000006E0: 20 50 52 4F 4F 46 20 49  4E 50 55 54 20 52 55 54  | PROOF INPUT RUT|
000006F0: 49 4E 45 20 2A 00 0C 0F  2A 03 9F 20 39 2C 30 3A  |INE *...*.. 9,0:|
00000700: 84 39 2C 58 24 3A A0 39  3A 99 3A 8E 00 12 0F 34  |.9,X$:.9:.:....4|
00000710: 03 3A 00 2E 0F 3E 03 8F  20 2A 20 4D 41 43 48 49  |.:...>.. * MACHI|
00000720: 4E 45 20 43 4F 44 45 20  44 41 54 41 20 2A 00 6B  |NE CODE DATA *.k|
00000730: 0F 48 03 83 31 36 32 2C  32 2C 33 32 2C 31 39 38  |.H..162,2,32,198|
00000740: 2C 32 35 35 2C 31 36 30  2C 31 2C 33 32 2C 32 30  |,255,160,1,32,20|
00000750: 37 2C 32 35 35 2C 31 35  33 2C 30 2C 31 32 30 2C  |7,255,153,0,120,|
00000760: 32 30 30 2C 32 30 38 2C  32 34 37 00 AC 0F 52 03  |200,208,247...R.|
00000770: 83 37 36 2C 32 30 34 2C  32 35 35 2C 31 36 39 2C  |.76,204,255,169,|
00000780: 31 32 30 2C 31 33 33 2C  31 38 31 2C 31 36 39 2C  |120,133,181,169,|
00000790: 30 2C 31 33 33 2C 31 38  30 2C 31 36 35 2C 31 38  |0,133,180,165,18|
000007A0: 30 2C 33 32 2C 31 32 36  2C 31 31 32 00 EB 0F 5C  |0,32,126,112...\|
000007B0: 03 83 31 36 39 2C 33 32  2C 33 32 2C 32 31 30 2C  |..169,32,32,210,|
000007C0: 32 35 35 2C 31 36 39 2C  35 38 2C 33 32 2C 32 31  |255,169,58,32,21|
000007D0: 30 2C 32 35 35 2C 31 36  39 2C 33 32 2C 33 32 2C  |0,255,169,32,32,|
000007E0: 32 31 30 2C 32 35 35 2C  31 36 30 00 29 10 66 03  |210,255,160.).f.|
000007F0: 83 30 2C 31 37 37 2C 31  38 30 2C 33 32 2C 31 32  |.0,177,180,32,12|
00000800: 36 2C 31 31 32 2C 31 36  39 2C 33 32 2C 33 32 2C  |6,112,169,32,32,|
00000810: 32 31 30 2C 32 35 35 2C  32 30 30 2C 31 39 32 2C  |210,255,200,192,|
00000820: 38 2C 32 30 38 2C 32 34  31 00 67 10 70 03 83 31  |8,208,241.g.p..1|
00000830: 36 30 2C 30 2C 31 36 39  2C 35 38 2C 33 32 2C 32  |60,0,169,58,32,2|
00000840: 31 30 2C 32 35 35 2C 31  36 39 2C 33 32 2C 33 32  |10,255,169,32,32|
00000850: 2C 32 31 30 2C 32 35 35  2C 31 37 37 2C 31 38 30  |,210,255,177,180|
00000860: 2C 32 30 31 2C 33 32 00  A4 10 7A 03 83 31 34 34  |,201,32...z..144|
00000870: 2C 31 32 2C 32 30 31 2C  39 36 2C 31 34 34 2C 31  |,12,201,96,144,1|
00000880: 30 2C 32 30 31 2C 31 36  30 2C 31 34 34 2C 34 2C  |0,201,160,144,4,|
00000890: 32 30 31 2C 32 32 34 2C  31 34 34 2C 32 2C 31 36  |201,224,144,2,16|
000008A0: 39 2C 33 32 00 E3 10 84  03 83 33 32 2C 32 31 30  |9,32......32,210|
000008B0: 2C 32 35 35 2C 32 30 30  2C 31 39 32 2C 38 2C 32  |,255,200,192,8,2|
000008C0: 30 38 2C 32 32 38 2C 31  36 39 2C 31 33 2C 33 32  |08,228,169,13,32|
000008D0: 2C 32 31 30 2C 32 35 35  2C 32 34 2C 31 36 35 2C  |,210,255,24,165,|
000008E0: 31 38 30 00 1E 11 8E 03  83 31 30 35 2C 38 2C 31  |180......105,8,1|
000008F0: 33 33 2C 31 38 30 2C 32  30 31 2C 30 2C 32 30 38  |33,180,201,0,208|
00000900: 2C 31 2C 39 36 2C 32 30  31 2C 31 32 38 2C 32 30  |,1,96,201,128,20|
00000910: 38 2C 31 35 38 2C 39 36  2C 37 32 2C 37 34 00 5A  |8,158,96,72,74.Z|
00000920: 11 98 03 83 37 34 2C 37  34 2C 37 34 2C 33 32 2C  |....74,74,74,32,|
00000930: 31 35 30 2C 31 31 32 2C  31 37 30 2C 31 30 34 2C  |150,112,170,104,|
00000940: 34 31 2C 31 35 2C 33 32  2C 31 35 30 2C 31 31 32  |41,15,32,150,112|
00000950: 2C 37 32 2C 31 33 38 2C  33 32 00 9B 11 A2 03 83  |,72,138,32......|
00000960: 32 31 30 2C 32 35 35 2C  31 30 34 2C 37 36 2C 32  |210,255,104,76,2|
00000970: 31 30 2C 32 35 35 2C 32  34 2C 31 30 35 2C 32 34  |10,255,24,105,24|
00000980: 36 2C 31 34 34 2C 32 2C  31 30 35 2C 36 2C 31 30  |6,144,2,105,6,10|
00000990: 35 2C 35 38 2C 39 36 2C  39 39 39 00 00 00 DA 73  |5,58,96,999....s|
000009A0: 2F 45 20                                          |/E              |
..#.D.. DISPLAY TRACK & SEKTOR '64'.M.N.
. ** FOR USE ON CBM-64 & 1541 DRIVE *.S.
X.:.O.... ADJUST MEMORY POINTER......55,
0:.56,112:.G(142):......:... ..  SETUP M
ASKIN CODE.....A.28672.H....B:.B.999.270
......A,B:A.A.1:.180...H.:.....:...... S
CREEN DISPLAY *.#...."..................
..........".J...."    . DISPLAY TRACK & 
SEKTOR ..".T.J.."..DISPLAY ON .S.CREEN O
R .P.RINTER"...T..J$:.J$."".340...^..J$.
"S"..4,3:.400...H..J$."P"..4,4:.400...R.
.340.X.... * OPEN FILE TO DISK *......15
,8,15:.770:. * OPEN ERROR CHANNEL  *.3..
..2,8,2,"#"."0":.770:. * RESERVE BUFFER 
0 *.9...:.V.... * GET TRACK & SEKTOR *.|
....198,0:." TRACK : ";:.810:T.E(X$)...B
.:.H.L.. * IF 'X' OR NON-VALID TRACK NO.
 IS ENTERED THEN PROGRAM EXITS *...V..T.
0.T.35.X$."X". 2: 4: 15:.". END ":......
.,,".SECTOR : ";:.810:.X$."X".440.%...S.
E(X$).G....J$."S".."TRACK"T"SECTOR"S".".
H....J$."P"..4,"TRACK"T"SECTOR"S.N...:..
.... * GET BLOCK INTO MEMORY *.M....15,"
U1:2,"0;T;S:.770:. * READ BLOCK FROM DIS
K TO BUFFER *...&..15,"B-P:2,1":. SET BU
FFER POINTER *...0..15,"M-R"G(0)G(3).?.:
..#15,A$:A$.A$.G(0):. * GET 1ST BYTE OF 
BLOCK *.|.D..30720,F(A$):.28672:. * READ
 REST OF BLOCK INTO MEMORY *...N.:...X..
 * DISPLAY BLOCK ON SCREEN OR PRINTER *.
..B..4:.28691:. * DISPLAY FIRST HALF OF 
BLOCK *...L..J$."P".640...V..Z$:.Z$."".6
30:. * WAIT KEYPRESS IF DISPLAYING TO SC
REEN *.X....28699:.4:. * DISPLAY REST OF
 BLOCK *.^...:.~.... * GET NEXT TRACK & 
SECTOR.....T1.B(30720):S1.B(30721)......
T1.0.."..END OF FILE":.440......". NEXT 
TRACK & SECTOR : ";T1;S1......"DO YOU WA
NT THE NEXT TRACK & SECTOR ?". .F..Z$:.Z
$."".710.B.P..Z$."Y".Z$." ".T.T1:S.S1:.5
00.R.Z..Z$."N".440.[....710.A...:...... 
*CHECK DISK ERROR CHANNEL *. ....15,EN,E
M$,ET,ES:.EN.0...M....".DISK ERROR ."E,,
EM$,ET,ES: 2: 4: 15:..S...:... .. * BOMB
 PROOF INPUT RUTINE *...*.. 9,0:.9,X$: 9
:.:....4.:...>.. * MACHINE CODE DATA *.K
.H..162,2,32,198,255,160,1,32,207,255,15
3,0,120,200,208,247...R..76,204,255,169,
120,133,181,169,0,133,180,165,180,32,126
,112...\..169,32,32,210,255,169,58,32,21
0,255,169,32,32,210,255,160.).F..0,177,1
80,32,126,112,169,32,32,210,255,200,192,
8,208,241.G.P..160,0,169,58,32,210,255,1
69,32,32,210,255,177,180,201,32...Z..144
,12,201,96,144,10,201,160,144,4,201,224,
144,2,169,32......32,210,255,200,192,8,2
08,228,169,13,32,210,255,24,165,180.....
.105,8,133,180,201,0,208,1,96,201,128,20
8,158,96,72,74.Z....74,74,74,32,150,112,
170,104,41,15,32,150,112,72,138,32......
210,255,104,76,210,255,24,105,246,144,2,
105,6,105,58,96,999...ZS/E 
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL