AUTOVOICE AVEC POSSIBILITÉ DE BLACK-LISTER auto, voice, black list, autovoice, blackliste, Source N°45923

Information sur la source

Catégorie :Scripts Classé sous : auto, voice, black list, autovoice, blackliste Niveau : Initié Date de création : 02/03/2008 Vu : 1 813

Auteur : Patou_175

Site perso

Ecrire un message privé

Note :
Aucune note

Commentaire sur cette source (7)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Autovoice classique avec fonction supplémentaire : vous pouvez empêcher quiconque de bénéficier du voice en ajoutant son host à la liste noire.

Le code principal de la source est à mettre dans la partie remote de mIRc.

Mettez cette ligne dans la partie popup pour ajouter un raccourci graphique au lancement du script :
Gérer l'autovoice:/dialog -m avoice avoice

Sinon, tapez /dialog -m avoice avoice pour le lancer.

Source

on *:JOIN:*:{
if ($chan == $readini(chanVoice.ini,$chan,avoice) && $address($nick,2) != $readini(chanVoiceBlack.ini,$address($nick,2),novoice)) mode $chan +v $nick
}
dialog avoice {
title "Gestion de l'autovoice"
size -1 -1 359 195
option pixels
tab "Gestion des salons", 1, 4 2 351 189
button "Supprimer", 4, 148 61 66 23, tab 1
text "Ajoutez ou supprimer un salon de la liste permet de voicer toutes les personnes qui y rentrent. N'oubliez pas de vous appliquer les modes +h, +o, +a ou +q pour que ce script fonctionne.", 5, 221 28 129 139, tab 1
button "Ajouter", 7, 149 35 66 22, tab 1
edit "#", 3, 14 33 127 22, tab 1
list 13, 14 59 125 116, tab 1 size
tab "Gestion de la liste noire", 2
text "La liste noire permet d'empécher certaines personnes de profiter de l'avoice sur les salons configurés. Les membres listés ne seront voicés sur un aucun salon ou ce script est actif.", 8, 234 33 109 143, tab 2
button "Ajouter", 11, 163 35 66 23, tab 2
button "Supprimer", 12, 164 62 65 22, tab 2
edit "*!*@", 6, 16 35 140 20, tab 2
list 14, 16 57 140 110, tab 2 size
}
on *:dialog:avoice:init:0:{
%i = 1
while ( %i <= $ini(chanVoice.ini,0)) {
did -a $dname 13 $ini(chanVoice.ini,%i)
inc %i
}
%i = 1
while ( %i <= $ini(chanVoiceBlack.ini,0)) {
did -a $dname 14 $ini(chanVoiceBlack.ini,%i)
inc %i
}
}
on *:dialog:avoice:sclick:*:{
if ($did == 7) {
//writeini -n chanVoice.ini $did(3) avoice $did(3)
did -r $dname 13
did -r $dname 3
%i = 1
while ( %i <= $ini(chanVoice.ini,0)) {
did -a $dname 13 $ini(chanVoice.ini,%i)
inc %i
}
}
if ($did == 4) {
//remini -n chanVoice.ini $did(13).seltext
did -r $dname 13
%i = 1
while ( %i <= $ini(chanVoice.ini,0)) {
did -a $dname 13 $ini(chanVoice.ini,%i)
inc %i
}
}
if ($did == 11) {
//writeini -n chanVoiceBlack.ini $did(6) novoice $did(6)
did -r $dname 14
did -r $dname 6
%i = 1
while ( %i <= $ini(chanVoiceBlack.ini,0)) {
did -a $dname 14 $ini(chanVoiceBlack.ini,%i)
inc %i
}
}
if ($did == 12) {
//remini -n chanVoiceBlack.ini $did(14).seltext
did -r $dname 14
%i = 1
while ( %i <= $ini(chanVoiceBlack.ini,0)) {
did -a $dname 14 $ini(chanVoiceBlack.ini,%i)
inc %i
}
}
}

on *:JOIN:*:{
  if ($chan == $readini(chanVoice.ini,$chan,avoice) && $address($nick,2) != $readini(chanVoiceBlack.ini,$address($nick,2),novoice)) mode $chan +v $nick
}

dialog avoice {
  title "Gestion de l'autovoice"
  size -1 -1 359 195
  option pixels
  tab "Gestion des salons", 1, 4 2 351 189
  button "Supprimer", 4, 148 61 66 23, tab 1
  text "Ajoutez ou supprimer un salon de la liste permet de voicer toutes les personnes qui y rentrent. N'oubliez pas de vous appliquer les modes +h, +o, +a ou +q pour que ce script fonctionne.", 5, 221 28 129 139, tab 1
  button "Ajouter", 7, 149 35 66 22, tab 1
  edit "#", 3, 14 33 127 22, tab 1
  list 13, 14 59 125 116, tab 1 size
  tab "Gestion de la liste noire", 2
  text "La liste noire permet d'empécher certaines personnes de profiter de l'avoice sur les salons configurés. Les membres listés ne seront voicés sur un aucun salon ou ce script est actif.", 8, 234 33 109 143, tab 2
  button "Ajouter", 11, 163 35 66 23, tab 2
  button "Supprimer", 12, 164 62 65 22, tab 2
  edit "*!*@", 6, 16 35 140 20, tab 2
  list 14, 16 57 140 110, tab 2 size
}

on *:dialog:avoice:init:0:{
  %i = 1
  while ( %i <= $ini(chanVoice.ini,0)) {
    did -a  $dname 13 $ini(chanVoice.ini,%i)
    inc %i
  }
  %i = 1
  while ( %i <= $ini(chanVoiceBlack.ini,0)) {
    did -a  $dname 14 $ini(chanVoiceBlack.ini,%i)
    inc %i
  }
}
on *:dialog:avoice:sclick:*:{
  if ($did == 7) { 
    //writeini -n chanVoice.ini $did(3) avoice $did(3)
    did -r  $dname 13
    did -r  $dname 3
    %i = 1
    while ( %i <= $ini(chanVoice.ini,0)) {
      did -a  $dname 13 $ini(chanVoice.ini,%i)
      inc %i
    }
  }
  if ($did == 4) { 
    //remini -n chanVoice.ini $did(13).seltext
    did -r  $dname 13
    %i = 1
    while ( %i <= $ini(chanVoice.ini,0)) {
      did -a  $dname 13 $ini(chanVoice.ini,%i)
      inc %i
    }
  }


  if ($did == 11) { 
    //writeini -n chanVoiceBlack.ini $did(6) novoice $did(6)
    did -r  $dname 14
    did -r  $dname 6
    %i = 1
    while ( %i <= $ini(chanVoiceBlack.ini,0)) {
      did -a  $dname 14 $ini(chanVoiceBlack.ini,%i)
      inc %i
    }
  }
  if ($did == 12) { 
    //remini -n chanVoiceBlack.ini $did(14).seltext
    did -r  $dname 14
    %i = 1
    while ( %i <= $ini(chanVoiceBlack.ini,0)) {
      did -a  $dname 14 $ini(chanVoiceBlack.ini,%i)
      inc %i
    }
  }
}

Conclusion

L'adresse à black-lister est comparé sous la forme *!*@host.
Il est donc obligatoire de mettre une host sous cette forme (c'est $addresse($nick,2))

Sources de la même categorie

Toutes les sources de la catégorie Scripts

Sources en rapport avec celle ci

Commentaires

Commentaire de modserv le 07/03/2008 18:57:30

* /dialog: 'avoice' invalid table, in 'text' 5
* /dialog: 'avoice' invalid table, in 'text' 5
* /dialog: 'avoice' invalid table, in 'text' 5
* /dialog: 'avoice' invalid table, in 'text' 5
hum hum ?
Commentaire de ircland le 10/03/2008 22:28:42

Génial cette source! dommage de mIRC n'offre pas se "add-on" par default!

*eyes rolling*!!!
Commentaire de Patou_175 le 11/03/2008 20:38:09

modserv, je comprend pas, j'ai ressayé moi ça marche..
Tu mets bien tout le code dans "Remote", puis tu tapes "/dialog -m avoice avoice" pour le lancer ?
Commentaire de wims le 11/03/2008 21:30:08

L'id 5 de la table de ton dialog est un text
Ton texte comporte une virgule mais les virgules sont utilisés comme séparateur de paramètre ds la table de dialog...
Je n'ai pas testé le code donc je peux pas en dire plus mais quel version utilisez-vous ? utilise $+ $chr(44) sinon, ça devrais marcher...
Commentaire de wims le 11/03/2008 21:32:42

Sur mIRC 6.3, aucun soucis pour la virgule, Modserv doit utiliser une version ancienne...
Commentaire de ircland le 12/03/2008 00:19:28

Non mais... le sujet n'est pas encore clot ? mIRC fait deja les autovoice sur le pseudo qu'on veut et la blacklist... Donc cassé vous pas la tête ... si vous êtes pas capable de la loader ou d'écrire une source dans le sens du monde utilisé mIRC avant de faire des sources inutiles...
Commentaire de wims le 12/03/2008 15:11:59

Je n'ai pas parlé de la source en elle même, je ne m'amuse pratiquement plus a commenter les sources que je juge inutile (celle ci a le bonus d'être en initié :))

Ajouter un commentaire

Discussions en rapport avec ce code source

Autovoice Pseudo Spéciaux par theNoX

compteur de ligne ou mot pour autovoice par speeder

Help :) par jujuquatre

devoice auto? par maaars

Auto voice selon le nick par XavierBL

probleme d'auto away par mixam

auto kicker gras et surligné. par jeekee

auto join salon par snip74

pb auto op par djdadou

Auto ghost on join [Question] par guibio