====== LINK ======
<code>
Header for : Link
Module size: $2C  #44
Module CRC : $F239C2 (Good)
Hdr parity : $04
Exec. off  : $0012  #18
Data size  : $01C2  #450
Edition    : $04  #4
Ty/La At/Rv: $11 $81
Prog mod, 6809 Obj, re-ent, R/O

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

 mod L002c,L000d,$11,$81,L0012,D01c2

* OS-9 system function equates

F$Link equ $00
F$Exit equ $06

* OS9 data area definitions

 rmb 450
D01c2 equ .

L000d inca  
 rol   14,s
 addb  4,x
L0012 clra  
 clrb  
 os9 F$Link
 bcs   L0026
 lda   ,x+
 cmpa  #$2c
 beq   L0012
 lda   ,-x
 cmpa  #$0d
 bne   L0012
 clrb  
L0026 os9 F$Exit

 emod 

L002c equ *

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