loveyte: 16-byte too hard

demos/lovebyte2024/spiral_32/Makefile

@@ -17,15 +17,15 @@ spiral_32.dsk:	HELLO SPIRAL_32
 submit:	spiral_32.zip
 
 spiral_32.zip:	SPIRAL_32 spiral_32.s file_id.diz spiral_32.dsk
-	mkdir -p lovebyte2023_spiral_32
-	cp SPIRAL_32 ./lovebyte2023_spiral_32
-	cp spiral_32.s ./lovebyte2023_spiral_32
-	cp file_id.diz ./lovebyte2023_spiral_32
-	cp spiral_32.dsk ./lovebyte2023_spiral_32
-	cp monitor.txt ./lovebyte2023_spiral_32
-	cp spiral_32_screen.png ./lovebyte2023_spiral_32
-	cp spiral_32_720p.mp4 ./lovebyte2023_spiral_32
-	zip -r spiral_32.zip lovebyte2023_spiral_32
+	mkdir -p lovebyte2024_spiral_32
+	cp SPIRAL_32 ./lovebyte2024_spiral_32
+	cp spiral_32.s ./lovebyte2024_spiral_32
+	cp file_id.diz ./lovebyte2024_spiral_32
+	cp spiral_32.dsk ./lovebyte2024_spiral_32
+	cp monitor.txt ./lovebyte2024_spiral_32
+	cp spiral_32_screen.png ./lovebyte2024_spiral_32
+	cp spiral_32_720p.mp4 ./lovebyte2024_spiral_32
+	zip -r spiral_32.zip lovebyte2024_spiral_32
 
 ####
 

demos/lovebyte2024/ticktock_16/Makefile

@@ -0,0 +1,49 @@
+include ../../../Makefile.inc
+
+DOS33 = ../../../utils/dos33fs-utils/dos33
+TOKENIZE = ../../../utils/asoft_basic-utils/tokenize_asoft
+EMPTYDISK = ../../../empty_disk/empty.dsk
+LINKERSCRIPTS = ../../../linker_scripts/
+
+all:	tick_tock.dsk
+
+tick_tock.dsk:	HELLO TICK_TOCK
+	cp $(EMPTYDISK) tick_tock.dsk
+	$(DOS33) -y tick_tock.dsk SAVE A HELLO
+	$(DOS33) -y tick_tock.dsk BSAVE -a 0xe7 TICK_TOCK
+
+###
+
+submit:	tick_tock.zip
+
+tick_tock.zip:	TICK_TOCK tick_tock.s file_id.diz tick_tock.dsk
+	mkdir -p lovebyte2023_tick_tock
+	cp TICK_TOCK ./lovebyte2023_tick_tock
+	cp tick_tock.s ./lovebyte2023_tick_tock
+	cp file_id.diz ./lovebyte2023_tick_tock
+	cp tick_tock.dsk ./lovebyte2023_tick_tock
+	cp monitor.txt ./lovebyte2023_tick_tock
+	cp tick_tock_screen.png ./lovebyte2023_tick_tock
+	cp tick_tock_720p.mp4 ./lovebyte2023_tick_tock
+	zip -r tick_tock.zip lovebyte2023_tick_tock
+
+####
+
+
+####
+
+HELLO:	hello.bas
+	$(TOKENIZE) < hello.bas > HELLO
+
+###
+
+TICK_TOCK:	tick_tock.o
+	ld65 -o TICK_TOCK tick_tock.o -C $(LINKERSCRIPTS)/apple2_e7_zp.inc
+
+tick_tock.o:	tick_tock.s
+	ca65 -o tick_tock.o tick_tock.s -l tick_tock.lst
+
+####
+
+clean:	
+	rm -f *~ *.o *.lst HELLO TICK_TOCK *.zip

demos/lovebyte2024/ticktock_16/file_id.diz

@@ -0,0 +1,10 @@
+-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-
+Spiraling Shape
+--------------------------------------
+Hi-res Xdraw Pattern
+with Sound!
+by Deater / dSr
+
+31-byte Intro for Apple II
+Lovebyte 2024
+--------------------------------------

demos/lovebyte2024/ticktock_16/hello.bas

@@ -0,0 +1,7 @@
+5 HOME
+10 PRINT "  TICK_TOCK"
+20 PRINT CHR$(4)"CATALOG"
+25 PRINT:PRINT "PRESS ANY KEY TO 'BRUN TICK_TOCK'"
+30 GET A$
+35 PRINT
+40 PRINT CHR$(4)"BRUN TICK_TOCK"

demos/lovebyte2024/ticktock_16/monitor.txt

@@ -0,0 +1,4 @@
+CALL -151
+E8: 20 D8 F3 2C 30 C0 A8 A2  8C A9 60 20 11 F4 A2 DF
+F8: A0 E2 E6 FE A9 01 29 7F  85 E7 20 5D F6 F0 E4
+E8G

demos/lovebyte2024/ticktock_16/tick_tock.s

@@ -0,0 +1,91 @@
+; Square Wave Gear Pattern
+
+; by Vince `deater` Weaver / dsr
+
+; Lovebyte 2024
+
+; zero page locations
+HGR_SHAPE	=	$1A
+HGR_SHAPE2	=	$1B
+HGR_BITS	=	$1C
+GBASL		=	$26
+GBASH		=	$27
+A5H		=	$45
+XREG		=	$46
+YREG		=	$47
+			; C0-CF should be clear
+			; D0-DF?? D0-D5 = HGR scratch?
+HGR_DX		=	$D0	; HGLIN
+HGR_DX2		=	$D1	; HGLIN
+HGR_DY		=	$D2	; HGLIN
+HGR_QUADRANT	=	$D3
+HGR_E		=	$D4
+HGR_E2		=	$D5
+HGR_X		=	$E0
+HGR_X2		=	$E1
+HGR_Y		=	$E2
+HGR_COLOR	=	$E4
+HGR_HORIZ	=	$E5
+HGR_SCALE	=	$E7
+HGR_SHAPE_TABLE	=	$E8
+HGR_SHAPE_TABLE2=	$E9
+HGR_COLLISIONS	=	$EA
+HGR_ROTATION	=	$F9
+FRAME		=	$FC
+FRAMEH		=	$FD
+XPOS		=	$FE
+YPOS		=	$FF
+
+; ROM calls
+HGR2		=	$F3D8
+HGR		=	$F3E2
+HPOSN		=	$F411
+DRAW0		=	$F601
+XDRAW0		=	$F65D
+XDRAW1		=	$F661
+RESTORE		=	$FF3F
+
+
+.zeropage
+.globalzp rot_smc
+
+square_wave:
+
+	.byte	$0A		; harmless ASL but also size of HGR_SCALE
+				; as we load this at $E7
+
+	jsr	HGR2		; Hi-res, full screen		; 3
+				; Y=0, A=0 after this call
+
+	; A and Y are 0 here.
+	; X is left behind by the boot process?
+	;	but doesn't matter as any 0..255 value should work
+
+	jsr	HPOSN		; set screen position to X= (y,x) Y=(a)
+				; saves X,Y,A to zero page
+				; after Y= orig X/7
+				; A and X are ??
+pattern_loop:
+
+	ldx	#<pattern_table	; point to bottom byte of shape address
+;	ldy	#>pattern_table	; point to top byte of shape address
+	tay			; shape table in zero page
+
+	; ROT in A
+
+	inc	rot_smc+1
+
+rot_smc:
+	lda	#1		; ROT
+	jsr	XDRAW0		; XDRAW 1 AT X,Y
+				; Both A and X are 0 at exit
+				; Z flag set on exit
+				; Y varies
+
+	beq	pattern_loop	; bra
+
+
+
+pattern_table:
+.byte	37,53,0
+