UNLINK

Header for : Unlink
Module size: $38  #56
Module CRC : $9C977B (Good)
Hdr parity : $10
Exec. off  : $0014  #20
Data size  : $0200  #512
Edition    : $02  #2
Ty/La At/Rv: $11 $81
Prog mod, 6809 Obj, re-ent, R/O

CODE

* Disassembly by Os9disasm of unlink

 mod L0038,L000d,$11,$81,L0014,D0200

* OS-9 system function equates

F$Link equ $00
F$UnLink equ $02
F$Exit equ $06

* OS9 data area definitions

 rmb 512
D0200 equ .

L000d fcb $55
 jmp   12,s
 rol   14,s
 addb  2,x
L0014 clra  
 clrb  
 os9 F$Link
 bcs   L0032
 os9 F$UnLink
 bcs   L0032
 os9 F$UnLink
 bcs   L0032
 lda   ,x+
 cmpa  #$2c
 beq   L0014
 lda   ,-x
 cmpa  #$0d
 bne   L0014
 clrb  
L0032 os9 F$Exit

 emod 

L0038 equ *

 end

RTS

Return to OS-9 or Top

This website uses cookies. By using the website, you agree with storing cookies on your computer. Also you acknowledge that you have read and understand our Privacy Policy. If you do not agree leave the website.More information about cookies