> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 0A 00 8F 20 2A 49 4E 53 49 44 45 20 |..%.... *INSIDE |
00000010: 43 4F 4D 4D 4F 44 4F 52 45 20 44 4F 53 20 50 47 |COMMODORE DOS PG|
00000020: 2E 20 38 36 2A 00 3C 08 14 00 8F 20 2A 4A 4A 4D |. 86*.<.... *JJM|
00000030: 2A 20 20 20 2A 30 34 31 32 38 37 2A 00 54 08 64 |* *041287*.T.d|
00000040: 00 8F 20 45 44 49 54 20 4C 4F 41 44 20 41 44 44 |.. EDIT LOAD ADD|
00000050: 52 45 53 53 00 6E 08 6E 00 48 24 B2 22 30 31 32 |RESS.n.n.H$."012|
00000060: 33 34 35 36 37 38 39 41 42 43 44 45 46 22 00 8F |3456789ABCDEF"..|
00000070: 08 78 00 99 22 93 45 44 49 54 20 4C 4F 41 44 20 |.x..".EDIT LOAD |
00000080: 41 44 44 52 45 53 53 20 2D 20 31 35 34 31 22 00 |ADDRESS - 1541".|
00000090: B2 08 82 00 99 22 11 52 45 4D 4F 56 45 20 12 57 |.....".REMOVE .W|
000000A0: 52 49 54 45 20 50 52 4F 54 45 43 54 20 54 41 42 |RITE PROTECT TAB|
000000B0: 92 22 00 D3 08 8C 00 99 22 11 49 4E 53 45 52 54 |."......".INSERT|
000000C0: 20 44 49 53 4B 45 54 54 45 20 49 4E 20 44 52 49 | DISKETTE IN DRI|
000000D0: 56 45 22 00 F6 08 96 00 99 22 11 50 52 45 53 53 |VE"......".PRESS|
000000E0: 20 12 52 45 54 55 52 4E 92 20 54 4F 20 43 4F 4E | .RETURN. TO CON|
000000F0: 54 49 4E 55 45 22 00 09 09 A0 00 A1 43 24 3A 8B |TINUE"......C$:.|
00000100: 43 24 B2 22 22 A7 31 36 30 00 1C 09 AA 00 8B 43 |C$."".160......C|
00000110: 24 B3 B1 C7 28 31 33 29 89 31 36 30 00 26 09 B4 |$...(13).160.&..|
00000120: 00 99 22 4F 4B 22 00 33 09 BE 00 9F 31 35 2C 38 |.."OK".3....15,8|
00000130: 2C 31 35 00 40 09 C8 00 98 31 35 2C 22 49 30 22 |,15.@....15,"I0"|
00000140: 00 58 09 D2 00 84 31 35 2C 45 4E 24 2C 45 4D 24 |.X....15,EN$,EM$|
00000150: 2C 45 54 24 2C 45 53 24 00 6A 09 DC 00 8B 45 4E |,ET$,ES$.j....EN|
00000160: 24 B2 22 30 30 22 89 32 36 30 00 89 09 E6 00 99 |$."00".260......|
00000170: 22 11 22 45 4E 24 22 2C 20 22 45 4D 24 22 2C 22 |"."EN$", "EM$","|
00000180: 45 54 24 22 2C 22 45 53 24 00 91 09 F0 00 A0 31 |ET$","ES$......1|
00000190: 35 00 97 09 FA 00 80 00 AD 09 04 01 98 31 35 2C |5............15,|
000001A0: 22 4D 2D 52 22 C7 28 31 29 C7 28 31 29 00 BB 09 |"M-R".(1).(1)...|
000001B0: 0E 01 A1 23 31 35 2C 44 4F 53 24 00 D2 09 18 01 |...#15,DOS$.....|
000001C0: 8B 44 4F 53 24 B2 22 22 A7 44 4F 53 24 B2 C7 28 |.DOS$."".DOS$..(|
000001D0: 30 29 00 E2 09 22 01 44 4F 53 B2 C6 28 44 4F 53 |0)...".DOS..(DOS|
000001E0: 24 29 00 F2 09 2C 01 8B 44 4F 53 B2 36 35 89 33 |$)...,..DOS.65.3|
000001F0: 33 30 00 15 0A 36 01 99 22 11 37 33 2C 43 42 4D |30...6..".73,CBM|
00000200: 20 44 4F 53 20 56 32 2E 36 20 31 35 34 31 2C 30 | DOS V2.6 1541,0|
00000210: 30 2C 30 30 22 00 1E 0A 40 01 89 39 31 30 00 32 |0,00"...@..910.2|
00000220: 0A 4A 01 85 22 11 46 49 4C 45 4E 41 4D 45 22 3B |.J..".FILENAME";|
00000230: 46 24 00 4D 0A 54 01 8B C3 28 46 24 29 B3 B1 30 |F$.M.T...(F$)..0|
00000240: AF C3 28 46 24 29 B3 31 37 89 33 36 30 00 56 0A |..(F$).17.360.V.|
00000250: 5E 01 89 39 32 30 00 70 0A 68 01 9F 32 2C 38 2C |^..920.p.h..2,8,|
00000260: 32 2C 22 30 3A 22 AA 46 24 AA 22 2C 50 2C 52 22 |2,"0:".F$.",P,R"|
00000270: 00 88 0A 72 01 84 31 35 2C 45 4E 24 2C 45 4D 24 |...r..15,EN$,EM$|
00000280: 2C 45 54 24 2C 45 53 24 00 9A 0A 7C 01 8B 45 4E |,ET$,ES$...|..EN|
00000290: 24 B2 22 30 30 22 89 34 30 30 00 A3 0A 86 01 89 |$."00".400......|
000002A0: 39 34 30 00 BE 0A 90 01 98 31 35 2C 22 4D 2D 52 |940......15,"M-R|
000002B0: 22 C7 28 32 34 29 C7 28 30 29 C7 28 32 29 00 CA |".(24).(0).(2)..|
000002C0: 0A 9A 01 A1 23 31 35 2C 54 24 00 DB 0A A4 01 54 |....#15,T$.....T|
000002D0: B2 C6 28 54 24 AA C7 28 30 29 29 00 E7 0A AE 01 |..(T$..(0)).....|
000002E0: A1 23 31 35 2C 53 24 00 F8 0A B8 01 53 B2 C6 28 |.#15,S$.....S..(|
000002F0: 53 24 AA C7 28 30 29 29 00 FF 0A C2 01 A0 32 00 |S$..(0))......2.|
00000300: 17 0B CC 01 84 31 35 2C 45 4E 24 2C 45 4D 24 2C |.....15,EN$,EM$,|
00000310: 45 54 24 2C 45 53 24 00 29 0B D6 01 8B 45 4E 24 |ET$,ES$.)....EN$|
00000320: B2 22 30 30 22 89 34 39 30 00 32 0B E0 01 89 39 |."00".490.2....9|
00000330: 30 30 00 42 0B EA 01 9F 32 2C 38 2C 32 2C 22 23 |00.B....2,8,2,"#|
00000340: 32 22 00 57 0B F4 01 98 31 35 2C 22 55 31 22 3B |2".W....15,"U1";|
00000350: 32 3B 30 3B 54 3B 53 00 6F 0B FE 01 84 31 35 2C |2;0;T;S.o....15,|
00000360: 45 4E 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 |EN$,EM$,ET$,ES$.|
00000370: 81 0B 08 02 8B 45 4E 24 B2 22 30 30 22 89 35 34 |.....EN$."00".54|
00000380: 30 00 8A 0B 12 02 89 39 30 30 00 A4 0B 1C 02 98 |0......900......|
00000390: 31 35 2C 22 4D 2D 52 22 C7 28 32 29 C7 28 35 29 |15,"M-R".(2).(5)|
000003A0: C7 28 32 29 00 B2 0B 26 02 A1 23 31 35 2C 4C 4F |.(2)...&..#15,LO|
000003B0: 57 24 00 C7 0B 30 02 4C 4F 57 B2 C6 28 4C 4F 57 |W$...0.LOW..(LOW|
000003C0: 24 AA C7 28 30 29 29 00 D6 0B 3A 02 A1 23 31 35 |$..(0))...:..#15|
000003D0: 2C 48 49 47 48 24 00 ED 0B 44 02 48 49 47 48 B2 |,HIGH$...D.HIGH.|
000003E0: C6 28 48 49 47 48 24 AA C7 28 30 29 29 00 F8 0B |.(HIGH$..(0))...|
000003F0: 4E 02 44 B2 48 49 47 48 00 02 0C 58 02 8D 31 30 |N.D.HIGH...X..10|
00000400: 31 30 00 0F 0C 62 02 4F 4C 41 24 B2 48 44 24 00 |10...b.OLA$.HD$.|
00000410: 19 0C 6C 02 44 B2 4C 4F 57 00 23 0C 76 02 8D 31 |..l.D.LOW.#.v..1|
00000420: 30 31 30 00 35 0C 80 02 4F 4C 41 24 B2 4F 4C 41 |010.5...OLA$.OLA|
00000430: 24 AA 48 44 24 00 55 0C 8A 02 99 22 11 4F 4C 44 |$.HD$.U....".OLD|
00000440: 20 4C 4F 41 44 20 41 44 44 52 45 53 53 3A 20 22 | LOAD ADDRESS: "|
00000450: 3B 4F 4C 41 24 00 73 0C 94 02 85 22 11 4E 45 57 |;OLA$.s....".NEW|
00000460: 20 4C 4F 41 44 20 41 44 44 52 45 53 53 22 3B 4E | LOAD ADDRESS";N|
00000470: 4C 41 24 00 86 0C 9E 02 8B C3 28 4E 4C 41 24 29 |LA$.......(NLA$)|
00000480: B2 34 89 36 39 30 00 8F 0C A8 02 89 39 36 30 00 |.4.690......960.|
00000490: B3 0C B2 02 85 22 11 41 52 45 20 59 4F 55 20 53 |.....".ARE YOU S|
000004A0: 55 52 45 20 28 59 2F 4E 29 20 20 59 9D 9D 9D 22 |URE (Y/N) Y..."|
000004B0: 3B 51 24 00 C4 0C BC 02 8B 51 24 B3 B1 22 59 22 |;Q$......Q$.."Y"|
000004C0: 89 39 36 30 00 D6 0C C6 02 48 44 24 B2 C9 28 4E |.960.....HD$..(N|
000004D0: 4C 41 24 2C 32 29 00 E0 0C D0 02 8D 31 30 36 30 |LA$,2)......1060|
000004E0: 00 EF 0C DA 02 8B 54 4D 45 B2 31 89 39 36 30 00 |......TME.1.960.|
000004F0: F9 0C E4 02 4C 4F 57 B2 44 00 0B 0D EE 02 48 44 |....LOW.D.....HD|
00000500: 24 B2 C8 28 4E 4C 41 24 2C 32 29 00 15 0D F8 02 |$..(NLA$,2).....|
00000510: 8D 31 30 36 30 00 24 0D 02 03 8B 54 4D 45 B2 31 |.1060.$....TME.1|
00000520: 89 39 36 30 00 2F 0D 0C 03 48 49 47 48 B2 44 00 |.960./...HIGH.D.|
00000530: 56 0D 16 03 98 31 35 2C 22 4D 2D 57 22 C7 28 32 |V....15,"M-W".(2|
00000540: 29 C7 28 35 29 C7 28 32 29 C7 28 4C 4F 57 29 C7 |).(5).(2).(LOW).|
00000550: 28 48 49 47 48 29 00 6B 0D 20 03 98 31 35 2C 22 |(HIGH).k. ..15,"|
00000560: 55 32 22 3B 32 3B 30 3B 54 3B 53 00 83 0D 2A 03 |U2";2;0;T;S...*.|
00000570: 84 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 24 2C |.15,EN$,EM$,ET$,|
00000580: 45 53 24 00 95 0D 34 03 8B 45 4E 24 B2 22 30 30 |ES$...4..EN$."00|
00000590: 22 89 38 34 30 00 9E 0D 3E 03 89 39 34 30 00 A5 |".840...>..940..|
000005A0: 0D 48 03 A0 32 00 BD 0D 52 03 84 31 35 2C 45 4E |.H..2...R..15,EN|
000005B0: 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 C5 0D |$,EM$,ET$,ES$...|
000005C0: 5C 03 A0 31 35 00 D3 0D 66 03 99 22 11 44 4F 4E |\..15...f..".DON|
000005D0: 45 21 22 00 D9 0D 70 03 80 00 E5 0D 7A 03 8F 20 |E!"...p.....z.. |
000005E0: 43 4C 4F 53 45 00 04 0E 84 03 99 22 11 22 45 4E |CLOSE......"."EN|
000005F0: 24 22 2C 20 22 45 4D 24 22 2C 22 45 54 24 22 2C |$", "EM$","ET$",|
00000600: 22 45 53 24 00 15 0E 8E 03 99 22 11 12 46 41 49 |"ES$......"..FAI|
00000610: 4C 45 44 92 22 00 1D 0E 98 03 A0 31 35 00 23 0E |LED."......15.#.|
00000620: A2 03 80 00 42 0E AC 03 99 22 11 22 45 4E 24 22 |....B...."."EN$"|
00000630: 2C 20 22 45 4D 24 22 2C 22 45 54 24 22 2C 22 45 |, "EM$","ET$","E|
00000640: 53 24 00 53 0E B6 03 99 22 11 12 46 41 49 4C 45 |S$.S...."..FAILE|
00000650: 44 92 22 00 5A 0E C0 03 A0 32 00 72 0E CA 03 84 |D.".Z....2.r....|
00000660: 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 24 2C 45 |15,EN$,EM$,ET$,E|
00000670: 53 24 00 7A 0E D4 03 A0 31 35 00 80 0E DE 03 80 |S$.z....15......|
00000680: 00 9D 0E E8 03 8F 20 44 45 43 49 4D 41 4C 20 54 |...... DECIMAL T|
00000690: 4F 20 48 45 58 41 44 45 43 49 4D 41 4C 00 AB 0E |O HEXADECIMAL...|
000006A0: F2 03 48 B2 B5 28 44 AD 31 36 29 00 BA 0E FC 03 |..H..(D.16).....|
000006B0: 4C B2 44 AB 28 48 AC 31 36 29 00 DA 0E 06 04 48 |L.D.(H.16).....H|
000006C0: 44 24 B2 CA 28 48 24 2C 48 AA 31 2C 31 29 AA CA |D$..(H$,H.1,1)..|
000006D0: 28 48 24 2C 4C AA 31 2C 31 29 00 E0 0E 10 04 8E |(H$,L.1,1)......|
000006E0: 00 FD 0E 1A 04 8F 20 48 45 58 41 44 45 43 49 4D |...... HEXADECIM|
000006F0: 41 4C 20 54 4F 20 44 45 43 49 4D 41 4C 00 07 0F |AL TO DECIMAL...|
00000700: 24 04 54 4D 45 B2 30 00 0F 0F 2E 04 48 B2 30 00 |$.TME.0.....H.0.|
00000710: 1B 0F 38 04 81 49 B2 31 A4 31 36 00 3C 0F 42 04 |..8..I.1.16.<.B.|
00000720: 8B C8 28 48 44 24 2C 31 29 B2 CA 28 48 24 2C 49 |..(HD$,1)..(H$,I|
00000730: 2C 31 29 A7 48 B2 49 3A 49 B2 31 36 00 44 0F 4C |,1).H.I:I.16.D.L|
00000740: 04 82 20 49 00 59 0F 56 04 8B 48 B2 30 A7 54 4D |.. I.Y.V..H.0.TM|
00000750: 45 B2 31 3A 89 31 32 30 30 00 63 0F 60 04 48 B2 |E.1:.1200.c.`.H.|
00000760: 48 AB 31 00 6B 0F 6A 04 4C B2 30 00 77 0F 74 04 |H.1.k.j.L.0.w.t.|
00000770: 81 49 B2 31 A4 31 36 00 98 0F 7E 04 8B C9 28 48 |.I.1.16...~...(H|
00000780: 44 24 2C 31 29 B2 CA 28 48 24 2C 49 2C 31 29 A7 |D$,1)..(H$,I,1).|
00000790: 4C B2 49 3A 49 B2 31 36 00 9F 0F 88 04 82 49 00 |L.I:I.16......I.|
000007A0: B3 0F 92 04 8B 4C B2 30 A7 4D 45 B2 31 3A 89 31 |.....L.0.ME.1:.1|
000007B0: 32 30 30 00 BD 0F 9C 04 4C B2 4C AB 31 00 CA 0F |200.....L.L.1...|
000007C0: A6 04 44 B2 48 AC 31 36 AA 4C 00 D0 0F B0 04 8E |..D.H.16.L......|
000007D0: 00 00 00 |... |
..%.... *INSIDE COMMODORE DOS PG. 86*.<.
... *JJM* *041287*.T.D.. EDIT LOAD ADD
RESS.N.N.H$."0123456789ABCDEF"...X..".ED
IT LOAD ADDRESS - 1541"......".REMOVE .W
RITE PROTECT TAB.".S....".INSERT DISKETT
E IN DRIVE"......".PRESS .RETURN. TO CON
TINUE"... ..C$:.C$."".160......C$..G(13)
.160.&...."OK".3....15,8,15.@.H..15,"I0"
.X.R..15,EN$,EM$,ET$,ES$.J....EN$."00".2
60......"."EN$", "EM$","ET$","ES$..... 1
5............15,"M-R"G(1)G(1)......#15,D
OS$.R....DOS$."".DOS$.G(0)...".DOS.F(DOS
$)...,..DOS.65.330...6..".73,CBM DOS V2.
6 1541,00,00"...@..910.2.J..".FILENAME";
F$.M.T..C(F$)..0.C(F$).17.360.V.^..920.P
.H..2,8,2,"0:".F$.",P,R"...R..15,EN$,EM$
,ET$,ES$...|..EN$."00".400......940.....
.15,"M-R"G(24)G(0)G(2).J....#15,T$.....T
.F(T$.G(0))......#15,S$.....S.F(S$.G(0))
...B. 2...L..15,EN$,EM$,ET$,ES$.).V..EN$
."00".490.2....900.B....2,8,2,"#2".W....
15,"U1";2;0;T;S.O....15,EN$,EM$,ET$,ES$.
.....EN$."00".540......900......15,"M-R"
G(2)G(5)G(2)...&..#15,LOW$.G.0.LOW.F(LOW
$.G(0)).V.:..#15,HIGH$...D.HIGH.F(HIGH$.
G(0))...N.D.HIGH...X..1010...B.OLA$.HD$.
..L.D.LOW.#.V..1010.5...OLA$.OLA$.HD$.U.
...".OLD LOAD ADDRESS: ";OLA$.S....".NEW
LOAD ADDRESS";NLA$......C(NLA$).4.690..
....960......".ARE YOU SURE (Y/N) Y..."
;Q$.D....Q$.."Y".960.V.F.HD$.I(NLA$,2)..
.P..1060...Z..TME.1.960.....LOW.D.....HD
$.H(NLA$,2)......1060.$....TME.1.960./..
.HIGH.D.V....15,"M-W"G(2)G(5)G(2)G(LOW)G
(HIGH).K. ..15,"U2";2;0;T;S...*..15,EN$,
EM$,ET$,ES$...4..EN$."00".840...>..940..
.H. 2...R..15,EN$,EM$,ET$,ES$.E.\. 15.S.
F..".DONE!".Y.P.....Z.. CLOSE......"."EN
$", "EM$","ET$","ES$......"..FAILED."...
.. 15.#.....B...."."EN$", "EM$","ET$","E
S$.S...."..FAILED.".Z... 2.R.J..15,EN$,E
M$,ET$,ES$.Z.T. 15............ DECIMAL T
O HEXADECIMAL.....H..(D.16).....L.D.(H.1
6).Z...HD$.J(H$,H.1,1).J(H$,L.1,1)......
...... HEXADECIMAL TO DECIMAL...$.TME.0.
....H.0...8..I.1.16.<.B..H(HD$,1).J(H$,I
,1).H.I:I.16.D.L.. I.Y.V..H.0.TME.1:.120
0.C.`.H.H.1.K.J.L.0.W.T..I.1.16...~..I(H
D$,1).J(H$,I,1).L.I:I.16......I......L.0
.ME.1:.1200.....L.L.1.J...D.H.16.L.P....
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL