More readable menu

4 years ago · 1f7692dbd3
1 changed files with 4 additions and 2 deletions
--- a/src/manifest.tal
+++ b/src/manifest.tal
@ -171,7 +171,9 @@ JMP2r
 	LDAk STH INC2 ;skip-str JSR2
 	STHr #00
 	&subcat
-		DUP [ LIT &sel $1 ] EQU INC [ LIT &mask $1 ] AND ;draw-chr/color STA
+		STHk 
+		#0d07
+		STHr [ LIT &sel $1 ] EQU JMP SWP POP [ LIT &mask $1 ] AND ;draw-chr/color STA
 		[ LIT2 &anchor $2 ] .Screen/x DEO2
 		#00 OVR INC #30 SFT2 .Screen/y DEO2
 		SWP2 ;draw-label JSR2 SWP2
@ -187,7 +189,7 @@ JMP2r

 	LDA2k SWP2
 	#0004 ADD2 ;draw-str JSR2
-	#08 ;draw-sub/mask LDA AND ;draw-chr/color STA
+	#06 ;draw-sub/mask LDA AND ;draw-chr/color STA
 	SWP2 ;draw-modkey JSR2

 JMP2r