xmas2023: add mockingboard message

demos/xmas_2023/Makefile

@@ -125,6 +125,7 @@ XMAS:	xmas.o
 
 xmas.o:	xmas.s plasma_tree.s fireplace.s \
 	zp.inc hardware.inc qload.inc \
+	graphics/merry.hgr.zx02 \
 	graphics/tree01.gr.zx02
 	ca65 -o xmas.o xmas.s -l xmas.lst
 

demos/xmas_2023/fireplace.s

@@ -1,5 +1,20 @@
 fireplace:
 
+	bit     SET_GR
+        bit     HIRES
+        bit     FULLGR
+        bit     PAGE1
+
+	lda	#<merry_graphics
+	sta	zx_src_l+1
+	lda	#>merry_graphics
+	sta	zx_src_h+1
+	lda	#$20
+	jsr	zx02_full_decomp
+
+	jsr	wait_until_keypress
+
+
 	bit     SET_GR
         bit     LORES
         bit     FULLGR
@@ -720,3 +735,6 @@ gr_offsets_h:
 	.byte	>$428,>$4a8,>$528,>$5a8,>$628,>$6a8,>$728,>$7a8
 	.byte	>$450,>$4d0,>$550,>$5d0,>$650,>$6d0,>$750,>$7d0
 
+
+merry_graphics:
+.incbin "graphics/merry.hgr.zx02"

demos/xmas_2023/graphics/Makefile

@@ -8,7 +8,15 @@ all:	tree01.gr.zx02 tree03.gr.zx02 \
 	tree05.gr.zx02 tree07.gr.zx02 \
 	tree09.gr.zx02 tree11.gr.zx02 \
 	tree13.gr.zx02 tree15.gr.zx02 \
+	merry.hgr.zx02
 
+####
+
+merry.hgr.zx02:	merry.hgr
+	$(ZX02) merry.hgr merry.hgr.zx02
+
+merry.hgr:	merry.png
+	$(PNG_TO_HGR) merry.png > merry.hgr
 
 ####
 

demos/xmas_2023/start.s

@@ -78,6 +78,46 @@ dont_enable_mc:
 
 skip_all_checks:
 
+	;=======================
+	;=======================
+	; Print message
+	;=======================
+	;=======================
+
+	; print non-inverse
+
+	jsr	set_normal
+
+	lda	SOUND_STATUS
+	and	#SOUND_MOCKINGBOARD
+	beq	print_no_mock
+
+print_mock:
+	lda	MB_ADDR_H
+	and	#$7
+	clc
+	adc	#$B0
+	sta	mockingboard_string+29
+
+	lda	#<mockingboard_string
+	sta	OUTL
+	lda	#>mockingboard_string
+	jmp	done_set_message
+
+print_no_mock:
+	lda	#<no_mockingboard_string
+	sta	OUTL
+	lda	#>no_mockingboard_string
+
+done_set_message:
+	sta	OUTH
+
+	; print the text
+
+	jsr	move_and_print
+
+
+
 
 	;=======================
 	;=======================
@@ -98,7 +138,7 @@ load_xmas:
 	;=======================
 	;=======================
 
-	cli			; start music
+;	cli			; start music
 
 	jsr	$8000
 
@@ -144,9 +184,13 @@ forever:
 
 ;.include "title.s"
 
-disk_change_string:
+
 ;             0123456789012345678901234567890123456789
-;.byte   5,22,"INSERT DISK 2 AND PRESS ANY KEY",0
+mockingboard_string:
+.byte   6,22,"MOCKINGBOARD DETECTED SLOT 4",0
+
+no_mockingboard_string:
+.byte   3,22,"NO MOCKINGBOARD, CONTINUING ANYWAY",0
 
 .include "pt3_lib_mockingboard_patch.s"