clt
vprw_start:
+ push yh
+ push yl
.if PORT_DEBUG > 1
tst temp2
brne dvp_1 ;don't debug console status
icall
rcall printhex
printstring " "
+ pop yl
+ pop yh
ret
dvp_2:
rcall printhex
printstring " "
- ijmp ; relative port # in temp3
+ ; relative port # in temp3
+ icall
+ pop yl
+ pop yh
+ ret
.else
- ijmp
+ icall
+ pop yl
+ pop yh
+ ret
.endif
vprw_exit:
vport_in_dummy:
ldi temp,0xff
vport_out_dummy:
+ pop yl
+ pop yh
ret