Having difficulty with this desc script

[mcdarby]

Hi, I am having some difficulty with this !desc script that I have because the problem is that the eggdrop isn't responding when the command "!desc Name" is issued in any of the channels it is in. This is the script that I have.

Code: Select all

bind pub -|- "!desc Name" pub:desc

set inuse 0

proc pub:desc {nick host hand chan arg} {
    global inuse

    if { $inuse == 1 } {
    putquick "PRIVMSG $chan :Sorry, !desc is currently in use, please wait 30 seconds and try again"
    return
    }
    set inuse 1
    putquick "PRIVMSG $chan :Desc of Name"
    utimer 30 {set inuse 0}
}

I hoping that you can tell me what the problem might be.

McDarby[/code]

[greenbear]

bind pub only work with a single word, use pubm if you want more than one trigger word.

[mcdarby]

bind pub only work with a single word, use pubm if you want more than one trigger word.

I just tried changing all the "pub"s to "pubm"s and that still didn't work.

[awyeah]

There's only one bind pub, which should have been changed to bind pubm. All the others? If you've changed the proc name, from pub:desc to pubm:desc that won't eventually effect the working of the script.

If the script does not work, what error do you get? Check in DCC:

.tcl set errorInfo

[spock]

probably didnt change the mask according to what the pubm bind expects ("% !desc name")

edit: yep

[mcdarby]

There's only one bind pub, which should have been changed to bind pubm. All the others? If you've changed the proc name, from pub:desc to pubm:desc that won't eventually effect the working of the script.

If the script does not work, what error do you get? Check in DCC:

.tcl set errorInfo

Well, the eggdrop still isn't responding to it and there is no error messages at all. And .tcl doesn't work in DCC of the eggdrop as it goes "What?, you need help?" in response to .tcl in DCC.

[greenbear]

I believe spock gave you the answer.

[awyeah]

Just try using the bind:

Code: Select all

bind pub - "!desc" pub:desc

And check next:
if {[string equal "Name" [lindex $arg 0]]}

Something like this:

Code: Select all

bind pub - "!desc" pub:desc

set inuse 0 

proc pub:desc {nick host hand chan arg} {
    global inuse
 if {[string equal "Name" [lindex $arg 0]]} {
    if { $inuse == 1 } {
    putquick "PRIVMSG $chan :Sorry, !desc is currently in use, please wait 30 seconds and try again"
    return
    }
    set inuse 1
    putquick "PRIVMSG $chan :Desc of Name"
    utimer 30 {set inuse 0}
    }
}

As for the .tcl command to work in DCC you have to comment the unbind directive for dcc:tcl in the bot's .conf file and then restart the bot.

[mcdarby]

probably didnt change the mask according to what the pubm bind expects ("% !desc name")

edit: yep

Yep, that was the problem, didn't realize the % needed to be in there.