shithub: pokecrystal

Download patch

ref: be7f9c18526cd14df0f2d7d4533c4261575dc399
parent: d3ecd6d10c61775e2ad384d37f0bca45c4b0c6fa
author: Lynn "Zhorken" Vaughan <[email protected]>
date: Mon May 14 12:16:20 EDT 2012

Add a byte fill function.

--- 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.