Join Clone Scan

By Zsadist on Jan 13, 2011

Eh, just something simple...basically just load it into remotes and watch it fly. It's limited up to 3 clones.

on !^*:join:#:{
    var %ii $ialchan($wildsite,$chan,0)
    if (%ii > 1) {
      var %count
      var %i 1
      while (%i <= %ii) {
        tokenize 32 $1- $ialchan($wildsite,$chan,%i).nick
        inc %i
        inc %count
      }
      .echo $chan $timestamp -(JOIN)- $nick [ $+ $address $+ ] (Clones: %count - $iif($3 !== $null, $1 $+ $chr(44), $1 $chr(38)) $2  $iif($3 == $null, $null, $chr(38) $left($3,1) $+ $right($3,-1))) $+ )
      haltdef
    }
    else { .echo $chan $timestamp -(JOIN)- $nick [ $+ $address $+ ]
      haltdef
    }
  }

Like Page Follow Author

Comments

Zsadist - Jan 14, 2011

Alright, Kenji. Go to irc.lucidchat.net and join #XPeriment - I'll try and manually help you there ~_~

Respond

kenJi - Jan 14, 2011

won't work for me.. i paste in my remote but nothing happen. theres a new window open but the echo is only this, " #fav -(JOIN)- " .. no nicks no IPs no clones.. lol

Respond

Zsadist - Jan 14, 2011

Respond

ProIcons - Jan 14, 2011

on *:join:#:{
    var %ii $ialchan($wildsite,$chan,0)
    if (%ii > 1) {
      var %count
      var %i 1
      while (%i <= %ii) {
        tokenize 32 $1- $ialchan($wildsite,$chan,%i).nick
        inc %i
        inc %count
      }
      if (!$window(@Clones)) { window -e @Clones }
      .echo @Clones $timestamp $+([,$chan,]) -(JOIN)- $nick [ $+ $address $+ ] (Clones: %count - $iif($3 !== $null, $1 $+ $chr(44), $1 $chr(38)) $2  $iif($3 == $null, $null, $chr(38) $left($3,1) $+ $right($3,-1))) $+ )
      haltdef
    }
  }

Respond

Zsadist - Jan 14, 2011

hey can u make when someone join in channel it open a new window to me sir. thnx..

Seems kind of pointless to me.

Respond

kenJi - Jan 14, 2011

hey can u make when someone join in channel it open a new window to me sir. thnx..

Respond

SimplySys - Jan 13, 2011

You can make your on JOIN:

on !^*:JOIN:#: {

The "!" will make sure it doesn't activate when you join. If you do that, you won't need to check if the nick = $me

Respond