gate on matching RWTS code

This commit is contained in:
4am 2021-03-01 00:27:38 -05:00
parent efcfdd8aa2
commit 198b432bc6
2 changed files with 15 additions and 2 deletions

View File

@ -792,7 +792,7 @@ _applyToAll
!source "patchers/bbf9.a" ; gIsProDOS only
!source "patchers/memory.config.a" ; gIsProDOS only
!source "patchers/origin.a" ; gIsProDOS only
!source "patchers/meccdbc.a" ; gMECCFastloadType==1 && gT07 only
!source "patchers/meccdqc.a" ; gMECCFastloadType==1 && gT07 only
!source "patchers/rwtsswapmecc.a" ; gMECCFastloadType only
!source "patchers/rwtsswapmecc2.a" ; gPossibleMECCSwapper only
!source "patchers/rwtsswappenguin.a" ; T01 only

View File

@ -1,5 +1,7 @@
;-------------------------------
; #MECCDBC
; #MECCDQC
; additional shenanigans in
; MECC Database Composer
;-------------------------------
!zone {
bit gMode ; nothing to do here in verify-only mode
@ -10,6 +12,17 @@
lda gMECCFastloadType
cmp #ID_MECC1
bne .jmpexit
lda #$0B
ldx #$02
ldy #$06
jsr compare
!byte $BD,$8C,$C0
!byte $10,$FB
!byte $C9
bcs .exit ; passport-test-suite/MECC Dataquest Composer.woz [C=0] matches
lda gMECCFastloadType
asl
asl
asl