prepare to add an info view
This commit is contained in:
parent
9efc469146
commit
216518d65b
|
@ -47,18 +47,25 @@ startPlayer:
|
||||||
; draw some text
|
; draw some text
|
||||||
lda #$20
|
lda #$20
|
||||||
sta PPUADDR
|
sta PPUADDR
|
||||||
lda #$42
|
lda #$40
|
||||||
sta PPUADDR
|
sta PPUADDR
|
||||||
|
|
||||||
ldx #$00
|
lda #<screenText
|
||||||
- lda helloWorld.w,x
|
sta $00
|
||||||
beq +
|
lda #>screenText
|
||||||
|
sta $01
|
||||||
|
ldy #0
|
||||||
|
clc
|
||||||
|
- lda ($00),y
|
||||||
|
beq ++
|
||||||
sta PPUDATA
|
sta PPUDATA
|
||||||
inx
|
inc $00
|
||||||
bne -
|
bne -
|
||||||
|
inc $01
|
||||||
|
bcc -
|
||||||
|
|
||||||
; set palette
|
; set palette
|
||||||
+ bit PPUSTATUS
|
++ bit PPUSTATUS
|
||||||
lda #$3f
|
lda #$3f
|
||||||
sta PPUADDR
|
sta PPUADDR
|
||||||
lda #$00
|
lda #$00
|
||||||
|
@ -137,8 +144,18 @@ fcsCmdTableHigh=fcsCmdTableExample
|
||||||
.include "../stream.s"
|
.include "../stream.s"
|
||||||
|
|
||||||
; data
|
; data
|
||||||
helloWorld:
|
screenText:
|
||||||
.db "Furnace Test Player"
|
.db " Furnace Test Player "
|
||||||
|
.db " "
|
||||||
|
.db " channel "
|
||||||
|
.db " "
|
||||||
|
.db " PC tick "
|
||||||
|
.db " note pitch "
|
||||||
|
.db " vib vibPos "
|
||||||
|
.db " arp porta "
|
||||||
|
.db " vol volS "
|
||||||
|
.db " pan "
|
||||||
|
.db " "
|
||||||
.db 0
|
.db 0
|
||||||
|
|
||||||
ppuPalette:
|
ppuPalette:
|
||||||
|
|
Loading…
Reference in a new issue