Un petit dialogue pour oper/deoper... d'un simple click sur une image
4/5 (3 avis)
Snippet vu 4 606 fois - Téléchargée 27 fois
Contenu du snippet
Heuuu, pour ceux qui ont vu l'addition de couleurs ou smileys dans la saisie, c'est la même chose, mais pour oper se oper, se déope voice, etc...
un dialogue qui se met soit à gauche soit à droite de mIRC.
Les images peuvent-être chargées sur http://alerion.nerim.net/addon/petiteaidecommandes.htm
ça marche avec ChanServ, sous les autres serveurs IRC je ne connait pas du tout, alors ce serait sympa, pour tous les dev très connus ici, si y en a un ki connait particulièrement d'ajouter la partie *** Click par les bonnes commandes (je pense particulièrement à irix
:)
Et Quidni!
un dialogue qui se met soit à gauche soit à droite de mIRC.
Les images peuvent-être chargées sur http://alerion.nerim.net/addon/petiteaidecommandes.htm
Source / Exemple :
;************************************************************ Table
alias gestcommandes { dialog -m gestcommandes gestcommandes }
dialog gestcommandes {
size -1 -1 45 450
title "Com"
button "t" 1,1 1 1 1,ok
icon 30 , 5 5 30 30 ,images\meop.bmp
icon 31 , 5 40 30 30 , images\dopvoice.bmp
icon 32 , 5 80 30 30 , images\oper.bmp
icon 33 , 5 115 30 30 , images\helper.bmp
icon 34 , 5 150 30 30 , images\voicer.bmp
icon 35 , 5 190 30 30, images\deoper.bmp
icon 36 , 5 225 30 30 , images\dehelper.bmp
icon 37, 5 260 30 30, images\devoicer.bmp
; icon 38, 5 300 30 30, images\kick.bmp
; icon 39, 5 335 30 30, images\kickban.bmp
icon 40, 5 375 30 30, images\gauche.bmp
icon 41, 5 410 30 30, images\droite.bmp
}
;************************************************************* Init
on 1:dialog:gestcommandes:init:*: {
set -u6 %xmain $window(-2).x + $window(-2).w
set -u6 %ymain $window(-2).y + 42
dialog -s gestcommandes %xmain %ymain 45 450
/did -bv gestcommandes 1
}
;************************************************************* Alias
;************************************************************* Click
on 1:dialog:gestcommandes:sclick:*: {
if ($did == 30) { /msg chanserv op $active $me }
if ($did == 31) { /mode $active +v-o $me $me }
if ($did == 32) { set %snick 1 | set %opppp +o | while (%snick < $snick($active,0)) { set %opppp %opppp $+ o | inc %snick }
set %snick $replace($snick($active),$chr(44),$chr(32)) | /mode $active %opppp %snick | unset %opppp %snick }
if ($did == 33) { set %snick 1 | set %hpppp +h | while (%snick < $snick($active,0)) { set %hpppp %hpppp $+ h | inc %snick }
set %snick $replace($snick($active),$chr(44),$chr(32)) | /mode $active %hpppp %snick | unset %hpppp %snick }
if ($did == 34) { set %snick 1 | set %vpppp +v | while (%snick < $snick($active,0)) { set %vpppp %vpppp $+ v | inc %snick }
set %snick $replace($snick($active),$chr(44),$chr(32)) | /mode $active %vpppp %snick | unset %vpppp %snick }
if ($did == 35) { set %snick 1 | set %opppp -o | while (%snick < $snick($active,0)) { set %opppp %opppp $+ o | inc %snick }
set %snick $replace($snick($active),$chr(44),$chr(32)) | /mode $active %opppp %snick | unset %opppp %snick }
if ($did == 36) { set %snick 1 | set %hpppp -h | while (%snick < $snick($active,0)) { set %hpppp %hpppp $+ h | inc %snick }
set %snick $replace($snick($active),$chr(44),$chr(32)) | /mode $active %hpppp %snick | unset %hpppp %snick }
if ($did == 37) { set %snick 1 | set %vpppp -v | while (%snick < $snick($active,0)) { set %vpppp %vpppp $+ v | inc %snick }
set %snick $replace($snick($active),$chr(44),$chr(32)) | /mode $active %vpppp %snick | unset %vpppp %snick }
if ($did == 40) { set -u6 %xmain $window(-2).x - 50 | set -u6 %ymain $window(-2).y + 42 | dialog -s gestcommandes %xmain %ymain 45 450 }
if ($did == 41) { set -u6 %xmain $window(-2).x + $window(-2).w | set -u6 %ymain $window(-2).y + 42 | dialog -s gestcommandes %xmain %ymain 45 450 }
}
;************************************************************** Evénements
on 1:start: { .gestcommandes }
;************************************************************** Menus
menu menubar {
-
Commandes:/gestcommandes
}
Conclusion :
ça marche avec ChanServ, sous les autres serveurs IRC je ne connait pas du tout, alors ce serait sympa, pour tous les dev très connus ici, si y en a un ki connait particulièrement d'ajouter la partie *** Click par les bonnes commandes (je pense particulièrement à irix
:)
Et Quidni!
A voir également
- Hpppp
- IRC : Petit anti kick et anti ban assez simple by blade2a - CodeS SourceS - Guide
- Petit menu et renvoi de donées tout simple ✓ - Forum - Flash
- Petit problème de texture ! Sans doute très simple ;-) ✓ - Forum - Flash
- Petit problème avec un pointeur et un simple appel de fonction... ✓ - Forum - C / C++ / C++.NET
- Petit probleme avec l'opérateur instanceof ✓ - Forum - Java
23 nov. 2005 à 10:12
Code original, et ça m'a permis de connaitre comment marche $snick($active) et compagnie :)
26 sept. 2003 à 19:12
A titre perso sur mon script j'utilise des alias et ça va bien plus vite, mais, ma femme estime que c'est mieux comme cela, il n'y a qu'à sélectionner, et cliquer sur l'icone. "Magique"
Pour le zip oui, j’essaierai pour le prochain :o)
(ha oui si quelqu'un connais le truc pour repasser le focus sur l'édit boxe...)voir le code sur les smileys :)
Et Quidini!
26 sept. 2003 à 12:48
... le /mode $chan +o $$1 c bcp plus rapide :p
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.