Un petit dialogue pour oper/deoper... d'un simple click sur une image

Commenter

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

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

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 (Alerion)