From 318331120b0bd48a06902e70a63b4f536a85de5f Mon Sep 17 00:00:00 2001
From: Joshua Wise <joshua@rebirth.joshuawise.com>
Date: Sat, 5 Apr 2008 00:56:08 -0400
Subject: [PATCH] Test interrupts. They work!

---
 FPGABoy.ise | Bin 240439 -> 240442 bytes
 rom.asm     |  56 ++++++++++++++++++++++++----------------------------
 2 files changed, 26 insertions(+), 30 deletions(-)

diff --git a/FPGABoy.ise b/FPGABoy.ise
index 3562e2939347135378f2138caa6b9fb7e0726134..7ef4156167ad5f7bf685c02e058026229cb6c003 100644
GIT binary patch
delta 55
zcmdmfjc?aAzJ?aY7N#xC`=@a_3$o?wGcYjdPtR>;mYDuv8nXmjQf5hdYTowW)0oXf
K*i=?C1Em2ZFA=u@

delta 52
zcmdmWjc@xkzJ?aY7N#xC`=@cv<XN^thk=1XXL@ckv&8fV)0icg3lfXA|C`2aCc>t;
Ini(hu01_e*q5uE@

diff --git a/rom.asm b/rom.asm
index 7994d3e..437f01e 100644
--- a/rom.asm
+++ b/rom.asm
@@ -9,15 +9,38 @@ main:
 
 	ld hl, signon
 	call puts
+
+	ld c, $07
+	ld a, $04	;start timer, 4.096KHz
+	ld [c], a
+	ei
 	
 	call memtest
 
 	call insntest
 
 	call waitsw
+	di
 
 	jr main
 
+	section "fuq",HOME[$100]
+irqhand:
+	PUSH AF
+	PUSH BC
+	PUSH DE
+	PUSH HL
+	xor a
+	ld c, $0F	; ack the irq
+	ld [c], a
+	ld a, $41	; print A
+	call putc
+	POP HL
+	POP DE
+	POP BC
+	POP AF
+	RETI
+
 signon:
 	db $0D,$0A,$1B,"[1mFPGABoy Diagnostic ROM",$1B,"[0m",$0D,$0A,0
 
@@ -103,23 +126,13 @@ puthex:				; Put two hex nibbles to the serial console.
 waitsw:
 	ld hl,waitswstr
 	call puts
-	
-	ld c, $07
-	ld a, $04	;start timer, 4.096KHz
-	ld [c], a
-	
+
 	ld c, $51
-	ld a, $00
+	xor a
 	ld [c],a
 	
-	ld e, a
-	
-.loop1:
-	push bc
-	call testa
-	pop bc
-	ld c, $51
 	ld b, $0
+.loop1:
 	ld a,[c]
 	cp b
 	jr z,.loop1
@@ -132,23 +145,6 @@ waitsw:
 waitswstr:
 	db "Diagnostic ROM complete; flip switches to nonzero and then to zero to reset. Expect A.",$0D,$0A,0
 
-testa:
-	ld c, $0F
-	ld a, [c]
-	ld b, $00
-	cp b
-	ret z
-	xor a
-	ld [c], a
-	ld a, $41
-	call putc
-	ld a, 1
-	add e
-	ld c, $51
-	ld [c], a
-	ld e, a
-	ret
-
 ; Core instruction basic acceptance tests.
 insntest:
 	ld hl, .insnteststr
-- 
2.39.2