demo: more unadvised messing around

worried there's a glitch in the sound at least on AppleWin
mame is fine

demos/demosplash2022/apple_desire.s

@@ -11,9 +11,13 @@ apple2_desire:
 
 	; clear both pages of graphics
 	jsr	HGR2
-	lda	#$ff
+
-	sta	HGR_BITS
+	; Y is 0 here
-	lda	#$20
+
+	dey				; color = $FF
+	sty	HGR_BITS
+
+	lda	#$20			; clear page1
 	jsr	BKGND+2
 
 	; A and Y are 0 now?
@@ -32,6 +36,38 @@ apple2_desire:
 
 
 	cli				; enable music
+.if 0
+forever:
+	sta	OUTL
+	sta	LINE
+
+	lda	#$d0
+	sta	OUTH
+
+line_loop:
+	lda	LINE
+	jsr	HPOSN           ; (Y,X),(A)  (values stores in HGRX,XH,Y)
+
+	; first top right
+	ldy	#0
+out_loop:
+        lda	(OUTL),Y
+        sta	(GBASL),Y
+
+        dey
+        bne	out_loop
+
+        inc	LINE
+        bne	line_loop
+
+end:
+	lda	WHICH_TRACK
+	beq	forever
+.endif
+
+
+
+
 
 
 .include "logo_intro.s"
@@ -41,17 +77,36 @@ apple2_desire:
 main_loop:
 	lda	FRAME
 	and	#$80
-	clc
+;	clc
-	rol
+;	rol
+	asl
 	rol
 	tax
 	lda	PAGE1,X
 
-;	lda	AY_REGS+7
+	lda	WHICH_TRACK
-;	sta	$5000
+	beq	main_loop
-;	sta	$3000
 
-	jmp	main_loop
+rot_rot_rot:
+	lda	#$0
+	jsr	draw_apple
+	inc	rot_rot_rot+1
+
+	bne	blah
+	dec	scale_smc
+blah:
+;	beq	main_loop
+;	lda	AY_REGS+8
+;	sta	HGR_SCALE
+
+
+
+
+	lda	HGR_PAGE
+	eor	#$60
+	sta	HGR_PAGE
+
+	bne	main_loop
 
 
 .include "interrupt_handler.s"
@@ -63,6 +118,10 @@ main_loop:
 
 .include "freq.s"
 
+
+
+.include "bamps.s"
+
 letters_x:
         .byte 14,62,110,154,176,220
 letters_l:
@@ -70,9 +129,7 @@ letters_l:
 ;letters_h:
 ;       .byte >letter_d,>letter_e,>letter_s,>letter_i,>letter_r,>letter_e
 
-.include "bamps.s"
+;.align $100
-
-.align $100
 
 .include "freq_h.s"
 

demos/demosplash2022/apple_logo.s

@@ -6,6 +6,7 @@ draw_apple:
 	; rotation in A
 
 	pha
+scale_smc:
 	lda	#10
 	sta	HGR_SCALE
 

demos/demosplash2022/bamps.s

@@ -1,4 +1,5 @@
 
+
 ; pattern 0
 ; 0 -> F
 ; 48-> C
@@ -85,10 +86,13 @@ bamps3:
 ; 62->F
 ; 63->C
 
+; needs to immediately follow bamps3 for some reason?
+
 bamps4:
 ;       0  15  30  45  60  61  62  63
 .byte $F0,$F0,$F0,$F0,$1F,$1C,$1F,$1C
 
+.align $100
 
-
+deater_string:
 

demos/demosplash2022/mA2E_4.s

@@ -1,10 +1,10 @@
 
 
+.align $100
+
 channel_a_volume:
         .byte 14,14,14,14,11,11,10,10
 
-.align $100
-
         lengths:
         .byte 0*8,1*8,2*8,4*8
 

demos/demosplash2022/zp.inc

@@ -29,6 +29,9 @@ HGR_COLOR       = $E4
 HGR_PAGE        = $E6
 HGR_SCALE	= $E7
 
+OUTL		= $F4
+OUTH		= $F5
+LINE		= $F6
 
 SAVE_Y		= $F7
 LETTER_X	= $F8