mirror of
https://github.com/a2-4am/passport.git
synced 2025-08-15 15:27:24 +00:00
shave some bytes
This commit is contained in:
@@ -12,7 +12,7 @@ WILDCARD = $97
|
|||||||
; out: C clear if string found
|
; out: C clear if string found
|
||||||
; or set if not found
|
; or set if not found
|
||||||
; If C is clear, then
|
; If C is clear, then
|
||||||
; A = sector where string was found
|
; A = @gDisplayBytes = sector where string was found
|
||||||
; X = starting offset where string was found
|
; X = starting offset where string was found
|
||||||
; all other registers and flags clobbered
|
; all other registers and flags clobbered
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
@@ -151,6 +151,7 @@ match_size2
|
|||||||
sec
|
sec
|
||||||
sbc #BASEPAGE
|
sbc #BASEPAGE
|
||||||
clc
|
clc
|
||||||
|
sta gDisplayBytes
|
||||||
rts
|
rts
|
||||||
|
|
||||||
; cold path
|
; cold path
|
||||||
|
@@ -154,9 +154,8 @@ Pass
|
|||||||
!byte s_writingto
|
!byte s_writingto
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_slotanddrive
|
!byte s_slotanddrive
|
||||||
jsr SwapProDOS ; ProDOS out -> in
|
jsr SwapProDOS ; ProDOS out -> in (preserves registers+flags)
|
||||||
jsr WriteRAMToDisk
|
jsr WriteRAMToDisk ; C=1 if error, and A=MLI error code
|
||||||
; C=1 if error, and A=MLI error code
|
|
||||||
jsr SwapProDOS ; ProDOS in -> out (preserves registers+flags)
|
jsr SwapProDOS ; ProDOS in -> out (preserves registers+flags)
|
||||||
bit KEY ; preserves C
|
bit KEY ; preserves C
|
||||||
bmi Cancel
|
bmi Cancel
|
||||||
@@ -176,27 +175,27 @@ Pass
|
|||||||
sta +
|
sta +
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
+ !byte $FD ; SMC
|
+ !byte $FD ; SMC
|
||||||
jmp TheEnd
|
bvc .TheEnd ; always branches
|
||||||
|
|
||||||
Cancel
|
Cancel
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_canceled
|
!byte s_canceled
|
||||||
jmp TheEnd
|
bvc .TheEnd ; always branches
|
||||||
|
|
||||||
FatalError
|
FatalError
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_fail
|
!byte s_fail
|
||||||
lda gTrack
|
lda gTrack
|
||||||
cmp #$22
|
cmp #$22
|
||||||
bne @TheEnd
|
bne .TheEnd
|
||||||
lda gSector
|
lda gSector
|
||||||
cmp #$0F
|
cmp #$0F
|
||||||
beq @failont22s0f
|
beq @failont22s0f
|
||||||
ldx gIsDOS32
|
ldx gIsDOS32
|
||||||
bne @TheEnd
|
bne .TheEnd
|
||||||
cmp #$0C
|
cmp #$0C
|
||||||
bne @TheEnd
|
bne .TheEnd
|
||||||
@failont22s0f
|
@failont22s0f
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_fatal220f
|
!byte s_fatal220f
|
||||||
@TheEnd jmp TheEnd
|
.TheEnd jmp TheEnd
|
||||||
|
@@ -16,7 +16,6 @@
|
|||||||
!byte $4C,$A5,$00; JMP $00A5
|
!byte $4C,$A5,$00; JMP $00A5
|
||||||
!byte $C9,$A5 ; CMP #$A5
|
!byte $C9,$A5 ; CMP #$A5
|
||||||
bcs .exit ; passport-test-suite/Game Frame One.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Game Frame One.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx8
|
jsr inx8
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_a5count
|
!byte s_a5count
|
||||||
|
@@ -31,7 +31,6 @@
|
|||||||
!byte $AE,$F8,$01; LDX $01F8
|
!byte $AE,$F8,$01; LDX $01F8
|
||||||
!byte $A9
|
!byte $A9
|
||||||
bcs .exit
|
bcs .exit
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_a6bc95
|
!byte s_a6bc95
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -25,7 +25,6 @@
|
|||||||
!byte $74,$45,$09 ;LDA $C08C,X
|
!byte $74,$45,$09 ;LDA $C08C,X
|
||||||
!byte $D9,$32 ;BPL -$FB
|
!byte $D9,$32 ;BPL -$FB
|
||||||
bcs .exit ; passport-test-suite/S.A.G.A. 6.woz [C=0] matches
|
bcs .exit ; passport-test-suite/S.A.G.A. 6.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_advint
|
!byte s_advint
|
||||||
ldy #$03
|
ldy #$03
|
||||||
|
@@ -27,7 +27,6 @@
|
|||||||
STA ($3C),Y
|
STA ($3C),Y
|
||||||
@searchend
|
@searchend
|
||||||
bcs .exit ; passport-test-suite/Photar.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Photar.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_bytrack
|
!byte s_bytrack
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -31,7 +31,6 @@
|
|||||||
!byte $A6,WILDCARD
|
!byte $A6,WILDCARD
|
||||||
!byte $BD,$89,$C0
|
!byte $BD,$89,$C0
|
||||||
bcs .exit ; passport-test-suite/Odd One Out 1990.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Odd One Out 1990.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_bbf9
|
!byte s_bbf9
|
||||||
ldy #$02
|
ldy #$02
|
||||||
|
@@ -31,7 +31,6 @@
|
|||||||
!byte $38 ; SEC
|
!byte $38 ; SEC
|
||||||
!byte $60 ; RTS
|
!byte $60 ; RTS
|
||||||
bcs .exit ; passport-test-suite/Mr. Pixel's Programming Paint Set.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Mr. Pixel's Programming Paint Set.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx9
|
jsr inx9
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
|
@@ -50,7 +50,7 @@
|
|||||||
!byte $18 ; CLC
|
!byte $18 ; CLC
|
||||||
!byte $6D ; ADC
|
!byte $6D ; ADC
|
||||||
bcs .exit ; passport-test-suite/RoboMath.woz [C=0] matches
|
bcs .exit ; passport-test-suite/RoboMath.woz [C=0] matches
|
||||||
sta gDisplayBytes ; passport-test-suite/Notecard Maker.woz [C=0] matches
|
; passport-test-suite/Notecard Maker.woz [C=0] matches
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_d5d5f7
|
!byte s_d5d5f7
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -11,7 +11,6 @@
|
|||||||
jsr SearchTrack
|
jsr SearchTrack
|
||||||
!byte $5D,$D4,$80,$49,00,$19
|
!byte $5D,$D4,$80,$49,00,$19
|
||||||
bcs .exit ; passport-test-suite/Tomahawk.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Tomahawk.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_datasoft
|
!byte s_datasoft
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -17,7 +17,6 @@
|
|||||||
jsr SearchTrack
|
jsr SearchTrack
|
||||||
!byte $08,$80,$00,$FD,$1C,$D1,$0D,$EC
|
!byte $08,$80,$00,$FD,$1C,$D1,$0D,$EC
|
||||||
bcs .exit ; passport-test-suite/Read 'N Roll.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Read 'N Roll.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_badblock
|
!byte s_badblock
|
||||||
inx
|
inx
|
||||||
|
@@ -36,7 +36,6 @@
|
|||||||
!byte $8D
|
!byte $8D
|
||||||
;
|
;
|
||||||
bcs .exit ; passport-test-suite/Garfield Trivia Game.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Garfield Trivia Game.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_e7everywhere
|
!byte s_e7everywhere
|
||||||
ldy #$02
|
ldy #$02
|
||||||
|
@@ -119,7 +119,6 @@
|
|||||||
!byte $07,$01 ;SUB #$4d
|
!byte $07,$01 ;SUB #$4d
|
||||||
!byte $0F,$F5,$70 ;BNE $a9f6
|
!byte $0F,$F5,$70 ;BNE $a9f6
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -151,7 +150,6 @@
|
|||||||
!byte $D0,$7C ;BNE +$7C
|
!byte $D0,$7C ;BNE +$7C
|
||||||
!byte $60 ;RTS
|
!byte $60 ;RTS
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -173,7 +171,6 @@
|
|||||||
!byte $07,$1C ;SUB #$50
|
!byte $07,$1C ;SUB #$50
|
||||||
!byte $0F,$78,$60 ;BNE $B97B
|
!byte $0F,$78,$60 ;BNE $B97B
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -195,7 +192,6 @@
|
|||||||
!byte $20,$67,$67 ;JSR $6767
|
!byte $20,$67,$67 ;JSR $6767
|
||||||
!byte $20,$AA,$BF ;JSR $BFAA
|
!byte $20,$AA,$BF ;JSR $BFAA
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -212,7 +208,6 @@
|
|||||||
!byte $C9,$52 ;CMP #$52
|
!byte $C9,$52 ;CMP #$52
|
||||||
!byte $F0,$03 ;BEQ +$03
|
!byte $F0,$03 ;BEQ +$03
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
jsr inx6
|
jsr inx6
|
||||||
@@ -226,7 +221,6 @@
|
|||||||
!byte $C9,$52 ;CMP #$52
|
!byte $C9,$52 ;CMP #$52
|
||||||
!byte $D0,$DB ;BNE -$DB
|
!byte $D0,$DB ;BNE -$DB
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
jsr inx4
|
jsr inx4
|
||||||
@@ -364,7 +358,6 @@
|
|||||||
!byte $E9,$00 ;SBC #$00
|
!byte $E9,$00 ;SBC #$00
|
||||||
!byte $48 ;PHA
|
!byte $48 ;PHA
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
inx
|
inx
|
||||||
@@ -382,7 +375,6 @@
|
|||||||
!byte $C9,$A0 ;CMP #$A0
|
!byte $C9,$A0 ;CMP #$A0
|
||||||
!byte $F0 ;BEQ *+xx
|
!byte $F0 ;BEQ *+xx
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -407,7 +399,6 @@
|
|||||||
!byte $04,$F1,$70 ;LDA $a9f2
|
!byte $04,$F1,$70 ;LDA $a9f2
|
||||||
!byte $07 ;CMP #$xx
|
!byte $07 ;CMP #$xx
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -498,7 +489,6 @@
|
|||||||
!byte $5E,$00
|
!byte $5E,$00
|
||||||
!byte $5E,$0D
|
!byte $5E,$0D
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
inx
|
inx
|
||||||
@@ -538,7 +528,6 @@
|
|||||||
!byte $D0,$F8 ;BNE $8111
|
!byte $D0,$F8 ;BNE $8111
|
||||||
!byte $E6,$98 ;INC $98
|
!byte $E6,$98 ;INC $98
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
|
@@ -25,7 +25,6 @@ ERRORD51
|
|||||||
!byte $8D,WILDCARD,WILDCARD
|
!byte $8D,WILDCARD,WILDCARD
|
||||||
!byte $20
|
!byte $20
|
||||||
bcs @exit
|
bcs @exit
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
clc
|
clc
|
||||||
adc #BASEPAGE
|
adc #BASEPAGE
|
||||||
|
@@ -102,7 +102,6 @@
|
|||||||
!byte $F0,WILDCARD
|
!byte $F0,WILDCARD
|
||||||
!byte $BC,$8C,$C0
|
!byte $BC,$8C,$C0
|
||||||
bcs .exit ; passport-test-suite/Maniac Mansion.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Maniac Mansion.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_fbff
|
!byte s_fbff
|
||||||
ldy #$05
|
ldy #$05
|
||||||
|
@@ -33,7 +33,6 @@
|
|||||||
inx
|
inx
|
||||||
inx
|
inx
|
||||||
inx
|
inx
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_fbff
|
!byte s_fbff
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -27,7 +27,6 @@
|
|||||||
!byte $AC,$EC,$C0; LDY $C0EC
|
!byte $AC,$EC,$C0; LDY $C0EC
|
||||||
bcs .exit ; passport-test-suite/The Typewriter.woz [C=0] matches
|
bcs .exit ; passport-test-suite/The Typewriter.woz [C=0] matches
|
||||||
stx .a+1
|
stx .a+1
|
||||||
sta gDisplayBytes
|
|
||||||
adc #BASEPAGE ; carry is guaranteed to be clear here
|
adc #BASEPAGE ; carry is guaranteed to be clear here
|
||||||
sta .a+2
|
sta .a+2
|
||||||
ldy #$10 ; get the branch offset from the WILDCARD above
|
ldy #$10 ; get the branch offset from the WILDCARD above
|
||||||
|
@@ -17,10 +17,8 @@
|
|||||||
!byte $03,$31,$32,$38,$02,$31,$31,$02
|
!byte $03,$31,$32,$38,$02,$31,$31,$02
|
||||||
!byte $39,$36
|
!byte $39,$36
|
||||||
bcs .exit ; passport-test-suite/Essential Grammar.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Essential Grammar.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_poke
|
!byte s_poke
|
||||||
ldy #$12
|
|
||||||
jsr modify
|
jsr modify
|
||||||
!byte $34,$34,$01,$30,$02,$31,$30,$03
|
!byte $34,$34,$01,$30,$02,$31,$30,$03
|
||||||
!byte $32,$33,$34,$03,$31,$36,$39,$02
|
!byte $32,$33,$34,$03,$31,$36,$39,$02
|
||||||
|
@@ -35,8 +35,6 @@
|
|||||||
!byte $20
|
!byte $20
|
||||||
@search2end
|
@search2end
|
||||||
bcs .exit ; passport-test-suite/Super Taxman II.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Super Taxman II.woz [C=0] matches
|
||||||
|
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_hallabs
|
!byte s_hallabs
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -20,7 +20,6 @@
|
|||||||
!byte $D0,$01
|
!byte $D0,$01
|
||||||
!byte $60
|
!byte $60
|
||||||
bcs .exit ; passport-test-suite/Clue Master Detective.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Clue Master Detective.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
ldy #$01
|
ldy #$01
|
||||||
sty gDisplayBytes+1
|
sty gDisplayBytes+1
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
|
@@ -26,7 +26,6 @@
|
|||||||
!byte $8D,$08,$C0 ; STA $C008
|
!byte $8D,$08,$C0 ; STA $C008
|
||||||
!byte $B5,$42 ; LDA $42,X
|
!byte $B5,$42 ; LDA $42,X
|
||||||
bcs .exit ; passport-test-suite/Rosie the Counting Rabbit.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Rosie the Counting Rabbit.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_runhello
|
!byte s_runhello
|
||||||
inx
|
inx
|
||||||
|
@@ -20,7 +20,6 @@
|
|||||||
!byte $84,$27 ; STY $27
|
!byte $84,$27 ; STY $27
|
||||||
!byte $BD,$8C,$C0; LDA $C08C,X
|
!byte $BD,$8C,$C0; LDA $C08C,X
|
||||||
bcs .exit ; passport-test-suite/Miner 2049er.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Miner 2049er.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_microfun
|
!byte s_microfun
|
||||||
ldy #$02
|
ldy #$02
|
||||||
|
@@ -22,7 +22,6 @@
|
|||||||
!byte $10,$F7 ; BPL *-9
|
!byte $10,$F7 ; BPL *-9
|
||||||
!byte $4C,$E3,$93 ; JMP $93E3
|
!byte $4C,$E3,$93 ; JMP $93E3
|
||||||
bcs .exit ; passport-test-suite/Polywriter.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Polywriter.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_pdi
|
!byte s_pdi
|
||||||
jsr inx0C
|
jsr inx0C
|
||||||
|
@@ -26,7 +26,6 @@
|
|||||||
inx ; passport-test-suite/The Crimson Crown.woz [C=0] reaches here
|
inx ; passport-test-suite/The Crimson Crown.woz [C=0] reaches here
|
||||||
inx
|
inx
|
||||||
inx
|
inx
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_fbff
|
!byte s_fbff
|
||||||
ldy #$01
|
ldy #$01
|
||||||
@@ -43,7 +42,6 @@
|
|||||||
!byte $F0,$09 ; BEQ +9
|
!byte $F0,$09 ; BEQ +9
|
||||||
!byte $AE ; LDX
|
!byte $AE ; LDX
|
||||||
bcs .exit ; passport-test-suite/The Crimson Crown.woz [C=0] matches
|
bcs .exit ; passport-test-suite/The Crimson Crown.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx9
|
jsr inx9
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
|
@@ -14,7 +14,6 @@
|
|||||||
!byte $50,$54,$58,$5C,$60,$64,$68,$00
|
!byte $50,$54,$58,$5C,$60,$64,$68,$00
|
||||||
!byte $20,$10,$30,WILDCARD,$AA,$EB
|
!byte $20,$10,$30,WILDCARD,$AA,$EB
|
||||||
bcs + ; passport-test-suite/Mystery Objects v1.1.woz [C=0] matches
|
bcs + ; passport-test-suite/Mystery Objects v1.1.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx0B
|
jsr inx0B
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr compare
|
jsr compare
|
||||||
@@ -40,7 +39,6 @@
|
|||||||
!byte $24,$38
|
!byte $24,$38
|
||||||
!byte $60
|
!byte $60
|
||||||
bcs + ; passport-test-suite/Miner's Cave.woz [C=0] matches
|
bcs + ; passport-test-suite/Miner's Cave.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx9
|
jsr inx9
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
@@ -55,7 +53,6 @@
|
|||||||
!byte $81,$C0,$28,$D0,$09,$8D,WILDCARD,WILDCARD
|
!byte $81,$C0,$28,$D0,$09,$8D,WILDCARD,WILDCARD
|
||||||
!byte $C9,$DE,$F0,$02,$18,$24,$38,$60
|
!byte $C9,$DE,$F0,$02,$18,$24,$38,$60
|
||||||
bcs + ; passport-test-suite/Spelling Press v1.1.woz [C=0] matches
|
bcs + ; passport-test-suite/Spelling Press v1.1.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx0B
|
jsr inx0B
|
||||||
jsr inx0B
|
jsr inx0B
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -20,7 +20,6 @@ _prodosrwts
|
|||||||
!byte $F0,$01
|
!byte $F0,$01
|
||||||
!byte $38
|
!byte $38
|
||||||
bcs .exit ; passport-test-suite/Mystery Objects v1.1.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Mystery Objects v1.1.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx0F
|
jsr inx0F
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr compare
|
jsr compare
|
||||||
|
@@ -13,7 +13,6 @@
|
|||||||
!byte $A9,$D5
|
!byte $A9,$D5
|
||||||
!byte $8D,$7A,$BC
|
!byte $8D,$7A,$BC
|
||||||
bcs + ; passport-test-suite/Word Wizards v1.0.woz [C=0] matches
|
bcs + ; passport-test-suite/Word Wizards v1.0.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx5
|
jsr inx5
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
@@ -28,7 +27,6 @@
|
|||||||
!byte $A2,$06
|
!byte $A2,$06
|
||||||
!byte $BD
|
!byte $BD
|
||||||
bcs + ; passport-test-suite/Zoyon Patrol v1.0.woz [C=0] matches
|
bcs + ; passport-test-suite/Zoyon Patrol v1.0.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx4
|
jsr inx4
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
@@ -41,7 +39,6 @@
|
|||||||
!byte $D0,$11
|
!byte $D0,$11
|
||||||
!byte $B9
|
!byte $B9
|
||||||
bcs + ; passport-test-suite/MECC Dataquest Composer [C=0] matches
|
bcs + ; passport-test-suite/MECC Dataquest Composer [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx5
|
jsr inx5
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
@@ -58,7 +55,6 @@
|
|||||||
!byte $B9,WILDCARD,WILDCARD
|
!byte $B9,WILDCARD,WILDCARD
|
||||||
!byte $8D,$AC,$D5
|
!byte $8D,$AC,$D5
|
||||||
bcs + ; passport-test-suite/MECC Dataquest - Europe and Soviet Union.woz [C=0] matches
|
bcs + ; passport-test-suite/MECC Dataquest - Europe and Soviet Union.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
ldy #$03
|
ldy #$03
|
||||||
jsr modify
|
jsr modify
|
||||||
!byte $A9,$00
|
!byte $A9,$00
|
||||||
|
@@ -287,7 +287,7 @@
|
|||||||
!byte $BD,$89,$C0 ;LDA $C089,X
|
!byte $BD,$89,$C0 ;LDA $C089,X
|
||||||
jsr inx4
|
jsr inx4
|
||||||
bcs ++
|
bcs ++
|
||||||
+ sta gDisplayBytes
|
+
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_sierra
|
!byte s_sierra
|
||||||
ldy #$01
|
ldy #$01
|
||||||
@@ -307,7 +307,6 @@
|
|||||||
!byte WILDCARD ;INX or DEX
|
!byte WILDCARD ;INX or DEX
|
||||||
!byte $D0,$FB ;BNE *-5
|
!byte $D0,$FB ;BNE *-5
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
pha
|
pha
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
@@ -332,7 +331,6 @@
|
|||||||
!byte $CD,WILDCARD,WILDCARD ;CMP $xxxx
|
!byte $CD,WILDCARD,WILDCARD ;CMP $xxxx
|
||||||
!byte $D0,$30 ;BNE *+$32
|
!byte $D0,$30 ;BNE *+$32
|
||||||
bcs +
|
bcs +
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_tamper
|
!byte s_tamper
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -19,7 +19,6 @@
|
|||||||
!byte $A9,$FF
|
!byte $A9,$FF
|
||||||
!byte $48
|
!byte $48
|
||||||
bcs .exit ; passport-test-suite/Advanced Electricity.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Advanced Electricity.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr inx8
|
jsr inx8
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
|
@@ -21,7 +21,6 @@
|
|||||||
!byte $EA ; NOP
|
!byte $EA ; NOP
|
||||||
bcs + ; passport-test-suite/Epidemic.woz [C=0] matches
|
bcs + ; passport-test-suite/Epidemic.woz [C=0] matches
|
||||||
|
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_ssi
|
!byte s_ssi
|
||||||
ldy #$01
|
ldy #$01
|
||||||
@@ -35,7 +34,6 @@
|
|||||||
!byte $A9,$44 ; LDA #$22
|
!byte $A9,$44 ; LDA #$22
|
||||||
!byte $20 ; JSR ...
|
!byte $20 ; JSR ...
|
||||||
bcs .exit ; passport-test-suite/Sixgun Shootout.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Sixgun Shootout.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
ldy #$01
|
ldy #$01
|
||||||
jsr modify
|
jsr modify
|
||||||
!byte $60 ; RTS
|
!byte $60 ; RTS
|
||||||
|
@@ -26,7 +26,6 @@
|
|||||||
!byte $AD,$83,$C0; LDA $C083
|
!byte $AD,$83,$C0; LDA $C083
|
||||||
!byte $AD,$83,$C0; LDA $C083
|
!byte $AD,$83,$C0; LDA $C083
|
||||||
bcs .exit ; passport-test-suite/Rendezvous with Rama rev. 2.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Rendezvous with Rama rev. 2.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_trillium
|
!byte s_trillium
|
||||||
ldy #$01
|
ldy #$01
|
||||||
|
@@ -23,7 +23,6 @@
|
|||||||
!byte $D0,$05
|
!byte $D0,$05
|
||||||
!byte $A9,$00
|
!byte $A9,$00
|
||||||
bcs .exit ; passport-test-suite/PlayWriter.woz [C=0] matches
|
bcs .exit ; passport-test-suite/PlayWriter.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_badblock
|
!byte s_badblock
|
||||||
jsr inx4
|
jsr inx4
|
||||||
|
@@ -14,7 +14,6 @@
|
|||||||
!byte $4C,$4D,$D0,$E2,$28,$4B,$42,$C9 ; 'LM = PEEK(KB - 2058)' in BASIC
|
!byte $4C,$4D,$D0,$E2,$28,$4B,$42,$C9 ; 'LM = PEEK(KB - 2058)' in BASIC
|
||||||
!byte $32,$30,$35,$38
|
!byte $32,$30,$35,$38
|
||||||
bcs .exit ; passport-test-suite/Zoom Grafix 26-JAN-82.woz [C=0] matches
|
bcs .exit ; passport-test-suite/Zoom Grafix 26-JAN-82.woz [C=0] matches
|
||||||
sta gDisplayBytes
|
|
||||||
ldy #$00
|
ldy #$00
|
||||||
sty gDisplayBytes+1
|
sty gDisplayBytes+1
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
|
@@ -8,7 +8,8 @@ kForceLower !byte $FF ; AND mask for lowercase letters
|
|||||||
; auto-uppercases on older machines
|
; auto-uppercases on older machines
|
||||||
; in: string ID (byte) on stack
|
; in: string ID (byte) on stack
|
||||||
; out: all registers preserved
|
; out: all registers preserved
|
||||||
; all flags clobbered
|
; oVerflow bit clear
|
||||||
|
; all other flags clobbered
|
||||||
; stack set to after params
|
; stack set to after params
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
PrintByID
|
PrintByID
|
||||||
@@ -106,6 +107,7 @@ PrintByID
|
|||||||
pla
|
pla
|
||||||
tay
|
tay
|
||||||
pla
|
pla
|
||||||
|
clv
|
||||||
rts
|
rts
|
||||||
@include
|
@include
|
||||||
sta @id
|
sta @id
|
||||||
|
Reference in New Issue
Block a user