Apple-2-SW/davex-mg-utils
1
0
Fork 0
mirror of https://github.com/mgcaret/davex-mg-utils.git synced 2024-12-22 00:29:15 +00:00
Code Issues Projects Releases Wiki Activity

iie.card: better speed setter routine; mig.insp: enable ROM ID

Browse Source
This commit is contained in:
mgcaret 2017-09-26 19:13:40 -07:00
parent b9a7876f62
commit b8cba65dec
2 changed files with 12 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
iie.card.s
View File

@ -99,20 +99,19 @@ fast: jsr xmess
rts
.endproc
.proc setspeed
cpy #$00
lda #%00000100 ; bit position of speed in $c05c and $c02b
cpy #$00 ; y reg will determine selected speed. Is 0?
beq norm ; set normal
dey
beq fast
lda $c05c
and #%00000100 ; bit 2 = option panel speed
beq norm
fast: lda #%00000100
ora $c02b
store: sta $c02b
dey ; is 1?
beq fast ; fast instead
; default fall through to option panel speed
trb $c02b ; default to slow
and $c05c ; bit 2 of $c05c reflects option panel setting
; fall through to tsb, which will do nothing if a = $00 (slow)
fast: tsb $c02b
rts
norm: trb $c02b
rts
norm: lda #%11111011
and $c02b
bra store
.endproc
.proc dispslot
jsr xmess

2
mig.insp.s
View File

@ -45,7 +45,7 @@
.include "davex-mg.inc"
; build options
SKIPROMID = 1 ; skip ROM identification
SKIPROMID = 0 ; skip ROM identification
; lets you use on a non-
; IIc Plus, but obviously
; isn't useful beyond some