egghelp.org community

[mikey2]

ok...so far so good

Next, I would like to add a 5 min. ban for non-reg. users (after they get the pm, of course). (3) attempts to join in 24 hours without registering gets a permanent ban.

[wonka071]

thx for the script
would like to add use /msg NickServ REGISTER yourpassword youremail
to REGISTER
use /msg NIckServ IDENTIFY yourpassword to ID it you are REGISTERED

puthelp "privmsg $n :please identify or register your nick"
Should I added it here ?
}
}

[demond]

try it and see for yourself, don't wait for somebody to approve your trials
_________________
connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code

[wonka071]

changed the script like this

bind join - * foo
proc foo {n u h c} {
puthelp "whois $n"
}
bind raw - 311 got311 ;# first WHOIS reply
bind raw - 307 got307 ;# nick has identified (registered)
bind raw - 318 got318 ;# End of /WHOIS list
proc got311 {f k t} {
set n [lindex [split $t] 1]
set ::whoised($n) 0
}
proc got307 {f k t} {
set n [lindex [split $t] 1]
incr ::whoised($n)
}
proc got318 {f k t} {
set n [lindex [split $t] 1]
if {$::whoised($n) == 0} {
puthelp "privmsg $n :please identify or register your nick" U can register your nick with this (/msg NickServ REGISTER yourpassword youremail) without the ()
Also you can use this to identify yourself if you already registered (/msg NickServ IDENTIFY yourpass) without the ()
}
}
putlog "nickreg loaded"
get this error from the bot
Tcl error [got318]: wrong # args: should be "puthelp text ?options?"
Can somebody help thx

[nml375]

Please use code-blocks for code snippets.. (and indenting it would also be nice)

The cause for the problem, is that you try to use " in your message without escaping it, thus tcl think it's the end of the string, and starts parsing a new argument.
Quick-fix, put a \ infront of any " within the string (not the ones marking the start and end of string tho)
_________________
NML_375, idling at #eggdrop@IrcNET

[wonka071]

kk changed it to this :
bind join - * foo
proc foo {n u h c} {
puthelp "whois $n"
}
bind raw - 311 got311 ;# first WHOIS reply
bind raw - 307 got307 ;# nick has identified (registered)
bind raw - 318 got318 ;# End of /WHOIS list
proc got311 {f k t} {
set n [lindex [split $t] 1]
set ::whoised($n) 0
}
proc got307 {f k t} {
set n [lindex [split $t] 1]
incr ::whoised($n)
}
proc got318 {f k t} {
set n [lindex [split $t] 1]
if {$::whoised($n) == 0} {
puthelp "privmsg $n :please identify or register your nick U can register your nick with this (/msg NickServ REGISTER yourpassword youremail) without the ()
Also you can use this to identify yourself if you already registered (/msg NickServ IDENTIFY yourpass) without the ()"
}
}
putlog "nickreg loaded"
but this line not showing up
Also you can use this to identify yourself if you already registered (/msg NickServ IDENTIFY yourpass) without the ()

[r0t3n]

*edited* thanks to nml375

Try:

[nml375]

@Tosser^^: Keep track of your variable names.. (no variable named arg defined anywhere within "gotraw").

@wonka071: You can't insert newlines in privmsgs.. you'll have to issue another