Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on 1:input:*: {
- if (!%co1) || (!%co2) { echo -a Please set the colors in the menu, or disable the talker. | halt }
- elseif (/ !iswm $left($1,1)) && (Status Window !iswm $active) && (!$regex($1,/^(\.|!)/)) {
- var %x 1
- while (%x <= $gettok($1-,0,32)) {
- var %text1 $mid($gettok($1-, [ [ %x ] ],32),1,1)
- var %text [ [ %text ] ] $replace($mid($gettok($1-, %x ,32),1,1),%text1, $+(%co1,%text1,%co2)) $+ $mid($gettok($1-, [ [ %x ] ],32),2,$calc($len($gettok($1-, [ [ %x ] ],32) - 1)))
- inc %x
- }
- msg $active %text
- halt
- }
- if ($regex($1,/^(\.|!)/)) {
- msg $active $1-
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement