egghelp/eggheads community

Help making this script relay

2005-10-11T03:44:07-04:00

Change

Code:

global onjoin_msg onjoin_chans botnick

Code:

global onjoin_msg onjoin_chans botnick relaychan

Statistics: Posted by Sir_Fz — Tue Oct 11, 2005 3:44 am

Help making this script relay

2005-10-10T18:42:58-04:00

Thanks for the effort but

[15:43] Tcl error [join_onjoin]: can't read "relaychan": no such variable

Statistics: Posted by stevegarbz — Mon Oct 10, 2005 6:42 pm

Help making this script relay

2005-10-09T16:52:28-04:00

Why does it message the channel. I would think that notice is alot better, otherwise it will spam the channel with welcome messages. This is better

Code:

set onjoin_msg {  {   "Hello $nick, welcome to $chan. This channel is owned by Precision Effect and has moved to #PE or www.PrecisionEffect.com - Please join there for sales/support."  } } set onjoin_chans "#1.6 #6radio #advertize #adz #e-sports #esports #find #hix #radio #ringer #scrim #search #webhosting #webdesign" set relaychan "#PE-Bot"bind join - * join_onjoin putlog "Onjoin.tcl 0.1 by Banned loaded" proc join_onjoin {nick uhost hand chan} {  global onjoin_msg onjoin_chans botnick  if {(([lsearch -exact [string tolower $onjoin_chans] [string tolower $chan]] != -1) || ($onjoin_chans == "*")) && (![matchattr $hand b]) && ($nick != $botnick)} {   set onjoin_temp [lindex $onjoin_msg [rand [llength $onjoin_msg]]]   foreach msgline $onjoin_temp {    putquick "NOTICE $nick :[subst $msgline]"   }  putquick "PRIVMSG $relaychan :On-join message sent to $nick on $chan"  } }

That will notice $nick with the welcome message, and message $relaychan with On-join message sent to $nick on $chan

If you dont want it to notice $nick with the welcome message, just change

Code:

putquick "NOTICE $nick :[subst $msgline]" toputquick "PRIVMSG $chan :[subst $msgline]"

Enjoy!!!

Statistics: Posted by r0t3n — Sun Oct 09, 2005 4:52 pm

Help making this script relay

2005-10-09T16:29:30-04:00

I currently have this script:

Code:

set onjoin_msg { {  "Hello $nick, welcome to $chan. This channel is owned by Precision Effect and has moved to #PE or www.PrecisionEffect.com - Please join there for sales/support." }}set onjoin_chans "#1.6 #6radio #advertize #adz #e-sports #esports #find #hix #radio #ringer #scrim #search #webhosting #webdesign"bind join - * join_onjoinputlog "Onjoin.tcl 0.1 by Banned loaded"proc join_onjoin {nick uhost hand chan} { global onjoin_msg onjoin_chans botnick if {(([lsearch -exact [string tolower $onjoin_chans] [string tolower $chan]] != -1) || ($onjoin_chans == "*")) && (![matchattr $hand b]) && ($nick != $botnick)} {  set onjoin_temp [lindex $onjoin_msg [rand [llength $onjoin_msg]]]  foreach msgline $onjoin_temp {   putquick "PRIVMSG $chan :[subst $msgline]"  } }}

Is there anyway that when it sends the message to the certain nick that joined, it can relay something like:

Say the bot was in #PE-Bot and I wanted it to say who it messaged:

On-join message sent to $nick in $chan

Example: The bot is in a channel #esports

Someone joins #esports
Bot messages #esports with the onjoin msg stated

Bot messages #PE-Bot
On-join message sent to $nick in $chan

-Thanks.

Statistics: Posted by stevegarbz — Sun Oct 09, 2005 4:29 pm