1 files changed, 16 insertions(+), 1 deletions(-)

M src/left.tal

@@ 824,9 824,11 @@ JMP2
 
 	;get-color JSR2 STH
 	&w
+		;is-bold JSR2 ;draw-ufx/bold STA
 		;is-selected JSR2 STH
 		LDAk STH2kr #08 ROT ROT [ JMP SWP POP ] ;draw-ufx JSR2 POPr
 		INC2 LDAk #20 GTH ,&w JCN
+	#00 ;draw-ufx/bold STA
 	&w2
 		;is-selected JSR2 STH
 		LDAk STH2kr #08 ROT ROT [ JMP SWP POP ] ;draw-ufx JSR2 POPr


@@ 835,7 837,18 @@ JMP2
 
 JMP2r
 
-@is-selected ( addr* -- bool )
+@is-bold ( addr* -- addr* bool )
+
+	LDAk LIT ", EQU ,&bold JCN
+	LDAk LIT ": EQU ,&bold JCN
+	LDAk LIT "; EQU ,&bold JCN
+	LDAk LIT ". EQU ,&bold JCN
+	#00
+
+JMP2r
+	&bold #01 JMP2r
+
+@is-selected ( addr* -- addr* bool )
 
 	DUP2
 	STH2k .selection/from LDZ2 #0001 SUB2 GTH2


@@ 890,6 903,8 @@ JMP2r
 	STHr #09 LTH [ JMP DEOk POP2 ]
 	.Screen/x DEO2
 
+	[ LIT &bold $1 ] POP
+
 JMP2r
 
 @draw-special ( char -- )