Update a few hard-coded addresses to ROM routines

This commit is contained in:
david-schmidt 2018-09-22 13:16:29 -04:00
parent f486cfa19c
commit 943b95bbf7
6 changed files with 8 additions and 6 deletions

View File

@ -57,6 +57,8 @@ cout = $fded
move = $fe2c
inverse = $fe80
normal = $fe84
setkbd = $fe89
setvid = $fe93
outport = $fe95
monitor = $ff69

View File

@ -28,8 +28,8 @@ messx: lda msgp+1
suspend80:
.byte 0
on80: jsr $fe89
jsr $fe93
on80: jsr setkbd
jsr setvid
jsr f8rom_init ; $fb2f
jsr home
lsr suspend80

View File

@ -11,7 +11,7 @@ print_time:
jsr validate_year_number
sec
jsr $fe1f
jsr $fe1f ;an RTS in not-IIgs
bcs :+ ;not IIgs
lda cfgclock ;Use IIgs clock?
bne doGSclk

View File

@ -373,7 +373,7 @@ mg_notdl:
bmi noApple
not_CR: bit exec_flag
bmi lit_char ;was noApple 5-Feb-90
ldy $fbb3
ldy $fbb3 ;contains $38 (sec) in original Apple II ROM, $06 in IIe
cpy #6
bne noApple ;do we have a machine with an Apple key?
ldy button0 ;Apple key down?

View File

@ -97,7 +97,7 @@ two_e: ror two_e_flag
no80xc: txa
pha
sec
jsr $fe1f
jsr $fe1f ;Contains RTS in not-IIgs
pla
bcs no_IIgs
ora #%00001000 ;IIgs

View File

@ -489,7 +489,7 @@ HardCopy:
hc1:
lda $25 ;vertical position
jsr $fbc1 ;BASCALC
jsr bascalc
hc2: ldy $24 ;horizontal position
jsr fetch_ch
jsr hcwrite