From be7f9c18526cd14df0f2d7d4533c4261575dc399 Mon Sep 17 00:00:00 2001
From: "Lynn \"Zhorken\" Vaughan" <zhorken@gmail.com>
Date: Mon, 14 May 2012 16:16:20 -0400
Subject: [PATCH] Add a byte fill function.

---
 main.asm | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/main.asm b/main.asm
index 1d507d16f..285327f04 100644
--- a/main.asm
+++ b/main.asm
@@ -1,6 +1,20 @@
 SECTION "bank0",HOME
 
-INCBIN "baserom.gbc",$0,$304d
+INCBIN "baserom.gbc",$0,$3041
+
+ByteFill:  ; 0x3041
+; fill BC bytes with the value of A, starting at HL
+	inc b  ; we bail *when* b hits 0, so include the last run
+	inc c  ; same thing; include last byte
+	jr .HandleLoop
+.PutByte
+	ld [hli], a
+.HandleLoop
+	dec c
+	jr nz, .PutByte
+	dec b
+	jr nz, .PutByte
+	ret
 
 GetFarByte: ; 0x304d
 ; retrieve a single byte from a:hl, and return it in a.