add fx/fx.hgr.checkerboard

Makefile

@@ -35,6 +35,7 @@ asm: md
 	$(ACME) src/fx/fx.hgr.foursquare.a
 	$(ACME) src/fx/fx.hgr.onesquare.a
 	$(ACME) src/fx/fx.hgr.diamond.a
+	$(ACME) src/fx/fx.hgr.checkerboard.a
 
 dsk: md asm
 	$(CADIUS) CREATEVOLUME build/"$(DISK)" "${VOLUME}" 32766KB >>build/log

res/fx.conf

@@ -1 +1 @@
-#
# transition effects for HGR slideshows
#
DIAMOND
ONESQUARE
FOURSQUARE
CRYSTAL
TWOPASS.LR
INTERLOCK.LR
BLOCK.MOSAIC
IRIS
FIZZLE
INTERLOCK.UD
BLOCK.FIZZLE
DIAGONAL
SPIRAL
BAR.DISSOLVE

[eof]
+#
# transition effects for HGR slideshows
#
CHECKERBOARD
DIAMOND
ONESQUARE
FOURSQUARE
CRYSTAL
TWOPASS.LR
INTERLOCK.LR
BLOCK.MOSAIC
IRIS
FIZZLE
INTERLOCK.UD
BLOCK.FIZZLE
DIAGONAL
SPIRAL
BAR.DISSOLVE

[eof]

res/fx/_FileInformation.txt

@@ -12,3 +12,4 @@ CRYSTAL=Type(06),AuxType(6000),Access(C3)
 FOURSQUARE=Type(06),AuxType(6000),Access(C3)
 ONESQUARE=Type(06),AuxType(6000),Access(C3)
 DIAMOND=Type(06),AuxType(6000),Access(C3)
+CHECKERBOARD=Type(06),AuxType(6000),Access(C3)

res/notes/checkerboard.py

@@ -0,0 +1,18 @@
+#!/usr/bin/env python3
+
+import sys
+
+alphabet = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklm'
+coords = []
+for filename in sys.argv[1:]:
+    with open(filename) as f:
+        lines = f.readlines()
+    for c in alphabet:
+        for line, row in zip(lines, range(len(lines))):
+            for l, col in zip(line, range(len(line))):
+                if l == c:
+                    if (row, col) not in coords:
+                        coords.append((row, col))
+        coords.append((255,255))
+for row, col in coords:
+    print("         !byte %s,%s" % (row, col))

res/notes/checkerboard.txt

@@ -0,0 +1,24 @@
+AmAmAmAmAmAmAmAmAmAmAmAmAmAmAmAmAmAmAmAm
+lBlBlBlBlBlBlBlBlBlBlBlBlBlBlBlBlBlBlBlB
+CkCkCkCkCkCkCkCkCkCkCkCkCkCkCkCkCkCkCkCk
+jDjDjDjDjDjDjDjDjDjDjDjDjDjDjDjDjDjDjDjD
+EiEiEiEiEiEiEiEiEiEiEiEiEiEiEiEiEiEiEiEi
+hFhFhFhFhFhFhFhFhFhFhFhFhFhFhFhFhFhFhFhF
+GgGgGgGgGgGgGgGgGgGgGgGgGgGgGgGgGgGgGgGg
+fHfHfHfHfHfHfHfHfHfHfHfHfHfHfHfHfHfHfHfH
+IeIeIeIeIeIeIeIeIeIeIeIeIeIeIeIeIeIeIeIe
+dJdJdJdJdJdJdJdJdJdJdJdJdJdJdJdJdJdJdJdJ
+KcKcKcKcKcKcKcKcKcKcKcKcKcKcKcKcKcKcKcKc
+bLbLbLbLbLbLbLbLbLbLbLbLbLbLbLbLbLbLbLbL
+MaMaMaMaMaMaMaMaMaMaMaMaMaMaMaMaMaMaMaMa
+9N9N9N9N9N9N9N9N9N9N9N9N9N9N9N9N9N9N9N9N
+O7O7O7O7O7O7O7O7O7O7O7O7O7O7O7O7O7O7O7O7
+6P6P6P6P6P6P6P6P6P6P6P6P6P6P6P6P6P6P6P6P
+Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5Q5
+4R4R4R4R4R4R4R4R4R4R4R4R4R4R4R4R4R4R4R4R
+S3S3S3S3S3S3S3S3S3S3S3S3S3S3S3S3S3S3S3S3
+2T2T2T2T2T2T2T2T2T2T2T2T2T2T2T2T2T2T2T2T
+U1U1U1U1U1U1U1U1U1U1U1U1U1U1U1U1U1U1U1U1
+0V0V0V0V0V0V0V0V0V0V0V0V0V0V0V0V0V0V0V0V
+WZWZWZWZWZWZWZWZWZWZWZWZWZWZWZWZWZWZWZWZ
+YXYXYXYXYXYXYXYXYXYXYXYXYXYXYXYXYXYXYXYX

src/fx/fx.hgr.checkerboard.a

@@ -0,0 +1,51 @@
+!cpu 6502
+!to "build/FX/CHECKERBOARD",plain
+*=$6000
+
+         lda   #$01
+         sta   $FD
+@outerloop
+         dec   $FD
+         lda   #<@coords
+         sta   $FE
+         lda   #>@coords
+         sta   $FF
+         ldy   #$00
+@loop
+         lda   ($fe),y
+         bpl   @copy
+         lda   #$20
+         jsr   WaitForKeyWithTimeout
+         bmi   @exit
+         bpl   @next                 ; always branches
+@copy
+         tax
+         iny
+         lda   ($fe),y
+         tay
+         txa
+         bit   $FD
+         bpl   +
+         jsr   HGRBlockCopy
+         beq   @next                 ; always branches
++        jsr   HGRBlockToWhite
+@next
+         inc   $FE
+         bne   +
+         inc   $FF
++        inc   $FE
+         bne   +
+         inc   $FF
++        ldy   #$00
+         lda   ($FE),y
+         cmp   #$80
+         bne   @loop
+         bit   $FD
+         bpl   @outerloop
+@exit    rts
+
+@coords
+         !source "src/fx/fx.hgr.checkerboard.data.a"
+         !byte $80
+         !source "src/wait.a"
+         !source "src/fx/fx.hgr.common.a"