BUILD
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
CODE
* 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
RTS