alias acronym {
/unset %finmsg
/set -u0 %l 1
while (%l <= $len($$1-)) {
if ($mid($$1-, %l, 1) == $chr(32)) { /set -u0 %finmsg $+(%finmsg,<s>) }
if (2 // %l) { /set -u0 %finmsg $+(%finmsg,12,$mid($$1-, %l, 1)) }
else { /set -u0 %finmsg $+(%finmsg,4,$mid($$1-, %l, 1)) }
/inc -u0 %l
}
return $replace(%finmsg, <s>, $chr(32))
}
on *:INPUT:*: {
; voice out commands
if ($left($$1, 1) != $readini($mircini, text, commandchar)) {
/set %mymsg $$1-
/set %mymsg $replace(%mymsg, lol, $acronym(Laughing out loud))
/set %mymsg $replace(%mysql, rofl, $acronym(Rolling on Floor Laughing))
; ...
; More Replacements
; ...
/msg $active %mymsg
; Kill Variable (Leave Things Tidy
/unset %mymsg
; stop the double talk
/halt
}
}
All I did was just add the command char reference, so in the event it's changed in the options dialog, this will carry over. Also, to save you some time when making the acronyms, I made a simple alias to convert them to the over-other-color theme you can going on.