org 8130h

acall 8140h
mov c,x4
orl c,tb
mov tb,c
mov c,x5
anl c,x6
orl c,tb
mov p.4,c
ret
end