Posted By
SVS on 2018-05-21 12:19:57
| Re: $AB1E
There is a routine on Plus/4 O.S. that does this, at $8FFA. I attach it for you here below. You could search on your C8032 system for a similar code. It is not so easy because there are JSRs and JMPs that obviously are different in the 2 systems.
d 8ffa . 8ffa 20 8b 90 jsr $908b . 8ffd 20 79 04 jsr $0479 . 9000 f0 3c beq $903e . 9002 c9 fb cmp #$fb . 9004 d0 03 bne $9009 . 9006 4c f7 ae jmp $aef7 . 9009 f0 43 beq $904e . 900b c9 a3 cmp #$a3 . 900d f0 50 beq $905f d . 900f c9 a6 cmp #$a6 . 9011 18 clc . 9012 f0 4b beq $905f . 9014 c9 2c cmp #$2c . 9016 f0 37 beq $904f . 9018 c9 3b cmp #$3b . 901a f0 5e beq $907a . 901c 20 2c 93 jsr $932c . 901f 24 0d bit $0d . 9021 30 d7 bmi $8ffa . 9023 20 6f a4 jsr $a46f
|