2023-12-15 05:00:24 +00:00
|
|
|
; XMAS 2023
|
2023-12-05 03:17:22 +00:00
|
|
|
|
|
|
|
|
.include "hardware.inc"
|
|
|
|
|
.include "zp.inc"
|
|
|
|
|
.include "qload.inc"
|
|
|
|
|
.include "music.inc"
|
|
|
|
|
|
|
|
|
|
|
2023-12-15 05:00:24 +00:00
|
|
|
xmas_main:
|
|
|
|
|
|
|
|
|
|
;======================================
|
|
|
|
|
; init
|
|
|
|
|
;======================================
|
2023-12-05 03:17:22 +00:00
|
|
|
|
|
|
|
|
lda #$00
|
|
|
|
|
sta DRAW_PAGE
|
|
|
|
|
sta clear_all_color+1
|
|
|
|
|
|
|
|
|
|
lda #$04
|
|
|
|
|
sta DRAW_PAGE
|
|
|
|
|
jsr clear_all
|
|
|
|
|
|
2023-12-15 05:00:24 +00:00
|
|
|
;======================================
|
|
|
|
|
; draw opening scene
|
|
|
|
|
;======================================
|
2023-12-05 03:17:22 +00:00
|
|
|
|
2023-12-23 22:12:56 +00:00
|
|
|
jsr fireplace_opener
|
2023-12-05 03:17:22 +00:00
|
|
|
|
2023-12-23 21:55:41 +00:00
|
|
|
repeat:
|
|
|
|
|
|
2023-12-23 19:44:06 +00:00
|
|
|
;======================================
|
|
|
|
|
; 3D tree
|
|
|
|
|
;======================================
|
|
|
|
|
|
|
|
|
|
jsr regular_tree
|
|
|
|
|
|
2023-12-15 05:00:24 +00:00
|
|
|
;======================================
|
|
|
|
|
; plasma tree
|
|
|
|
|
;======================================
|
2023-12-05 03:17:22 +00:00
|
|
|
|
2023-12-15 05:00:24 +00:00
|
|
|
jsr plasma_tree
|
2023-12-05 03:17:22 +00:00
|
|
|
|
2023-12-24 04:56:36 +00:00
|
|
|
;======================================
|
|
|
|
|
; snowflakes
|
|
|
|
|
;======================================
|
|
|
|
|
|
|
|
|
|
jsr do_snow
|
|
|
|
|
|
2023-12-05 03:17:22 +00:00
|
|
|
|
2023-12-23 22:12:56 +00:00
|
|
|
;======================================
|
|
|
|
|
; fireplace without vapor lock
|
|
|
|
|
;======================================
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
jsr fireplace_restart
|
|
|
|
|
|
2023-12-15 05:00:24 +00:00
|
|
|
finished:
|
2023-12-23 21:55:41 +00:00
|
|
|
jmp repeat
|
2023-12-05 03:17:22 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
.include "wait_keypress.s"
|
|
|
|
|
.include "irq_wait.s"
|
|
|
|
|
|
2023-12-15 05:00:24 +00:00
|
|
|
.include "plasma_tree.s"
|
2023-12-15 05:40:43 +00:00
|
|
|
.include "fireplace.s"
|
2023-12-23 19:44:06 +00:00
|
|
|
.include "regular_tree.s"
|
2023-12-24 04:56:36 +00:00
|
|
|
.include "snowflakes.s"
|
