From 98f8bf6f0f3671a9703b354459bc2dcb1af8818c Mon Sep 17 00:00:00 2001 From: neauoire Date: Mon, 5 Dec 2022 10:19:31 -0800 Subject: [PATCH] Added selection size label --- src/nasu.tal | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) diff --git a/src/nasu.tal b/src/nasu.tal index 61b3a75..c0b808c 100644 --- a/src/nasu.tal +++ b/src/nasu.tal @@ -645,8 +645,8 @@ JMP2 POP2 ( draw selection ) #06 .selection/x2 LDZ .selection/x1 LDZ SUB #40 SFT ADD .Screen/auto DEO - .tileview/x1 LDZ2 #00 .selection/x1 LDZ #30 SFT2 ADD2 .Screen/x DEO2 - .tileview/y1 LDZ2 #00 .selection/y1 LDZ #30 SFT2 ADD2 .Screen/y DEO2 + #00 .selection/x1 LDZ #30 SFT2 .tileview/x1 LDZ2 ADD2 .Screen/x DEO2 + #00 .selection/y1 LDZ #30 SFT2 .tileview/y1 LDZ2 ADD2 .Screen/y DEO2 .selection LDZ2 ;get-tile-addr JSR2 ,&sprite STR2 .selection/y2 LDZ .selection/y1 LDZ SUB INC #00 &loop-sel @@ -655,6 +655,16 @@ JMP2 INC GTHk ,&loop-sel JCN POP2 #01 .Screen/auto DEO + ( draw selection size ) + .selection/x2 LDZ .selection/x1 LDZ SUB #02 LTH ,&no-label JCN + .selection/y2 LDZ #0f EQU ,&no-label JCN + #00 .selection/x1 LDZ #30 SFT2 .tileview/x1 LDZ2 ADD2 .Screen/x DEO2 + #00 .selection/y2 LDZ INC #30 SFT2 .tileview/y1 LDZ2 ADD2 .Screen/y DEO2 + #04 ;draw-chr/color STA + .selection/x2 LDZ .selection/x1 LDZ SUB INC #40 SFT + .selection/y2 LDZ .selection/y1 LDZ SUB INC ORA + ;draw-byte JSR2 + &no-label JMP2r