35
FILE INFORMATION
FILENAME(S): 35
FILE TYPE(S): PRG
FILE SIZE: 607b
FIRST SEEN: 2025-11-30 20:31:02
APPEARS ON: 1 disk(s)
FILE HASH
55a535a64484c7b18f6a5469cfe39115fafdf116ba7fdae6eea0416e0c894213
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DR ZIG | 35 | PRG | Curtcool, Nigel | 19 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 0D 20 20 20 20 20 20 20 20 20 3B 20 49 4E |... ; IN| 00000010: 50 55 54 20 31 2D 32 34 20 4C 49 4E 45 53 0D 0D |PUT 1-24 LINES..| 00000020: 48 30 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |H0. LDA | 00000030: 23 22 13 22 0D 20 20 20 20 20 20 20 20 20 4A 53 |#".". JS| 00000040: 52 20 24 46 46 44 32 0D 20 20 20 20 20 20 20 20 |R $FFD2. | 00000050: 20 4A 53 52 20 48 35 0D 0D 48 31 0D 48 32 20 20 | JSR H5..H1.H2 | 00000060: 20 20 20 20 20 4A 53 52 20 24 46 46 45 34 0D 20 | JSR $FFE4. | 00000070: 20 20 20 20 20 20 20 20 42 45 51 20 48 32 0D 20 | BEQ H2. | 00000080: 20 20 20 20 20 20 20 20 50 48 41 0D 20 20 20 20 | PHA. | 00000090: 20 20 20 20 20 4A 53 52 20 48 35 0D 20 20 20 20 | JSR H5. | 000000A0: 20 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 | PLA. | 000000B0: 20 20 43 4D 50 20 23 22 03 22 0D 20 20 20 20 20 | CMP #".". | 000000C0: 20 20 20 20 42 45 51 20 48 38 0D 20 20 20 20 20 | BEQ H8. | 000000D0: 20 20 20 20 43 4D 50 20 23 24 32 32 0D 20 20 20 | CMP #$22. | 000000E0: 20 20 20 20 20 20 42 45 51 20 48 36 0D 20 20 20 | BEQ H6. | 000000F0: 20 20 20 20 20 20 4A 53 52 20 24 46 46 44 32 0D | JSR $FFD2.| 00000100: 48 37 20 20 20 20 20 20 20 4C 44 41 20 24 44 36 |H7 LDA $D6| 00000110: 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 4C 49 |. CMP LI| 00000120: 4E 45 0D 20 20 20 20 20 20 20 20 20 42 43 53 20 |NE. BCS | 00000130: 48 33 0D 48 34 20 20 20 20 20 20 20 4A 53 52 20 |H3.H4 JSR | 00000140: 48 35 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 |H5. JMP | 00000150: 48 31 0D 0D 48 33 20 20 20 20 20 20 20 4C 44 41 |H1..H3 LDA| 00000160: 20 23 22 91 22 0D 20 20 20 20 20 20 20 20 20 4A | #".". J| 00000170: 53 52 20 24 46 46 44 32 0D 20 20 20 20 20 20 20 |SR $FFD2. | 00000180: 20 20 4A 4D 50 20 48 34 0D 0D 48 35 20 20 20 20 | JMP H4..H5 | 00000190: 20 20 20 4C 44 59 20 24 44 33 0D 20 20 20 20 20 | LDY $D3. | 000001A0: 20 20 20 20 4C 44 41 20 28 24 44 31 29 2C 59 0D | LDA ($D1),Y.| 000001B0: 20 20 20 20 20 20 20 20 20 45 4F 52 20 23 24 38 | EOR #$8| 000001C0: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 28 |0. STA (| 000001D0: 24 44 31 29 2C 59 0D 20 20 20 20 20 20 20 20 20 |$D1),Y. | 000001E0: 52 54 53 0D 0D 48 36 20 20 20 20 20 20 20 4A 53 |RTS..H6 JS| 000001F0: 52 20 24 46 46 44 32 0D 20 20 20 20 20 20 20 20 |R $FFD2. | 00000200: 20 44 45 43 20 24 44 33 0D 20 20 20 20 20 20 20 | DEC $D3. | 00000210: 20 20 4C 44 41 20 23 24 32 32 0D 20 20 20 20 20 | LDA #$22. | 00000220: 20 20 20 20 4A 53 52 20 24 46 46 44 32 0D 20 20 | JSR $FFD2. | 00000230: 20 20 20 20 20 20 20 4A 4D 50 20 48 37 0D 0D 48 | JMP H7..H| 00000240: 38 20 20 20 20 20 20 20 52 54 53 0D 0D 4C 49 4E |8 RTS..LIN| 00000250: 45 20 20 20 20 20 2E 42 59 54 45 20 31 0D 0D |E .BYTE 1.. |
... ; INPUT 1-24 LINES..H0.
LDA #".". JSR $FFD2.
JSR H5..H1.H2 JSR $FFE4.
BEQ H2. PHA. JSR H5.
PLA. CMP #".". BEQ
H8. CMP #$22. BEQ H6.
JSR $FFD2.H7 LDA $D6.
CMP LINE. BCS H3.H4 JSR
H5. JMP H1..H3 LDA #".".
JSR $FFD2. JMP H4..H5
LDY $D3. LDA ($D1),Y.
EOR #$80. STA ($D1),Y.
RTS..H6 JSR $FFD2. DEC $D3
. LDA #$22. JSR $FFD2.
JMP H7..H8 RTS..LINE .B
YTE 1..
> CLICK IMAGE PREVIEW FOR FULL MODAL