34
FILE INFORMATION
FILENAME(S): 34
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 20:31:02
APPEARS ON: 1 disk(s)
FILE HASH
527c8b1b78c831f0e79b04838af1842c2a70fe176bf055d32d76ed9be8a76e2c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DR ZIG | 34 | PRG | Curtcool, Nigel | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 0D 20 20 20 20 20 20 20 20 20 3B 20 49 4E |... ; IN| 00000010: 54 52 4F 20 54 52 41 4E 53 46 45 52 0D 0D 0D 0D |TRO TRANSFER....| 00000020: 20 20 20 20 20 20 20 20 20 53 45 49 0D 20 20 20 | SEI. | 00000030: 20 20 20 20 20 20 4C 44 41 20 23 24 33 37 0D 20 | LDA #$37. | 00000040: 20 20 20 20 20 20 20 20 53 54 41 20 24 30 31 0D | STA $01.| 00000050: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 44 | JSR $FD| 00000060: 41 33 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |A3. JSR | 00000070: 24 46 46 35 42 0D 20 20 20 20 20 20 20 20 20 4C |$FF5B. L| 00000080: 44 41 20 23 24 33 31 0D 20 20 20 20 20 20 20 20 |DA #$31. | 00000090: 20 53 54 41 20 24 30 33 31 34 0D 20 20 20 20 20 | STA $0314. | 000000A0: 20 20 20 20 4C 44 41 20 23 24 45 41 0D 20 20 20 | LDA #$EA. | 000000B0: 20 20 20 20 20 20 53 54 41 20 24 30 33 31 35 0D | STA $0315.| 000000C0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0| 000000D0: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |0. STA $| 000000E0: 44 30 32 30 0D 20 20 20 20 20 20 20 20 20 53 54 |D020. ST| 000000F0: 41 20 24 44 30 32 31 0D 20 20 20 20 20 20 20 20 |A $D021. | 00000100: 20 4C 44 58 20 23 32 35 35 0D 41 41 20 20 20 20 | LDX #255.AA | 00000110: 20 20 20 4C 44 41 20 23 31 0D 20 20 20 20 20 20 | LDA #1. | 00000120: 20 20 20 53 54 41 20 24 44 38 30 30 2C 58 0D 20 | STA $D800,X. | 00000130: 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 0D 20 | LDA #0. | 00000140: 20 20 20 20 20 20 20 20 53 54 41 20 24 44 38 30 | STA $D80| 00000150: 30 2B 31 32 2C 58 0D 20 20 20 20 20 20 20 20 20 |0+12,X. | 00000160: 4C 44 41 20 56 41 52 2C 58 0D 20 20 20 20 20 20 |LDA VAR,X. | 00000170: 20 20 20 53 54 41 20 24 30 34 30 30 2C 58 0D 20 | STA $0400,X. | 00000180: 20 20 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 | DEX. | 00000190: 20 20 20 20 20 43 50 58 20 23 32 35 35 0D 20 20 | CPX #255. | 000001A0: 20 20 20 20 20 20 20 42 4E 45 20 41 41 0D 20 20 | BNE AA. | 000001B0: 20 20 20 20 20 20 20 4C 44 41 20 23 24 33 34 0D | LDA #$34.| 000001C0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 30 31 | STA $01| 000001D0: 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 24 30 |. JMP $0| 000001E0: 34 30 30 2B 31 32 0D 0D 0D 0D 0D 0D 0D 0D 56 41 |400+12........VA| 000001F0: 52 20 20 20 20 20 20 2E 54 45 58 54 20 22 14 08 |R .TEXT "..| 00000200: 05 20 17 01 12 12 09 0F 12 13 22 0D 0D 20 20 20 |. ........".. | 00000210: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 20 20 | LDA #$00 | 00000220: 20 20 20 20 20 3B 20 20 3C 53 54 41 52 54 0D 20 | ; <START. | 00000230: 20 20 20 20 20 20 20 20 53 54 41 20 24 30 32 0D | STA $02.| 00000240: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 32 | LDA #$2| 00000250: 30 20 20 20 20 20 20 20 3B 20 20 3E 53 54 41 52 |0 ; >STAR| 00000260: 54 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |T. STA $| 00000270: 30 33 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |03. LDA | 00000280: 23 24 30 31 0D 20 20 20 20 20 20 20 20 20 53 54 |#$01. ST| 00000290: 41 20 24 30 34 0D 20 20 20 20 20 20 20 20 20 4C |A $04. L| 000002A0: 44 41 20 23 24 30 38 0D 20 20 20 20 20 20 20 20 |DA #$08. | 000002B0: 20 53 54 41 20 24 30 35 0D 41 41 31 20 20 20 20 | STA $05.AA1 | 000002C0: 20 20 4C 44 59 20 23 24 30 30 0D 41 41 32 20 20 | LDY #$00.AA2 | 000002D0: 20 20 20 20 4C 44 41 20 28 24 30 32 29 2C 59 0D | LDA ($02),Y.| 000002E0: 20 20 20 20 20 20 20 20 20 53 54 41 20 28 24 30 | STA ($0| 000002F0: 34 29 2C 59 0D 20 20 20 20 20 20 20 20 20 4C 44 |4),Y. LD| 00000300: 58 20 23 24 33 37 0D 20 20 20 20 20 20 20 20 20 |X #$37. | 00000310: 53 54 58 20 24 30 31 0D 20 20 20 20 20 20 20 20 |STX $01. | 00000320: 20 4C 44 58 20 24 46 45 0D 20 20 20 20 20 20 20 | LDX $FE. | 00000330: 20 20 53 54 41 20 24 44 34 30 30 2C 58 0D 20 20 | STA $D400,X. | 00000340: 20 20 20 20 20 20 20 49 4E 43 20 24 46 45 0D 20 | INC $FE. | 00000350: 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 33 35 | LDX #$35| 00000360: 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 24 30 |. STX $0| 00000370: 31 0D 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 |1. INY. | 00000380: 20 20 20 20 20 20 20 20 42 4E 45 20 41 41 32 0D | BNE AA2.| 00000390: 20 20 20 20 20 20 20 20 20 49 4E 43 20 24 30 33 | INC $03| 000003A0: 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 24 30 |. INC $0| 000003B0: 35 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |5. LDA $| 000003C0: 30 33 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 |03. CMP | 000003D0: 23 24 38 30 0D 20 20 20 20 20 20 20 20 20 42 4E |#$80. BN| 000003E0: 45 20 41 41 31 0D 20 20 20 20 20 20 20 20 20 4C |E AA1. L| 000003F0: 44 41 20 23 24 33 37 0D 20 20 20 20 20 20 20 20 |DA #$37. | 00000400: 20 53 54 41 20 24 30 31 0D 20 20 20 20 20 20 20 | STA $01. | 00000410: 20 20 4C 44 41 20 23 24 30 30 0D 20 20 20 20 20 | LDA #$00. | 00000420: 20 20 20 20 4C 44 58 20 23 24 30 30 0D 20 20 20 | LDX #$00. | 00000430: 20 20 20 20 20 20 53 54 41 20 24 41 45 0D 20 20 | STA $AE. | 00000440: 20 20 20 20 20 20 20 53 54 58 20 24 41 46 0D 20 | STX $AF. | 00000450: 20 20 20 20 20 20 20 20 53 54 41 20 24 32 44 0D | STA $2D.| 00000460: 20 20 20 20 20 20 20 20 20 53 54 58 20 24 32 45 | STX $2E| 00000470: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 32 |. STA $2| 00000480: 46 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 24 |F. STX $| 00000490: 33 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |30. STA | 000004A0: 24 33 31 0D 20 20 20 20 20 20 20 20 20 53 54 58 |$31. STX| 000004B0: 20 24 33 32 0D 20 20 20 20 20 20 20 20 20 43 4C | $32. CL| 000004C0: 49 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 24 |I. JMP $| 000004D0: 39 30 30 30 20 20 20 20 20 20 3B 20 4A 4D 50 0D |9000 ; JMP.| 000004E0: 0D |. |
... ; INTRO TRANSFER....
SEI. LDA #$37. STA $01.
JSR $FDA3. JSR $FF5B.
LDA #$31. STA $0314.
LDA #$EA. STA $0315.
LDA #$00. STA $D020. ST
A $D021. LDX #255.AA LDA #
1. STA $D800,X. LDA #0.
STA $D800+12,X. LDA VAR,
X. STA $0400,X. DEX.
CPX #255. BNE AA. L
DA #$34. STA $01. JMP $0
400+12........VAR .TEXT "... ......
..".. LDA #$00 ; <START.
STA $02. LDA #$20
; >START. STA $03. LDA
#$01. STA $04. LDA #$08.
STA $05.AA1 LDY #$00.AA2
LDA ($02),Y. STA ($04),Y.
LDX #$37. STX $01.
LDX $FE. STA $D400,X. I
NC $FE. LDX #$35. STX $0
1. INY. BNE AA2.
INC $03. INC $05. LDA $
03. CMP #$80. BNE AA1.
LDA #$37. STA $01.
LDA #$00. LDX #$00. ST
A $AE. STX $AF. STA $2D.
STX $2E. STA $2F.
STX $30. STA $31. STX
$32. CLI. JMP $9000
; JMP..
> CLICK IMAGE PREVIEW FOR FULL MODAL