commit b513014fa891a35a80d306e749eb80f4c69efbbd
parent 85d22bbb90a76e8053f192ef46a0d0835de6fbe1
Author: neauoire <aliceffekt@gmail.com>
Date: Fri, 27 Oct 2023 19:53:42 -0700
(screen.blending.tal) Fixed issue with sprite position
Diffstat:
1 file changed, 3 insertions(+), 7 deletions(-)
diff --git a/projects/examples/devices/screen.blending.tal b/projects/examples/devices/screen.blending.tal
@@ -33,23 +33,19 @@
;circle-chr .Screen/addr DEO2
DUP .Screen/sprite DEO
DUP #10 ORA .Screen/sprite DEO
- .Screen/x DEI2k #0010 SUB2 ROT DEO2
.Screen/y DEI2k #0008 ADD2 ROT DEO2
DUP #20 ORA .Screen/sprite DEO
DUP #30 ORA .Screen/sprite DEO
@<draw-hex> ( color -- )
- .Screen/x DEI2k #000c SUB2 ROT DEO2
.Screen/y DEI2k #000c ADD2 ROT DEO2
#00 SWP #30 SFT ;font-icn ADD2 .Screen/addr DEO2
- #05 .Screen/sprite DEO
+ #09 .Screen/sprite DEO
JMP2r
-@check-icn
- [ 0306 0c18 3060 c081 ]
+@check-icn [ 0306 0c18 3060 c081 ]
-@circle-chr
- [
+@circle-chr [
071f 3c70 60e3 c7c7 0000 030f 1f1f 3f3f ]
@font-icn ( 0-f )