From a04f984891c6469997f4f5e71c686d1733c89205 Mon Sep 17 00:00:00 2001 From: neauoire Date: Sat, 10 Dec 2022 20:20:48 -0800 Subject: [PATCH] Draw missing tile in tileview --- src/dexe.tal | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/src/dexe.tal b/src/dexe.tal index bf69d90..60a3960 100644 --- a/src/dexe.tal +++ b/src/dexe.tal @@ -45,7 +45,7 @@ ;untrap JSR2 ( set size ) - #0230 .Screen/width DEO2 + #0240 .Screen/width DEO2 #0188 .Screen/height DEO2 ( frame ) @@ -63,7 +63,7 @@ ( tile frame ) .byte-frame/x2 LDZ2 #0008 ADD2 - DUP2 .tile-frame/x STZ2 #000f ADD2 .tile-frame/x2 STZ2 + DUP2 .tile-frame/x STZ2 #001f ADD2 .tile-frame/x2 STZ2 .byte-frame/y LDZ2 .tile-frame/y STZ2 .byte-frame/y2 LDZ2 .tile-frame/y2 STZ2 @@ -343,10 +343,10 @@ BRK POP2 POP2 BRK &continue - ( row ) NIP2 .tile-frame/y LDZ2 SUB2 #34 SFT2 + ( row ) NIP2 .tile-frame/y LDZ2 SUB2 #44 SFT2 .selection/key LDZ2 ADD2 DUP2 .selection/from STZ2 - #0007 ADD2 ;select-until JSR2 + #000f ADD2 ;select-until JSR2 BRK @@ -572,9 +572,9 @@ JMP .options-frame/x LDZ2 #0028 ADD2 .Screen/x DEO2 .options-frame/y LDZ2 .Screen/y DEO2 - .selection/from LDZ2 ;data SUB2 #01 ;draw-short JSR2 + .selection/from LDZ2 ;data SUB2 #01 ;draw-short ( .. ) -JMP2r +JMP2 @draw-spacer ( -- ) @@ -623,6 +623,11 @@ JMP2 INC GTHk ,&bytes-loop JCN POP2 + .tile-frame/x LDZ2 .Screen/y DEI2 ;&row LDA2 #01 + ;draw-tile JSR2 + .tile-frame/x LDZ2 #0010 ADD2 .Screen/y DEI2 #0010 SUB2 ;&row LDA2 #0008 ADD2 #01 + ;draw-tile JSR2 + .char-frame/x LDZ2 .Screen/x DEO2 #1000 @@ -634,12 +639,7 @@ JMP2 INC GTHk ,&chars-loop JCN POP2 - .tile-frame/x LDZ2 - .Screen/y DEI2 - ;&row LDA2 #01 - ;draw-tile ( .. ) - -JMP2 +JMP2r &y $2 &row $2 @get-byte-color ( id* ) -- 2.45.2