Header for : Build
Module size: $54  #84
Module CRC : $2F0C63 (Good)
Hdr parity : $7C
Exec. off  : $0013  #19
Data size  : $0243  #579
Edition    : $04  #4
Ty/La At/Rv: $11 $81
Prog mod, 6809 Obj, re-ent, R/O

* Disassembly by Os9disasm of build

 mod L0054,L000d,$11,$81,L0013,D0243

* OS-9 system function equates

F$Exit equ $06
I$Create equ $83
I$ReadLn equ $8b
I$WritLn equ $8c
I$Close equ $8f

* OS9 data area definitions

D0000 rmb 579
D0243 equ .

L000d fcb $42
 fcb $75
 rol   12,s
 andb  4,x
L0013 ldd   #$020b
 os9 I$Create
 bcs   L004c
 sta   D0000
L001d lda   #1
 leax  <L004f,pcr
 ldy   #2
 os9 I$WritLn
 clra  
 leax  1,u
 ldy   #$0080
 os9 I$ReadLn
 bcs   L0044
 cmpy  #1
 beq   L0044
 lda   D0000
 os9 I$WritLn
 bcc   L001d
 bra   L004c
L0044 lda   D0000
 os9 I$Close
 bcs   L004c
 clrb  
L004c os9 F$Exit
L004f swi   
 fcb $20

 emod 

L0054 equ *

 end

Return to OS-9 or Top