+.wait: ld a, [c]
+ cp $00
+ jr nz, .wait
+
+ ld h, a
+ ld l, a
+ ld [hl], $01 ; Select the GB boot rom
+
+ ld a, $55
+ ld [c], a
+
+ ld hl, booting
+ call puts
+
+ rst $00 ; Boot
+
+putc:
+ ld c, $53
+ push af
+.waitport:
+ ld a,[c]
+ cp $00
+ jr nz,.waitport
+ pop af
+ ld [$FF52],a
+ ret
+
+puts:
+ ld a, [hli]
+ cp $00
+ ret z
+ call putc
+ jr puts
+
+signon:
+ db $0D,$0A,$1B,"[1mFPGABoy Boot ROM",$1B,"[0m",$0D,$0A,0
+booting:
+ db "Booting...",$0D,$0A,0
+
+