passport/src/patchers/b4bbbasic.a
2021-06-21 10:33:16 -04:00

19 lines
573 B
Plaintext

;-------------------------------
; #B4BBBASIC
; RWTS swapper in BASIC
;
; tested on
; - SocMate Analogies Games
;-------------------------------
lda gPossibleB4BBBasic
bne +
ldy #$07
jsr SearchTrack
!byte $B9,$34,$37,$34 ; 'POKE 47445,' in Applesoft BASIC (POKE opcode is $B9)
!byte $34,$35,$2C
bcs + ; passport-test-suite/SocMate Analogies Games.woz [C=0] matches
jsr modify1
!byte $B2 ; change POKE opcode to REM
+