egghelp/eggheads community

on join help!

2006-10-27T10:24:47-04:00

I'd also recommend using puthelp as it uses a different queue with a lower priority

Statistics: Posted by nml375 — Fri Oct 27, 2006 10:24 am

on join help!

2006-10-27T08:59:34-04:00

If it's under heavy join/parts then it gets lagged thus leading to the delay in oping. If you really need this implement a *delay* function else remove it.

Statistics: Posted by caesar — Fri Oct 27, 2006 8:59 am

on join help!

2006-10-26T07:44:31-04:00

* off topic *
mindflow stop checking the 'Disable BBCode in this post' if you use BBCode in your replyes.

* on topic *
if {[lsearch -exact $::excludedchans $channel] == -1}
is missing a "{"
Code:
if {[lsearch -exact $::excludedchans $channel] == -1} {
Also, if the channel name will be #foo and in the 'excludedchans' you have #FOO or something different than #foo then it will send the message. I would go for 'setudef'.

Ok. the TCL working now, but i got a strange behavior from the bot, after added that line i got a huge "lag" or "delay" when the bot auto op me, i know auto op is a bad this to use, but since the channels are protected by channel service i use it any way

Problem:
befor that line i got auto oped 2 sec after i joined, now it takes up to 1 minute befor i got my @, the bot are on 4 channels with maybe 100 users total, so that shouldent be any problem, anyone that have a suggestion about this? and i have a of topic question too, to change the eggdrop version reply i need to add 1 line in the eggdrop.con file, i forgot what line that is. someone that know what i mean?

Statistics: Posted by mindflow — Thu Oct 26, 2006 7:44 am

on join help!

2006-10-24T03:26:39-04:00

I thought lsearch was case-sensitive when using the -exact switch? Hmm, just looked at the lsearch manpage, guess you'd have to use -exact -ascii for it to be case-sensitive.

And about crashing the bot, sorry!

Read this post and you'll never have a bot crash from loading scripts:

http://forum.egghelp.org/viewtopic.php?p=63899#63899

Statistics: Posted by rosc2112 — Tue Oct 24, 2006 3:26 am

on join help!

2006-10-24T02:57:31-04:00

* off topic *
mindflow stop checking the 'Disable BBCode in this post' if you use BBCode in your replyes.

* on topic *

if {[lsearch -exact $::excludedchans $channel] == -1}

is missing a "{"

Code:

if {[lsearch -exact $::excludedchans $channel] == -1} {

Also, if the channel name will be #foo and in the 'excludedchans' you have #FOO or something different than #foo then it will send the message. I would go for 'setudef'.

Statistics: Posted by caesar — Tue Oct 24, 2006 2:57 am

on join help!

2006-10-23T21:48:12-04:00

Code:

set excludedchans "#channelname #chan2 #whatever"proc msg_jmsg1 {nick uhost hand channel args} {    global botnick     if {[lsearch -exact $::excludedchans $channel] == -1}          putserv "NOTICE $nick : Hi $nick, I'm $botnick. Rest of msg"     } else {          return     }}

BTW "args" is a special case in tcl, in case you run into problems using it.

Thnx for the help, the code didnt work as it should tho.. any other idea?

* EDIT *

Forgot to say, the bot dies when i rehach it:

(03:45) « bot » (file "scripts/fun.tcl" line 710)
(03:45) « bot » invoked from within
(03:45) « bot » "source scripts/fun.tcl"
(03:45) « bot » (file "bot.conf" line 1220)
(03:45) « bot » [05:44] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)

Line 710 in the tcl:

proc msg_jmsg1 {nick uhost hand channel} {

tryed to edit it a bit, but still same result.

Statistics: Posted by mindflow — Mon Oct 23, 2006 9:48 pm

on join help!

2006-10-23T17:26:46-04:00

Code:

set excludedchans "#channelname #chan2 #whatever"proc msg_jmsg1 {nick uhost hand channel args} {    global botnick     if {[lsearch -exact $::excludedchans $channel] == -1}          putserv "NOTICE $nick : Hi $nick, I'm $botnick. Rest of msg"     } else {          return     }}

BTW "args" is a special case in tcl, in case you run into problems using it.

Statistics: Posted by rosc2112 — Mon Oct 23, 2006 5:26 pm

on join help!

2006-10-23T17:18:44-04:00

Try it: http://www.egghelp.org/tclhtml/3478-4-7-0-1.htm

uhum, thats a link to other peoples TCL, all i need is a if statement, if {chan == #channel} do nothing

dont remember how to write it right tho..

Statistics: Posted by mindflow — Mon Oct 23, 2006 5:18 pm

on join help!

2006-10-23T17:08:02-04:00

Try it: http://www.egghelp.org/tclhtml/3478-4-7-0-1.htm

Statistics: Posted by username — Mon Oct 23, 2006 5:08 pm

on join help!

2006-10-23T16:57:22-04:00

I havent been working in TCL for a long time now, and i need 1 channel to be excluded from the "join" event, this is how it looks like now.

Code:

bind join * * msg_jmsg1proc msg_jmsg1 {nick uhost hand channel args} {global botnick    putserv "NOTICE $nick : Hi $nick, I'm $botnick. Rest of my message here. :)"     return 1}

how would i make this see if the channel the person join is the excluded channel, the bot are on 6 channels i want it to send the notice on join, then 1 i dont want it to send the notice too.. someone that can help me with this?[/code]

Statistics: Posted by mindflow — Mon Oct 23, 2006 4:57 pm