improve Micrograms ID and patcher (fixes Shapes and Patterns)

This commit is contained in:
4am 2017-12-29 10:35:48 -05:00
parent 9d9146382b
commit a28ab279df
3 changed files with 6 additions and 16 deletions

View File

@ -22,8 +22,8 @@ IDMicrograms
!byte $85,$3F !byte $85,$3F
bcs .exit bcs .exit
ldx #$42 ldx #$42
ldy #$03 ldy #$02
jsr compare jsr compare
!byte $4C,$00,$0D !byte $4C,$00
.exit rts .exit rts
} }

View File

@ -7,26 +7,16 @@
; Wild West Math Level 3 ; Wild West Math Level 3
; Wild West Math Level 4 ; Wild West Math Level 4
; Wild West Math Level 5 ; Wild West Math Level 5
; Shapes and Patterns
;------------------------------- ;-------------------------------
!zone { !zone {
lda #$06
ldx #$01
ldy #$09 ldy #$09
jsr compare ; if T00,S06,$01 == jsr SearchTrack
!byte $AD,$EC,$C0
!byte $10,$FB
!byte $C9,$BE
!byte $D0,$E5
bcc .patch
ldx #$07
ldy #$09
jsr compare ; or if T00,S06,$07 ==
!byte $AD,$EC,$C0 !byte $AD,$EC,$C0
!byte $10,$FB !byte $10,$FB
!byte $C9,$BE !byte $C9,$BE
!byte $D0,$E5 !byte $D0,$E5
bcs .exit bcs .exit
.patch
inx inx
inx inx
inx inx
@ -36,7 +26,7 @@
inx inx
inx inx
ldy #$01 ldy #$01
jsr modify ; then set T00,S06,$xx = jsr modify ; change BNE to continue instead
!byte $00 !byte $00
.exit .exit
} }

View File

@ -137,7 +137,7 @@ StringTable
; can be set directly before calling PrintByID. ; can be set directly before calling PrintByID.
; ;
.header .header
!text "Passport by 4am 2017-12-27",$00 !text "Passport by 4am 2017-12-29",$00
.mainmenu .mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " " !text " "