- section "end",HOME[1024]
- nop
-
SECTION "a",HOME[$00]
-start: jp main
+start: ld a, $AA
+ ld [$FF51], a
+ jr start
section "vbl",HOME[$40]
jp vbl
section "tmro",HOME[$50]
jp tmro
+ SECTION "b",HOME[$100]
+boot: jr main ; $0100
+ nop ; $0102
+ nop ; $0103
+ ;Nintendo Logo ; $0104
+ DB $CE,$ED,$66,$66,$CC,$0D,$00,$0B,$03,$73,$00,$83,$00,$0C,$00,$0D
+ DB $00,$08,$11,$1F,$88,$89,$00,$0E,$DC,$CC,$6E,$E6,$DD,$DD,$D9,$99
+ DB $BB,$BB,$67,$63,$6E,$0E,$EC,$CC,$DD,$DC,$99,$9F,$BB,$B9,$33,$3E
+ ;$0134
+ DB $00,$E7,$00,$00,$00,$00,$00,$00, $00,$00,$00,$00,$00,$00,$00,$00
+ ;$0144
+ DB $00,$00,$00,$00,$00,$00,$00,$00, $00,$00,$00,$00,$00,$00,$00,$00
+
main:
ld a, $FF
ld c, $51
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
; Serial port manipulation functions.
putc:
- ld c, $50
+ ld c, $53
push af
.waitport:
ld a,[c]
- cp $00
+ and $01
jr nz,.waitport
pop af
- ld [c],a
+ ld [$FF52],a
ret
puts: