Shitlist qui marche :)

Commenter

Contenu du snippet

c'est une shitlist come son nom lindik
vous pouvez mettre un nombre de nick illimite dan votre liste
vous pouvez choisir le format de rejet : kick , kickban ou akick
vous pouvez lactiver et la desactiver :|
pour les akick il faut que le serveur ait les services epona ( chanserv en locurence)
la capture est ici : http://consoljv.free.fr/shitlist.jpg
jcompren pas pk ircfr la validai pa :|

Source / Exemple : 


dialog shite {
  title "Shitlist par Tiboug"
  size -1 -1 156 175
  option dbu
  list 1, 83 6 65 143, size 
  edit "", 2, 17 26 50 10, autohs
  button "Ajouter", 3, 3 41 37 12
  button "Supprimer", 4, 45 41 37 12
  button "Modifier", 5, 23 59 37 12
  box "Format de rejet", 6, 3 84 72 65
  radio "Kick", 7, 13 95 24 10
  radio "Kickban", 8, 13 111 33 10
  radio "Akick", 9, 12 128 25 10
  text "Pseudo :", 10, 25 10 26 8
  button "Ok", 11, 5 163 143 12, ok cancel
  check "Activer la Shitlist", 12, 20 152 65 10
}

alias shitmaj {
  did -r shite 1
  var %conte = 1
  while ( %conte <= $gettok(%shit,0,44) ) {
    did -a shite 1 $gettok(%shit,%conte,44) 
    inc %conte
  }
}
on *:dialog:shite:init:0: {   
  shitmaj
  if (%formashit == Kick) {  did -c shite 7 }
  if (%formashit == Kb) {  did -c shite 8 }
  if (%formashit == Akick) {  did -c shite 9 }
  if (%shitact == pikachu) { did -c shite 12 }
}
on *:dialog:shite:sclick:*:{
  if ($did == 3) { set %shit $addtok(%shit,$did(2),44) | shitmaj }
  if ($did == 5) && ($did(1).sel !== $null)  { set %shit $reptok(%shit,$gettok(%shit,$did(1).sel,44),$did(2),1,44) | shitmaj  }
  if ($did == 1) { did -ra shite 2 $gettok(%shit,$did(1).sel,44) }
  if ($did == 4) { set %shit $remtok(%shit,$gettok(%shit,$did(1).sel,44),44) | shitmaj }
  if ($did == 7) { set %formashit Kick }
  if ($did == 8) { set %formashit Kb }
  if ($did == 9) { set %formashit Akick }
  if ($did == 12) {
    if ($did(12).state == 1) { set %shitact pikachu  }
    else { set %shitact carapuce }
  }
}
on ^1:JOIN:#:{
  if  (%shitact == pikachu) && ($nick isin %shit) && (%formashit == Kick) { /kick $chan $nick 7 Tu es dans ma shitlisteuhhhhhh }
  if  (%shitact == pikachu) && ($nick isin %shit) && (%formashit == Kb) { /kick $chan $nick 7 Tu es dans ma shitlisteuhhhhhh | /ban $chan $nick }
  if (%shitact == pikachu) && ($nick isin %shit) && (%formashit == Akick) { //msg chanserv akick $chan add $nick  7 Present dans la Shitlist de $me | /kick $chan $nick 7 Tu es dans ma shitlisteuhhhhhhhhh   }
}
on *:load:{ /dialog -m shite shite }
menu menubar,channel,status,query {
  ShitList :/dialog -m shite shite 
  -
}
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_Tiboug)