Accueil > > > SCANNEUR DE CLONES
SCANNEUR DE CLONES
Information sur la source
Description
Scanne les clones et affiche tout les who dans une nouvelle fenetre
Source
- alias clonescan { unset %i* | .ial on | window -kn @Scanner | .enable #cln | who # | set %ichan # | set %itnick $nick(#,0) | set %itotal 0 | hmake c 10 | echo %ichan $timestamp 0[12Clones0]12 - Recherche en cours... }
- alias scaning { set %n 0 | :p | inc %n
- if ($nick(%ichan,%n) isin %istock) { goto e }
- if ($ialchan($address($nick(%ichan,%n),2),%ichan,0) > 1) { inc %itotal | unset %inick | set %l 0 | :l | inc %l
- if ($ialchan($address($nick(%ichan,%n),2),%ichan,%l).nick) { set %istock %istock $ialchan($address($nick(%ichan,%n),2),%ichan,%l).nick | set %inick %inick $+ , $ialchan($address($nick(%ichan,%n),2),%ichan,%l).nick | goto l } | hadd c %itotal ( $+ $right($address($nick(%ichan,%n),2),-4) $+ ) $right(%inick,-2) }
- :e
- if (%n < $nick(%ichan,0)) { goto p }
- if (%n = $nick(%ichan,0)) {
- if (%itotal != 0) { echo @Scanner $timestamp 0[12Clones0]12 - Détection sur %ichan | echo @Scanner $timestamp 0[12Clones0]12 - Résultat: $numtok(%istock,32) clones pour %itotal host(s) | var %e = 1 | while ($hget(c,%e)) { echo @Scanner $timestamp 0[12Clones0]12 - %e $+ . $hget(c,%e) | inc %e } }
- if (%itotal == 0) { echo @Scanner $timestamp 0[12Clones0]12 - Pas de clones détecté sur %ichan $+ . }
- unset %i* | hfree c }
- }
- #cln off
- raw 315:*:.disable #cln | scaning | halt
- #cln end
- #Scan.Channel off
- raw 352:*:{
- if ( $parm3 $+ @ $+ $parm4 isin %Chan.Address) { inc %Chan.Clones } | else { %Chan.Address = %Chan.Address $parm3 $+ @ $+ $parm4 }
- if (G isin $parm7) {
- inc %Chan.Gone
- if (%Chan.pseudo == $null) { %Chan.pseudo = $parm6 }
- alse { %Chan.pseudo = %Chan.pseudo 1+ $parm6 }
- }
- inc %Chan.Total | halt
- }
- raw 315:*:{
- echo 2 $parm2 6??? Stat. de $parm2 6???
- echo 2 $parm2 6?OQP6? %Chan.Gone 6? %Chan.pseudo 6?
- echo 2 $parm2 6?Clones 6? %Chan.Clones
- echo 2 $parm2 6??? Fin de Stat. total: %Chan.Total 6???
- .disable #Scan.Channel | unset %Chan.* | halt
- }
- #Scan.Channel end
- menu @Scanner {
- Effacer:clear
- -
- Fermer:window -c @Scanner
- }
- alias whowin {
- if $window(@who) == $null {
- window -klm -t10,30,33,36,49 +e @who 0 0 1100 500 arial 12
- aline $colour(normal) @who Pseudo $chr(9) Adresse $chr(9) IRCop $chr(9) Away $chr(9) Vrai Nom $chr(9) Serveur
- aline @who $chr(160)
- aline @who $chr(160)
- }
- }
alias clonescan { unset %i* | .ial on | window -kn @Scanner | .enable #cln | who # | set %ichan # | set %itnick $nick(#,0) | set %itotal 0 | hmake c 10 | echo %ichan $timestamp 0[12Clones0]12 - Recherche en cours... }
alias scaning { set %n 0 | :p | inc %n
if ($nick(%ichan,%n) isin %istock) { goto e }
if ($ialchan($address($nick(%ichan,%n),2),%ichan,0) > 1) { inc %itotal | unset %inick | set %l 0 | :l | inc %l
if ($ialchan($address($nick(%ichan,%n),2),%ichan,%l).nick) { set %istock %istock $ialchan($address($nick(%ichan,%n),2),%ichan,%l).nick | set %inick %inick $+ , $ialchan($address($nick(%ichan,%n),2),%ichan,%l).nick | goto l } | hadd c %itotal ( $+ $right($address($nick(%ichan,%n),2),-4) $+ ) $right(%inick,-2) }
:e
if (%n < $nick(%ichan,0)) { goto p }
if (%n = $nick(%ichan,0)) {
if (%itotal != 0) { echo @Scanner $timestamp 0[12Clones0]12 - Détection sur %ichan | echo @Scanner $timestamp 0[12Clones0]12 - Résultat: $numtok(%istock,32) clones pour %itotal host(s) | var %e = 1 | while ($hget(c,%e)) { echo @Scanner $timestamp 0[12Clones0]12 - %e $+ . $hget(c,%e) | inc %e } }
if (%itotal == 0) { echo @Scanner $timestamp 0[12Clones0]12 - Pas de clones détecté sur %ichan $+ . }
unset %i* | hfree c }
}
#cln off
raw 315:*:.disable #cln | scaning | halt
#cln end
#Scan.Channel off
raw 352:*:{
if ( $parm3 $+ @ $+ $parm4 isin %Chan.Address) { inc %Chan.Clones } | else { %Chan.Address = %Chan.Address $parm3 $+ @ $+ $parm4 }
if (G isin $parm7) {
inc %Chan.Gone
if (%Chan.pseudo == $null) { %Chan.pseudo = $parm6 }
alse { %Chan.pseudo = %Chan.pseudo 1+ $parm6 }
}
inc %Chan.Total | halt
}
raw 315:*:{
echo 2 $parm2 6??? Stat. de $parm2 6???
echo 2 $parm2 6?OQP6? %Chan.Gone 6? %Chan.pseudo 6?
echo 2 $parm2 6?Clones 6? %Chan.Clones
echo 2 $parm2 6??? Fin de Stat. total: %Chan.Total 6???
.disable #Scan.Channel | unset %Chan.* | halt
}
#Scan.Channel end
menu @Scanner {
Effacer:clear
-
Fermer:window -c @Scanner
}
alias whowin {
if $window(@who) == $null {
window -klm -t10,30,33,36,49 +e @who 0 0 1100 500 arial 12
aline $colour(normal) @who Pseudo $chr(9) Adresse $chr(9) IRCop $chr(9) Away $chr(9) Vrai Nom $chr(9) Serveur
aline @who $chr(160)
aline @who $chr(160)
}
}
Conclusion
pour scanner, se metre sur le salon et taper /clonescan
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
QUELQUES TRUCS INTéRESSANTS (05/09/2010)QUELQUES TRUCS INTéRESSANTS (05/09/2010) par coq
Cette fois-ci : .NET Debug / Performance Sécurité SQL Server .NET Determining if a type is defined in the .NET Framework (blog de Scott Dorman) Ha tiens, je n'avais jamais vraiment pensé à utiliser le jeton de clé publique...
Cliquez pour lire la suite de l'article par coq ENUMERABLECOLLECTIONENUMERABLECOLLECTION par Matthieu MEZIL
Prenons le scénario suivant. On utilise MVVM. On a les deux classes suivantes dans le model : public class Child { } public class Parent { private ObservableCollection < Child > _children; public ObservableCollection < Child > Children { get {...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [HS] CHROME 6 + MOI = COUP DE GUEULE ![HS] CHROME 6 + MOI = COUP DE GUEULE ! par JeremyJeanson
Attention, le poste qui suit n'est pas la complainte d'une personne : Qui n'aime pas Chrome. D'un anti Google. D'un développeur qui a un poil énorme dans la main. Ceux qui me fréquentent savent que je change de navigateur favori tous les 2 ou 3 mois afin ...
Cliquez pour lire la suite de l'article par JeremyJeanson [WP7] UTILISER UN WRAPPANEL DANS UNE APPLICATION WINDOWS PHONE 7[WP7] UTILISER UN WRAPPANEL DANS UNE APPLICATION WINDOWS PHONE 7 par Audrey
Lors de la réalisation de ma 2ème application Windows Phone 7, j'ai souhaité utiliser un WrapPanel pour afficher plusieurs photos. Mais le contrôle WrapPanel ne fait pas parti de la liste des contrôles inclus dans le SDK de la version Beta des outils pour...
Cliquez pour lire la suite de l'article par Audrey
Logiciels
WebLogAndPass (1.0.0)WEBLOGANDPASS (1.0.0)WebLogAndPass est un logiciel permettant de mémoriser vos sites préférés et pour chacun d'entre-e... Cliquez pour télécharger WebLogAndPass uTorrent (2.0.4)UTORRENT (2.0.4)C'est un client BitTorrent très puissant et très performant. Comme son nom l'indique, uTorrent (m... Cliquez pour télécharger uTorrent Bureau de Gestion - ERP Devis Facturation (2.02)BUREAU DE GESTION - ERP DEVIS FACTURATION (2.02)- Version gratuite du 10/06/2010
Le Bureau de Gestion est un logiciel dédié à la gestion de l'en... Cliquez pour télécharger Bureau de Gestion - ERP Devis Facturation 4Videosoft Transfert iPod Mac (3.2.08)4VIDEOSOFT TRANSFERT IPOD MAC (3.2.08)4Videosoft Transfert iPod-Mac caractérise principalement à transférer les fichiers iPod vers Mac.... Cliquez pour télécharger 4Videosoft Transfert iPod Mac 4Videosoft HD Convertisseur (3.3.08)4VIDEOSOFT HD CONVERTISSEUR (3.3.08)Etant le meilleur HD Vidéo Convertisseur, 4Videosoft HD Convertisseur, vous pouvez regarder la vi... Cliquez pour télécharger 4Videosoft HD Convertisseur
|