~rabbits/nasu

3468bb49bd4e67dfc867e3315b1d569748f1d3d0 — Devine Lu Linvega 8 months ago 5d605bd
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