1. Accueil
  2. Tous les snippets
  3. Snippets IRC
  4. Auto identify multi serveur infini par nickserv

Auto identify multi serveur infini par nickserv

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 967 fois - Téléchargée 35 fois

Commenter

Contenu du snippet

Comme d'habitude a mettre dans les remotes Alt+R => File => New
Ceci est un Auto Identify Multi Serveur par nickserv infini

Source / Exemple : 


;Auto Identify by guigui653

alias ai dialog -m ai ai
dialog ai {
  title "Auto Ident Multi server by guigui653"
  size -1 -1 350 270
  edit "" ,2, 10 20 150 25, read
  list 1, 10 50 150 200, sort, extsel, multsel, size, vsbar
  radio "O&n" ,6, 210 170 35 15, left
  radio "O&ff" ,7, 250 170 100 15,
  button "&Ajouter" ,3, 200 30 120 24,
  button "&Supprimer" ,4, 200 80 120 24, disable
  button "&Modifier" ,5, 200 130 120 24, disable
  button "&Ok" ,8, 200 200 120 25, cancel
}

on *:dialog:ai:sclick:*: {
  if ($did == 1) { did -e $dname 4,5 }
  if ($did == $null) { did -b $dname 4,5 }
  if ($did == 3) { addai }
  if ($did == 4) { delai }
  if ($did == 5) { modifai }
  if ($did == 8) {
    if ($did(6).state == 1) { .enable #autoid }
    if ($did(7).state == 1) { .disable #autoid }
  }
}
alias -l addai {
  var %addaigars $$?="Entre le pseudo"
  var %addaipass $$?*"Entre le pass"
  writeini $network $+ .autoident autoid %addaigars %addaipass | saveini
  did -a ai 1 %addaigars
}

alias -l delai {
  remini $network $+ .autoident autoid $did(1).seltext | saveini
  did -d ai 1 $did(1).sel
}

alias -l modifai {
  var %modifgars $$?="Par quel pseudo remplacer"
  var %modifpass $$?*"Par quel pass"
  remini $network $+ .autoident autoid $did(1).seltext | saveini
  did -d ai 1 $did(1).sel
  writeini $network $+ .autoident autoid %modifgars %modifpass | saveini
  did -a ai 1 %modifgars
}

on *:dialog:ai:init:0: {
  did -ra ai 2 $network
  if ($group(#autoid) == on) { did -c ai 6 }
  if ($group(#autoid) == off) { did -c ai 7 }

  var %a 1
  while (%a <= $ini($network $+ .autoident,autoid,0) ) {
    if ($ini($network $+ .autoident,autoid,%a) != $null) {
    did -a ai 1 $ini($network $+ .autoident,autoid,%a) }
    else { goto suite }
    :suite
    inc %a
  }
}

#autoid on
on *:notice:*identify*motdepasse*:*: {
  if ($nick == nickserv) || ($nick == Themis) {
    if ($readini($network $+ .autoident,autoid,$me)) {
      echo 6 -a Identification de $me
      ns identify $readini($network $+ .autoident,autoid,$me)
    }
  }
}

Conclusion :


j'attend vos commentaires et vos notes (j'espere bon :) )

A voir également

Ajouter un commentaire Commentaires
cs_tofu Messages postés 1726 Date d'inscription vendredi 12 septembre 2003 Statut Membre Dernière intervention 13 juin 2009 1
3 oct. 2004 à 17:11
if ($did == $null) { did -b $dname 4,5 }, if !$did
if ($ini($network $+ .autoident,autoid,%a) != $null) {,
if $ini($network $+ .autoident,autoid,%a) {

ARRETEZ DE MAL UTILISER LIDENTIFIEUR $NULL, JE ME REPETE DANS CHAQUE CODE POSTE.§

au lieu de mettre deux radio, tu mets un check on/off et tu mets
$iif($did(6).state == 1,.enable #autoid,.disable #autoid)
guigui653 Messages postés 13 Date d'inscription samedi 24 juillet 2004 Statut Membre Dernière intervention 24 décembre 2004
3 oct. 2004 à 17:30
écoute tofu, je suis débutant :/
alors soit indulgent stp :/
en + je comprend rien aux $iif alors je pouvé pas le mettre et y'a aucun tutorial ici la dessus...
cs_tofu Messages postés 1726 Date d'inscription vendredi 12 septembre 2003 Statut Membre Dernière intervention 13 juin 2009 1
3 oct. 2004 à 17:34
ok faut que jsois indulgent, donc ton code est super trop bien ya rien à changer tu script trop bien, tu veux pas me donner des cours stp ? ..
guigui653 Messages postés 13 Date d'inscription samedi 24 juillet 2004 Statut Membre Dernière intervention 24 décembre 2004
3 oct. 2004 à 17:40
fou toi de ma guele :/
guigui653 Messages postés 13 Date d'inscription samedi 24 juillet 2004 Statut Membre Dernière intervention 24 décembre 2004
3 oct. 2004 à 17:41
JE NE MAITRISE PAS LE $iif alors je préfere faire comme sa. c clair ? :) g pas envie de m'embrouiller ac kékun 2 plu for ke moi :s
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 (guigui653)