Selasa, 4 Disember 2012

mIRC Script - Spy Bot

on *:TEXT:!spy*:*: {
  spy $2 $3
}
on *:TEXT:!unspy*:%spyreport: {
  unspy
}
alias spy {
  if (%spychan == $null) {
    join $1
    join $2
    set %spychan $1
    set %spyreport $2
    enable #spybot
    echo 4SpyBot hanya mampu beroperasi didalam satu channel sahaja.
    msg %spyreport 4Kesemua data sembang dari channel %spychan akan dipaparkan disini.
  }
  if (%spychan != $null) {
    echo 4Anda kini telah memulakan operasi pengintipan didalam channel %spychan
    echo 4untuk hentikan operasi pengintipan sila taip /unspy
  }
}
alias unspy {
  msg %spyreport Anda telah menamatkan operasi pengintipan didalam channel %spychan
  echo Semua operasi intipan didalam channel %spychan telah dihentikan.
  unset %spychan
  unset %spyreport
  disable #spybot
}
#spybot off
on *:TEXT:*:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport < $+ $nick $+ > $1-
  }
}
on *:ACTION:*:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport 6 $nick $1-
  }
}
on *:JOIN:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport 4,1has joined: $nick
  }
}
on *:NICK: {
  if ($nick !ison %spyreport) {
    if ($nick ison %spychan) {
      msg %spyreport $nick is now known as $newnick
    }
  }
}
on *:PART:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport $nick has left %spychan
  }
}
on *:KICK:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport $knick was kicked from %spychan by $nick < $+ $1- $+ >
  }
}
on *:RAWMODE:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport $nick set mode $1- in %spychan
  }
}
on *:BAN:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport $2 has been banned from $chan by $nick
  }
}
on *:UNBAN:%spychan: {
  if ($nick !ison %spyreport) {
    msg %spyreport $2 has been unbanned from $chan by $nick
  }
}
on *:QUIT: {
  if ($nick ison %spychan) {
    msg %spyreport $nick has disconnected from the network
  }
}
#spybot end

Tiada ulasan:

Catat Ulasan