ported clonescan script

diff --git a/TODO.txt b/TODO.txt
index c008b664ce2b4435e91c4d5350333e9a89ec118c..22ca468194b1a5873c899c837ef2063513d037c5 100644 (file)
--- a/TODO.txt
+++ b/TODO.txt
@@ -1,13 +1,12 @@
 This file contains a list of scripts that has not been ported (yet) to KVIrc4.
 Please keep this list up to date.
 
-Forza4
+Forza4 (wip)
 KISS
 NGL fserv
 chanops
 chanstats
 checkers
-clonescan
 country
 cryption
 ezbounce

diff --git a/clonescan/install.kvs b/clonescan/install.kvs
index f7ee4b452683e1290827218531eb77002da7cecc..d77d4e7095c84fd372943f68e6a9a577c7a72e68 100644 (file)
--- a/clonescan/install.kvs
+++ b/clonescan/install.kvs
@@ -40,12 +40,10 @@ alias(hell_clonescan)
        class(helltrixclone,object){
                constructor(){
                        # Channel mask array in the form nick!ident@host
-                       %chanmask[]=$chan.users(,,m)
                        %i=0
        
-                       foreach(%mask,%chanmask[]){
-                               %nick=$mask.nick(%mask)
-                               %host=$str.append("*!*@",$mask.host(%mask))
+                       foreach(%nick,$chan.users()){
+                               %host=$str.append("*!*@",$mask.host($mask(%nick)))
        
                                # Nick array in the form *!*@host
                                %ArrayNick[%i]=%nick
@@ -58,8 +56,6 @@ alias(hell_clonescan)
                cloneCheck($0=nick,$1=host){
                        %checkNick=$0
                        %checkHost=$1
-                       echo "Z": %checkNick;
-                       %DbCloneNum{%checkNick}=0
 
                        # Global scan
                        if(!%checkNick){
@@ -73,12 +69,12 @@ alias(hell_clonescan)
                                                                %DbCloneNick{%ArrayNick[%i]}=$str.append(%DbCloneNick{%ArrayNick[%i]},", "%ArrayNick[%j])
        
                                                        # Delete clone
-                                                       #%DbHost{%ArrayNick[%j]}=
-                                                       #%ArrayNick[%j]=
+                                                       #%DbHost{%ArrayNick[%j]}=clone_%j
                                                }
                                        }
                                }
                        } else {
+                               %DbCloneNum{%checkNick}=0
                                # Nick scan
                                if(!%checkHost){
                                        # Just for sanity check