rendered paste body#colors4 on
on *:input:*: {
if ($left($1,1) != /) {
say $colors4($1-)}
halt
}
}
#colors4 end
menu * {
&colors2
.on:/enable #colors4
.off:/disable #colors4
}
alias colors4 {
var %color1 = 04,01
var %color2 = 09,01
var %i = 1, %count = $numtok($1-,32)
while (%i <= %count) {
var %c = $gettok($1-,%i,32), %text = %text $+(%color1 $+ ,$left(%c,1),%color2 $+ ,$mid(%c,2,$len(%)),%color2 $+ ,$mid(%c,3,$len(%)),%color1 $+ ,$mid(%c,4,$len(%)),%color2 $+ ,$mid(%c,5,$len(%)),%color2 $+ ,$mid(%c,6,$len(%)),%color1 $+ ,$mid(%c,7,$len(%)),%color2 $+ ,$mid(%c,8,$len(%)),%color2 $+ ,$mid(%c,9,$len(%)),%color1 $+ ,$mid(%c,10,$len(%c)), %color2 $+ ,$end(%c)))
inc %i
}
return %text
}