ld hl, signon
call puts
+ ld a, $91
+ ld [$FF40], a
+
call putscreen
ei
db %00000000
putscreen:
+ LD A,$fc ; $001d Setup BG palette
+ LD [$FF47],A ; $001f
+
; Wait for vblank
call .vblwait
ld a,[c]
cp $0
jr z,.loop1
-.loop2:
- ld a,[c]
+
+.loop2: ld a,[c]
cp $0
jr nz,.loop2
ret