add Gamco variant [fixes Percent]

This commit is contained in:
4am 2022-11-17 01:06:05 -05:00
parent cd37eaba50
commit 44a8aceb62
2 changed files with 16 additions and 2 deletions

View File

@ -16,12 +16,26 @@
!byte $33,$32,$01,$30,$03,$31,$39,$31
!byte $03,$31,$32,$38,$02,$31,$31,$02
!byte $39,$36
bcs .exit ; passport-test-suite/Essential Grammar.woz [C=0] matches
bcs .var2 ; passport-test-suite/Essential Grammar.woz [C=0] matches
jsr PrintByID
!byte s_poke
jsr modify
!byte $34,$34,$01,$30,$02,$31,$30,$03
!byte $32,$33,$34,$03,$31,$36,$39,$02
!byte $33,$39
bvc .exit
.var2
ldy #$12
jsr SearchTrack
!byte $32,$01,$30,$03,$31,$39,$31,$03
!byte $31,$32,$38,$03,$32,$35,$30,$02
!byte $33,$31
bcs .exit ; passport-test-suite/Percent (Gamco).woz [C=0] matches
jsr PrintByID
!byte s_poke
jsr modify
!byte $36,$01,$30,$03,$31,$36,$39,$03
!byte $31,$32,$38,$03,$31,$36,$39,$02
!byte $33,$39
.exit
}

View File

@ -373,7 +373,7 @@ StringTableHigh ; must be kept in sync with constants in enid.a
.passport
!text "Passport ",$00
.header
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2022-08-04",$00
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2022-11-17",$00
.bar9
!text "_________",$00
.bar18