egghelp/eggheads community

$arg is not being returned?

2014-07-31T06:46:13-04:00

There's no difference in the placement of the return with this "simple" procedure, but there is a condition in it. So it's better to have the return exactly when needed.

And I agree with the inline comment from heartbroken : use a nocase comparison for channel name, because if you do:

Code:

# In party-line.+chan #DaIgO# In tclset givechan "#daigo"

The eggdrop will see that the channel is #DaIgO, doesn't equal #daigo.

Statistics: Posted by CrazyCat — Thu Jul 31, 2014 6:46 am

$arg is not being returned?

2014-07-26T02:49:26-04:00

For the last 3 lines, what is the difference between:

Code:

       return 0      }  }

and

Code:

      }  return 0  }

Statistics: Posted by daigo — Sat Jul 26, 2014 2:49 am

$arg is not being returned?

2014-07-26T02:02:43-04:00

you need bind pub instead of pubm there...
and you already have "global" line for "givechan" in give proc..
you have to choose one of :

global givechan
.. $givechan

or remove "global" line and just use :

.. $::givechan

Code:

 set givechan "#daigo" bind pub - !give pub_give proc pub_give {nick host hand chan arg} {     # this one is "case sensitive"     if {$chan eq $::givechan} {        # you can use string match -nocase or string equal -nocase   # if {[string match -nocase $::givechan $chan]} {     # if {[string equal -nocase $::givechan $chan]} {   # or add a line outside of the proc , an user defined channel flag     # setudef flag something    # and add a line just under the proc line to check this channel flag    #  activated or not    # if {[channel get $chan something]} {   # and no need to set givechan "..."    # do : .chanset #your-channel +something    # voilà  if you would go this way ,don't forget to replace all    # $::givechan vars to $chan in proc too...     # !cmd first Word to last Word. it takes whole line.       set given [join [lrange [split $arg] 0 end]]       # if you want to post !cmd first-word :      # set given [lindex [split $arg] 0]      #  or if you want to post !cmd three-words :      # set given [join [lrange [split $arg] 0 2]]       puthelp "PRIVMSG $::givechan :Here is $given for you"       return 0      }   }

Statistics: Posted by heartbroken — Sat Jul 26, 2014 2:02 am

$arg is not being returned?

2014-07-26T01:08:11-04:00

Here is my script:

Code:

bind pubm - !give giveset givechan "#daigo"proc give {nick host hand chan arg} {  global givechan  if {$chan eq $::givechan} {  puthelp "PRIVMSG $givechan :Here is $arg for you"  }  return 0}

But when I do something like: !give milk and cookies
In the channel, but the bot doesn't return anything, not even an error. But if I make the bind pubm as * (bind pubm - * give) then it does work. How come?

Statistics: Posted by daigo — Sat Jul 26, 2014 1:08 am