dos33fsprogs/music/tiny_tracker6/d4.s
2022-11-09 23:22:57 -05:00

45 lines
597 B
ArmAsm

; Apple II graphics/music in 1k
; by deater (Vince Weaver) <vince@deater.net>
; Zero Page
.include "zp.inc"
.include "hardware.inc"
d4:
;=================
; init vars
lda #0
sta FRAME
sta WHICH_TRACK
;===================
; music Player Setup
tracker_song = peasant_song
; assume mockingboard in slot#4
; inline mockingboard_init
.include "mockingboard_init.s"
.include "tracker_init.s"
jsr SETGR ; enable lo-res graphics
cli ; enable music
game_loop:
jmp game_loop
.include "interrupt_handler.s"
.include "mockingboard_constants.s"
; music
.include "mA2E_4.s"