mirror of https://github.com/a2-4am/passport.git
36 lines
1.1 KiB
Plaintext
Executable File
36 lines
1.1 KiB
Plaintext
Executable File
;-------------------------------
|
|
; #ROL1E
|
|
; RWTS stores timing bits in $1E
|
|
; e.g. Spellicopter
|
|
;-------------------------------
|
|
_rol1e
|
|
lda #$03
|
|
ldx #$00
|
|
ldy #$2F
|
|
jsr compare ; if T00,S03,$00 ==
|
|
!byte $86,$1B,$BA,$BD,02,01,$85,03
|
|
!byte $18,$69,04,$85,05,$A0,00,$84
|
|
!byte 02,$A0,$40,$84,04,$A0,$39,$A9
|
|
!byte $93,$91,02,$C8,$A5,03,$91,02
|
|
!byte $A0,$7F,$B1,04,$99,00,08,$88
|
|
!byte $10,$F8,$A6,$1B,$4C,00,08
|
|
bcs rol1e_exit
|
|
lda #$03
|
|
ldx #$40
|
|
ldy #$28
|
|
jsr compare ; and T00,S03,$40 ==
|
|
!byte $A9,00,$A0,$EC,$91,02,$C8,$91
|
|
!byte 02,$A9,09,$A0,$F1,$91,02,$A9
|
|
!byte 08,$A0,$E1,$91,02,$A9,$4C,$85
|
|
!byte 01,$A9,$93,$85,02,$20,01,00
|
|
!byte $A0,00,$84,02,$A5,$1E,$85,08
|
|
bcs rol1e_exit
|
|
lda #s_rol1e
|
|
jsr PrintByID
|
|
lda #$03
|
|
ldx #$64
|
|
ldy #$02
|
|
jsr modify ; then set T00,S03,$64 =
|
|
!byte $A9,$F7
|
|
rol1e_exit
|