Header for : Tee Module size: $7D #125 Module CRC : $070490 (Good) Hdr parity : $55 Exec. off : $0011 #17 Data size : $02D1 #721 Edition : $02 #2 Ty/La At/Rv: $11 $81 Prog mod, 6809 Obj, re-ent, R/O
* Disassembly by Os9disasm of tee mod L007d,L000d,$11,$81,L0011,D02d1 * OS-9 system function equates F$Exit equ $06 I$Create equ $83 I$ReadLn equ $8b I$WritLn equ $8c * OS9 data area definitions rmb 721 D02d1 equ . L000d lsrb fcb $65 bitb 2,x L0011 clrb clr 14,u cmpy #0 lbeq L0076 leay 1,u L001e lda ,x+ cmpa #$20 beq L001e cmpa #$2c beq L001e cmpa #$0d lbeq L0042 leax -1,x lda #2 ldb #$0b os9 I$Create bcs L0077 ldb 14,u sta b,y incb stb 14,u bra L001e L0042 stb 14,u L0044 clra leax 15,u ldy #$0100 os9 I$ReadLn bcc L0057 cmpb #$d3 beq L0076 coma bra L0077 L0057 inca os9 I$WritLn tst 14,u beq L0044 clrb L0060 leay 1,u lda b,y leax 15,u ldy #$0100 os9 I$WritLn bcs L0077 incb cmpb 14,u bne L0060 bra L0044 L0076 clrb L0077 os9 F$Exit emod L007d equ * end