egghelp/eggheads community

common command with multiple variants/subcommands ?

2002-09-06T10:56:19-04:00

i tried a few things and i still get that error, was looking good too

Statistics: Posted by kain — Fri Sep 06, 2002 10:56 am

common command with multiple variants/subcommands ?

2002-09-05T16:08:16-04:00

forgot to add:
i get that same error when trying any of the commands owner/master/op/voice

Statistics: Posted by kain — Thu Sep 05, 2002 4:08 pm

common command with multiple variants/subcommands ?

2002-09-05T15:36:47-04:00

ppslim:
when i tried your code out i got this:

Code:

Tcl error [pub:add:command]: list element in quotes followed by "op"" instead of space

maybe regsub would work?

Statistics: Posted by kain — Thu Sep 05, 2002 3:36 pm

common command with multiple variants/subcommands ?

2002-09-04T19:17:41-04:00

wow that looks so simple.
i'll try both and run each one for a week, see if i get any problems.
thanks both

Statistics: Posted by kain — Wed Sep 04, 2002 7:17 pm

common command with multiple variants/subcommands ?

2002-09-04T16:52:27-04:00

An easy way to do subcommands would be to use the pubm bind, since it allows you to do more than one word. For instance:

Code:

bind pubm n "add op *" pub_add_opbind pubm n "add master" pub_add_masterbind pubm n "add owner *" pub_add_ownerproc pub_add_op {nick uhost hand chan text} {  ...}

This looks a lot easier than that switch statement heh.

Statistics: Posted by stdragon — Wed Sep 04, 2002 4:52 pm

common command with multiple variants/subcommands ?

2002-09-04T11:03:01-04:00

ahh, thats what i was doing, the switch anyway, have a look at this code, some of it might look a bit weird/wrong, which it probably is, but its part of a much larger script(which works), i'll try and include everything.

Code:

   set add_pubcmd {      "add"      "del"   }   switch $add_pubcmd {               "add" {                  if {[lindex ${origtext} 0]=="owner"} {                     pub_add_owner [lindex [split ${origtext} " "] 1] $chan $nick                  }                              }                              "del" {                  if {[lindex ${origtext} 0]=="owner"} {                     pub_del_owner [lindex [split ${origtext} " "] 1] $chan $nick                  }                              }bind pub n|- owner pub_add_ownerproc pub_add_owner {nick host hand chan arg} {  if { $arg == "" } {    putserv "NOTICE $nick :Usage: add owner "    return  }  chattr $arg |+n $chan  putserv "PRIVMSG $chan :$nick is now a channel owner for $chan!"  putloglev c $chan "($nick!$host) $hand $chan <> $arg"}bind pub n|- owner pub_del_ownerproc pub_del_owner {nick host hand chan arg} {    if { $arg == "" } {    putserv "NOTICE $nick :Usage: del owner "    return  }    if { ![validuser $arg] } {    putserv "NOTICE $nick :Error: invalid handle."    return  }  chattr $arg |-n $chan  putserv "NOTICE $nick :Removed $arg as owner on $chan."  putloglev c $chan "($nick!$host) $hand $chan <> $arg"}

its probably obvious that im no tcl god lol, but i try
thanks again ppslim

Statistics: Posted by kain — Wed Sep 04, 2002 11:03 am

common command with multiple variants/subcommands ?

2002-09-04T09:38:02-04:00

There is no way to sub-bind in eggdrop.

You would have to bind the "add" command, and then filter what is being said within the script, using either switch of if-elseif-else statments.

EG

bind pub n|n add pub:add:command
proc pub:add:command {nick uh hand chan arg} {
switch -exact -- [lindex [split [string tolower $arg]] 0] {
"owner" { chattr [lindex [split $arg] 1] +n $chan }
"master { chattr [lindex [split $arg] 1] +m $chan }
"op" {chattr [lindex [split $arg] 1] +o $chan }
"handle" {
switch -exact -- [lindex [split [string tolower $arg]] 1] {
"owner" {blah}
"master" {blah}
}
}
}
[/code]

Statistics: Posted by ppslim — Wed Sep 04, 2002 9:38 am

common command with multiple variants/subcommands ?

2002-09-04T07:56:15-04:00

Hi,
Heres what im trying to do. ive got it going one way but i'd like to know if theres a better way of doing it.

I want to add a common command "add" which has 4 subcommands "owner/master/op/voice" followed by "nick/handle"
it would work something like this:

pub:

add owner person
Person is now a channel owner on #channel!

the same would work for master/op/voice
the second common command is "del" with subcommands "owner/master/op/voice" followed by "nick/handle"
the final one is the same as "add" but if the nick isnt on the channel you can use "add hand owner "
ive almost got it working but i wanted to know if there is a better way to add a common command and a list of subcommands which would be bound, rather than having a long list.
any help / ideas would be great

Statistics: Posted by kain — Wed Sep 04, 2002 7:56 am