Spy ( espion de salon ) by w4x en dialog ( menu ) et en input ( .spy .log )

Commenter

Contenu du snippet

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~~ Espion By w4x ~~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
;Commandes Inputs

;Pour lancer le Spy .spy #lesalon pour definir le chan log .chanlog #lesalon
;Obtenir les stats spy .statlog Voir le topic du chan spy .topicspy
;et /spy pour ouvrir le menu :]

alias spy dialog -m spy spy
dialog Spy {
title "- Espion - /Spy"
size -1 -1 108 182
option dbu
box "Salon des logs", 1, 4 92 50 44
box "Salon a Spy", 2, 55 92 50 44
button "Salon des logs", 5, 7 101 44 12
button "Stoper", 6, 7 118 44 12
button "Ajouter", 7, 58 101 44 12
button "Stoper", 8, 58 118 44 12
box "Events Activer/desactiver", 9, 2 3 104 75
button "Fermer", 10, 4 163 33 8, flat ok cancel
button "Tous Stoper", 3, 37 138 37 12
check "Activer Op", 4, 8 13 39 9
box "Espion - /Spy", 12, 2 80 105 96
check "Activer Deop", 16, 8 23 43 8
check "Activer Kick", 17, 8 33 40 7
check "Activer Ban", 23, 8 41 38 7
check "Activer Join", 24, 8 50 39 8
check "Activer Part", 25, 8 58 40 8
check "Activer Mode", 26, 52 12 42 7
check "Activer texte", 27, 52 21 45 8
check "Activer Unban", 29, 52 30 46 8
check "Activer Voice", 34, 52 39 43 8
check "Activer Devoice", 35, 52 48 47 7
check "Activer Quit", 36, 52 57 43 8
text "Auteur: w4x", 13, 71 163 33 8
check "Activer Nick", 14, 8 67 40 8
check "Activer Action", 15, 52 65 45 9
}
on *:Dialog:spy:sclick:*:{
if ($did = 3) { /unset %spr | /unset %logr | unset %chdeops | unset %chops | unset %chquit | unset %chpart | unset %chban | unset %chkick | unset %chvoice | unset %chdevoice | unset %chtext | unset %chaction | echo -a Le Spy à été totalement désactiver. }
if ($did = 5) { /set %logr $$?="Salon des logs" | echo -a Salon des logs : %logr }
if ($did = 6) { unset %logr | echo -a Supression du chan de logs : %logr }
if ($did = 7) { /set %spr $$?="Salon a Espionner" | echo -a Salon à espionner : %spr }
if ($did = 8) { unset %spr | echo -a Supression du chan Spy : %spr }
if ($did(4).state == 1) { set %chops ON }
else { unset %chops }
if ($did(16).state == 1) { set %chdeops ON }
else { unset %chdeops }
if ($did(17).state == 1) { set %chkick ON }
else { unset %chkick }
if ($did(23).state == 1) { set %chban ON }
else { unset %chban }
if ($did(24).state == 1) { set %chjoin ON }
else { unset %chjoin }
if ($did(25).state == 1) { set %chpart ON }
else { unset %chpart }
if ($did(26).state == 1) { set %chmode ON }
else { unset %chmode }
if ($did(27).state == 1) { set %chtext ON }
else { unset %chtext }
if ($did(29).state == 1) { set %chunban ON }
else { unset %chunban }
if ($did(34).state == 1) { set %chvoice ON }
else { unset %chvoice }
if ($did(35).state == 1) { set %chdevoice ON }
else { unset %chdevoice }
if ($did(36).state == 1) { set %chquit ON }
else { unset %chquit }
if ($did(15).state == 1) { set %chaction ON }
else { unset %chaction }
if ($did(14).state == 1) { set %chnick ON }
else { unset %chnick }
}
on 1:DIALOG:spy:init:*: {
if (%chtext == ON) { did -c spy 27 }
if (%chjoin == ON) { did -c spy 24 }
if (%chaction == ON) { did -c spy 15 }
if (%chpart == ON) { did -c spy 25 }
if (%chquit == ON) { did -c spy 36 }
if (%chnick == ON) { did -c spy 14 }
if (%chkick == ON) { did -c spy 17 }
if (%chops == ON) { did -c spy 4 }
if (%chdeops == ON) { did -c spy 16 }
if (%chvoice == ON) { did -c spy 34 }
if (%chdevoice == ON) { did -c spy 35 }
if (%chban == ON) { did -c spy 23 }
if (%chunban == ON) { did -c spy 29 }
if (%chmode == ON) { did -c spy 26 }
}
on *:DEOP:%spr: if (%chdeops == on) { msg %logr 4[1 Deop 4]1 $Nick 4Deop 1(-o)  $opnick $+ . | halt }
on *:OP:%spr: if (%chops == on) { msg %logr 4[1 Op 4]1 $nick 4Op1 (+o) $opnick $+ . | halt }
on *:MODE:%spr: if (%chmode == on) { msg %logr 4[1 Mode 4]1 $nick met le mode4 $1- $+ . | halt }
on *:JOIN:%spr: if (%chjoin == on) { msg %logr 4 [1 Join 4]1 $nick join  $chan 14(4 $address($nick,2) 14) | halt }
on *:PART:%spr: if (%chpart == on) { msg %logr 4[1 Part 4]1 $nick part  $chan 14(4 $Address($nick,2) 14) 1: $1- | halt }
on *:KICk:%spr: if (%chkick == on) { msg %logr 4[1 Kick 4]1 $nick KICK1  $knick 1 $+ $1- | halt }
on *:VOICE:%spr: if (%chvoice == on) { msg %logr 4[1 Voice 4]1 $nick 3voice1 (+v)  $vnick $+ . | halt }
on *:DEVOICE:%spr: if (%chdevoice == on) { msg %logr 4[1 Devoice 4]1 $nick 3devoice1 (-v)  $nick $+ . | halt }
on *:text:*:%spr:{
if (%chtext == on) && ($nick isop $chan) && ($nick !isvo $chan) { msg %logr 4<@1 $+ $nick $+ 4> $1- | halt }
if (%chtext == on) && ($nick !isop $chan) && ($nick isvo $chan) { msg %logr 4<3+1 $+ $nick $+ 4> $1- | halt }
if (%chtext == on) && ($nick isop $chan) && ($nick isvo $chan) { msg %logr 4<@3+1 $+ $nick $+ 4> $1- | halt }
if (%chtext == on) && ($nick !isop $chan) { msg %logr 4<1 $+ $nick $+ 4> $1- | halt }
}
on ^*:NICK: if (%chnick == on) { msg %logr 4<1 $nick 4>1 a changé son nick en :4 $newnick $+ . | halt }
ON *:QUIT: if (%chquit == on) { msg %logr 2 Quit $nick : $1- $+ . | halt }
ON ^*:ACTION:*:%spr: if (%chaction == on) { msg %logr 4»1 $nick 4»1 (6/me1)1. $1- $+ . | halt }
on *:BAN:%spr: if (%chban == on) { msg %logr 4[1 Ban 4]1 $nick 4Ban1 (+b) :4 $banmask $+ . | halt }
on *:UNBAN:%spr: if (%chunban == on) { msg %logr 4[1 Unban 4]1 $nick 4Déban1 (-b) :4 $banmask $+ . | halt }
On *:INPUT:#:{
if (.spy isin $strip($1)) {
set %spr $strip($2) | echo -a Salon a espionné : %spr }
if (.log isin $strip($1)) {
set %logr $strip($2) | echo -a Salon de Log: $strip($2) }
if (.stop isin $strip($1)) {
unset %logr $strip($2) | /unset %spr | unset %chdeops | unset %chops | unset %chquit | unset %chpart | unset %chban | unset %chkick | unset %chvoice | unset %chdevoice | unset %chtext | unset %chaction | echo -a Spy: Stoper }
if (.statspy isin $strip($1)) {
echo -a Salon à espionner: %spr 
echo -a Salon de Log: %logr 
}
if (.topicspy isin $strip($1)) {
timer 1 1 say %logr Topic sur %spr : $chan(%spr).topic
}

}

Source / Exemple : 


.

Conclusion :


voila mon spy :') merci de pas rip ! ou de me demander avant sur orange le chan mIRC

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