added sprites.tal
This commit is contained in:
@@ -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
|
||||||
|
)
|
||||||
|
|
||||||
Reference in New Issue
Block a user