@@ 449,10 449,12 @@ JMP2r
@walk-width ( addr* -- addr* width* )
LDAk
- [ LIT ". ] EQUk NIP ,&special JCN
- [ LIT ", ] EQUk NIP ,&special JCN
- [ LIT "; ] EQUk NIP ,&special JCN
- [ LIT ": ] EQUk NIP ,&special JCN
+ .textarea/highlight LDZ ,&skip-highlight JCN
+ [ LIT ". ] EQUk NIP ,&special JCN
+ [ LIT ", ] EQUk NIP ,&special JCN
+ [ LIT "; ] EQUk NIP ,&special JCN
+ [ LIT ": ] EQUk NIP ,&special JCN
+ &skip-highlight
#00 SWP ;font ADD2 LDA #00 SWP
JMP2r
@@ 885,6 887,7 @@ JMP2r
,&color STR
+ .textarea/highlight LDZ ,&skip-highlight JCN
[ LIT ". ] NEQk NIP ,&no-litzpa JCN
POP #08 ;litzpa-icn ,&seg JMP
&no-litzpa
@@ 897,6 900,7 @@ JMP2r
[ LIT ": ] NEQk NIP ,&no-rawabs JCN
POP #08 ;rawabs-icn ,&seg JMP
&no-rawabs
+ &skip-highlight
DUP #20 SUB #5e GTH ,draw-special JCN