Terminal program for MailStation devices
lpt: restore djnz's that were changed to jr while debugging
+2
-2
+2
-2
lpt.s
+2
-2
lpt.s
···
46
46
in a, (STATUS)
47
47
and #LPT_STROBE_IN ; inb(STATUS) & stbin
48
48
jr nz, got_strobe
49
-
jr wait_for_strobe
49
+
djnz wait_for_strobe
50
50
strobe_failed:
51
51
ld h, #1
52
52
ld l, #0
···
65
65
in a, (STATUS)
66
66
and #LPT_STROBE_IN ; inb(STATUS) & stbin
67
67
jr z, lptrecv_tribble_out
68
-
jr wait_for_unstrobe
68
+
djnz wait_for_unstrobe
69
69
; if we never get unstrobe, that's ok
70
70
lptrecv_tribble_out:
71
71
ld a, #LPT_BUSY_OUT ; raise busy/ack