Dashing mimics and crystal books
This commit is contained in:
52
crystalswitchbook.asm
Normal file
52
crystalswitchbook.asm
Normal file
@@ -0,0 +1,52 @@
|
||||
pushpc
|
||||
|
||||
org $87A46E
|
||||
JSL CheckBookTriggerSwitch
|
||||
BCS +
|
||||
skip 15
|
||||
+
|
||||
|
||||
org $8296A8
|
||||
JSL FinishPegChange
|
||||
|
||||
pullpc
|
||||
|
||||
FinishPegChange:
|
||||
LDA.b #$20
|
||||
TRB.w $037A
|
||||
|
||||
STZ.b $B0
|
||||
STZ.b $11
|
||||
RTL
|
||||
|
||||
CheckBookTriggerSwitch:
|
||||
LDA.l CrystalSwitchBook
|
||||
BEQ +
|
||||
|
||||
LDA.b $10
|
||||
CMP.b #$07
|
||||
BNE +
|
||||
|
||||
LDA.l $7EC172
|
||||
EOR.b #$01
|
||||
STA.l $7EC172
|
||||
|
||||
LDA.b #$16
|
||||
STA.b $11
|
||||
|
||||
LDA.b #$20
|
||||
TSB.w $037A
|
||||
|
||||
LDA.b #$25
|
||||
JSL $8DBB8A
|
||||
|
||||
SEC
|
||||
BRA .done
|
||||
|
||||
+ CLC
|
||||
.done
|
||||
; what we wrote over
|
||||
LDA.b $3A
|
||||
AND.b #$BF
|
||||
STA.b $3A
|
||||
RTL
|
||||
Reference in New Issue
Block a user