Apple-2-SW/IIcSystemClock
1
0
Fork 0
mirror of https://github.com/a2stuff/IIcSystemClock.git synced 2024-12-28 07:29:19 +00:00
Code Issues Projects Releases Wiki Activity

disasm: prodos calls

Browse Source
This commit is contained in:
Joshua Bell 2019-04-20 17:03:10 -07:00
parent ab7f24bb3c
commit acd10c460c
1 changed files with 19 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
clock.system.s
View File

@ -652,9 +652,8 @@ L24BF: lda $BF90,y
bpl L24BF bpl L24BF
lda #OPC_RTS lda #OPC_RTS
sta DATETIME sta DATETIME
jsr PRODOS PRODOS_CALL $C3, $11F9
.byte $C3 .byte $D0
sbc $D011,y
asl $A9 asl $A9
jmp L068D jmp L068D
@ -669,28 +668,25 @@ L24BF: lda $BF90,y
jsr RDKEY jsr RDKEY
jmp L111A jmp L111A
jsr PRODOS PRODOS_CALL $C8, $11E9
iny
sbc #$11
bne L2546 bne L2546
lda $11EE lda $11EE
sta $11F0 sta $11F0
jsr PRODOS
dex PRODOS_CALL $CA, $11EF
.byte $EF .byte $D0
ora ($D0),y
.byte $43 .byte $43
jsr PRODOS
cpy $11F7 PRODOS_CALL $CC, $11F7
bne L2546 bne L2546
rts rts
lda $BF30 lda $BF30
sta $11DD sta $11DD
sta $11E4 sta $11E4
jsr PRODOS
cmp $DC PRODOS_CALL $C5, $11DC
ora ($D0),y .byte $D0
and #$AD and #$AD
.byte $0C .byte $0C
.byte $12 .byte $12
@ -700,20 +696,18 @@ L24BF: lda $BF90,y
sty $120B sty $120B
lda #$2F lda #$2F
sta $120C sta $120C
jsr PRODOS
dec $E0 PRODOS_CALL $C6, $11E0
ora ($D0),y .byte $D0
.byte $12 .byte $12
jsr PRODOS
cpy $F9 PRODOS_CALL $C4, $11F9
ora ($D0),y .byte $D0
asl a asl a
rts rts
jsr PRODOS PRODOS_CALL $80, $11E3
.byte $80 .byte $D0
.byte $E3
ora ($D0),y
ora ($60,x) ora ($60,x)
L2546: ldy #$02 L2546: ldy #$02
sty $0B sty $0B