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

PROB2

FILE INFORMATION

FILENAME(S): PROB2

FILE TYPE(S): PRG

FILE SIZE: 655b

FIRST SEEN: 2025-11-30 17:31:22

APPEARS ON: 1 disk(s)

FILE HASH

268218fb3683c8838af967885156c37403724c000d8df8bffde98fb55c6b4b6a

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C D U JUNE 90 PROB2 PRG UK CD 5 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 28 08 0A 00 20 AC  B2 24 43 30 30 30 20 20  |..(... ..$C000  |
00000010: 20 20 20 20 20 20 20 20  20 5F 21 53 54 41 52 54  |         _!START|
00000020: 20 4F 46 20 43 4F 44 45  00 51 08 14 00 20 53 45  | OF CODE.Q... SE|
00000030: 54 4C 46 53 B2 24 46 46  42 41 20 20 20 20 20 20  |TLFS.$FFBA      |
00000040: 5F 21 4B 45 52 4E 41 4C  20 52 4F 55 54 49 4E 45  |_!KERNAL ROUTINE|
00000050: 53 00 6B 08 1E 00 20 53  45 54 4E 41 4D B2 24 46  |S.k... SETNAM.$F|
00000060: 46 42 44 20 20 20 20 20  20 20 21 00 82 08 28 00  |FBD       !...(.|
00000070: 20 44 4F E7 B2 24 46 46  44 35 20 20 20 20 20 20  | DO..$FFD5      |
00000080: 20 21 00 A9 08 32 00 20  44 45 56 49 43 45 B2 38  | !...2. DEVICE.8|
00000090: 20 20 20 20 20 20 20 20  20 20 5F 21 44 45 56 49  |          _!DEVI|
000000A0: 43 45 20 4E 55 4D 42 45  52 00 CC 08 3C 00 20 46  |CE NUMBER...<. F|
000000B0: 49 C3 4F B2 31 20 20 20  20 20 20 20 20 20 20 5F  |I.O.1          _|
000000C0: 21 46 49 4C 45 20 4E 55  4D 42 45 52 00 F5 08 46  |!FILE NUMBER...F|
000000D0: 00 20 53 45 43 41 44 44  B2 32 35 35 20 20 20 20  |. SECADD.255    |
000000E0: 20 20 20 20 5F 21 53 45  43 4F 4E 44 41 52 59 20  |    _!SECONDARY |
000000F0: 41 44 44 52 2E 00 FC 08  50 00 20 3B 00 0A 09 64  |ADDR....P. ;...d|
00000100: 00 4C 44 41 20 23 46 49  C3 4F 00 1A 09 6E 00 4C  |.LDA #FI.O...n.L|
00000110: 44 58 20 23 44 45 56 49  43 45 00 2A 09 78 00 4C  |DX #DEVICE.*.x.L|
00000120: 44 59 20 23 53 45 43 41  44 44 00 4E 09 82 00 4A  |DY #SECADD.N...J|
00000130: 53 52 20 53 45 54 4C 46  53 20 20 20 20 20 20 20  |SR SETLFS       |
00000140: 20 5F 21 53 45 54 20 55  50 20 46 49 4C 45 00 76  | _!SET UP FILE.v|
00000150: 09 8C 00 4C 44 41 20 23  4E 41 4D 45 31 AB 4E 41  |...LDA #NAME1.NA|
00000160: 4D 45 20 20 20 5F 21 46  49 4C 45 4E 41 4D 45 20  |ME   _!FILENAME |
00000170: 4C 45 4E 47 54 48 00 9C  09 96 00 4C 44 58 20 23  |LENGTH.....LDX #|
00000180: B3 4E 41 4D 45 20 20 20  20 20 20 20 20 5F 21 4C  |.NAME        _!L|
00000190: 4F 2F 48 49 20 42 59 54  45 20 4F 46 00 C3 09 A0  |O/HI BYTE OF....|
000001A0: 00 4C 44 59 20 23 B1 4E  41 4D 45 20 20 20 20 20  |.LDY #.NAME     |
000001B0: 20 20 20 20 21 20 53 54  41 52 54 20 4F 46 20 4E  |    ! START OF N|
000001C0: 41 4D 45 00 E6 09 AA 00  4A 53 52 20 53 45 54 4E  |AME.....JSR SETN|
000001D0: 41 4D 20 20 20 20 20 20  20 20 5F 21 53 45 54 20  |AM        _!SET |
000001E0: 46 49 C3 41 4D 45 00 0C  0A B4 00 4C 44 41 20 23  |FI.AME.....LDA #|
000001F0: 30 20 20 20 20 20 20 20  20 20 20 20 20 5F 21 46  |0            _!F|
00000200: 4C 41 47 20 46 4F 52 20  4C 4F 41 44 00 2D 0A BE  |LAG FOR LOAD.-..|
00000210: 00 4A 53 52 20 44 4F E7  20 20 20 20 20 20 20 20  |.JSR DO.        |
00000220: 5F 21 44 4F 20 54 48 45  20 4C 4F 41 44 00 54 0A  |_!DO THE LOAD.T.|
00000230: C8 00 4A 4D 50 20 53 54  41 52 54 20 20 20 20 20  |..JMP START     |
00000240: 20 20 20 20 5F 21 53 54  41 52 54 20 4F 46 20 50  |    _!START OF P|
00000250: 52 4F 47 2E 00 5A 0A D2  00 3B 00 72 0A DC 00 4E  |ROG..Z...;.r...N|
00000260: 41 4D 45 20 42 59 54 20  22 46 49 4C 45 4E 41 4D  |AME BYT "FILENAM|
00000270: 45 22 00 7E 0A E6 00 4E  41 4D 45 31 20 3B 00 8C  |E".~...NAME1 ;..|
00000280: 0A F0 00 53 54 41 52 54  20 52 54 53 00 00 00     |...START RTS... |
..(... ..$C000           _!START OF CODE
.Q... SETLFS.$FFBA      _!KERNAL ROUTINE
S.K... SETNAM.$FFBD       !...(. DO..$FF
D5       !...2. DEVICE.8          _!DEVI
CE NUMBER.L.<. FICO.1          _!FILE NU
MBER...F. SECADD.255        _!SECONDARY 
ADDR....P. ;...D.LDA #FICO...N.LDX #DEVI
CE.*.X.LDY #SECADD.N...JSR SETLFS       
 _!SET UP FILE.V...LDA #NAME1.NAME   _!F
ILENAME LENGTH.....LDX #.NAME        _!L
O/HI BYTE OF.C. .LDY #.NAME         ! ST
ART OF NAME.....JSR SETNAM        _!SET 
FICAME.....LDA #0            _!FLAG FOR 
LOAD.-...JSR DO.        _!DO THE LOAD.T.
H.JMP START         _!START OF PROG..Z.R
.;.R...NAME BYT "FILENAME".~...NAME1 ;..
...START RTS...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL