Mercurial > hg > Members > kono > nitros9-code
annotate lib/kreiderclib/misc.as @ 2992:1d9ec36546c0
rules.mak: Mark as development version again
We are not bumping the version number before the next release
is ready. So 3.3.0 dev means 3.3.0 + dev
author | Tormod Volden <debian.tormod@gmail.com> |
---|---|
date | Mon, 14 Apr 2014 00:30:18 +0200 |
parents | 1647f1874cdf |
children |
rev | line source |
---|---|
2824 | 1 * Disassembly by Os9disasm of misc.r |
2 | |
3 section code | |
4 | |
5 * OS-9 system function equates | |
6 | |
7 F$Sleep equ $0a | |
8 F$PErr equ $0f | |
9 F$CRC equ $17 | |
10 | |
11 lock: rts | |
12 pause: ldx #0 | |
13 clrb | |
14 os9 F$Sleep | |
15 lbra _os9err | |
16 sync: rts | |
17 crc: pshs y,u | |
18 ldx 6,s | |
19 ldy 8,s | |
20 ldu 10,s | |
21 os9 F$CRC | |
22 puls y,u,pc | |
23 prerr: lda 3,s | |
24 ldb 5,s | |
25 os9 F$PErr | |
26 lblo _os9err | |
27 rts | |
28 tsleep: ldx 2,s | |
29 os9 F$Sleep | |
30 lblo _os9err | |
31 tfr x,d | |
32 rts | |
33 | |
34 endsect | |
35 |