76 lines
761 B
NASM
76 lines
761 B
NASM
|
.feature c_comments
|
||
|
|
|
||
|
|
.zeropage
|
||
|
|
|
||
|
|
.segment "CODE"
|
||
|
|
|
||
|
|
.org $080D
|
||
|
|
main:
|
||
|
|
sei
|
||
|
|
lda #$35
|
||
|
|
sta $01
|
||
|
|
|
||
|
|
lda #127
|
||
|
|
sta $dc0d
|
||
|
|
|
||
|
|
and $d011
|
||
|
|
sta $d011
|
||
|
|
|
||
|
|
lda $dc0d
|
||
|
|
lda $dd0d
|
||
|
|
|
||
|
|
lda #<irq
|
||
|
|
sta $fffe
|
||
|
|
lda #>irq
|
||
|
|
sta $ffff
|
||
|
|
|
||
|
|
lda #$0b
|
||
|
|
sta $d011
|
||
|
|
lda #$00
|
||
|
|
sta $d012
|
||
|
|
|
||
|
|
lda #0
|
||
|
|
sta $d01a
|
||
|
|
|
||
|
|
lda #$63; <(985248/100)
|
||
|
|
sta $dc04
|
||
|
|
lda #$26;>(985248/100)
|
||
|
|
sta $dc05
|
||
|
|
|
||
|
|
lda $dc0d
|
||
|
|
and #$81
|
||
|
|
sta $dc0d
|
||
|
|
|
||
|
|
lda #$40
|
||
|
|
sta $dc0c
|
||
|
|
|
||
|
|
lda #$81
|
||
|
|
sta $dc0d
|
||
|
|
|
||
|
|
lda #0
|
||
|
|
jsr $1000
|
||
|
|
cli
|
||
|
|
jmp *
|
||
|
|
|
||
|
|
irq_music:
|
||
|
|
pha
|
||
|
|
txa
|
||
|
|
pha
|
||
|
|
tya
|
||
|
|
pha
|
||
|
|
|
||
|
|
inc $d020
|
||
|
|
jsr $1003
|
||
|
|
dec $d020
|
||
|
|
|
||
|
|
pla
|
||
|
|
tay
|
||
|
|
pla
|
||
|
|
tax
|
||
|
|
pla
|
||
|
|
;rti
|
||
|
|
jmp $dc0c
|
||
|
|
|
||
|
|
|
||
|
|
.res $1000-*
|
||
|
|
.incbin "ys2_sid.sid", $7e+($1000-$ff6)
|