mIRC Clone Protection

Clone Protection

on *:join:#:{
  if ($ialchan($wildsite,#,0) > 1) {
    echo # 4 $+ $timestamp * Clones in # from $wildsite
    :start
    inc %nomer 1
    set %ravno $ialchan($wildsite,#,0)
    if (%nomer >= $calc(%ravno + 1)) { goto end | return }
    else {
      echo # 15 $+ $timestamp -- %nomer $+ . $ialchan($wildsite,#,%nomer).nick
      goto start
    }
    :end
    unset %nomer
    unset %ravno
    echo # 4 $+ $timestamp * End Of List
  }
  else /halt
}