added sprites.tal

This commit is contained in:
John Bliss
2026-04-25 22:50:51 -04:00
parent caf345df15
commit a070e1f719
+39
View File
@@ -0,0 +1,39 @@
|00 @System/vector $2 &expansion $2 &wst $1 &rst $1 &metadata $2 &r $2 &g $2 &b $2 &debug $1 &state $1
|20 @Screen/vector $2 &width $2 &height $2 &auto $2 &x $2 &y $2 &addr $2 &pixel $1 &sprite $1
|100
@on-reset ( -> )
set-theme
#0020 .Screen/x DEO2
#0040 .Screen/y DEO2
( ;sprite-icn .Screen/addr DEO2 )
( #01 .Screen/sprite DEO )
#00 .Screen/auto DEO
;sprite2-icn .Screen/addr DEO2
#c1 .Screen/sprite DEO
BRK
@set-theme ( -- )
#f07f .System/r DEO2
#f0d6 .System/g DEO2
#f0b2 .System/b DEO2
JMP2r
@sprite-icn
00 66 ff ff ff 7e 3c 18
@sprite2-icn
18 3c 66 e7 ff 7e 5a 00 00 24 42 99 81 e7 db 81
30 78 48 4c 7c 04 34 04 10 50 c0 f0 f0 fc bc 84
(
. . . . . . . . 00
. # # . . # # . 66
# # # # # # # # ff
# # # # # # # # ff
# # # # # # # # ff
. # # # # # # . 7e
. . # # # # . . 3c
. . . # # . . . 18
)