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

DIR-LOADER

FILE INFORMATION

FILENAME(S): DIR-LOADER

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-11-30 20:08:39

APPEARS ON: 1 disk(s)

FILE HASH

6832d6580e9245f9c58fcfd33a1834852fc4888704c61e9771638906a196ea80

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FEDTMULES COPY DIR-LOADER PRG Curtcool, K-Fly 14 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 4A 08 0A 00 8F 20  43 4F 4D 4D 4F 44 4F 52  |..J.... COMMODOR|
00000010: 45 20 36 34 20 46 55 4E  43 54 49 4F 4E 20 4B 45  |E 64 FUNCTION KE|
00000020: 59 53 2C 46 52 4F 4D 20  20 20 20 20 20 20 20 27  |YS,FROM        '|
00000030: 59 4F 55 52 20 43 4F 4D  50 55 54 45 52 27 20 44  |YOUR COMPUTER' D|
00000040: 45 43 45 4D 42 45 52 20  38 33 00 6D 08 64 00 83  |ECEMBER 83.m.d..|
00000050: 41 30 2C 30 30 2C 42 39  2C 31 35 2C 39 43 2C 39  |A0,00,B9,15,9C,9|
00000060: 39 2C 35 30 2C 30 34 2C  41 39 2C 30 31 00 90 08  |9,50,04,A9,01...|
00000070: 6E 00 83 39 39 2C 35 30  2C 44 38 2C 43 38 2C 43  |n..99,50,D8,C8,C|
00000080: 30 2C 32 38 2C 44 30 2C  46 30 2C 34 43 2C 34 30  |0,28,D0,F0,4C,40|
00000090: 00 B3 08 78 00 83 39 43  2C 30 42 2C 30 35 2C 31  |...x..9C,0B,05,1|
000000A0: 39 2C 32 30 2C 30 34 2C  30 35 2C 30 36 2C 30 39  |9,20,04,05,06,09|
000000B0: 2C 30 45 00 D6 08 82 00  83 30 35 2C 32 30 2C 30  |,0E......05,20,0|
000000C0: 32 2C 31 39 2C 32 30 2C  30 44 2C 32 45 2C 31 34  |2,19,20,0D,2E,14|
000000D0: 2C 30 39 2C 30 45 00 F9  08 8C 00 83 30 37 2C 30  |,09,0E......07,0|
000000E0: 43 2C 30 35 2C 32 30 2C  31 33 2C 31 39 2C 31 33  |C,05,20,13,19,13|
000000F0: 2C 33 32 2C 33 35 2C 33  36 00 1C 09 96 00 83 32  |,32,35,36......2|
00000100: 41 2C 33 31 2C 33 35 2C  33 36 2C 32 30 2C 31 33  |A,31,35,36,20,13|
00000110: 2C 31 34 2C 30 31 2C 31  32 2C 31 34 00 58 09 A0  |,14,01,12,14.X..|
00000120: 00 83 31 33 2C 30 30 2C  30 30 2C 30 30 3A 8F 2A  |..13,00,00,00:.*|
00000130: 2A 45 4E 44 20 4F 46 20  4E 41 4D 45 20 41 4E 44  |*END OF NAME AND|
00000140: 20 53 54 41 52 54 20 41  44 44 52 45 53 53 20 44  | START ADDRESS D|
00000150: 49 53 50 4C 41 59 2A 2A  00 7D 09 AA 00 8F 20 53  |ISPLAY**.}.... S|
00000160: 54 41 52 54 20 4F 46 20  50 4F 49 4E 54 45 52 20  |TART OF POINTER |
00000170: 46 4F 54 20 49 4E 54 45  52 52 55 50 54 00 97 09  |FOT INTERRUPT...|
00000180: B4 00 83 37 38 2C 41 39  2C 34 44 2C 38 44 2C 31  |...78,A9,4D,8D,1|
00000190: 34 2C 30 33 2C 41 39 00  C9 09 BE 00 83 39 43 2C  |4,03,A9......9C,|
000001A0: 38 44 2C 31 35 2C 30 33  2C 35 38 2C 36 30 3A 8F  |8D,15,03,58,60:.|
000001B0: 20 45 4E 44 20 4F 46 20  49 4E 54 45 52 52 55 50  | END OF INTERRUP|
000001C0: 54 20 50 4F 49 4E 54 45  52 00 03 0A C8 00 8F 20  |T POINTER...... |
000001D0: 53 54 41 52 54 20 4F 46  20 44 45 54 45 43 54 20  |START OF DETECT |
000001E0: 57 48 49 43 48 20 46 55  4E 43 54 49 4F 4E 20 4B  |WHICH FUNCTION K|
000001F0: 45 59 20 48 41 53 20 42  45 45 4E 20 50 52 45 53  |EY HAS BEEN PRES|
00000200: 53 45 44 00 20 0A D2 00  83 41 35 2C 43 35 2C 43  |SED. ....A5,C5,C|
00000210: 39 2C 30 34 2C 44 30 2C  32 30 2C 41 32 2C 30 30  |9,04,D0,20,A2,00|
00000220: 00 3D 0A DC 00 83 41 44  2C 38 44 2C 30 32 2C 43  |.=....AD,8D,02,C|
00000230: 39 2C 30 31 2C 44 30 2C  30 35 2C 41 32 00 5A 0A  |9,01,D0,05,A2.Z.|
00000240: E6 00 83 30 41 2C 34 43  2C 44 37 2C 39 43 2C 43  |...0A,4C,D7,9C,C|
00000250: 39 2C 30 32 2C 44 30 2C  30 35 00 77 0A F0 00 83  |9,02,D0,05.w....|
00000260: 41 32 2C 31 34 2C 34 43  2C 44 37 2C 39 43 2C 43  |A2,14,4C,D7,9C,C|
00000270: 39 2C 30 34 2C 44 30 00  94 0A FA 00 83 36 39 2C  |9,04,D0......69,|
00000280: 41 32 2C 31 45 2C 34 43  2C 44 37 2C 39 43 2C 41  |A2,1E,4C,D7,9C,A|
00000290: 35 2C 43 35 00 B1 0A 04  01 83 43 39 2C 30 35 2C  |5,C5......C9,05,|
000002A0: 44 30 2C 32 30 2C 41 32  2C 32 38 2C 41 44 2C 38  |D0,20,A2,28,AD,8|
000002B0: 44 00 CE 0A 0E 01 83 30  32 2C 43 39 2C 30 31 2C  |D......02,C9,01,|
000002C0: 44 30 2C 30 35 2C 41 32  2C 33 32 2C 34 43 00 EB  |D0,05,A2,32,4C..|
000002D0: 0A 18 01 83 44 37 2C 39  43 2C 43 39 2C 30 32 2C  |....D7,9C,C9,02,|
000002E0: 44 30 2C 30 35 2C 41 32  2C 33 43 00 08 0B 22 01  |D0,05,A2,3C...".|
000002F0: 83 34 43 2C 44 37 2C 39  43 2C 43 39 2C 30 34 2C  |.4C,D7,9C,C9,04,|
00000300: 44 30 2C 34 33 2C 41 32  00 25 0B 2C 01 83 34 36  |D0,43,A2.%.,..46|
00000310: 2C 34 43 2C 44 37 2C 39  43 2C 41 35 2C 43 35 2C  |,4C,D7,9C,A5,C5,|
00000320: 43 39 2C 30 36 00 42 0B  36 01 83 44 30 2C 32 30  |C9,06.B.6..D0,20|
00000330: 2C 41 32 2C 35 30 2C 41  44 2C 38 44 2C 30 32 2C  |,A2,50,AD,8D,02,|
00000340: 43 39 00 5F 0B 40 01 83  30 31 2C 44 30 2C 30 35  |C9._.@..01,D0,05|
00000350: 2C 41 32 2C 35 41 2C 34  43 2C 44 37 2C 39 43 00  |,A2,5A,4C,D7,9C.|
00000360: 7C 0B 4A 01 83 43 39 2C  30 32 2C 44 30 2C 30 35  ||.J..C9,02,D0,05|
00000370: 2C 41 32 2C 36 34 2C 34  43 2C 44 37 00 99 0B 54  |,A2,64,4C,D7...T|
00000380: 01 83 39 43 2C 43 39 2C  30 34 2C 44 30 2C 31 44  |..9C,C9,04,D0,1D|
00000390: 2C 41 32 2C 36 45 2C 34  43 00 B6 0B 5E 01 83 44  |,A2,6E,4C...^..D|
000003A0: 37 2C 39 43 2C 41 35 2C  43 35 2C 43 39 2C 30 33  |7,9C,A5,C5,C9,03|
000003B0: 2C 44 30 2C 33 31 00 D3  0B 68 01 83 41 32 2C 37  |,D0,31...h..A2,7|
000003C0: 38 2C 41 44 2C 38 44 2C  30 32 2C 43 39 2C 30 30  |8,AD,8D,02,C9,00|
000003D0: 2C 46 30 00 F0 0B 72 01  83 30 39 2C 41 44 2C 38  |,F0...r..09,AD,8|
000003E0: 44 2C 30 32 2C 43 39 2C  30 31 2C 44 30 2C 32 34  |D,02,C9,01,D0,24|
000003F0: 00 1A 0C 7C 01 83 41 32  2C 38 32 3A 8F 20 45 4E  |...|..A2,82:. EN|
00000400: 44 20 4F 46 20 4B 45 59  20 44 45 54 45 43 54 49  |D OF KEY DETECTI|
00000410: 4F 4E 20 52 4F 55 54 49  4E 45 00 3C 0C 86 01 8F  |ON ROUTINE.<....|
00000420: 20 53 54 41 52 54 20 4F  46 20 50 52 49 4E 54 20  | START OF PRINT |
00000430: 57 4F 52 44 20 52 4F 55  54 49 4E 45 00 59 0C 90  |WORD ROUTINE.Y..|
00000440: 01 83 41 30 2C 30 30 2C  42 44 2C 33 34 2C 39 45  |..A0,00,BD,34,9E|
00000450: 2C 39 39 2C 37 37 2C 30  32 00 90 0C 9A 01 83 45  |,99,77,02......E|
00000460: 38 2C 43 38 2C 43 39 2C  32 30 2C 44 30 2C 46 34  |8,C8,C9,20,D0,F4|
00000470: 2C 38 38 2C 38 34 2C 43  36 3A 8F 20 45 4E 44 20  |,88,84,C6:. END |
00000480: 4F 46 20 50 52 49 4E 54  20 52 4F 55 54 49 4E 45  |OF PRINT ROUTINE|
00000490: 00 C5 0C A4 01 8F 20 53  54 41 52 54 20 4F 46 20  |...... START OF |
000004A0: 44 45 4C 41 59 20 52 4F  55 54 49 4E 45 20 41 4E  |DELAY ROUTINE AN|
000004B0: 44 20 45 58 49 54 20 46  52 4F 4D 20 49 4E 54 45  |D EXIT FROM INTE|
000004C0: 52 52 55 50 54 00 E2 0C  AE 01 83 41 32 2C 30 30  |RRUPT......A2,00|
000004D0: 2C 41 30 2C 30 30 2C 43  38 2C 43 30 2C 46 41 2C  |,A0,00,C8,C0,FA,|
000004E0: 44 30 00 19 0D B8 01 83  46 42 2C 45 38 2C 45 30  |D0......FB,E8,E0|
000004F0: 2C 46 41 2C 44 30 2C 46  34 2C 34 43 2C 33 31 2C  |,FA,D0,F4,4C,31,|
00000500: 45 41 3A 8F 20 45 4E 44  20 4F 46 20 44 45 4C 41  |EA:. END OF DELA|
00000510: 59 20 52 4F 55 54 49 4E  45 00 4D 0D C2 01 8F 20  |Y ROUTINE.M.... |
00000520: 53 54 41 52 54 20 4F 46  20 43 48 41 4E 47 45 20  |START OF CHANGE |
00000530: 53 43 52 45 45 4E 20 26  20 42 4F 52 44 45 52 20  |SCREEN & BORDER |
00000540: 43 4F 4C 4F 52 20 52 4F  55 54 49 4E 45 00 6A 0D  |COLOR ROUTINE.j.|
00000550: CC 01 83 43 39 2C 30 32  2C 44 30 2C 30 36 2C 41  |...C9,02,D0,06,A|
00000560: 45 2C 32 30 2C 44 30 2C  34 43 00 87 0D D6 01 83  |E,20,D0,4C......|
00000570: 31 41 2C 39 44 2C 43 39  2C 30 34 2C 44 30 2C 45  |1A,9D,C9,04,D0,E|
00000580: 46 2C 41 45 2C 32 31 00  A4 0D E0 01 83 44 30 2C  |F,AE,21......D0,|
00000590: 45 38 2C 45 30 2C 31 30  2C 39 30 2C 30 36 2C 38  |E8,E0,10,90,06,8|
000005A0: 45 2C 32 31 00 C1 0D EA  01 83 44 30 2C 34 43 2C  |E,21......D0,4C,|
000005B0: 45 38 2C 39 43 2C 41 32  2C 30 30 2C 34 43 2C 30  |E8,9C,A2,00,4C,0|
000005C0: 46 00 DE 0D F4 01 83 39  44 2C 45 38 2C 45 30 2C  |F......9D,E8,E0,|
000005D0: 31 30 2C 39 30 2C 30 36  2C 38 45 2C 32 30 00 FE  |10,90,06,8E,20..|
000005E0: 0D FE 01 83 44 30 2C 34  43 2C 45 38 2C 39 43 2C  |....D0,4C,E8,9C,|
000005F0: 41 32 2C 30 30 2C 34 43  2C 31 46 2C 39 44 00 13  |A2,00,4C,1F,9D..|
00000600: 0E 08 02 83 2A 3A 8F 20  45 4E 44 20 4F 46 20 44  |....*:. END OF D|
00000610: 41 54 41 00 36 0E 12 02  97 35 36 2C 31 35 36 3A  |ATA.6....56,156:|
00000620: 97 35 32 2C 31 35 36 3A  8F 20 50 52 4F 54 45 43  |.52,156:. PROTEC|
00000630: 54 20 43 4F 44 45 00 4B  0E E7 03 4C B2 33 39 39  |T CODE.K...L.399|
00000640: 33 36 3A 4E B2 30 3A 54  54 B2 30 00 53 0E E8 03  |36:N.0:TT.0.S...|
00000650: 87 41 24 00 5F 0E F2 03  43 B2 C3 28 41 24 29 00  |.A$._...C..(A$).|
00000660: 70 0E FC 03 8B 41 24 B2  22 2A 22 A7 31 31 30 30  |p....A$."*".1100|
00000670: 00 7F 0E 06 04 41 B2 C6  28 41 24 29 AB 34 38 00  |.....A..(A$).48.|
00000680: 93 0E 10 04 42 B2 C6 28  C9 28 41 24 2C 31 29 29  |....B..(.(A$,1))|
00000690: AB 34 38 00 BA 0E 1A 04  4E B2 42 AA 37 AC 28 42  |.48.....N.B.7.(B|
000006A0: B1 39 29 AB 28 43 B2 32  29 AC 28 31 36 AC 28 41  |.9).(C.2).(16.(A|
000006B0: AA 37 AC 28 41 B1 39 29  29 29 00 CE 0E 24 04 8B  |.7.(A.9)))...$..|
000006C0: 4E B3 30 B0 4E B1 32 35  35 A7 31 30 39 30 00 DF  |N.0.N.255.1090..|
000006D0: 0E 2E 04 97 4C 2C 4E 3A  54 54 B2 54 54 AA 4E 00  |....L,N:TT.TT.N.|
000006E0: EF 0E 38 04 4C B2 4C AA  31 3A 89 31 30 30 30 00  |..8.L.L.1:.1000.|
000006F0: 16 0F 42 04 99 22 42 59  54 45 22 4C 22 3D 28 22  |..B.."BYTE"L"=("|
00000700: 41 24 22 29 3F 3F 22 3A  8F 20 49 4E 56 41 4C 49  |A$")??":. INVALI|
00000710: 44 20 44 41 54 41 00 54  0F 4C 04 8B 20 54 54 B3  |D DATA.T.L.. TT.|
00000720: B1 33 32 38 31 33 A7 99  22 93 43 4F 44 45 20 45  |.32813..".CODE E|
00000730: 52 52 4F 52 20 52 55 4E  20 41 42 4F 52 54 45 44  |RROR RUN ABORTED|
00000740: 2E 22 3A 80 3A 8F 20 43  48 45 43 4B 20 4F 4E 20  |.":.:. CHECK ON |
00000750: 44 41 54 41 00 85 0F 51  04 4D B2 34 30 35 30 30  |DATA...Q.M.40500|
00000760: 3A 8F 20 53 54 41 52 54  20 4C 4F 43 41 54 49 4F  |:. START LOCATIO|
00000770: 4E 20 46 4F 52 20 53 50  45 43 49 46 49 45 44 20  |N FOR SPECIFIED |
00000780: 57 4F 52 44 53 00 B8 0F  60 04 4E B2 4D 3A 41 24  |WORDS...`.N.M:A$|
00000790: B2 22 4C 4F 41 44 22 AA  C7 28 33 34 29 AA 22 24  |."LOAD"..(34)."$|
000007A0: 22 AA C7 28 33 34 29 AA  22 2C 38 5F 22 3A 81 41  |"..(34).",8_":.A|
000007B0: B2 31 A4 C3 28 41 24 29  00 CB 0F 6A 04 42 B2 C6  |.1..(A$)...j.B..|
000007C0: 28 CA 28 41 24 2C 41 2C  31 29 29 00 03 10 6F 04  |(.(A$,A,1))...o.|
000007D0: 8B 42 B2 39 35 A7 42 B2  31 33 3A 8F 20 43 48 45  |.B.95.B.13:. CHE|
000007E0: 43 4B 53 20 46 4F 52 20  41 20 5F 20 53 59 4D 42  |CKS FOR A _ SYMB|
000007F0: 4F 4C 20 54 4F 20 44 45  4E 4F 54 45 20 52 45 54  |OL TO DENOTE RET|
00000800: 55 52 4E 00 0C 10 74 04  97 4D 2C 42 00 16 10 7E  |URN...t..M,B...~|
00000810: 04 4D B2 4D AA 31 00 1D  10 88 04 82 41 00 61 10  |.M.M.1......A.a.|
00000820: 92 04 97 4D 2C 33 32 3A  8F 20 54 48 49 53 20 50  |...M,32:. THIS P|
00000830: 4F 4B 45 53 20 54 48 45  20 43 4F 44 45 20 46 4F  |OKES THE CODE FO|
00000840: 52 20 41 20 53 50 41 43  45 20 41 4E 44 20 49 53  |R A SPACE AND IS|
00000850: 20 55 53 45 44 20 42 59  20 54 48 45 20 43 4F 44  | USED BY THE COD|
00000860: 45 00 83 10 97 04 8F 20  54 4F 20 44 45 54 45 43  |E...... TO DETEC|
00000870: 54 20 54 48 45 20 45 4E  44 20 4F 46 20 41 20 57  |T THE END OF A W|
00000880: 4F 52 44 00 8E 10 9C 04  4D B2 4E AA 31 30 00 98  |ORD.....M.N.10..|
00000890: 10 A6 04 97 4D 2C 33 32  00 B7 10 B0 04 4D B2 4E  |....M,32.....M.N|
000008A0: AA 31 30 3A 41 24 B2 22  4C C9 5F 22 3A 81 41 B2  |.10:A$."L._":.A.|
000008B0: 31 A4 C3 28 41 24 29 00  CA 10 BA 04 42 B2 C6 28  |1..(A$).....B..(|
000008C0: CA 28 41 24 2C 41 2C 31  29 29 00 D9 10 C4 04 8B  |.(A$,A,1))......|
000008D0: 42 B2 39 35 A7 42 B2 31  33 00 E2 10 CE 04 97 4D  |B.95.B.13......M|
000008E0: 2C 42 00 EC 10 D8 04 4D  B2 4D AA 31 00 F3 10 E2  |,B.....M.M.1....|
000008F0: 04 82 41 00 FD 10 EC 04  97 4D 2C 33 32 00 0B 11  |..A......M,32...|
00000900: F6 04 97 34 30 35 32 30  2C 33 32 00 19 11 00 05  |...40520,32.....|
00000910: 97 34 30 35 33 30 2C 33  32 00 27 11 0A 05 97 34  |.40530,32.'....4|
00000920: 30 35 34 30 2C 33 32 00  35 11 14 05 97 34 30 35  |0540,32.5....405|
00000930: 35 30 2C 33 32 00 43 11  1E 05 97 34 30 35 36 30  |50,32.C....40560|
00000940: 2C 33 32 00 51 11 28 05  97 34 30 35 37 30 2C 33  |,32.Q.(..40570,3|
00000950: 32 00 5F 11 32 05 97 34  30 35 38 30 2C 33 32 00  |2._.2..40580,32.|
00000960: 76 11 DC 05 99 22 93 11  11 11 22 3A 9E 33 39 39  |v...."....":.399|
00000970: 33 36 3A 9C 3A A2 00 00  00 11                    |36:.:.....      |
..J.... COMMODORE 64 FUNCTION KEYS,FROM 
       'YOUR COMPUTER' DECEMBER 83.M.D..
A0,00,B9,15,9C,99,50,04,A9,01...N..99,50
,D8,C8,C0,28,D0,F0,4C,40...X..9C,0B,05,1
9,20,04,05,06,09,0E.V....05,20,02,19,20,
0D,2E,14,09,0E......07,0C,05,20,13,19,13
,32,35,36......2A,31,35,36,20,13,14,01,1
2,14.X. ..13,00,00,00:.**END OF NAME AND
 START ADDRESS DISPLAY**.}.... START OF 
POINTER FOT INTERRUPT......78,A9,4D,8D,1
4,03,A9.I....9C,8D,15,03,58,60:. END OF 
INTERRUPT POINTER...H.. START OF DETECT 
WHICH FUNCTION KEY HAS BEEN PRESSED. .R.
.A5,C5,C9,04,D0,20,A2,00.=....AD,8D,02,C
9,01,D0,05,A2.Z....0A,4C,D7,9C,C9,02,D0,
05.W....A2,14,4C,D7,9C,C9,04,D0......69,
A2,1E,4C,D7,9C,A5,C5......C9,05,D0,20,A2
,28,AD,8D.N....02,C9,01,D0,05,A2,32,4C..
....D7,9C,C9,02,D0,05,A2,3C..."..4C,D7,9
C,C9,04,D0,43,A2.%.,..46,4C,D7,9C,A5,C5,
C9,06.B.6..D0,20,A2,50,AD,8D,02,C9._.@..
01,D0,05,A2,5A,4C,D7,9C.|.J..C9,02,D0,05
,A2,64,4C,D7...T..9C,C9,04,D0,1D,A2,6E,4
C...^..D7,9C,A5,C5,C9,03,D0,31.S.H..A2,7
8,AD,8D,02,C9,00,F0...R..09,AD,8D,02,C9,
01,D0,24...|..A2,82:. END OF KEY DETECTI
ON ROUTINE.<.... START OF PRINT WORD ROU
TINE.Y....A0,00,BD,34,9E,99,77,02......E
8,C8,C9,20,D0,F4,88,84,C6:. END OF PRINT
 ROUTINE.E.... START OF DELAY ROUTINE AN
D EXIT FROM INTERRUPT......A2,00,A0,00,C
8,C0,FA,D0......FB,E8,E0,FA,D0,F4,4C,31,
EA:. END OF DELAY ROUTINE.M.B.. START OF
 CHANGE SCREEN & BORDER COLOR ROUTINE.J.
L..C9,02,D0,06,AE,20,D0,4C...V..1A,9D,C9
,04,D0,EF,AE,21......D0,E8,E0,10,90,06,8
E,21.A....D0,4C,E8,9C,A2,00,4C,0F......9
D,E8,E0,10,90,06,8E,20......D0,4C,E8,9C,
A2,00,4C,1F,9D......*:. END OF DATA.6...
.56,156:.52,156:. PROTECT CODE.K...L.399
36:N.0:TT.0.S....A$._...C.C(A$).P....A$.
"*".1100....A.F(A$).48.....B.F(I(A$,1))
.48.....N.B.7.(B.9).(C.2).(16.(A.7.(A.9)
)).N.$..N.0.N.255.1090......L,N:TT.TT.N.
..8.L.L.1:.1000...B.."BYTE"L"=("A$")??":
. INVALID DATA.T.L.. TT..32813..".CODE E
RROR RUN ABORTED.":.:. CHECK ON DATA...Q
.M.40500:. START LOCATION FOR SPECIFIED 
WORDS...`.N.M:A$."LOAD".G(34)."$".G(34).
",8_":.A.1.C(A$).K.J.B.F(J(A$,A,1))...O.
.B.95.B.13:. CHECKS FOR A _ SYMBOL TO DE
NOTE RETURN...T..M,B...~.M.M.1......A.A.
...M,32:. THIS POKES THE CODE FOR A SPAC
E AND IS USED BY THE CODE...... TO DETEC
T THE END OF A WORD.....M.N.10......M,32
.....M.N.10:A$."LI_":.A.1.C(A$).J...B.F(
J(A$,A,1)).Y.D..B.95.B.13...N..M,B...X.M
.M.1......A......M,32......40520,32.....
.40530,32.'....40540,32.5....40550,32.C.
...40560,32.Q.(..40570,32._.2..40580,32.
V...."....":.39936:.:.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL