Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


cherche blacklist pour eggdrop
#16
tu peut ajouter ceci


tcl
|| ![channel get $chan blacklist]



tcl
proc blacklist:join {nickname hostname handle channel} {
 global blacklist
  if {![botisop $channel]} {return}
  set userhost [blacklist:weirdclean "$nickname![getchanhost $nickname]"]
  foreach entry [array names blacklist] {
    set reason [lrange [blacklist:clean $blacklist($entry)] 2 end]
    set blackhost [blacklist:weirdclean $entry]
    if {[string match -nocase $blackhost $userhost]} {
      putquick "MODE $channel -o+b $nickname $entry"
      putquick "KICK $channel $nickname :[join $reason]"
    }
  }
}


ce qui va te donner :


tcl
proc blacklist:join {nickname hostname handle channel} {
 global blacklist
  if {![botisop $channel] || ![channel get $channel blacklist] } {return}
  set userhost [blacklist:weirdclean "$nickname![getchanhost $nickname]"]
  foreach entry [array names blacklist] {
    set reason [lrange [blacklist:clean $blacklist($entry)] 2 end]
    set blackhost [blacklist:weirdclean $entry]
    if {[string match -nocase $blackhost $userhost]} {
      putquick "MODE $channel -o+b $nickname $entry"
      putquick "KICK $channel $nickname :[join $reason]"
    }
  }
}


pour activer ta blacklist sur un salon définie tu va en pl de ton bot et tu tape

Quote:.chanset #TONSALON +blacklist

sa devrai le faire,j'ai pas tester Smile


Cordialement DnS
La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.
#17
je vien de tester en party line mai sa me dit ce message >> Error trying to set +blacklist for #possession-tchat, invalid mode. Aliassangelius faut til le rajouter ou pas merci de votre aide
#18
tu a taper quoi en pl ?
La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.
#19
jai tapper sa >>>.chanset #possession-tchat +blacklist
#20
ha oui j'ai oublier sa dans ton code:

Quote:setudef flag blacklist

voila


tcl
setudef flag blacklist
 
proc blacklist:join {nickname hostname handle channel} {
global blacklist
  if {![botisop $channel] || ![channel get $channel blacklist] } {return}
  set userhost [blacklist:weirdclean "$nickname![getchanhost $nickname]"]
  foreach entry [array names blacklist] {
    set reason [lrange [blacklist:clean $blacklist($entry)] 2 end]
    set blackhost [blacklist:weirdclean $entry]
    if {[string match -nocase $blackhost $userhost]} {
      putquick "MODE $channel -o+b $nickname $entry"
      putquick "KICK $channel $nickname :[join $reason]"
    }
  }
}

La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.
#21
voila c fait c activer en pl mai quand je regarde ma liste sur un autre salon il aparrai tjr
#22
normal puisque il est dans ta liste blacklister. apres ce que tu vient de faire c'est activer la blackliste sur un salon voulu donc ton user qui est blacklister sera kick ban seulement là ou tu aura activer ta blackliste:

si tu active ta blackliste sur #salon1 l'user sera kick ban sur salon1 et pas sur #salon2
La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.
#23
oki ba je te remercie bonne journer


Possibly Related Threads…
Thread Author Replies Views Last Post
  [Demande] Demande tcl pour faire parler eggdrop Yakka 9 8,473 26/09/2014, 14:10
Last Post: CrazyCat
  Cherche d'un tcl KeeViiNou 2 3,842 28/12/2012, 10:32
Last Post: KeeViiNou
  Une Blacklist par salon. aliasangelius 4 4,984 15/10/2012, 12:07
Last Post: aliasangelius
  Cherche un Tcl qui réagit a des mots KeeViiNou 4 4,398 28/09/2012, 15:10
Last Post: KeeViiNou
  cherche un script zyrte 3 3,284 02/08/2011, 10:50
Last Post: CrazyCat
  je cherche un tcl geantrfr 0 2,720 25/04/2011, 00:43
Last Post: geantrfr
  Soucis avec une Blacklist [résolu] loulou7593 6 5,981 12/12/2010, 14:42
Last Post: loulou7593
  Recherche uno pour eggdrop MRVOLKANO 2 4,392 03/12/2010, 23:45
Last Post: Mrvolks
  Recherche de script blacklist Amelie 8 5,549 28/11/2010, 18:25
Last Post: Amelie
  cherche tcl pseudo T4tou 9 3,886 03/11/2010, 13:47
Last Post: T4tou

Forum Jump:


Users browsing this thread: 1 Guest(s)