egghelp/eggheads community

multi cmdchars

2008-06-21T15:28:43-04:00

As I told you, you can't do it like that.
You will either have to set multiple binds, or create a pubm bind to match against * and parse the text inside the proc. Both have their benefits and fallbacks. Multiple binds means, well, multiple bindings (which isn't a bad thing unless you create a million binds, so I don't know why you wouldn't want this). A pubm bound procedure would have to process all text in a channel, which isn't too efficient.

So again... I repeat to you the solution I posted above, commented:

Code:

# Set below the characters you wish to use prior to your command# ie: 1) !command 2) .command 3)`commandset cmdchars ".!`"# now we will set up the bindings based on that information provided above, you don't need to edit this partforeach cmdchar [split $cmdchars ""] {  bind pub - ${cmdchar}say pub:say}#done

This does exactly what you ask, despite how many times you say it isn't what you are asking.

Statistics: Posted by strikelight — Sat Jun 21, 2008 3:28 pm

multi cmdchars

2008-06-21T15:23:56-04:00

so, let me explain it again.. more clearly.. (I hope)

I want to make this script that has a lot of binds, and I want to use more cmdchars, for this reason I want to make this proc [cmd] and set more binds, like:

Code:

bind pub -|- [cmd]say proc_saybind pub -|- [cmd]die proc_die

and so on..

I dont want to set 3 times the same thing..

help me if you can, thank you & for your time.

Statistics: Posted by edu — Sat Jun 21, 2008 3:23 pm

multi cmdchars

2008-06-21T14:58:47-04:00

Code:

bind pub -|- !say pub:say bind pub -|- .say pub:say bind pub -|- `say pub:say

That's what my code above did. He doesn't want that apparently.

Statistics: Posted by strikelight — Sat Jun 21, 2008 2:58 pm

multi cmdchars

2008-06-21T14:27:34-04:00

Code:

bind pub -|- !say pub:say bind pub -|- .say pub:say bind pub -|- `say pub:say

Statistics: Posted by Nor7on — Sat Jun 21, 2008 2:27 pm

multi cmdchars

2008-06-21T13:21:27-04:00

you dont get it -- I'll make it with only one cmdchar

Thanks anyway

Statistics: Posted by edu — Sat Jun 21, 2008 1:21 pm

multi cmdchars

2008-06-21T10:14:32-04:00

You can't do what you are trying to do that way. What []'s do is evaluate a command immediately. For example:

Code:

proc test {} {  return "moo boo who"}bind pub - "[test]unf" proc:unf

This will cause the pub event to be bound to "moo boo who".
ie. To trigger the proc, you would have to say in a channel:

moo boo whounf

NOT "moounf" or "boounf" or "whounf"

You will need to create multiple bindings as I just provided you the code for, or you will need to bind a pubm to * and check inside the proc itself.

Statistics: Posted by strikelight — Sat Jun 21, 2008 10:14 am

multi cmdchars

2008-06-21T04:25:33-04:00

I dont need it this way..

I need to make the [cmd] proc to use it, like:

proc -|- [cmd]say say_proc
proc -|- [cmd]die die_proc
etc..

and then into the "code" if $text isn't specified to do: putquick "notice $nickname :[cmd]say "

pls help me

Statistics: Posted by edu — Sat Jun 21, 2008 4:25 am

multi cmdchars

2008-06-20T20:22:40-04:00

I think more of what you are after is this:

Code:

set cmdchars ".!`"foreach cmdchar [split $cmdchars ""] {  bind pub - ${cmdchar}say pub:say}

and then your proc...

Statistics: Posted by strikelight — Fri Jun 20, 2008 8:22 pm

multi cmdchars

2008-06-20T20:11:40-04:00

Code:

set cmdchar ". ! `"proc cmd { } {global cmdcharforeach cmd_char $cmdchar {return $cmd_char}}bind pub -|- [cmd]say pub:sayproc pub:say {nickname hostname handle channel text} {global cmdset text [split $text]        if {$text == ""} {            putquick "NOTICE $nickname :syntax: [cmd]say "            return       }putquick "PRIVMSG $channel :$text"}

how can I make this script to work when I type .say / !say or `say -- and if no "text" is specified to return .say / !say or `say

Thank you, please help me.

Statistics: Posted by edu — Fri Jun 20, 2008 8:11 pm