ARP responder
[fpgaboy.git] / serial.inc
CommitLineData
3a0bde75
JW
1PUTC: MACRO
2 ld a, \1
3 call putc
4 ENDM
5
6PUTS: MACRO
7 ld hl, \1
8 call puts
9 ENDM
10
11PUTSI: MACRO
12 push hl
13 call putsi
14 db \1, 0
15 pop hl
16 ENDM
17
18PUTSIL: MACRO
19 push hl
20 call putsi
21 db \1, 13, 10, 0
22 pop hl
23 ENDM
24
25PUTHEX: MACRO
26 ld a, \1
27 call puthex
28 ENDM
29
30 SECTION "serial", HOME
31
32putc:
33 push af
34.waitport:
35 ld a,[$FF53]
36 and $01
37 jr nz,.waitport
38 pop af
39 ld [$FF52],a
40 ret
41
42puts:
43 ld a, [hli]
44 cp $00
45 ret z
46 call putc
47 jr puts
48
49EX_SP_HL: MACRO
50 push de
51 di
52 add sp, 2
53 pop de
54 push hl
55 ld l, e
56 ld h, d
57 add sp, -2
58 ei
59 pop de
60 ENDM
61
62putsi:
63 pop hl
64 push af
65 push bc
66 push de
67.lp: ld a, [hli]
68 or a
69 jr z, .done
70 call putc
71 jr .lp
72.done: pop de
73 pop bc
74 pop af
75 push hl
76 ret
77
78puthex: ; Put two hex nibbles to the serial console.
79 push bc
80 push hl
81 push af
82 swap a
83 and $0F
84 ld hl,hex
85 ld b,0
86 ld c,a
87 add hl,bc
88 ld a, [hl]
89 call putc
90 pop af
91 and $0F
92 ld hl,hex
93 ld c,a
94 add hl,bc
95 ld a, [hl]
96 call putc
97 pop hl
98 pop bc
99 ret
100hex: db "0123456789ABCDEF"
This page took 0.025093 seconds and 4 git commands to generate.