egghelp/eggheads community

great

2002-11-21T16:25:09-04:00

thanks
It work now

Statistics: Posted by Guest — Thu Nov 21, 2002 4:25 pm

Anyone have tryed "popdog" BotRequest script from

2002-11-21T14:33:58-04:00

Code:

global botnicks

change this line to:

Code:

global botnicks receiver waittime

when a variable is set outside a proc you have to put it in the global line to be able to use it inside a proc

Statistics: Posted by Papillon — Thu Nov 21, 2002 2:33 pm

!

2002-11-21T13:53:05-04:00

hmm now that error are gone, but a new come :/

Tcl error [pub:request]: can't read "receiver": no such variable

can you help again ?

Statistics: Posted by Guest — Thu Nov 21, 2002 1:53 pm

Anyone have tryed "popdog" BotRequest script from

2002-11-21T12:38:05-04:00

Locate this line

Code:

proc pub:request {nick uhost handle chan text} {

and make it

Code:

proc pub:request {nick uhost handle chan text} {global botnicks

(yes it is 2 seperate lines)

I don't know if there are any other errors.

Statistics: Posted by ppslim — Thu Nov 21, 2002 12:38 pm

the script

2002-11-21T12:18:47-04:00

Thanks

# BotRequest by popdog <Humpert.Ben@T-Online.de>, #Q-Control @ QuakeNet
# version 1.3 for eggdrop 1.5.x & 1.6.x
# 05-Nov-2001
# If you have suggestions -> #Q-Control @ QuakeNet

# some settings

set botnicks "ZyFleX01 ZyFleX02"
# Enter every bots nickanme which is free for requesting.
set waittime "3800"
# Enter time in seconds the user have to wait before he can request again. (default "604800" = 1 week)
set receiver "$owner"
# Enter handle (or use $owner if the bot-owner shout receive it) of added user which should receive the request. If note should send to an user on another bot use handle@botname. (default "$owner")
# more users can be added if you remove the "#" in front of the line below

# YOU SHOULDN'T EDIT ANYTHING BELOW THIS LINE IF YOU DON'T KNOW WHAT YOU ARE DOING !!

bind pub -|- !request pub:request

proc pub:request {nick uhost handle chan text} {
set ipmask [lindex [split [maskhost $nick![getchanhost $nick $chan]] "@"] 1]
set userm [lindex [split [getchanhost $nick $chan] "@"] 0]
set userhost *!*$userm@$ipmask
set requestbot [lindex [split $text " "] 0]
set channel [lindex [split $text " "] 1]
set homepage [lindex [split $text " "] 2]
if {[matchattr $handle +R]} {
putserv "NOTICE $nick :Request not send."
putserv "NOTICE $nick :You already requested a bot in the last 7 days!"
putserv "NOTICE $nick :You have to wait more than 7 days after a successful Request."
} else {
if {$requestbot == ""} {
putserv "NOTICE $nick :Wrong !request-format."
putserv "NOTICE $nick :To request use: 4!request #channel http://www.home.page"
putserv "NOTICE $nick :You also need a working homepage and 2 or more Members opped in the requested channel."
} else {
if {$channel == ""} {
putserv "NOTICE $nick :Wrong !request-format."
putserv "NOTICE $nick :To request use: 4!request #channel http://www.home.page"
putserv "NOTICE $nick :You also need a working homepage and 2 or more Members opped in the requested channel."
} else {
if {[string first "#" $channel] == -1} {
putserv "NOTICE $nick :Wrong !request-format."
putserv "NOTICE $nick :To request use: 4!request #channel http://www.home.page"
putserv "NOTICE $nick :You also need a working homepage and 2 or more Members opped in the requested channel."
} else {
if {[string first "http://" $homepage] == -1} {
putserv "NOTICE $nick :Wrong !request-format."
putserv "NOTICE $nick :To request use: 4!request #channel http://www.home.page"
putserv "NOTICE $nick :You also need a working homepage and 2 or more Members opped in the requested channel."
} else {
if {[string first $requestbot $botnicks] != -1} {
if {$channel != ""} {
if {$homepage != ""} {
sendnote BotRequest $receiver "$nick want's $requestbot in $channel. His HP is $homepage."
# sendnote BotRequest user1 "$nick want's $requestbot in $channel. His HP is $homepage."
# sendnote BotRequest user2 "$nick want's $requestbot in $channel. His HP is $homepage."
adduser $nick $userhost
chattr $nick +R|
utimer $waittime "chattr $nick -R|"
putserv "NOTICE $nick :Request send."
} else {
putserv "NOTICE $nick :Wrong !request-format."
putserv "NOTICE $nick :To request use: 4!request #channel http://www.home.page"
putserv "NOTICE $nick :You also need a working homepage and 2 or more Members opped in the requested channel."
}
}
} else {
putserv "NOTICE $nick :You typed a wrong bot-nick. Known bot-nick's are:"
putserv "NOTICE $nick :$botnicks"
}
}
}
}
}
}
}

putlog "BotRequest v1.3 by popdog loaded."

Statistics: Posted by Guest — Thu Nov 21, 2002 12:18 pm

Anyone have tryed "popdog" BotRequest script from

2002-11-21T12:17:31-04:00

If you post a link to the script, I will look over it.

Statistics: Posted by ppslim — Thu Nov 21, 2002 12:17 pm

k

2002-11-21T11:35:42-04:00

I used the advanced one...

im checking the tcl again... im almost sure im not gonna find any errors.... im a n00b in tcl... :/
perhaps you will check it for me if i post it here ?

Statistics: Posted by Guest — Thu Nov 21, 2002 11:35 am

Anyone have tryed "popdog" BotRequest script from

2002-11-21T11:31:02-04:00

My advice is to read over the configuration of the script carefully, as you may have left out a setting, that can't be blank, or has a invalid format.

While it may not be directly named the same as in the error, missing data elsewhere could cause this to happen.

Another cause is, that you have missed a setting in the main config file. Which config template did you use.

Statistics: Posted by ppslim — Thu Nov 21, 2002 11:31 am

.

2002-11-21T11:24:31-04:00

im not sure i understand what you mean... i cant find any place in the script where there only are typed botnick

Statistics: Posted by Guest — Thu Nov 21, 2002 11:24 am

Anyone have tryed "popdog" BotRequest script from

2002-11-21T11:19:27-04:00

There is a standard variable called 'botnick', but not 'botnicks' - is this a typo?

Statistics: Posted by Photon — Thu Nov 21, 2002 11:19 am

Anyone have tryed "popdog" BotRequest script from

2002-11-21T11:14:40-04:00

have anyone tryed that script ?
my wont work...
perhaps anyone can help me whit it ?

When ppl use the request command nothing happens...
but in the partyline the bot says:

Tcl error [pub:request]: can't read "botnicks": no such variable

I have set the bot nicks... what can be wrong ?

Statistics: Posted by Guest — Thu Nov 21, 2002 11:14 am