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

LISTOMATIC.S

FILE INFORMATION

FILENAME(S): LISTOMATIC.S

FILE TYPE(S): DEL

FILE SIZE: 350b

FIRST SEEN: 2025-12-01 19:06:55

APPEARS ON: 1 disk(s)

FILE HASH

65a2e5b60c2d100f8a7bcf9b1fadeb8493c4b68cf0aeda8e4c2bd5237d46d6c3

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ICE DISK 28 LISTOMATIC.S DEL Icebreaker 26 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 0A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..**************|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 0D 2A A0 A0 A0 62  61 73 65 A0 69 6E 74 65  |**.*...base.inte|
00000030: 72 72 75 70 74 A0 72 6F  75 74 69 6E 65 2E 62 6A  |rrupt.routine.bj|
00000040: A0 A0 2A 0D 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..*.************|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000060: 2A 2A 2A 2A 0D 20 73 65  69 0D 20 6C 64 61 20 23  |****. sei. lda #|
00000070: 24 30 64 0D 20 73 74 61  20 24 30 33 31 34 0D 20  |$0d. sta $0314. |
00000080: 6C 64 61 20 23 24 38 30  0D 20 73 74 61 20 24 30  |lda #$80. sta $0|
00000090: 33 31 35 0D 20 63 6C 69  0D 20 72 74 73 0D 2A 2A  |315. cli. rts.**|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 0D 20  |**************. |
000000C0: 6C 64 78 20 23 30 0D 6C  6F 6F 70 31 20 6C 64 61  |ldx #0.loop1 lda|
000000D0: 20 64 61 74 61 2C 78 0D  20 63 6D 70 20 23 34 32  | data,x. cmp #42|
000000E0: 0D 20 62 65 71 20 6E 65  78 74 0D 20 6A 73 72 20  |. beq next. jsr |
000000F0: 24 66 66 64 32 0D 20 69  6E 78 0D 20 6A 6D 70 20  |$ffd2. inx. jmp |
00000100: 6C 6F 6F 70 31 0D 6E 65  78 74 20 6C 64 61 20 23  |loop1.next lda #|
00000110: 31 33 0D 20 6A 73 72 20  24 66 66 64 32 0D 2A 2A  |13. jsr $ffd2.**|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 0D 65  |**************.e|
00000140: 6E 64 20 6A 6D 70 20 24  65 61 33 31 0D 64 61 74  |nd jmp $ea31.dat|
00000150: 61 20 61 73 63 20 22 6C  69 73 74 2A 22 0D        |a asc "list*".  |

..********************************.*   B
ASE INTERRUPT ROUTINE.BJ  *.************
********************. SEI. LDA #$0D. STA
 $0314. LDA #$80. STA $0315. CLI. RTS.**
******************************. LDX #0.L
OOP1 LDA DATA,X. CMP #42. BEQ NEXT. JSR 
$FFD2. INX. JMP LOOP1.NEXT LDA #13. JSR 
$FFD2.********************************.E
ND JMP $EA31.DATA ASC "LIST*".
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL