Joshua Wise's Git repositories - fpgaboy.git/blame

Commit	Line	Data
3a0bde75 JW	1	PUTC: MACRO
	2	ld a, \1
	3	call putc
	4	ENDM
	5
	6	PUTS: MACRO
	7	ld hl, \1
	8	call puts
	9	ENDM
	10
	11	PUTSI: MACRO
	12	push hl
	13	call putsi
	14	db \1, 0
	15	pop hl
	16	ENDM
	17
	18	PUTSIL: MACRO
	19	push hl
	20	call putsi
	21	db \1, 13, 10, 0
	22	pop hl
	23	ENDM
	24
	25	PUTHEX: MACRO
	26	ld a, \1
	27	call puthex
	28	ENDM
	29
	30	SECTION "serial", HOME
	31
	32	putc:
	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
	42	puts:
	43	ld a, [hli]
	44	cp $00
	45	ret z
	46	call putc
	47	jr puts
	48
	49	EX_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
	62	putsi:
	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
78	puthex: ; 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
100	hex: db "0123456789ABCDEF"