mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 21:41:27 +00:00
support Logic Builders
This commit is contained in:
parent
b87b0266e3
commit
d9d502d50c
|
@ -30,6 +30,7 @@
|
|||
; - Keyboard Golf
|
||||
; - L.A. Land Monopoly
|
||||
; - Lazersilk
|
||||
; - Logic Builders
|
||||
; - Microzine 3
|
||||
; - Microzine 4
|
||||
; - Microzine 5
|
||||
|
@ -224,6 +225,12 @@ Do555
|
|||
lda #0
|
||||
sta .hookseek+1
|
||||
ldx #$94
|
||||
lda $801,x
|
||||
cmp #$B7
|
||||
bne .not_e7
|
||||
ldx #$A2
|
||||
|
||||
.not_e7
|
||||
jmp .foundpart
|
||||
|
||||
.foundseek2
|
||||
|
@ -558,12 +565,12 @@ Do555
|
|||
ldy #$37
|
||||
lda ($3E),y
|
||||
cmp #$41 ; [INC] $41
|
||||
beq .notpatch1
|
||||
beq .jnotpatch1
|
||||
ldy $3A
|
||||
iny
|
||||
lda ($3E),y
|
||||
cmp #$4C
|
||||
beq .notpatch1
|
||||
beq .jnotpatch1
|
||||
tya
|
||||
clc
|
||||
adc #$0D
|
||||
|
@ -585,6 +592,21 @@ Do555
|
|||
!byte $E6,$41 ; INC $41
|
||||
!byte $EA ; NOP
|
||||
!byte $4C ; JMP $xxxx
|
||||
txa
|
||||
pha
|
||||
sec
|
||||
lda $3F
|
||||
sbc #BASEPAGE
|
||||
ldx #$9B
|
||||
jsr compare3
|
||||
!byte $20,$00,$02
|
||||
bcs .skip_e7
|
||||
jsr modify1
|
||||
!byte $2C
|
||||
|
||||
.skip_e7
|
||||
pla
|
||||
tax
|
||||
ldy .curtrk+1
|
||||
bpl .skipnohalf
|
||||
clc
|
||||
|
@ -613,6 +635,7 @@ Do555
|
|||
sta ($3C),y
|
||||
lda #0
|
||||
sta $3E
|
||||
.jnotpatch1
|
||||
beq .notpatch1
|
||||
|
||||
.skipnohalf
|
||||
|
|
|
@ -365,7 +365,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," 2021-09-06",$00
|
||||
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-09-07",$00
|
||||
.bar9
|
||||
!text "_________",$00
|
||||
.bar18
|
||||
|
|
Loading…
Reference in New Issue
Block a user