Optimized draw-cat
1 files changed, 2 insertions(+), 6 deletions(-) M src/manifest.tal
M src/manifest.tal => src/manifest.tal +2 -6
@@ 147,12 147,8 @@ BRK ;manifest/menu &cat #0701 [ LIT &sel $1 ] [ LIT &cat-id $1 ] EQU JMP SWP POP ;draw-chr/color STA LDAk STH INC2 ;draw-str JSR2 #00 .Screen/sprite DEOk DEO STHr #00 &subcat SWP2 #0004 ADD2 ;skip-str JSR2 SWP2 INC GTHk ,&subcat JCN POP2 INC2k ;draw-str JSR2 POP2 #00 .Screen/sprite DEOk DEO ;skip-sub JSR2 ,&cat-id LDR INC ,&cat-id STR LDAk ,&cat JCN POP2