PRG.USER EDIT
FILE INFORMATION
FILENAME(S): PRG.USER EDIT
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-10-19 22:35:22
APPEARS ON: 1 disk(s)
FILE HASH
b181cc6a93bbfde39603d8173f5ad2264a4a1766cc1e5164d8c950f3bb4d8dec
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ILROYS ASTLE | PRG.USER EDIT | PRG | Radd Maxx | 30 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3B 08 00 02 41 24 B2 22 8B 93 8B 20 20 20 |..;...A$."... |
00000010: 20 20 D2 45 4D 4F 54 45 20 D5 53 45 52 20 C5 44 | .EMOTE .SER .D|
00000020: 49 54 20 56 45 52 53 49 4F 4E 20 31 30 2E 30 8B |IT VERSION 10.0.|
00000030: 22 3A 8D 34 30 3A 4D 4C 25 B2 31 00 41 08 01 02 |":.40:ML%.1.A...|
00000040: 3A 00 82 08 02 02 41 24 B2 22 8B D4 48 45 52 45 |:.....A$."..HERE|
00000050: 20 41 52 45 22 AA C4 28 55 52 29 AA 22 20 55 53 | ARE"..(UR)." US|
00000060: 45 52 53 2E 8B 8B C5 44 49 54 20 57 48 49 43 48 |ERS....DIT WHICH|
00000070: 3F 20 22 3A 8D 34 30 3A 50 4C B2 31 3A 8D 32 31 |? ":.40:PL.1:.21|
00000080: 30 30 00 AD 08 03 02 52 53 B2 B5 28 C5 28 CA 28 |00.....RS..(.(.(|
00000090: 41 4E 24 2C 31 2C 39 29 29 29 3A 8B 28 52 53 B1 |AN$,1,9))):.(RS.|
000000A0: 55 52 29 B0 52 53 B3 31 A7 31 33 30 30 00 B3 08 |UR).RS.1.1300...|
000000B0: 04 02 3A 00 E9 08 05 02 8D 36 30 30 31 30 3A 81 |..:......60010:.|
000000C0: 54 B2 31 A4 35 3A 58 B2 52 53 AC 35 AB 35 AA 54 |T.1.5:X.RS.5.5.T|
000000D0: 3A 8D 32 3A 9E 35 33 31 35 34 3A 54 54 24 28 54 |:.2:.53154:TT$(T|
000000E0: 29 B2 41 24 3A 82 3A A0 32 00 00 09 06 02 44 54 |).A$:.:.2.....DT|
000000F0: 24 28 31 29 B2 C8 28 54 54 24 28 31 29 2C 31 29 |$(1)..(TT$(1),1)|
00000100: 00 17 09 07 02 44 54 24 28 32 29 B2 C8 28 54 54 |.....DT$(2)..(TT|
00000110: 24 28 32 29 2C 31 29 00 2F 09 08 02 44 54 24 28 |$(2),1)./...DT$(|
00000120: 33 29 B2 CA 28 54 54 24 28 33 29 2C 31 34 29 00 |3)..(TT$(3),14).|
00000130: 48 09 09 02 44 54 24 28 34 29 B2 CA 28 54 54 24 |H...DT$(4)..(TT$|
00000140: 28 32 29 2C 32 2C 32 29 00 62 09 0A 02 44 54 24 |(2),2,2).b...DT$|
00000150: 28 35 29 B2 CA 28 54 54 24 28 33 29 2C 31 32 2C |(5)..(TT$(3),12,|
00000160: 32 29 00 7B 09 0B 02 44 54 24 28 36 29 B2 CA 28 |2).{...DT$(6)..(|
00000170: 54 54 24 28 32 29 2C 34 2C 31 29 00 94 09 0C 02 |TT$(2),4,1).....|
00000180: 44 54 24 28 37 29 B2 CA 28 54 54 24 28 32 29 2C |DT$(7)..(TT$(2),|
00000190: 35 2C 31 29 00 CB 09 0D 02 44 54 24 28 38 29 B2 |5,1).....DT$(8).|
000001A0: CA 28 54 54 24 28 32 29 2C 36 2C 31 29 3A 44 54 |.(TT$(2),6,1):DT|
000001B0: 24 28 31 32 29 B2 54 54 24 28 34 29 3A 44 54 24 |$(12).TT$(4):DT$|
000001C0: 28 31 33 29 B2 54 54 24 28 35 29 00 0B 0A 0E 02 |(13).TT$(5).....|
000001D0: 44 54 24 28 39 29 B2 C8 28 54 54 24 28 33 29 2C |DT$(9)..(TT$(3),|
000001E0: 31 31 29 3A 44 54 24 28 31 30 29 B2 CA 28 54 54 |11):DT$(10)..(TT|
000001F0: 24 28 31 29 2C 32 29 3A 44 54 24 28 31 31 29 B2 |$(1),2):DT$(11).|
00000200: CA 28 54 54 24 28 32 29 2C 37 29 00 46 0A 0F 02 |.(TT$(2),7).F...|
00000210: 44 54 24 28 31 34 29 B2 22 22 3A 81 58 B2 31 A4 |DT$(14)."":.X.1.|
00000220: 31 31 3A 8B C8 28 44 54 24 28 58 29 2C 31 29 B2 |11:..(DT$(X),1).|
00000230: 22 20 22 A7 44 54 24 28 58 29 B2 CA 28 44 54 24 |" ".DT$(X)..(DT$|
00000240: 28 58 29 2C 32 29 00 4C 0A 10 02 82 00 70 0A 11 |(X),2).L.....p..|
00000250: 02 41 24 B2 22 8B 8B 93 D5 53 45 52 20 C9 C4 23 |.A$."....SER ..#|
00000260: 3A 22 AA C4 28 52 53 29 AA 22 8B 22 3A 8D 34 30 |:"..(RS).".":.40|
00000270: 00 A9 0A 12 02 8C 3A 81 58 B2 31 A4 39 3A 87 41 |......:.X.1.9:.A|
00000280: 24 3A 82 3A 81 58 B2 31 A4 31 34 3A 87 45 44 24 |$:.:.X.1.14:.ED$|
00000290: 28 58 29 3A 41 24 B2 45 44 24 28 58 29 AA 44 54 |(X):A$.ED$(X).DT|
000002A0: 24 28 58 29 3A 4C 50 B2 31 00 DC 0A 13 02 8D 34 |$(X):LP.1......4|
000002B0: 30 3A 82 3A 41 24 B2 22 2D 2D 29 20 C3 48 41 4E |0:.:A$."--) .HAN|
000002C0: 47 45 2F CF 50 54 49 4F 4E 3F 20 20 22 3A 8D 34 |GE/.PTION? ":.4|
000002D0: 30 3A 50 4C B2 31 3A 8D 32 31 30 30 00 FA 0A 14 |0:PL.1:.2100....|
000002E0: 02 41 B2 C5 28 CA 28 41 4E 24 2C 31 2C 35 29 29 |.A..(.(AN$,1,5))|
000002F0: 3A 8B 41 B2 31 34 A7 35 35 32 00 00 0B 15 02 3A |:.A.14.552.....:|
00000300: 00 1A 0B 16 02 8B 41 B3 31 B0 41 B1 31 33 B0 41 |......A.1.A.13.A|
00000310: B3 B1 B5 28 41 29 A7 35 32 39 00 55 0B 17 02 41 |...(A).529.U...A|
00000320: 24 B2 22 8B 22 AA 45 44 24 28 41 29 3A 8D 34 30 |$.".".ED$(A):.40|
00000330: 3A 50 4C B2 31 3A 8D 32 31 30 30 3A 8B 41 4E 24 |:PL.1:.2100:.AN$|
00000340: B3 B1 22 22 A7 44 54 24 28 41 29 B2 41 4E 24 3A |.."".DT$(A).AN$:|
00000350: 4D 4C 25 B2 30 00 5E 0B 18 02 89 35 32 39 00 6F |ML%.0.^....529.o|
00000360: 0B 19 02 8B 4D 4C 25 A7 A0 32 3A 89 35 31 32 00 |....ML%..2:.512.|
00000370: 9F 0B 1A 02 41 24 B2 22 8B 93 8B D7 52 49 54 49 |....A$."....RITI|
00000380: 4E 47 20 54 4F 20 55 53 45 52 20 44 41 54 41 20 |NG TO USER DATA |
00000390: 46 49 4C 45 53 2E 2E 2E 8B 8B 22 3A 8D 34 30 00 |FILES.....":.40.|
000003A0: A5 0B 1B 02 3A 00 D6 0B 1C 02 8D 36 30 30 31 30 |....:......60010|
000003B0: 3A 58 B2 52 53 AC 35 AB 34 3A 8D 32 3A 98 32 2C |:X.RS.5.4:.2:.2,|
000003C0: 44 54 24 28 31 29 44 54 24 28 31 30 29 3A 58 B2 |DT$(1)DT$(10):X.|
000003D0: 58 AA 31 3A 8D 32 00 0C 0C 1D 02 98 32 2C 44 54 |X.1:.2......2,DT|
000003E0: 24 28 32 29 44 54 24 28 34 29 44 54 24 28 36 29 |$(2)DT$(4)DT$(6)|
000003F0: 44 54 24 28 37 29 44 54 24 28 38 29 44 54 24 28 |DT$(7)DT$(8)DT$(|
00000400: 31 31 29 3A 58 B2 58 AA 31 3A 8D 32 00 37 0C 1E |11):X.X.1:.2.7..|
00000410: 02 98 32 2C 44 54 24 28 39 29 C9 28 C4 28 C5 28 |..2,DT$(9).(.(.(|
00000420: 44 54 24 28 35 29 29 29 2C 32 29 44 54 24 28 33 |DT$(5))),2)DT$(3|
00000430: 29 3A 58 B2 58 AA 31 00 49 0C 1F 02 8D 32 3A 98 |):X.X.1.I....2:.|
00000440: 32 2C 44 54 24 28 31 32 29 00 61 0C 20 02 58 B2 |2,DT$(12).a. .X.|
00000450: 58 AA 31 3A 8D 32 3A 98 32 2C 44 54 24 28 31 33 |X.1:.2:.2,DT$(13|
00000460: 29 00 6D 0C 21 02 A0 32 3A 89 35 31 32 00 A1 0C |).m.!..2:.512...|
00000470: 22 02 83 20 22 20 31 29 20 C1 43 43 45 53 53 20 |".. " 1) .CCESS |
00000480: C7 52 4F 55 50 3A 20 20 20 22 2C 22 20 32 29 20 |.ROUP: "," 2) |
00000490: C3 4F 4D 50 55 54 45 52 20 D4 59 50 45 3A 20 20 |.OMPUTER .YPE: |
000004A0: 22 00 D5 0C 23 02 83 20 22 20 33 29 20 D4 4F 54 |"...#.. " 3) .OT|
000004B0: 41 4C 20 C3 41 4C 4C 53 3A 20 20 20 20 22 2C 22 |AL .ALLS: ","|
000004C0: 20 34 29 20 CC 49 4E 45 20 CC 45 4E 47 54 48 3A | 4) .INE .ENGTH:|
000004D0: 20 20 20 20 22 00 09 0D 24 02 83 20 22 20 35 29 | "...$.. " 5)|
000004E0: 20 C3 41 4C 4C 53 20 D4 4F 44 41 59 3A 20 20 20 | .ALLS .ODAY: |
000004F0: 20 22 2C 22 20 36 29 20 CC 49 4E 45 20 C6 45 45 | "," 6) .INE .EE|
00000500: 44 53 3A 20 20 20 20 20 22 00 3D 0D 25 02 83 20 |DS: ".=.%.. |
00000510: 22 20 37 29 20 C3 36 34 20 C3 2F C7 20 CD 4F 44 |" 7) .64 ./. .OD|
00000520: 45 20 20 20 20 22 2C 22 20 38 29 20 CC 4F 57 45 |E "," 8) .OWE|
00000530: 52 43 41 53 45 3A 20 20 20 20 20 20 22 00 71 0D |RCASE: ".q.|
00000540: 26 02 83 20 22 20 39 29 20 CC 41 53 54 20 C3 41 |&.. " 9) .AST .A|
00000550: 4C 4C 20 C4 41 54 45 3A 20 22 2C 22 31 30 29 20 |LL .ATE: ","10) |
00000560: CE 41 4D 45 3A 20 20 20 20 20 20 20 20 20 20 20 |.AME: |
00000570: 22 00 A5 0D 27 02 83 20 22 31 31 29 20 D0 48 4F |"...'.. "11) .HO|
00000580: 4E 45 20 23 3A 20 20 20 20 20 20 20 20 22 2C 22 |NE #: ","|
00000590: 31 32 29 20 D0 41 53 53 57 4F 52 44 3A 20 20 20 |12) .ASSWORD: |
000005A0: 20 20 20 20 22 00 B4 0D 28 02 8B 4D 4C 25 B2 31 | "...(..ML%.1|
000005B0: A7 35 31 32 00 F4 0D 29 02 41 24 B2 22 8B D3 41 |.512...).A$."..A|
000005C0: 56 45 20 43 48 41 4E 47 45 53 3F 20 22 3A 8D 34 |VE CHANGES? ":.4|
000005D0: 30 3A 50 4C B2 31 3A 8D 32 31 30 30 3A 41 24 B2 |0:PL.1:.2100:A$.|
000005E0: C8 28 41 4E 24 2C 31 29 3A 8B 41 24 B2 22 D9 22 |.(AN$,1):.A$."."|
000005F0: A7 35 33 37 00 FD 0D 2A 02 89 35 31 32 00 31 0E |.537...*..512.1.|
00000600: 2B 02 83 20 22 31 33 29 20 D2 45 41 4C 20 CE 41 |+.. "13) .EAL .A|
00000610: 4D 45 3A 20 20 20 20 20 20 22 2C 22 31 34 29 20 |ME: ","14) |
00000620: C4 4F 4E 45 20 20 20 20 20 20 20 20 20 20 20 20 |.ONE |
00000630: 22 00 00 00 |"... |
..;...A$."... REMOTE USER EDIT VERSI
ON 10.0.":.40:ML%.1.A...:.....A$.".THERE
ARE".D(UR)." USERS...EDIT WHICH? ":.40:
PL.1:.2100.....RS..(E(J(AN$,1,9))):.(RS.
UR).RS.1.1300.....:......60010:.T.1.5:X.
RS.5.5.T:.2:.53154:TT$(T).A$:.: 2.....DT
$(1).H(TT$(1),1).....DT$(2).H(TT$(2),1).
/...DT$(3).J(TT$(3),14).H...DT$(4).J(TT$
(2),2,2).B...DT$(5).J(TT$(3),12,2).{...D
T$(6).J(TT$(2),4,1).....DT$(7).J(TT$(2),
5,1).K...DT$(8).J(TT$(2),6,1):DT$(12).TT
$(4):DT$(13).TT$(5).....DT$(9).H(TT$(3),
11):DT$(10).J(TT$(1),2):DT$(11).J(TT$(2)
,7).F...DT$(14)."":.X.1.11:.H(DT$(X),1).
" ".DT$(X).J(DT$(X),2).L.....P...A$."...
USER ID#:".D(RS).".":.40......:.X.1.9:.A
$:.:.X.1.14:.ED$(X):A$.ED$(X).DT$(X):LP.
1......40:.:A$."--) CHANGE/OPTION? ":.4
0:PL.1:.2100.....A.E(J(AN$,1,5)):.A.14.5
52.....:......A.1.A.13.A...(A).529.U...A
$.".".ED$(A):.40:PL.1:.2100:.AN$.."".DT$
(A).AN$:ML%.0.^....529.O....ML%. 2:.512.
....A$."...WRITING TO USER DATA FILES...
..":.40.....:.V....60010:X.RS.5.4:.2:.2,
DT$(1)DT$(10):X.X.1:.2......2,DT$(2)DT$(
4)DT$(6)DT$(7)DT$(8)DT$(11):X.X.1:.2.7..
..2,DT$(9)I(D(E(DT$(5))),2)DT$(3):X.X.1.
I....2:.2,DT$(12).A. .X.X.1:.2:.2,DT$(13
).M.!. 2:.512...".. " 1) ACCESS GROUP:
"," 2) COMPUTER TYPE: ".U.#.. " 3) TOT
AL CALLS: "," 4) LINE LENGTH: "...
$.. " 5) CALLS TODAY: "," 6) LINE FEE
DS: ".=.%.. " 7) C64 C/G MODE ","
8) LOWERCASE: ".Q.&.. " 9) LAST CA
LL DATE: ","10) NAME: "...'..
"11) PHONE #: ","12) PASSWORD:
"...(..ML%.1.512...).A$.".SAVE CHANG
ES? ":.40:PL.1:.2100:A$.H(AN$,1):.A$."Y"
.537...*..512.1.+.. "13) REAL NAME:
","14) DONE "...
> CLICK IMAGE PREVIEW FOR FULL MODAL