voicing users in list when bot is last who joined..

[kublador]

how can i do this?
because when the bot is the first joined and the users in the userlist joined.. it voices automatically..
but when the users in the userlist are already in the channel and the eggdrop bot lastly joined..
it doesnt voices the users that are there before the bot joined even if they are in the userlist..
can someone help me?
thank you

[caesar]

Code: Select all

bind join * my:join

proc my:join {nick uhost hand chan} {
  if {[strlwr $nick] != [strlwr $::botnick]} {
    return
  }
  utimer 15 [list give:voice $chan]
}

proc give:voice {chan} {
  if {![botisop $chan]} {
    return
  }
  foreach user [chanlist $chan] {
    if {[strlwr $user] == [strlwr $::botnick] || [isvoice $user $chan] [isop $user $chan] || ![matchattr [nick2hand $user] of|of $chan]} {
      continue
    }
    pushmode $chan +v user
  }
}

[kublador]

thanks... how can i run this? is there something i need to type in the channel to voice everyone in the userlist that has +B flag?

how bout everyone that has no voice even if it s not in the userlist?
thank you very much

[caesar]

First copy/paste the code I've posted in a file named how you wish .tcl (eg. bla.tcl) then load it to your eggdrop. For a channel command use the folowing code to voice friends (marked with +B flag):

Code: Select all

bind pub o !fvoice pub:fvoice

proc pub:fvoice {nick host hand chan text} {
  foreach user [chanlist $chan] { 
    if {[strlwr $user] == [strlwr $::botnick] || [isvoice $user $chan] [isop $user $chan] || ![matchattr [nick2hand $user] |B $chan]} { 
      continue 
    } 
    pushmode $chan +v user 
  }
}

and this one for all the channel users:

Code: Select all

bind pub o !avoice pub:avoice

proc pub:avoice {nick host hand chan text} {
  foreach user [chanlist $chan] { 
    if {[strlwr $user] == [strlwr $::botnick] || [isvoice $user $chan] [isop $user $chan]} { 
      continue 
    } 
    pushmode $chan +v user 
  }
}

[kublador]

kewl! thanks God bless