====== SLEEP ======
<code>
Header for : Sleep
Module size: $4D  #77
Module CRC : $610935 (Good)
Hdr parity : $65
Exec. off  : $0013  #19
Data size  : $0200  #512
Edition    : $01  #1
Ty/La At/Rv: $11 $81
Prog mod, 6809 Obj, re-ent, R/O

</code>
===== CODE =====
<code>
* Disassembly by Os9disasm of sleep

 mod L004d,L000d,$11,$81,L0013,D0200

* OS-9 system function equates

F$Exit equ $06
F$Sleep equ $0a

* OS9 data area definitions

 rmb 512
D0200 equ .

L000d comb  
 inc   5,s
 fcb $65
 subb  $014f
L0013 equ *-1
 clrb  
 bsr   L0028
 bsr   L0028
 bsr   L0028
 bsr   L0028
 bsr   L0028
 tfr   d,x
 os9 F$Sleep
 clrb  
 os9 F$Exit
L0028 pshs  d
 ldb   ,x
 subb  #$30
 bcs   L0048
 cmpb  #9
 bhi   L0048
 leax  1,x
 pshs  b
 ldb   #$0a
 mul   
 stb   1,s
 lda   2,s
 ldb   #$0a
 mul   
 addb  ,s+
 adca  ,s
 std   ,s
L0048 puls  d,pc

 emod 

L004d equ *

 end
</code>
===== RTS =====
Return to [[:OS-9:]] or [[:Top:]]