EDIT LOAD ADRES

FILE INFORMATION

FILENAME(S): EDIT LOAD ADRES

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-11-30 21:10:34

APPEARS ON: 1 disk(s)

FILE HASH

535f10840d56d6638aed6de70d5b0d7b555cdb1168cb213fc6e120965da3248c

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
3003 THE NEW FCG	EDIT LOAD ADRES	PRG	DuncanTwain	14	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 33 08 6E 00 48 24  B2 22 30 31 32 33 34 35  |..3.n.H$."012345|
00000010: 36 37 38 39 41 42 43 44  45 46 22 3A 99 22 93 45  |6789ABCDEF":.".E|
00000020: 44 49 54 20 4C 4F 41 44  20 41 44 44 52 45 53 53  |DIT LOAD ADDRESS|
00000030: 20 2D 20 31 35 34 31 22  3A 99 22 11 52 45 4D 4F  | - 1541":.".REMO|
00000040: 56 45 20 12 57 52 49 54  45 20 50 52 4F 54 45 43  |VE .WRITE PROTEC|
00000050: 54 20 54 41 42 92 22 3A  99 22 11 49 4E 53 45 52  |T TAB.":.".INSER|
00000060: 54 20 44 49 53 4B 45 54  54 45 20 49 4E 20 44 52  |T DISKETTE IN DR|
00000070: 49 56 45 22 3A 99 22 11  50 52 45 53 53 20 12 52  |IVE":.".PRESS .R|
00000080: 45 54 55 52 4E 92 20 54  4F 20 43 4F 4E 54 49 4E  |ETURN. TO CONTIN|
00000090: 55 45 22 00 01 01 A0 00  A1 43 24 3A 8B 43 24 B2  |UE"......C$:.C$.|
000000A0: 22 22 A7 31 36 30 00 E1  08 AA 00 8B 43 24 B3 B1  |"".160......C$..|
000000B0: C7 28 31 33 29 89 31 36  30 00 EB 08 B4 00 99 22  |.(13).160......"|
000000C0: 4F 4B 22 3A 9F 31 35 2C  38 2C 31 35 3A 98 31 35  |OK":.15,8,15:.15|
000000D0: 2C 22 49 30 22 3A 84 31  35 2C 45 4E 24 2C 45 4D  |,"I0":.15,EN$,EM|
000000E0: 24 2C 45 54 24 2C 45 53  24 3A 8B 45 4E 24 B2 22  |$,ET$,ES$:.EN$."|
000000F0: 30 30 22 89 32 36 30 00  4E 09 E6 00 99 22 11 22  |00".260.N...."."|
00000100: 45 4E 24 22 2C 20 22 45  4D 24 22 2C 22 45 54 24  |EN$", "EM$","ET$|
00000110: 22 2C 22 45 53 24 3A A0  31 35 3A 80 00 01 01 04  |","ES$:.15:.....|
00000120: 01 98 31 35 2C 22 4D 2D  52 22 C7 28 31 29 C7 28  |..15,"M-R".(1).(|
00000130: 31 29 3A A1 23 31 35 2C  44 4F 53 24 3A 8B 44 4F  |1):.#15,DOS$:.DO|
00000140: 53 24 B2 22 22 A7 44 4F  53 24 B2 C7 28 30 29 00  |S$."".DOS$..(0).|
00000150: A7 09 22 01 44 4F 53 B2  C6 28 44 4F 53 24 29 3A  |..".DOS..(DOS$):|
00000160: 8B 44 4F 53 B2 36 35 89  33 33 30 00 DA 09 36 01  |.DOS.65.330...6.|
00000170: 99 22 11 37 33 2C 43 42  4D 20 44 4F 53 20 56 32  |.".73,CBM DOS V2|
00000180: 2E 36 20 31 35 34 31 2C  30 30 2C 30 30 22 3A 89  |.6 1541,00,00":.|
00000190: 39 31 30 00 F7 09 4A 01  85 22 11 46 49 4C 45 4E  |910...J..".FILEN|
000001A0: 41 4D 45 22 3B 46 24 3A  8B C3 28 46 24 29 B3 B1  |AME";F$:..(F$)..|
000001B0: 30 AF C3 28 46 24 29 B3  31 37 89 33 36 30 00 1B  |0..(F$).17.360..|
000001C0: 0A 5E 01 89 39 32 30 00  35 0A 68 01 9F 32 2C 38  |.^..920.5.h..2,8|
000001D0: 2C 32 2C 22 30 3A 22 AA  46 24 AA 22 2C 50 2C 52  |,2,"0:".F$.",P,R|
000001E0: 22 3A 84 31 35 2C 45 4E  24 2C 45 4D 24 2C 45 54  |":.15,EN$,EM$,ET|
000001F0: 24 2C 45 53 24 3A 8B 45  4E 24 B2 22 30 30 22 89  |$,ES$:.EN$."00".|
00000200: 34 30 30 00 68 0A 86 01  89 39 34 30 00 83 0A 90  |400.h....940....|
00000210: 01 98 31 35 2C 22 4D 2D  52 22 C7 28 32 34 29 C7  |..15,"M-R".(24).|
00000220: 28 30 29 C7 28 32 29 3A  A1 23 31 35 2C 54 24 3A  |(0).(2):.#15,T$:|
00000230: 54 B2 C6 28 54 24 AA C7  28 30 29 29 3A A1 23 31  |T..(T$..(0)):.#1|
00000240: 35 2C 53 24 3A 53 B2 C6  28 53 24 AA C7 28 30 29  |5,S$:S..(S$..(0)|
00000250: 29 3A A0 32 3A 84 31 35  2C 45 4E 24 2C 45 4D 24  |):.2:.15,EN$,EM$|
00000260: 2C 45 54 24 2C 45 53 24  3A 8B 45 4E 24 B2 22 30  |,ET$,ES$:.EN$."0|
00000270: 30 22 89 34 39 30 00 F7  0A E0 01 89 39 30 30 00  |0".490......900.|
00000280: 07 0B EA 01 9F 32 2C 38  2C 32 2C 22 23 32 22 3A  |.....2,8,2,"#2":|
00000290: 98 31 35 2C 22 55 31 22  3B 32 3B 30 3B 54 3B 53  |.15,"U1";2;0;T;S|
000002A0: 3A 84 31 35 2C 45 4E 24  2C 45 4D 24 2C 45 54 24  |:.15,EN$,EM$,ET$|
000002B0: 2C 45 53 24 3A 8B 45 4E  24 B2 22 30 30 22 89 35  |,ES$:.EN$."00".5|
000002C0: 34 30 00 4F 0B 12 02 89  39 30 30 00 69 0B 1C 02  |40.O....900.i...|
000002D0: 98 31 35 2C 22 4D 2D 52  22 C7 28 32 29 C7 28 35  |.15,"M-R".(2).(5|
000002E0: 29 C7 28 32 29 3A A1 23  31 35 2C 4C 4F 57 24 3A  |).(2):.#15,LOW$:|
000002F0: 4C 4F 57 B2 C6 28 4C 4F  57 24 AA C7 28 30 29 29  |LOW..(LOW$..(0))|
00000300: 3A A1 23 31 35 2C 48 49  47 48 24 3A 48 49 47 48  |:.#15,HIGH$:HIGH|
00000310: B2 C6 28 48 49 47 48 24  AA C7 28 30 29 29 3A 44  |..(HIGH$..(0)):D|
00000320: B2 48 49 47 48 3A 8D 31  30 31 30 3A 4F 4C 41 24  |.HIGH:.1010:OLA$|
00000330: B2 48 44 24 3A 44 B2 4C  4F 57 3A 8D 31 30 31 30  |.HD$:D.LOW:.1010|
00000340: 3A 4F 4C 41 24 B2 4F 4C  41 24 AA 48 44 24 3A 99  |:OLA$.OLA$.HD$:.|
00000350: 22 11 4F 4C 44 20 4C 4F  41 44 20 41 44 44 52 45  |".OLD LOAD ADDRE|
00000360: 53 53 3A 20 22 3B 4F 4C  41 24 3A 85 22 11 4E 45  |SS: ";OLA$:.".NE|
00000370: 57 20 4C 4F 41 44 20 41  44 44 52 45 53 53 22 3B  |W LOAD ADDRESS";|
00000380: 4E 4C 41 24 00 4B 0C 9E  02 8B C3 28 4E 4C 41 24  |NLA$.K.....(NLA$|
00000390: 29 B2 34 89 36 39 30 00  54 0C A8 02 89 39 36 30  |).4.690.T....960|
000003A0: 00 78 0C B2 02 85 22 11  41 52 45 20 59 4F 55 20  |.x....".ARE YOU |
000003B0: 53 55 52 45 20 28 59 2F  4E 29 20 20 59 9D 9D 9D  |SURE (Y/N)  Y...|
000003C0: 22 3B 51 24 3A 8B 51 24  B3 B1 22 59 22 89 39 36  |";Q$:.Q$.."Y".96|
000003D0: 30 00 9B 0C C6 02 48 44  24 B2 C9 28 4E 4C 41 24  |0.....HD$..(NLA$|
000003E0: 2C 32 29 3A 8D 31 30 36  30 3A 8B 54 4D 45 B2 31  |,2):.1060:.TME.1|
000003F0: 89 39 36 30 00 BE 0C E4  02 4C 4F 57 B2 44 3A 48  |.960.....LOW.D:H|
00000400: 44 24 B2 C8 28 4E 4C 41  24 2C 32 29 3A 8D 31 30  |D$..(NLA$,2):.10|
00000410: 36 30 3A 8B 54 4D 45 B2  31 89 39 36 30 00 F4 0C  |60:.TME.1.960...|
00000420: 0C 03 48 49 47 48 B2 44  3A 98 31 35 2C 22 4D 2D  |..HIGH.D:.15,"M-|
00000430: 57 22 C7 28 32 29 C7 28  35 29 C7 28 32 29 C7 28  |W".(2).(5).(2).(|
00000440: 4C 4F 57 29 C7 28 48 49  47 48 29 3A 98 31 35 2C  |LOW).(HIGH):.15,|
00000450: 22 55 32 22 3B 32 3B 30  3B 54 3B 53 3A 84 31 35  |"U2";2;0;T;S:.15|
00000460: 2C 45 4E 24 2C 45 4D 24  2C 45 54 24 2C 45 53 24  |,EN$,EM$,ET$,ES$|
00000470: 3A 8B 45 4E 24 B2 22 30  30 22 89 38 34 30 00 63  |:.EN$."00".840.c|
00000480: 0D 3E 03 89 39 34 30 00  6A 0D 48 03 A0 32 3A 84  |.>..940.j.H..2:.|
00000490: 31 35 2C 45 4E 24 2C 45  4D 24 2C 45 54 24 2C 45  |15,EN$,EM$,ET$,E|
000004A0: 53 24 3A A0 31 35 3A 99  22 11 44 4F 4E 45 21 22  |S$:.15:.".DONE!"|
000004B0: 3A 80 00 01 01 84 03 99  22 11 22 45 4E 24 22 2C  |:......."."EN$",|
000004C0: 20 22 45 4D 24 22 2C 22  45 54 24 22 2C 22 45 53  | "EM$","ET$","ES|
000004D0: 24 00 01 01 8E 03 99 22  11 12 46 41 49 4C 45 44  |$......"..FAILED|
000004E0: 92 22 00 01 01 98 03 A0  31 35 3A 80 00 01 01 AC  |."......15:.....|
000004F0: 03 99 22 11 22 45 4E 24  22 2C 20 22 45 4D 24 22  |.."."EN$", "EM$"|
00000500: 2C 22 45 54 24 22 2C 22  45 53 24 3A 99 22 11 12  |,"ET$","ES$:."..|
00000510: 46 41 49 4C 45 44 92 22  00 01 01 C0 03 A0 32 3A  |FAILED."......2:|
00000520: 84 31 35 2C 45 4E 24 2C  45 4D 24 2C 45 54 24 2C  |.15,EN$,EM$,ET$,|
00000530: 45 53 24 3A A0 31 35 3A  80 00 01 01 F2 03 48 B2  |ES$:.15:......H.|
00000540: B5 28 44 AD 31 36 29 3A  4C B2 44 AB 28 48 AC 31  |.(D.16):L.D.(H.1|
00000550: 36 29 3A 48 44 24 B2 CA  28 48 24 2C 48 AA 31 2C  |6):HD$..(H$,H.1,|
00000560: 31 29 AA CA 28 48 24 2C  4C AA 31 2C 31 29 3A 8E  |1)..(H$,L.1,1):.|
00000570: 00 01 01 24 04 54 4D 45  B2 30 3A 48 B2 30 3A 81  |...$.TME.0:H.0:.|
00000580: 49 B2 31 A4 31 36 3A 8B  C8 28 48 44 24 2C 31 29  |I.1.16:..(HD$,1)|
00000590: B2 CA 28 48 24 2C 49 2C  31 29 A7 48 B2 49 3A 49  |..(H$,I,1).H.I:I|
000005A0: B2 31 36 00 08 0F 4C 04  82 49 3A 8B 48 B2 30 A7  |.16...L..I:.H.0.|
000005B0: 54 4D 45 B2 31 3A 89 31  32 30 30 00 27 0F 60 04  |TME.1:.1200.'.`.|
000005C0: 48 B2 48 AB 31 3A 4C B2  30 3A 81 49 B2 31 A4 31  |H.H.1:L.0:.I.1.1|
000005D0: 36 3A 8B C9 28 48 44 24  2C 31 29 B2 CA 28 48 24  |6:..(HD$,1)..(H$|
000005E0: 2C 49 2C 31 29 A7 4C B2  49 3A 49 B2 31 36 00 63  |,I,1).L.I:I.16.c|
000005F0: 0F 88 04 82 49 3A 8B 4C  B2 30 A7 54 4D 45 B2 31  |....I:.L.0.TME.1|
00000600: 3A 89 31 32 30 30 00 82  0F 9C 04 4C B2 4C AB 31  |:.1200.....L.L.1|
00000610: 3A 44 B2 48 AC 31 36 AA  4C 00 01 01 B0 04 8E 00  |:D.H.16.L.......|
00000620: 00 00                                             |..              |

..3.N.H$."0123456789ABCDEF":.".EDIT LOAD
 ADDRESS - 1541":.".REMOVE .WRITE PROTEC
T TAB.":.".INSERT DISKETTE IN DRIVE":.".
PRESS .RETURN. TO CONTINUE"... ..C$:.C$.
"".160......C$..G(13).160......"OK":.15,
8,15:.15,"I0":.15,EN$,EM$,ET$,ES$:.EN$."
00".260.N...."."EN$", "EM$","ET$","ES$: 
15:.......15,"M-R"G(1)G(1):.#15,DOS$:.DO
S$."".DOS$.G(0)...".DOS.F(DOS$):.DOS.65.
330.Z.6..".73,CBM DOS V2.6 1541,00,00":.
910...J..".FILENAME";F$:.C(F$)..0.C(F$).
17.360...^..920.5.H..2,8,2,"0:".F$.",P,R
":.15,EN$,EM$,ET$,ES$:.EN$."00".400.H...
.940......15,"M-R"G(24)G(0)G(2):.#15,T$:
T.F(T$.G(0)):.#15,S$:S.F(S$.G(0)): 2:.15
,EN$,EM$,ET$,ES$:.EN$."00".490......900.
.....2,8,2,"#2":.15,"U1";2;0;T;S:.15,EN$
,EM$,ET$,ES$:.EN$."00".540.O....900.I...
.15,"M-R"G(2)G(5)G(2):.#15,LOW$:LOW.F(LO
W$.G(0)):.#15,HIGH$:HIGH.F(HIGH$.G(0)):D
.HIGH:.1010:OLA$.HD$:D.LOW:.1010:OLA$.OL
A$.HD$:.".OLD LOAD ADDRESS: ";OLA$:.".NE
W LOAD ADDRESS";NLA$.K....C(NLA$).4.690.
T....960.X....".ARE YOU SURE (Y/N)  Y...
";Q$:.Q$.."Y".960...F.HD$.I(NLA$,2):.106
0:.TME.1.960.....LOW.D:HD$.H(NLA$,2):.10
60:.TME.1.960.....HIGH.D:.15,"M-W"G(2)G(
5)G(2)G(LOW)G(HIGH):.15,"U2";2;0;T;S:.15
,EN$,EM$,ET$,ES$:.EN$."00".840.C.>..940.
J.H. 2:.15,EN$,EM$,ET$,ES$: 15:.".DONE!"
:......."."EN$", "EM$","ET$","ES$......"
..FAILED."..... 15:......."."EN$", "EM$"
,"ET$","ES$:."..FAILED."..... 2:.15,EN$,
EM$,ET$,ES$: 15:......H..(D.16):L.D.(H.1
6):HD$.J(H$,H.1,1).J(H$,L.1,1):....$.TME
.0:H.0:.I.1.16:.H(HD$,1).J(H$,I,1).H.I:I
.16...L..I:.H.0.TME.1:.1200.'.`.H.H.1:L.
0:.I.1.16:.I(HD$,1).J(H$,I,1).L.I:I.16.C
....I:.L.0.TME.1:.1200.....L.L.1:D.H.16.
L.........

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL