Systeme d'utilisation des services (chanserv, nickserv, ...)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 579 fois - Téléchargée 26 fois

Commenter

Contenu du snippet

Voila ma deuxième source, elle permet de ne plus avoir a taper les commandes pour utiliser les services chanserv, nickserv, mémoserv, botserv).
Pour l'instant seul nickserv et chanserv sont opérationnels, je coderé les autres prochainement.
PS: je débute en MIRC scripting alors soyez pas trop dur avec moi ;-)

Source / Exemple : 


menu * { 
  Services:dialog -m services services
}

dialog services {
  title ".:: Utilisation des Services IRC ::."
  size -1 -1 243 167
  option dbu
  tab "Nickserv", 1, 3 0 237 148
  tab "Chanserv", 2
  tab "Botserv", 3
  button "Fermer", 5, 105 154 33 12
  box "T'enregistrer ou t'authentifier", 4, 7 33 110 56, tab 1
  edit "", 6, 92 19 65 10, multi return tab 1
  edit "", 7, 40 42 65 10, multi return tab 1
  text "Nick :", 8, 72 22 17 6, right tab 1
  text "Pass :", 9, 20 45 17 6, right tab 1
  check "Enregistrement", 10, 40 55 49 6, tab 1
  button "Identifier", 11, 43 77 32 10, tab 1
  box "Récupérer ton nick", 12, 125 33 110 56, tab 1
  text "Nick :", 13, 135 50 17 6, right tab 1
  edit "", 14, 155 47 65 10, multi return tab 1
  button "Release", 15, 140 67 37 12, tab 1
  box "Options", 16, 7 89 227 55, tab 1
  box "T'enregistrer ou t'authentifier", 17, 7 33 110 63, tab 2
  edit "", 19, 95 20 65 10, multi return tab 2
  edit "", 20, 44 42 65 10, multi return tab 2
  text "Pass :", 22, 24 45 17 6, right tab 2
  text "Channel :", 23, 67 23 25 6, right tab 2
  check "Enregistrement", 24, 47 56 45 6, tab 2
  button "OK", 25, 55 82 20 10, tab 2
  box "Gestion SOP/AOP/VOP", 26, 125 33 110 63, tab 2
  text "Nick :", 32, 135 55 17 6, right tab 2
  edit "", 33, 155 53 65 10, multi return tab 2
  radio "Ajouter", 34, 133 44 25 6, tab 2
  radio "Supprimer", 35, 194 44 33 6, tab 2
  radio "Lister", 36, 165 44 21 6, tab 2
  button "OK", 37, 171 82 20 10, tab 2
  box "Options", 38, 7 96 227 48, tab 2
  edit "", 39, 40 63 65 10, multi return tab 1
  text "Mail :", 40, 19 64 17 6, tab 1
  edit "", 41, 44 65 65 10, multi return tab 2
  text "Description :", 42, 12 68 29 6, right tab 2
  check "SOP", 28, 134 70 21 6, tab 2
  check "AOP", 29, 156 70 21 6, tab 2
  check "HOP", 18, 179 70 21 6, tab 2
  check "VOP", 30, 203 70 21 6, tab 2
  button "Recover", 31, 184 59 37 12, tab 1
  button "Topic", 43, 65 106 37 12, tab 2
  button "Modes", 44, 105 106 37 12, tab 2
  button "Message d'entrée", 45, 12 106 49 12, tab 2
  button "Drop", 21, 145 106 37 12, tab 2
  button "Founder", 27, 190 106 37 12, tab 2
  button "Successeur", 46, 16 122 37 12, tab 2
  button "Pass", 47, 58 122 37 12, tab 2
  button "Description", 48, 100 122 37 12, tab 2
  button "Url", 49, 141 122 37 12, tab 2
  button "Email", 50, 184 122 37 12, tab 2
  button "Logout", 51, 12 99 37 12, tab 1
  button "Status", 52, 52 99 37 12, tab 1
  button "Send Pass", 53, 93 99 37 12, tab 1
  button "Drop", 54, 134 99 37 12, tab 1
  button "&Hide", 55, 0 0 0 0, hide Ok
}

on *:dialog:services:*:*: {
  if $devent == init { 
    did -c services 1
    did -b services 39
    did -b services 41
    did -a services 6,14 $me
    did -a services 33 $snick($active,1)
    if ($left($active,1) == $chr(35)) { did -a services 19 $active } 
  }
  if $devent == sclick  {
    if $did == 5 { dialog -x services services }
    if $did == 10 {
      if ($did(10).state == 1) { did -e services 39 | did -ra services 11 Enregistrer }
      if ($did(10).state == 0) { did -b services 39 | did -ra services 11 Identifier }
    }
    if $did == 11 {
      if $did(10).state == 1 {
        if ($did(6)) || ($did(7)) || ($did(39)) { msg NickServ register $did(6) $did(7) $did(39) }
      }
      if $did(10).state == 0 {
        if ($did(6)) || ($did(7)) { msg NickServ identify $did(6) $did(7) }
      }
    }
    if $did == 15 {
      if ($did(14)) { msg NickServ release $did(14) }
    }
    if $did == 31 {
      if ($did(14)) { msg NickServ recover $did(14) }
    }
    if $did == 25 {
      if $did(24).state == 1 {
        if ($did(19)) || ($did(20)) || ($did(41)) { msg ChanServ register $did(19) $did(20) $did(41) }
      }
      if $did(24).state == 0 {
        if ($did(19)) || ($did(20)) { msg ChanServ identify $did(19) $did(20) }
      }
    }
    if $did == 24 {
      if ($did(24).state == 1) { did -e services 41 }
      if ($did(24).state == 0) { did -b services 41 }
    }

    if $did == 37 {
      if ($did(34).state == 1) && ($did(33)) && ($did(19)) && ($did(28).state == 1) { msg ChanServ sop $did(19) add $did(33) }
      if ($did(34).state == 1) && ($did(33)) && ($did(19)) && ($did(29).state == 1) { msg ChanServ aop $did(19) add $did(33) }
      if ($did(34).state == 1) && ($did(33)) && ($did(19)) && ($did(18).state == 1) { msg ChanServ hop $did(19) add $did(33) }
      if ($did(34).state == 1) && ($did(33)) && ($did(19)) && ($did(30).state == 1) { msg ChanServ vop $did(19) add $did(33) }
      if ($did(35).state == 1) && ($did(33)) && ($did(19)) && ($did(28).state == 1) { msg ChanServ sop $did(19) del $did(33) }
      if ($did(35).state == 1) && ($did(33)) && ($did(19)) && ($did(29).state == 1) { msg ChanServ aop $did(19) del $did(33) }
      if ($did(35).state == 1) && ($did(33)) && ($did(19)) && ($did(18).state == 1) { msg ChanServ hop $did(19) del $did(33) }
      if ($did(35).state == 1) && ($did(33)) && ($did(19)) && ($did(30).state == 1) { msg ChanServ vop $did(19) del $did(33) }
      if ($did(36).state == 1) && ($did(19)) { msg ChanServ list $did(19) }
      if ($did(36).state == 1) && ($did(19)) && ($did(28).state == 1) { msg ChanServ sop $did(19) list }
      if ($did(36).state == 1) && ($did(19)) && ($did(29).state == 1) { msg ChanServ aop $did(19) list }
      if ($did(36).state == 1) && ($did(19)) && ($did(18).state == 1) { msg ChanServ hop $did(19) list }
      if ($did(36).state == 1) && ($did(19)) && ($did(30).state == 1) { msg ChanServ vop $did(19) list }
    }
    if $did == 36 {
      if ($did(36).state == 0) { did -e services 33 }
      if ($did(36).state == 1) { did -b services 33 }
    }
    if $did == 34 {
      if ($did(34).state == 1) { did -e services 33 }
    }
    if $did == 35 {
      if ($did(35).state == 1) { did -e services 33 }
    }    
    if $did == 45 {
      set %var $?="Entrez le message d'entrée (laissez un espace pour effacer l'ancien) :"
      if (%var) { msg ChanServ set $did(19) EntryMsg %var }
      else { halt }
    }
    if $did == 44 {
      set %var $?="Entrez les modes (ex: +nt-iklps) :"
      if (%var) { msg ChanServ set $did(19) MLock %var }
      else { halt }
    }
    if $did == 43 {
      set %var $?="Entrez le topic à afficher (laissez un espace pour effacer l'ancien) :"
      if (%var) { msg ChanServ set $did(19) TopicLock Off | msg chanserv Topic $did(19) %var | msg chanserv set $did(19) TopicLock On }
      else { halt }
    }
    if $did == 21 {
      set %var $input(Cette commande effacera votre channel. Il n'y a aucun moyen de faire marche arrière. Etes-vous sûr de vouloir le faire ?,adwy,ATTENTION !!!,ATTENTION !!!)
      if (%var) { msg ChanServ Drop $did(19) }
      else { halt }
    }
    if $did == 27 {
      set %var $?="Entrez le nouveau propriétaire :"
      if (%var) { msg ChanServ set $did(19) Founder %var }
      else { halt }
    }
    if $did == 46 {
      set %var $?="Entrez le nouveau successeur :"
      if (%var) { msg ChanServ set $did(19) Successor %var }
      else { halt }
    }
    if $did == 47 {
      set %var $?="Entrez le nouveau mot de passe :"
      if (%var) { msg ChanServ set $did(19) Password %var }
      else { halt }
    }
    if $did == 48 {
      set %var $?="Entrez la nouvelle description :"
      if (%var) { msg ChanServ set $did(19) Desc %var }
      else { halt }
    }
    if $did == 49 {
      set %var $?="Entrez la nouvelle url (laissez un espace pour effacer l'ancienne) :"
      if (%var) { msg ChanServ set $did(19) Url %var }
      else { halt }
    }
    if $did == 50 {
      set %var $?="Entrez la nouvelle email (laissez un espace pour effacer l'ancienne) :"
      if (%var) { msg ChanServ set $did(19) Email %var }
      else { halt }
    }
    if $did == 51 { msg NickServ LogOut }
    if $did == 52 { msg NickServ Status $did(6) }
    if $did == 53 { msg NickServ SendPass $did(6) }
    if $did == 54 {
      set %var $input(Cette commande effacera votre nick. Il n'y a aucun moyen de faire marche arrière. Etes-vous sûr de vouloir le faire ?,adwy,ATTENTION !!!,ATTENTION !!!)
      if (%var) { msg NickServ Drop $did(6) }
      else { halt }
    }
  }
}

Conclusion :


Comme je l'ai di plus haut, le code sera mis à jour bientôt (dès que j'en aurait le temps)
Je remercie Sorn_Drixer, Kolibot, tofu\ et Re[M]i_34 pour leur aide ;-)

A voir également

Ajouter un commentaire Commentaires
Floorfilla91 Messages postés 27 Date d'inscription lundi 5 décembre 2005 Statut Membre Dernière intervention 18 février 2008
8 juin 2007 à 03:38
8/10 mais il manque juste les commande du BotServ.
Erwanou Messages postés 59 Date d'inscription mardi 23 août 2005 Statut Membre Dernière intervention 8 janvier 2006
20 nov. 2005 à 16:50
po mal , un peu gros a mon gout : 8/10
SnJaS Messages postés 17 Date d'inscription lundi 18 juillet 2005 Statut Membre Dernière intervention 23 septembre 2005
11 sept. 2005 à 21:00
ça m'a l'air bien... Aller, pour le fun je met 9 ^^
juki_webmaster Messages postés 947 Date d'inscription mercredi 19 novembre 2003 Statut Membre Dernière intervention 5 avril 2008 3
22 févr. 2004 à 17:25
Pas mal du tout !
9/10
lgrenon Messages postés 32 Date d'inscription mercredi 19 février 2003 Statut Membre Dernière intervention 29 juillet 2004
15 févr. 2004 à 09:25
Merci Chang-Fu mais t'inquiete pas les options et les autres contrôles, je les coderai prochainement, c'est juste que je n'est pas assez de temps en ce moment.
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 (lgrenon)