Simple. Add to Remotes.
:] it replaces the set acronyms with what it means. :]
It does still send the default message, I'm working on this part as to where I need to put the haltdef. :]
on *:input:*: {
if ($regex($1-,/(brb|bbl|lol|omg|ty|wb|yw|bck|bf|hb)/i)) {
if (brb !isin $msg) { set %Acronymbrb 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1B7,1e 4,1R7,1ight 4,1B7,1ack $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (bbl !isin $msg) { set %Acronymbbl 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1B7,1e 4,1B7,1ack 4,1L7,1ater $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (thanks !isin $msg) { set %Acronymty 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1T7,1hank 4,1Y7,1ou $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (yw !isin $msg) { set %Acronymyw 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1Y7,1our 4,1W7,1elcome $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (bck !isin $msg) { set %Acronymbck 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1I0,1'7,1m 4,1B7,1ack $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (lol !isin $msg) { set %Acronymlol 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1L7,1aughing 4,1O7,1ut 4,1L7,1oud $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (omg !isin $msg ) { set %Acronymomg 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1O7,1h 4,1O7,1uh 4,1G7,1awd $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (brb !isin $msg) { set %Acronymbrb 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1B7,1e 4,1R7,1ight 4,1B7,1ack $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (wb !isin $msg) { set %Acronymwb 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1W7,1elcome 4,1B7,1ack $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (bf !isin $msg) { set %Acronymbf 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1B7,1oy 4,1F7,1riend $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1° }
if (hb !isin $msg) { set %Acronymhb 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ 4,1H7,1urry 4,1B7,1ack $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°
say $replace($1-,brb, %Acronymbrb ,bbl, %Acronymbbl ,lol, %Acronymlol ,omg, %Acronymomg ,ty, %Acronymty ,wb, %Acronymwb ,yw, %Acronymyw ,bck, %Acronymbck ,bf, %Acronymbf ,hb, %Acronymhb )
halt
}
}
Nice catch, Cracker200. There's no $msg identifier. That being said, change: > if (brb !isin $msg) to
if (brb isin $regml(1))
if (bbl isin $regml(1))
if (thanks isin $regml(1))
... so on and so forth
will resolve the issue. And you do the same for other ones.
The regex example by WorldDMV is a great one, too.
!!! ??
look i dont understand verry well your problem i'm not good in inglish i seak french
bu about color u can try this
/echo -a My text: 14,1©15,1º0,1°4,1¨9,1H14,1ello. 4,1¨0,1°15,1º14,1©
u'll have this text colored " My text: ©º°¨Hello. ¨°º© "
ON INPUT event if u dont put "halt" or "haldef" u'll have a double send the hal command stop the event so while u put the color word it stoped befor the second send
on :input::{
echo -a My text: 14,1©15,1º0,1°4,1¨9,1H14,1ello. 4,1¨0,1°15,1º14,1©
halt <== here it's stoped if u remove this u'll have a doule send
}
Oh, WorldDMT, You seem like someone who'd know.. I need to set it up on my talker to have the text be dual color.. Here's an example:
My text: 14,1©15,1º0,1°4,1¨9,1H14,1ello. 4,1¨0,1°15,1º14,1©
I know it can be done, I know someone who did it, but I can't reach them.. If you know him, maybe you can ask? Lucius on irc.nightchatters.com I haven't been on it for awhile, but Maybe you can help? Or anyone?
I'm gonna make a forum post about it too. Forum Topic: http://www.hawkee.com/phpBB2/viewtopic.php?p=93519#93519
hi
one "}" missing at end
your code can be like this
on *:input:*:{
if $regex($1-,/^(brb|bbl|lol|omg|ty|wb|yw|bck|bf|hb)$/i) {
var %x $replace($regml(1),brb,Be Right Back,bbl,Be Back Later,ty,Thank You,yw,Your Welcome,bck,I'm Back,lol,Laughing Out Loud,omg,Oh Ouh Gawd,brb,Be Right Back,wb,Welcome Back,bf,Boy Friend,hb,Hurry Back)
msg $active 4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°14,1«15,1« $+ $regsubex(%x,((\w)(.+\s)(\w)(.+\s)|(\w)(.+\s))(\w)(.+),4\27\3 4\47\5 4\67\7) $+ 15,1»14,1»4,1°7,1ø6,1·4,1¤6,1·7,1ø4,1°
halt
}
}