vvblkd equ $0224›setvblkd equ $e45c›musadr equ $8000›play equ $9400›song equ $02›› opt %10101› org $9000›› jmp init››zaloz ldx musadr› lda #$70›› jsr play+3›› lda #$00› ldx #song›› jsr play+3›› lda vvblkd› sta skok› lda vvblkd+1› sta skok+1›› ldy przerw›› lda #$07›› jsr setvblkd›› lda #$01› sta temp› rts››skok dta c''›temp dta c''››przerw ldx #0› txa›› jsr play+6› jmp (skok)››stop ldy skok› ldx skok+1› lda #$07› jsr setvblkd›› ldx musadr› lda #$40›› jsr play+3›› lda #$00› sta temp› rts››init lda temp›› cmp #$00› beq skok_1›› cmp #$01› beq skok_2›› rts››skok_1 jmp zaloz›skok_2 jmp stop›› end of file.››