Welcome, Guest. Please login or register.

Login with username, password and session length

 
Advanced search

9 958 Posts in 5 432 Topics- by 1 216 Members - Latest Member: santini862

17 June 2019, 09:29
Select Language English | Russian ru | German
Main PageIRC Client KVIrc forumKVIrc discussionKVIrc scriptingScript For Clon's
Pages: [1]
Print
Author Topic: Script For Clon's  (Read 3790 times)
0 Members and 1 Guest are viewing this topic.
Rizon
Новичок
*

Репутация: 0
Posts: 17


Noctis


View Profile WWW Email
« on: 6 December 2012, 04:58 »


command /clon

Code:
%usuarionombre = $0
%usuariohost = $2
%ListadeUsuarios = $chan.users;

//contador de usuarios con la misma ip
%contadorinternoclones = 0;
//el nombre de cada usuario que es clon por cada ip
%clones = "" ;
%analizado = 0 ;

   //el usuario que no ha sido analizado debe escanearse
foreach ( %usuarios ,  %ListadeUsuarios ) {
// Si tiene la misma ip si no es el mismo usuario y si no es un clon de la lista de clones hace eso
if  (  $hostname( %usuarionombre )  == $hostname( %usuarios ) && %usuarionombre != %usuarios && %analizado == 0  ) {
//Guarda en la posicion del contador de la lista total al usuario que es clon
%clones[ %contadorinternoclones ] = %usuarios;
//como la posicion del contador debe aumentar para guardar en la siguiente se aumetna a uno
%contadorinternoclones = $( %contadorinternoclones + 1 );
}
}

if ( %clones != 0 ) {
echo $k(4) $b %clones y %usuarionombre SON CLONES! ;
}




for channel joins


Code:


// Aqui se va a guardar la lista completa de todos los clones para comprobar que no se repitan
%listadocompletodeclones[0] = "vacio";
// Este lleva el contador de clones
%contadorclones = 0 ;
%ListadeUsuarios = $chan.users;
foreach  ( %usuario , %ListadeUsuarios ) {
//contador de usuarios con la misma ip
%contadorinternoclones = 0;
//el nombre de cada usuario que es clon por cada ip
%clones = "" ;
%analizado = 0 ;

   //comprueba que el usuario a analizar no haya tenido clones antes
   foreach( %esclon ,  %listadocompletodeclones ) {
    if ( %usuario == %esclon  ) {
%analizado = 1;
}
   }

   //el usuario que no ha sido analizado debe escanearse
foreach ( %usuarios ,  %ListadeUsuarios ) {
// Si tiene la misma ip si no es el mismo usuario y si no es un clon de la lista de clones hace eso
if  (  $hostname( %usuario )  == $hostname( %usuarios ) && %usuario != %usuarios && %analizado == 0  ) {
//Guarda en la posicion del contador de la lista total al usuario que es clon
%clones[ %contadorinternoclones ] = %usuarios;
//Guarda en la posicion del contador de la misma IP al usuario que es clon
%listadocompletodeclones[ %contadorclones ] = %usuarios;
//como la posicion de guardado ya fue ocupada debe guarda en la siguiente por eso se aumenta 1
%contadorclones = $( %contadorclones + 1 );
//como la posicion del contador debe aumentar para guardar en la siguiente se aumetna a uno
%contadorinternoclones = $( %contadorinternoclones + 1 );
}
}

if ( %clones != 0 ) {
echo $k(4) $b %clones y %usuario son la misma persona;
}
}





DOWNLOAD COMMANDO CLON DETECTOR: http://www.mediafire.com/download.php?dld7x5fh4t979h5
DOWNLOAD DETECTOR JOIN CHANNEL: http://www.mediafire.com/download.php?4h7vw9hd6un44km

http://kvircode.blogspot.com/2012/12/kvirc-script-snippet-clon.html

LOAD WITH THIS


Logged

Yeah =) time zero : http://kvircode.blogspot.com
Pages: [1]
Print
Jump to:  

Theme orange-lt created by panic