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

LIST.SRC

FILE INFORMATION

FILENAME(S): LIST.SRC

FILE TYPE(S): PRG

FILE SIZE: 694b

FIRST SEEN: 2025-11-30 21:23:14

APPEARS ON: 1 disk(s)

FILE HASH

fba6ae42d391d1cdb8aeae82c11ed7b0d25f939cd76a1825c482e245c4259a86

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 1 1 LIST.SRC PRG DuncanTwain 10 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 0E 08 5A 00 9E 20  38 AC 34 30 39 36 00 19  |....Z.. 8.4096..|
00000010: 08 64 00 2E 4F 50 54 20  50 00 1F 08 6E 00 3B 00  |.d..OPT P...n.;.|
00000020: 3E 08 78 00 3B 20 9B AB  52 4F 55 54 49 4E 45 20  |>.x.; ..ROUTINE |
00000030: 44 45 53 20 B5 45 52 50  52 45 54 45 52 53 00 44  |DES .ERPRETERS.D|
00000040: 08 82 00 3B 00 55 08 8C  00 51 55 4F 54 46 4C 47  |...;.U...QUOTFLG|
00000050: 20 B2 20 31 35 00 63 08  96 00 50 4E 54 20 B2 20  | . 15.c...PNT . |
00000060: 24 34 39 00 81 08 A0 00  54 41 42 4C 45 20 B2 20  |$49.....TABLE . |
00000070: 24 41 30 39 45 20 3B 20  CE 53 54 41 42 45 4C 4C  |$A09E ; .STABELL|
00000080: 45 00 95 08 AA 00 43 48  41 52 4F 55 54 20 B2 20  |E.....CHAROUT . |
00000090: 24 41 42 34 37 00 9B 08  B4 00 3B 00 A8 08 BE 00  |$AB47.....;.....|
000000A0: AC B2 20 24 41 37 31 41  00 D8 08 C8 00 42 50 4C  |.. $A71A.....BPL|
000000B0: 20 24 41 36 46 33 20 3B  20 4B 45 49 4E 20 B5 45  | $A6F3 ; KEIN .E|
000000C0: 52 50 52 45 54 45 52 4B  4F 44 45 2C 20 53 4F 20  |RPRETERKODE, SO |
000000D0: 41 55 53 47 45 42 45 4E  00 E5 08 D2 00 43 4D 50  |AUSGEBEN.....CMP|
000000E0: 20 23 24 46 46 00 04 09  DC 00 42 45 51 20 24 41  | #$FF.....BEQ $A|
000000F0: 36 46 33 20 3B 20 50 49  20 53 4F 20 41 55 53 47  |6F3 ; PI SO AUSG|
00000100: 45 42 45 4E 00 25 09 E6  00 42 49 54 20 51 55 4F  |EBEN.%...BIT QUO|
00000110: 54 46 4C 47 20 3B 20 48  4F 43 48 4B 4F 4D 4D 41  |TFLG ; HOCHKOMMA|
00000120: 4D 4F 44 55 53 00 49 09  F0 00 42 4D 49 20 24 41  |MODUS.I...BMI $A|
00000130: 36 46 33 20 3B 20 55 4E  56 45 52 41 80 45 52 54  |6F3 ; UNVERA.ERT|
00000140: 20 41 55 53 47 45 42 45  4E 00 51 09 FA 00 53 45  | AUSGEBEN.Q...SE|
00000150: 43 00 5E 09 04 01 53 42  43 20 23 24 37 46 00 74  |C.^...SBC #$7F.t|
00000160: 09 0E 01 54 41 58 20 3B  20 4B 4F 44 45 20 4D 45  |...TAX ; KODE ME|
00000170: 52 4B 45 4E 00 8F 09 18  01 53 54 59 20 50 4E 54  |RKEN.....STY PNT|
00000180: 3B 20 5A 45 49 47 45 52  20 4D 45 52 4B 45 4E 00  |; ZEIGER MERKEN.|
00000190: 9B 09 22 01 4C 44 59 20  23 AB 31 00 A5 09 2C 01  |..".LDY #.1...,.|
000001A0: 82 20 44 45 58 00 C2 09  36 01 42 45 51 20 46 4F  |. DEX...6.BEQ FO|
000001B0: 55 4E 44 20 3B 20 57 B0  54 20 47 45 46 55 4E 44  |UND ; W.T GEFUND|
000001C0: 45 4E 00 CF 09 40 01 4C  4F 4F 50 20 49 4E 59 00  |EN...@.LOOP INY.|
000001D0: DF 09 4A 01 4C 44 41 20  54 41 42 4C 45 2C 59 00  |..J.LDA TABLE,Y.|
000001E0: 02 0A 54 01 42 50 4C 20  4C 4F 4F 50 20 3B 20 57  |..T.BPL LOOP ; W|
000001F0: B0 54 20 4E 4F 43 48 20  4E 49 43 48 54 20 5A 55  |.T NOCH NICHT ZU|
00000200: 80 45 00 1C 0A 5E 01 42  4D 49 20 82 20 3B 20 4E  |.E...^.BMI . ; N|
00000210: 41 45 43 48 53 54 45 53  20 57 B0 54 00 22 0A 68  |AECHSTES W.T.".h|
00000220: 01 3B 00 30 0A 72 01 46  4F 55 4E 44 20 49 4E 59  |.;.0.r.FOUND INY|
00000230: 00 51 0A 7C 01 4C 44 41  20 54 41 42 4C 45 2C 59  |.Q.|.LDA TABLE,Y|
00000240: 20 3B 20 42 55 43 48 53  54 41 42 45 4E 20 48 4F  | ; BUCHSTABEN HO|
00000250: C3 00 6F 0A 86 01 42 4D  49 20 24 41 36 45 46 20  |..o...BMI $A6EF |
00000260: 3B 20 88 5A 54 45 53 20  5A 45 49 43 48 45 4E 00  |; .ZTES ZEICHEN.|
00000270: 92 0A 90 01 4A 53 52 20  43 48 41 52 4F 55 54 20  |....JSR CHAROUT |
00000280: 3B 20 5A 45 49 43 48 45  4E 20 41 55 53 47 45 42  |; ZEICHEN AUSGEB|
00000290: 45 4E 00 B3 0A 9A 01 42  4E 45 20 46 4F 55 4E 44  |EN.....BNE FOUND|
000002A0: 20 3B 20 55 4E 42 45 44  49 4E 47 54 45 52 20 53  | ; UNBEDINGTER S|
000002B0: 50 8A 47 00 00 00                                 |P.G...          |
....Z.. 8.4096...D..OPT P...N.;.>.X.; ..
ROUTINE DES .ERPRETERS.D...;.U...QUOTFLG
 . 15.C...PNT . $49... .TABLE . $A09E ; 
NSTABELLE.....CHAROUT . $AB47.....;.....
.. $A71A.X.H.BPL $A6F3 ; KEIN .ERPRETERK
ODE, SO AUSGEBEN...R.CMP #$FF.....BEQ $A
6F3 ; PI SO AUSGEBEN.%...BIT QUOTFLG ; H
OCHKOMMAMODUS.I...BMI $A6F3 ; UNVERA.ERT
 AUSGEBEN.Q...SEC.^...SBC #$7F.T...TAX ;
 KODE MERKEN.....STY PNT; ZEIGER MERKEN.
..".LDY #.1...,.. DEX.B.6.BEQ FOUND ; W.
T GEFUNDEN.O.@.LOOP INY...J.LDA TABLE,Y.
..T.BPL LOOP ; W.T NOCH NICHT ZU.E...^.B
MI . ; NAECHSTES W.T.".H.;.0.R.FOUND INY
.Q.|.LDA TABLE,Y ; BUCHSTABEN HOC.O...BM
I $A6EF ; .ZTES ZEICHEN.....JSR CHAROUT 
; ZEICHEN AUSGEBEN.....BNE FOUND ; UNBED
INGTER SP.G...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL