__main:
call c.ent
call _main
jmp c.ret
.:=.data
L5:
.:=.[01]
public _cpm
public _main
public __main
.:=.text
_main:
call c.ent
L1: / 11
hl=&0177777=>sp
hl=&06=>sp
call _cpm
af<=sp<=sp
a=c->L5
a=L5|a
jz L1
a=L5::03
jnz L11
hl=&0=>sp
call _cpm
af<=sp
L11: /23
a=L5->c+a-^a->b
sp<=bc
hl=&06=>sp
call _cpm
af<=sp<=sp
jmp L1