Mercurial > hg > Members > kono > nitros9-code
annotate lib/kreiderclib/ss1.as @ 3226:9749d0dfc4a2
Changed a puls PC to rts to save cycles
author | David Ladd <drencor-xeen@users.sourceforge.net> |
---|---|
date | Sat, 20 Jan 2018 19:32:22 -0600 |
parents | 1647f1874cdf |
children |
rev | line source |
---|---|
2824 | 1 * Disassembly by Os9disasm of ss1.r |
2 | |
3 section code | |
4 | |
5 * OS-9 system function equates | |
6 | |
7 I$SetStt equ $8e | |
8 | |
9 _ss_rel: ldb #$1b | |
10 bra L0018 | |
11 _ss_rest: ldb #3 | |
12 bra L0018 | |
13 _ss_opt: ldb #0 | |
14 bra L0016 | |
15 _ss_pfd: ldb #$0f | |
16 bra L0016 | |
17 _ss_ssig: ldb #$1a | |
18 bra L0016 | |
19 _ss_tiks: ldb #$10 | |
20 L0016 ldx 4,s | |
21 L0018 lda 3,s | |
22 os9 I$SetStt | |
23 lbra _sysret | |
24 | |
25 endsect | |
26 |