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

PRG2

FILE INFORMATION

FILENAME(S): PRG2

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-11-30 21:09:12

APPEARS ON: 2 disk(s)

FILE HASH

680d18fb8239c8be24dfe6e1957f4a39947cb11a5a17427c247011af438a5c71

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
HULPPPROGRAM PRG2 PRG DuncanTwain 12 3 DOWNLOAD FILE
C64 HULP 54 1 PRG2 PRG DuncanTwain 12 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 2A 08 02 00 97 35  33 32 38 30 2C 31 31 3A  |..*....53280,11:|
00000010: 97 35 33 32 38 31 2C 31  32 3A 97 35 33 32 37 32  |.53281,12:.53272|
00000020: 2C 32 31 3A 97 38 32 38  2C 31 00 48 08 04 00 97  |,21:.828,1.H....|
00000030: 38 30 38 2C 32 33 34 3A  97 38 31 39 2C 32 34 35  |808,234:.819,245|
00000040: 3A 97 38 31 38 2C 33 32  00 78 08 0A 00 99 22 93  |:.818,32.x....".|
00000050: 90 11 1D 1D 1D 1D 1D 1D  1D 43 41 52 42 4F 4E 20  |.........CARBON |
00000060: 43 4F 50 59 20 4D 41 43  48 49 4E 45 20 4D 4F 4E  |COPY MACHINE MON|
00000070: 49 54 4F 52 20 20 20 22  00 A6 08 14 00 99 22 11  |ITOR   "......".|
00000080: 11 1D 1D 1D 1D 1D 1D 20  46 55 4E 43 54 49 4F 4E  |....... FUNCTION|
00000090: 1D 1D 1D 44 45 43 20 4C  4F 41 44 20 20 48 45 58  |...DEC LOAD  HEX|
000000A0: 20 4C 4F 41 44 22 00 D2  08 1E 00 99 22 11 05 1D  | LOAD"......"...|
000000B0: 1D 1D 28 31 29 20 58 4D  4F 4E 28 42 41 53 49 43  |..(1) XMON(BASIC|
000000C0: 29 20 20 34 39 31 35 32  20 20 20 20 24 43 30 30  |)  49152    $C00|
000000D0: 30 22 00 FD 08 28 00 99  22 11 1D 1D 1D 28 32 29  |0"...(.."....(2)|
000000E0: 20 58 4D 4F 4E 28 43 41  52 54 2E 29 20 20 32 39  | XMON(CART.)  29|
000000F0: 39 30 30 20 20 20 20 24  37 34 43 43 22 00 28 09  |900    $74CC".(.|
00000100: 32 00 99 22 11 1D 1D 1D  28 33 29 20 58 4D 4F 4E  |2.."....(3) XMON|
00000110: 20 20 20 20 20 20 20 20  20 33 38 30 38 33 20 20  |         38083  |
00000120: 20 20 24 39 34 43 33 22  00 53 09 3C 00 99 22 11  |  $94C3".S.<..".|
00000130: 1D 1D 1D 28 34 29 20 58  4D 4F 4E 20 20 20 20 20  |...(4) XMON     |
00000140: 20 20 20 20 35 30 31 33  35 20 20 20 20 24 43 33  |    50135    $C3|
00000150: 44 37 22 00 70 09 46 00  99 22 11 1D 1D 1D 28 35  |D7".p.F.."....(5|
00000160: 29 20 42 41 53 45 20 43  4F 4E 56 45 52 54 45 52  |) BASE CONVERTER|
00000170: 00 8B 09 49 00 99 22 11  1D 1D 1D 28 36 29 20 49  |...I.."....(6) I|
00000180: 4E 53 54 52 55 43 54 49  4F 4E 53 00 A8 09 4B 00  |NSTRUCTIONS...K.|
00000190: 99 22 11 1D 1D 1D 28 37  29 20 52 45 54 55 52 4E  |."....(7) RETURN|
000001A0: 20 54 4F 20 4D 45 4E 55  00 CB 09 4D 00 99 22 90  | TO MENU...M..".|
000001B0: 11 11 1D 1D 1D 20 20 20  20 53 45 4C 45 43 54 20  |.....    SELECT |
000001C0: 46 55 4E 43 54 49 4F 4E  20 3F 22 00 DD 09 50 00  |FUNCTION ?"...P.|
000001D0: A1 41 24 3A 8B 41 24 B2  22 22 A7 38 30 00 F0 09  |.A$:.A$."".80...|
000001E0: 64 00 41 B2 C5 28 41 24  29 3A 8B 41 B3 31 A7 32  |d.A..(A$):.A.1.2|
000001F0: 00 03 0A 69 00 8B 41 B2  35 A7 99 22 93 22 3A 89  |...i..A.5..".":.|
00000200: 33 30 30 00 0E 0A 6E 00  8B 41 B1 37 A7 32 00 57  |300...n..A.7.2.W|
00000210: 0A 78 00 41 24 28 31 29  B2 22 42 41 53 49 43 22  |.x.A$(1)."BASIC"|
00000220: 3A 41 24 28 32 29 B2 22  32 39 39 30 30 22 3A 41  |:A$(2)."29900":A|
00000230: 24 28 33 29 B2 22 33 38  30 38 33 22 3A 41 24 28  |$(3)."38083":A$(|
00000240: 34 29 B2 22 35 30 31 33  35 22 3A 41 24 28 37 29  |4)."50135":A$(7)|
00000250: B2 22 42 4F 4F 54 22 00  69 0A 82 00 41 24 28 36  |."BOOT".i...A$(6|
00000260: 29 B2 22 49 4E 53 54 52  22 00 95 0A 8C 00 99 22  |)."INSTR"......"|
00000270: 93 11 11 11 11 11 11 11  11 11 11 11 11 1D 1D 1D  |................|
00000280: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 4C 4F 41 44 49 4E  |..........LOADIN|
00000290: 47 2E 2E 2E 22 00 B3 0A  91 00 97 37 38 38 2C 34  |G..."......788,4|
000002A0: 39 3A 97 38 30 38 2C 32  33 37 3A 97 35 33 32 38  |9:.808,237:.5328|
000002B0: 31 2C 30 00 DD 0A 96 00  99 22 13 90 22 C7 28 31  |1,0......"..".(1|
000002C0: 37 29 22 4C 4F 41 44 22  C7 28 33 34 29 41 24 28  |7)"LOAD".(34)A$(|
000002D0: 41 29 C7 28 33 34 29 22  2C 38 2C 31 22 00 F5 0A  |A).(34)",8,1"...|
000002E0: 9B 00 8B 41 B1 31 A7 8B  41 B3 35 A7 8D 31 39 30  |...A.1..A.5..190|
000002F0: 3A 89 31 37 30 00 0D 0B  A0 00 99 3A 99 3A 99 3A  |:.170......:.:.:|
00000300: 99 3A 99 22 52 55 4E 22  C7 28 31 39 29 00 35 0B  |.:."RUN".(19).5.|
00000310: AA 00 97 31 39 38 2C 34  3A 97 36 33 31 2C 31 39  |...198,4:.631,19|
00000320: 3A 81 42 B2 31 A4 33 3A  97 36 33 31 AA 42 2C 31  |:.B.1.3:.631.B,1|
00000330: 33 3A 82 3A 80 00 5B 0B  BE 00 58 B2 C5 28 41 24  |3:.:..[...X..(A$|
00000340: 28 41 29 29 3A 99 3A 99  3A 99 3A 99 3A 99 22 53  |(A)):.:.:.:.:."S|
00000350: 59 53 22 58 C7 28 31 39  29 3A 8E 00 8F 0B 2C 01  |YS"X.(19):....,.|
00000360: 99 22 11 11 1D 1D 1D 43  4F 4E 56 45 52 54 20 46  |.".....CONVERT F|
00000370: 52 4F 4D 20 12 48 92 45  58 2C 12 44 92 45 43 49  |ROM .H.EX,.D.ECI|
00000380: 4D 41 4C 20 4F 52 20 12  42 92 49 4E 2E 3F 22 00  |MAL OR .B.IN.?".|
00000390: A2 0B 36 01 A1 41 24 3A  8B 41 24 B2 22 22 A7 33  |..6..A$:.A$."".3|
000003A0: 31 30 00 BA 0B 40 01 8B  41 24 B2 22 48 22 A7 42  |10...@..A$."H".B|
000003B0: 49 25 B2 31 36 3A 89 33  35 30 00 D2 0B 4A 01 8B  |I%.16:.350...J..|
000003C0: 41 24 B2 22 44 22 A7 42  49 25 B2 31 30 3A 89 33  |A$."D".BI%.10:.3|
000003D0: 35 30 00 E9 0B 54 01 8B  41 24 B2 22 42 22 A7 42  |50...T..A$."B".B|
000003E0: 49 25 B2 32 3A 89 33 35  30 00 F0 0B 59 01 89 32  |I%.2:.350...Y..2|
000003F0: 00 19 0C 5E 01 85 22 11  1D 1D 1D 45 4E 54 45 52  |...^.."....ENTER|
00000400: 20 4E 4F 2E 20 54 4F 20  42 45 20 43 4F 4E 56 45  | NO. TO BE CONVE|
00000410: 52 54 45 44 22 3B 4E 49  24 00 3F 0C 68 01 42 4F  |RTED";NI$.?.h.BO|
00000420: 25 B2 31 36 3A 8D 31 30  31 35 30 3A 99 22 11 1D  |%.16:.10150:."..|
00000430: 1D 1D 48 45 58 2E 2E 2E  2E 2E 24 22 4E 4F 24 00  |..HEX.....$"NO$.|
00000440: 64 0C 72 01 42 4F 25 B2  31 30 3A 8D 31 30 31 35  |d.r.BO%.10:.1015|
00000450: 30 3A 99 22 11 1D 1D 1D  44 45 43 49 4D 41 4C 2E  |0:."....DECIMAL.|
00000460: 22 4E 4F 24 00 89 0C 7C  01 42 4F 25 B2 30 32 3A  |"NO$...|.BO%.02:|
00000470: 8D 31 30 31 35 30 3A 99  22 11 1D 1D 1D 42 49 4E  |.10150:."....BIN|
00000480: 41 52 59 2E 2E 22 4E 4F  24 00 BA 0C 86 01 99 22  |ARY.."NO$......"|
00000490: 11 1D 1D 1D 50 52 45 53  53 20 12 53 50 41 43 45  |....PRESS .SPACE|
000004A0: 92 20 12 42 41 52 92 20  54 4F 20 52 45 54 55 52  |. .BAR. TO RETUR|
000004B0: 4E 20 54 4F 20 4D 45 4E  55 22 00 CF 0C 90 01 A1  |N TO MENU"......|
000004C0: 41 24 3A 8B 41 24 B3 B1  22 20 22 A7 34 30 30 00  |A$:.A$.." ".400.|
000004D0: D6 0C 9A 01 89 32 00 F7  0C 10 27 8F 20 42 41 53  |.....2....'. BAS|
000004E0: 45 20 43 4F 4E 56 45 52  53 49 4F 4E 20 53 55 42  |E CONVERSION SUB|
000004F0: 52 4F 55 54 49 4E 45 00  10 0D 74 27 8F 20 43 4F  |ROUTINE...t'. CO|
00000500: 4E 56 45 52 54 20 54 4F  20 44 45 43 49 4D 41 4C  |NVERT TO DECIMAL|
00000510: 00 1E 0D A6 27 4C 25 B2  C3 28 4E 49 24 29 00 28  |....'L%..(NI$).(|
00000520: 0D D8 27 44 45 43 B2 30  00 33 0D 3C 28 50 57 52  |..'DEC.0.3.<(PWR|
00000530: 25 B2 30 00 48 0D A0 28  81 20 4A B2 4C 25 20 A4  |%.0.H..(. J.L% .|
00000540: 20 31 20 A9 20 AB 20 31  00 5D 0D 04 29 4B 25 B2  | 1 . . 1.]..)K%.|
00000550: C6 28 CA 28 4E 49 24 2C  4A 2C 31 29 29 00 73 0D  |.(.(NI$,J,1)).s.|
00000560: CC 29 8B 20 4B 25 B1 36  34 20 A7 20 4B 25 B2 4B  |.). K%.64 . K%.K|
00000570: 25 AB 37 00 80 0D 30 2A  4B 25 B2 4B 25 AB 34 38  |%.7...0*K%.K%.48|
00000580: 00 9D 0D 3A 2A 8B 20 4B  25 B3 42 49 25 20 AF 20  |...:*. K%.BI% . |
00000590: 4B 25 B1 AB 31 20 A7 20  31 30 39 30 30 00 BC 0D  |K%..1 . 10900...|
000005A0: 44 2A 99 22 49 4E 56 41  4C 49 44 20 49 4E 50 55  |D*."INVALID INPU|
000005B0: 54 20 46 4F 52 20 42 41  53 45 22 3B 00 C6 0D 4E  |T FOR BASE";...N|
000005C0: 2A 99 20 42 49 25 00 D5  0D 58 2A 4E 4F 24 B2 22  |*. BI%...X*NO$."|
000005D0: 3F 3F 3F 3F 22 00 DB 0D  62 2A 8E 00 F3 0D 94 2A  |????"...b*.....*|
000005E0: 44 45 43 B2 44 45 43 AA  4B 25 AC 42 49 25 AE 50  |DEC.DEC.K%.BI%.P|
000005F0: 57 52 25 00 03 0E F8 2A  50 57 52 25 B2 50 57 52  |WR%....*PWR%.PWR|
00000600: 25 AA 31 00 0B 0E 5C 2B  82 20 4A 00 2B 0E 66 2B  |%.1...\+. J.+.f+|
00000610: 8F 20 43 4F 4E 56 45 52  54 20 44 45 43 49 4D 41  |. CONVERT DECIMA|
00000620: 4C 20 54 4F 20 42 41 53  45 20 23 00 45 0E 70 2B  |L TO BASE #.E.p+|
00000630: 48 24 B2 22 30 31 32 33  34 35 36 37 38 39 41 42  |H$."0123456789AB|
00000640: 43 44 45 46 22 00 50 0E  7A 2B 4E 4F 24 B2 22 22  |CDEF".P.z+NO$.""|
00000650: 00 67 0E C0 2B 50 57 52  25 B2 BC 28 44 45 43 29  |.g..+PWR%..(DEC)|
00000660: AD BC 28 42 4F 25 29 00  7D 0E 24 2C 81 20 4A B2  |..(BO%).}.$,. J.|
00000670: 50 57 52 25 20 A4 20 30  20 A9 20 AB 31 00 8D 0E  |PWR% . 0 . .1...|
00000680: 2E 2C 58 58 B2 B5 28 42  4F 25 AE 4A 29 00 9C 0E  |.,XX..(BO%.J)...|
00000690: 38 2C 43 48 25 B2 44 45  43 AD 58 58 00 B6 0E EC  |8,CH%.DEC.XX....|
000006A0: 2C 4E 4F 24 B2 4E 4F 24  AA CA 28 48 24 2C 43 48  |,NO$.NO$..(H$,CH|
000006B0: 25 AA 31 2C 31 29 00 CC  0E 50 2D 44 45 43 B2 B5  |%.1,1)...P-DEC..|
000006C0: 28 44 45 43 AB 43 48 25  AC 58 58 29 00 D4 0E B4  |(DEC.CH%.XX)....|
000006D0: 2D 82 20 4A 00 DA 0E 18  2E 8E 00 E0 0E 7C 2E 80  |-. J.........|..|
000006E0: 00 00 00 D0                                       |....            |
..*....53280,11:.53281,12:.53272,21:.828
,1.H....808,234:.819,245:.818,32.X....".
.........CARBON COPY MACHINE MONITOR   "
......"........ FUNCTION...DEC LOAD  HEX
 LOAD".R....".....(1) XMON(BASIC)  49152
    $C000"...(.."....(2) XMON(CART.)  29
900    $74CC".(.2.."....(3) XMON        
 38083    $94C3".S.<.."....(4) XMON     
    50135    $C3D7".P.F.."....(5) BASE C
ONVERTER...I.."....(6) INSTRUCTIONS...K.
."....(7) RETURN TO MENU.K.M.."......   
 SELECT FUNCTION ?"...P..A$:.A$."".80...
D.A.E(A$):.A.1.2...I..A.5..".":.300...N.
.A.7.2.W.X.A$(1)."BASIC":A$(2)."29900":A
$(3)."38083":A$(4)."50135":A$(7)."BOOT".
I...A$(6)."INSTR"......"................
..........LOADING..."......788,49:.808,2
37:.53281,0......".."G(17)"LOAD"G(34)A$(
A)G(34)",8,1"......A.1..A.5..190:.170...
 ..:.:.:.:."RUN"G(19).5....198,4:.631,19
:.B.1.3:.631.B,13:.:..[...X.E(A$(A)):.:.
:.:.:."SYS"XG(19):....,..".....CONVERT F
ROM .H.EX,.D.ECIMAL OR .B.IN.?"...6..A$:
.A$."".310...@..A$."H".BI%.16:.350.R.J..
A$."D".BI%.10:.350...T..A$."B".BI%.2:.35
0...Y..2...^.."....ENTER NO. TO BE CONVE
RTED";NI$.?.H.BO%.16:.10150:."....HEX...
..$"NO$.D.R.BO%.10:.10150:."....DECIMAL.
"NO$...|.BO%.02:.10150:."....BINARY.."NO
$......"....PRESS .SPACE. .BAR. TO RETUR
N TO MENU".O....A$:.A$.." ".400.V....2..
..'. BASE CONVERSION SUBROUTINE...T'. CO
NVERT TO DECIMAL....'L%.C(NI$).(.X'DEC.0
.3.<(PWR%.0.H. (. J.L% . 1 . . 1.]..)K%.
F(J(NI$,J,1)).S.L). K%.64 . K%.K%.7...0*
K%.K%.48...:*. K%.BI% . K%..1 . 10900...
D*."INVALID INPUT FOR BASE";.F.N*. BI%.U
.X*NO$."????"...B*.....*DEC.DEC.K%.BI%.P
WR%....*PWR%.PWR%.1...\+. J.+.F+. CONVER
T DECIMAL TO BASE #.E.P+H$."0123456789AB
CDEF".P.Z+NO$."".G..+PWR%..(DEC)..(BO%).
}.$,. J.PWR% . 0 . .1....,XX..(BO%.J)...
8,CH%.DEC.XX....,NO$.NO$.J(H$,CH%.1,1).L
.P-DEC..(DEC.CH%.XX).T..-. J.Z.......|..
...P
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL