ChristianEthics 9.3
_________________________________________________________________________
E-mail: ChristianEthics2@yahoo.ca 
Messenger: ChristianEthics@hotmail.com 
Home page: http://ca.geocities.com/christianethics2
Message Board: http://groups.yahoo.com/group/ChristianEthics_BibleBotDownloadZone/
__________________________________________________________________________

Clone detect greeting.
Edited Sept 2004 works with clear and vincula.
____________________________________________________________________________

*Do not edit this file.
__________________________________________________________________________
on *:LOAD:{ set %clond $=cld On | /splay notify.wav
}

on *:UNLOAD:{ set %clond $=cld Off | /splay unload.wav
} 

if (%clond == on) {
    if ($nick == $me) halt
    if ($nick == $mi) halt
    if (!$read(Lists/clonegreetinglist.txt,w,* $+ $address($nick,1) $+ *)) {
      write Lists/clonegreetinglist.txt $address($nick,1) $nick
      msg $chan hi $nick 
    }
    else {
      if ($read(Lists/clonegreetinglist.txt,s, $address($nick,1)) != $nick) {
        msg $chan hi again $ifmatch  
        write -l $+ $readn Lists/clonegreetinglist.txt $address($nick,1) $nick
      }
      else {
        msg $chan hi again $nick 
      }
    }
  }






*******Script Writter Known by God, Unknown to me*******

