AUTO OPER V.2

Voici l'explication de l'addon puis l'addon lui même 
J'ai fais ces deux séparations pour plus de clareté
 
Pour Créer votre Addon:

alias nom identifiant (du dialog) { if (!dialog(nnom identifiant)) { dialog -m nom identifiant (x2) } | else { dialog -x nom identifiant } }
#Raccourcis vous permettant d'ouvrir ou de fermer la boîte de dialog simplement en tapant /operpass

Nom identifiant du dialog n'oubliez pas le { pour permetre d'ouvrir le dialog et ainsi permettre d'y intégrer les options que vous désirerez
titre du dialog
Taille, largeur, grosseur et hauteur du dialog qui s'ouvrira
"box" est l'élément vous permettant d'encadrer des informations
"text" est l'élément vous permettant d'écrire un petit texte
"edit" élément vous permettant d'éditer une information (explication plus en détail ci-dessous)
"button" élement vous permettant de cliquer avec votre souris
"radio" élément vous permettant d'activer ou non une option 

#indiquer toujours une option de cette manière:
#élement, id, position horizontale position vertical largeur et hauteur
#exemple: text "Êtes vous Super Admin?", 26, 10 265 125 25 
#vous ne devez jamais avoir deux fois le même id dans un dialog!

#Il ne suffit pas d'un dialog pour éxecuter des commandes (malheureusement)

#On va donc faire réagir les options que vous avez mis dans votre dialog
#D'abord nous allons préciser que les éléments à faire réagir sont en rapport avec le dialog

on *:dialog:nom identifiant = "grossièrement" si on ouvre le dialog untel
#les :*:*: vous permettront d'éviter la répétition de on *:dialog...
#/!\ toujours indiquer apres :dialog: le nom identifiant

if ($devent... = si l'événement est...

ini = c'est l'initialisation d'une commande avant l'ouverture du dialog
#ici c'est s'assurer que le dialogue ne s'ouvrira qu'en partie et qu'il ne se dévoilera que si l'on cliquer sur l'element 16 (button "chnager")

sclick = si l'action est effectué par un clic gauche

Si did c'est à dire si le numéro id est égale (==) à 27 (radio "oui") activer #saoper
Si did c'est à dire si le numéro id est == à 28 (radio "non") desactiver #saoper
enable et #disable permette d'activer et de désactiver des options
#Ici ils sont en rapport avec  on 1:connect: { ...
#Donc si l'option est activé il se passera quelque chose à la connection

#interaction d'un élément en fonction d'un autre:
#si lorsque on clique sur l'id 25 (button "Ok") et que l'id 24 (%operpseudo) est nul alors on reçoit un message fenêtre active (echo -a ...)
#sinon on enregistre le pseudo oper (%operpseudo) indiqué dans l'id 24
# | permet d'indiquer d'autres actions à effectuer ici on referme le dialog puis on le réouvre (celà permet de vérifier que le operpseudo est enregistré, c'est assez basique je l'admet mais simple à comprendre ^^)

set %... ... 
#Permet d'enregistrer une variable
#Toujours à indiquer de cette forme!
#set %nomdelavariable elementàenregistrer
 
 #aOPER off
 #indique que la variable %aOPER est désactivé pour le moment (n'oubliez pas le #avant le nom)
 
 #aOPER end
 #On referme la (dés)activation 
 #/!\ A ne pas oublier!!!
 
on 1:connect: {
#Signifie lorsque je me connecte

if (!%servch) { halt }
#Signifie si la variable %servch est null
halt signifie ne rien faire

else
#Signifie sinon (en rapport avec if) 

 on *:load: {
 #Signifie lorsque je charg cet addon
 
Echo 
#Signifie envoyer en message

#et pour finir
-a
#Sur la fenêtre active

 dialog nom identifiant {
   title "S'oper [/operpass] - (¯`·._)CityWorld_ScRiPt(¯`·._)"
   size -1 -1 270 315
   box "Vous possédez un accès Admin/IRCop",1, 5 5 250 250
   text "Inscrivez le:",7,10 25 190 45
  edit %operpass ,8, 90 25 100 20,autohs, center
  button "Ok" ,10,195 25 40 25
   box "Souhaitez-vous?",13, 15 50 225 50
   button "Activer" ,11,40 70 60 25
   button "Désactiver" ,12,145 70 60 25
   box "Sur quel réseau?",15, 15 111 225 50
   edit %servch, 14, 25 130 140 20, disable
   button "Changer" ,16,175 126 60 25
   box "Sur quel réseau?",17, 270 25 180 220
   button SoInL0V3 ,18,280 55 160 35
   button SkyDirect ,19,280 100 160 35
   button %operserv ,20,280 145 160 35
   box "Votre pseudo OPER",22, 15 165 225 55
   text "Inscrivez le:",23,20 186 190 45
   edit %operpseudo ,24, 90 185 100 20,autohs, center
   button "Ok" ,25,195 184 40 25
   button "Enregistrer" ,9,95 225 75 25
   text "Êtes vous Super Admin?", 26, 10 265 125 25
   radio "oui", 27, 145 255 40 35
   radio "non", 28, 185 255 40 35
   text "Ne fonctionne qu'avec les services Anopes (ou Epona).", 21, 280 190 165 45
   text "Created By No_ImpoRtAnZ © 2006", 140, 10 290 200 70, disable
   button "Fermer" ,120,210 290 50 20, cancel
 }
 
on *:dialog:operpass:*:*:{
    if ($devent == ini) { if ($did == 0) { set %tc pti | if %econfig = ON { did -c $dname 16 } } }
   if ($devent == sclick) {
     if ($did == 27) { enable #saOPER }
 if ($did == 28) { disable #saOPER }
 if ($did == 25) {
       if (!$did(24)) { echo -a Veuillez choisir un pseudo avant d'enregistrer }
     else { set %operpseudo $did(24) | dialog -x operpass | dialog -m operpass operpass | echo 9Pseudo OPER modifié } }
     if ($did == 18) { set %servch SoInL0V3.mrhi-pro.com:7170 | dialog -x operpass | dialog -m operpass operpass }
     if ($did == 19) { set %servch irc.skydirect.net | dialog -x operpass | dialog -m operpass operpass }
     if ($did == 20) {
       if (%operserv != $null) { set %servch %operserv | dialog -x operpass | dialog -m operpass operpass }
     else { set %operserv $$?="Choisissez un server" | dialog -x operpass | dialog -m operpass operpass } }
     if ($did == 9) { if (!%operpass) { echo -a Veuillez inscire votre pass OPER }
     else { set %operpass $did(8) } }
     if (!%operseudo) { set %operpseudo $did(24)}
     else { echo -a Veuillez inscire votre pseudo OPER } }
     if ($did == 10) { if (!$did(8)) { echo -a Veuillez choisir un pseudo }
     else { set %operpass $did(8) | dialog -x operpass | dialog -m operpass operpass | echo 9OPER modifié } }
     if ($did == 11) { enable #aOPER | echo 9L'auto OPER est activé }
     if ($did == 12) { disable #aOPER | echo 9L'auto OPER est désactivé }
 if ($did == 16) { tc } } }
 alias tc { if %tc = pti { set %tc gd | .timer 1 0 dialog -s operpass -1 -1 470 315 | halt } | if %tc = gd { set %tc pti | .timer 1 0 dialog -s operpass -1 -1 265 315 | halt } } }
  
 #aOPER off
 on 1:connect: {
   if (!%servch) { halt }
 else { oper %operpseudo %operpass } }
 #aOPER end
  
 #saOPER on
 on 1:connect: {
   if (!%servch) { halt }
 else { os set superadmin on } }
 #saOPER end
  
 on *:load: {
   /echo -a 4Addon télécharger sur le site: HTTP://IN2LOVE.SYTES.NET
   /echo -a 4AUCUNE DIFFUSION SUR UN AUTRE SITE N'EST TOLéRé SANS L'AVIS DU CRéATEUR
   /echo -a 
   /echo -a 9AUTO OPER v.2 4créé par 10No_ImPoRtAnZ 4(13noimportnaz@aol.com13)
 }

 Ceci est l'explication de ma source, il existe de nombreuses autres manières d'en créer, et de multiples options sont à votre portées.
 J'espère vous avoir apporté (au moins) un peu d'aide.
 @ très bientôt.
 
(Je tiens à signaler que c'est un des premières sources dont j'explique le fonctionnement, donc veuillez m'excuser si certains points ne sont pas assez clarifier)
 

Télécharger le zip

23 septembre 2006 18:03:58 :

Petite correction de la phrase de présentation.

24 septembre 2006 01:16:50 :

Remplacement des if (... == $null)par if (!%servch); regroupement des on dialogues; suppression des "/" inutiles merci à atlantisfr

24 septembre 2006 01:37:22 :

petit oubli de * sur le on *:dialog:operpass

30 septembre 2006 03:29:45 :

Explication rédigée pour permettre à tous de comprendre un peu mieux le sens de cette source et surtout son mode de fonctionnement ou les options qui la compose. Merci à Tofu de m'avoir fait cette remarque. Pour ceux qui poseront des commentaires hors de propos, ne vous fatiguez à polluer ce site, Merci d'avance. Je tiens à préciser que je n'ai fais que peu d'explication totale d'une source donc si certains points ne sont pas assez clarifier n'hésitez pas à me le signaler. Si quelqu'un souhaite approfondir, ce sera avec joie. @ Bientôt :)

30 septembre 2006 03:44:53 :

Ajout du principe de fonctionnement dans le zip

08 avril 2007 05:07:02 :

Cette source ayant posée quelques inconvénients je poste son optimisation... Elle gère désormais la possibilité d'utiliser plusieurs commandes ainsi qu'une fonction multi-serveur. Son utilité bien que non-déstinée à tous (de par sa fonction), peut servir à titre d'exemple un fichier appui, certes un peu maigre vous ai fournit en complément d'informations.