This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

problem with nick2hand from chanlist

Old posts that have not been replied to for several years.
Locked
User avatar
Dedan
Master
Posts: 260
Joined: Wed Jul 09, 2003 10:50 pm
Location: Memphis

problem with nick2hand from chanlist

Post by Dedan »

i am getting no errors but nothing is happening ...
any ideas?

Code: Select all


bind part -|- "#myChannel *" part:ck

proc part:ck {nick uhost handle channel msg} {
  global botnick

  set Masters 0
  set Opers 0
  set friends 0

  set users [chanlist $channel]
  foreach user $users {
    if {$user == $botnick} {continue}
    set hand [nick2hand $user]
    if {($hand == "") || ($hand == "*")} {
      continue
    } elseif {[matchattr $hand m]} {
      incr Masters 1
    } elseif {[matchattr $hand o]} {
      incr Opers 1
    } elseif {[matchattr $hand f]} {
      incr friends 1
    } 
  }
  # post stuff
}

thanks
I once was an intelligent young man, now i am old and i can not remember who i was.
User avatar
strikelight
Owner
Posts: 708
Joined: Mon Oct 07, 2002 10:39 am
Contact:

Post by strikelight »

It could be that the bot is seeing different caps for the channel mask, which would result in the proc not being called...

use * as the mask for the binding, and do a case insensitive comparison inside the proc itself...
User avatar
Dedan
Master
Posts: 260
Joined: Wed Jul 09, 2003 10:50 pm
Location: Memphis

Post by Dedan »

i still have the same problem when i use
"*" in the bind .. no "s
I once was an intelligent young man, now i am old and i can not remember who i was.
User avatar
strikelight
Owner
Posts: 708
Joined: Mon Oct 07, 2002 10:39 am
Contact:

Post by strikelight »

Then you need to post your entire proc, including the posting...
User avatar
Dedan
Master
Posts: 260
Joined: Wed Jul 09, 2003 10:50 pm
Location: Memphis

Post by Dedan »

Code: Select all

bind part -|- * part:ck 

proc part:ck {nick uhost handle channel msg} { 
  global botnick 

  set Masters 0 
  set Opers 0 
  set friends 0 

  set users [chanlist $channel] 
  foreach user $users { 
    if {$user == $botnick} {continue} 
    set hand [nick2hand $user] 
    if {($hand == "") || ($hand == "*")} { 
      continue 
    } elseif {[matchattr $hand m]} { 
      incr Masters 1 
    } elseif {[matchattr $hand o]} { 
      incr Opers 1 
    } elseif {[matchattr $hand f]} { 
      incr friends 1 
    } 
  } 
   putquick "PRIVMSG $channel : Masters\: $Masters Opers\: $Opers friends\: $friends "
} 
I once was an intelligent young man, now i am old and i can not remember who i was.
User avatar
strikelight
Owner
Posts: 708
Joined: Mon Oct 07, 2002 10:39 am
Contact:

Post by strikelight »

And nothing is getting sent to the channel upon someone parting it?
Have to ask, are you sure the script is being loaded?
Locked