From 07cc62a712e9bee8349cb4b8aedad68a60d4ceca Mon Sep 17 00:00:00 2001 From: Devine Lu Linvega Date: Wed, 5 Apr 2023 11:44:45 -0700 Subject: [PATCH] (romviz) Draw size at the top --- gui/romviz/romviz.tal | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/gui/romviz/romviz.tal b/gui/romviz/romviz.tal index 30d8e59..e56cbe2 100644 --- a/gui/romviz/romviz.tal +++ b/gui/romviz/romviz.tal @@ -95,6 +95,7 @@ JMP2r @redraw ( -- ) ( bytes ) + #00 .Screen/auto DEO ;src .File/name DEO2 #0001 .File/length DEO2 ;pixel-icn .Screen/addr DEO2 @@ -103,8 +104,13 @@ JMP2r ;&buf .File/read DEO2 .File/success DEI2 #0000 EQU2 ?&eof [ LIT &buf $1 ] STH2kr draw-cell INC2r + STH2kr #0000 EQU2 ?&eof !&stream &eof - POP2r + ( size ) + #0200 .Screen/x DEO2 + #0010 .Screen/y DEO2 + #01 .Screen/auto DEO + STH2r draw-short ( filename ) #0020 .Screen/x DEO2 #0010 .Screen/y DEO2 @@ -164,7 +170,7 @@ JMP2r addr-pos .Screen/y DEO2 .Screen/x DEO2 DUP ?&no-null - .Screen/sprite DEO JMP2r + POP ( .Screen/sprite DEO ) JMP2r &no-null DUP #20 GTH ?&no-low POP #05 .Screen/sprite DEO JMP2r