IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kod:

on *:snotice:*:{

  if ([Spamfilter] isin $1-) {

    if ($window(@Spam) == $null) { window -ne @Spam }

    echo 12 -t @Spam 4Spam : $2 12Spam Kelime : $remove($5,',:) 4Kelime Tamamı : $6-

    halt

  }

}

Pek Detaylı Değil Ama Genede İşini Görür..

Buda Komple Kendi Yaptığım Bir Remote

Kod:

on ^1:SNOTICE:*:{

  if (whois isin $1-) {

    if ($window(@Whois) == $null) { window -ne @Whois }

    inc -u5 %wf. [ $+ [ $2 ] ] 1

    inc %whoissayac 1

    if ($2 ison #admin) || ($2 ison #operhelp) { goto fifi }

    if %wf. [ $+ [ $2 ] ] == 5 {

      KILL $2 Whois flood yapma!

      halt

    }

    :fifi

    if ($2 ison #admin) { goto zirto }

    if (%whowho. [ $+ [ $2 ] ] == zort) { goto zirto }

    if (D isin $usermode) { 

      .msg $2 12Whois Çektiğiniz Tespit Edildi..

      .msg $2 12Şu Anda Özelim Kapalı.. Sorunlarınızı 4/memoserv send $me mesaj 12Şeklinde İletebilirsiniz..

      set -u300 %whowho. [ $+ [ $2 ] ] zort

      goto zirto

    }

    if ($2 ison #admin) || ($2 ison #helpop) { goto zirto }

    if (%whowho. [ $+ [ $2 ] ] == zort) { goto zirto }

    if (%tarih != $date) { set %tarih $date | set %whoissayac 1 }

    .msg $2 12Whois Çektiğiniz Tespit Edildi.. $date $time(hh:nn:ss)

    .msg $2 12Bana Bu Gün Whois Çeken %whoissayac $+ . Kişisin :)

    .msg $2 12Pc Başında Olmayabilir Size Cevap Vermeyebilirim..

    .msg $2 12Lütfen Op, Access, Helper Isteklerinde Bulunmayın Aksi Halde Ignore Edilirsiniz!

    .msg $2 12Nick/Kanal Şifreleri, Takeover ve Hack Gibi Sorunlarınız İçin 4OperHeLp

    .msg $2 12IRC iLe iLgili Bütün Sorunlarınız İçin 4HeLp12 Kanalını Kullanın.

    .msg $2 12Bu Bir Otomatik Yanıt Sistemidir..

    set -u300 %whowho. [ $+ [ $2 ] ] zort

    :zirto

    echo 12 -t @Whois $1- | halt

  }

  if (%snotice == OFF) { halt }

  if (his/her isin $1-) || (Failed isin $1-) || (Denied isin $1-) || (tkl isin $1-) || (Q: isin $1-) || (used isin $1-) || (OperOverride isin $1-) || (Mismatch: isin $1-) || (is now isin $1-) || (GECOS isin $1-) || (warning isin $1-)  {

    if ($window(@Opers) == $null) { window -ne @Opers }

    echo 12 -t @Opers $1- | halt

  }

  if (Locops isin $1-) || (activated isin $1-) {

    if ($window(@UyarI) == $null) { window -ne @UyarI }

    echo 12 -t @UyarI $1- | halt

  }

  if (added isin $1-) || (Received isin $1-) {

    if ($window(@XLine) == $null) { window -ne @XLine }

    echo 12 -t @XLine $1- | halt

  }

  if (removed isin $1-) {

    if ($window(@XLine) == $null) { window -ne @XLine }

    echo 4 -t @XLine $1- | halt

  }

  if (banned isin $1-) {

    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

    echo 12 -t @Giris/Cikis $1- | halt

  }

  if (Connecting isin $1-) {

    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

    echo 12 -t @Giris/Cikis $1- | halt

  }

  if (exiting isin $1-) || (recvQ isin $1-) {

    if ($window(@Giris/Cikis) == $null) { window -ne @Giris/Cikis }

    echo 4 -t @Giris/Cikis $1- | halt

  }

  if (Forbidding isin $1-) || (Q:lined isin $1-) {

    if ($window(@Q-Lined) == $null) { window -ne @Q-Lined }

    echo 12 -t @Q-Lined $1- | halt

  }

  if (Expiring isin $1-) {

    if ($window(@XLine) == $null) { window -ne @XLine }

    echo 12 -t @XLine $1- | halt

  }

  if ([Spamfilter] isin $1-) {

    if ($window(@Spam) == $null) { window -ne @Spam }

    echo 12 -t @Spam 4Spam : $2 12Spam Kelime : $remove($5,',:) 4Kelime Tamamı : $6-

    halt

  }

}