IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar mIRC Parça Kodlar Statüs tarama, sajoin, sapart
Statüs tarama, sajoin, sapart
Aytac
Statüs tarama, sajoin, sapart
0
195
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
sapart tarama sajoin statüs

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular335
  • Mesajlar341
  • Beğenileri:15 in 12 posts
  • Beğendiği:7
  • Rep puanı 4

Statuste bulunan kişileri belirli bir kanala çeker;

Kod :
on *:text:*:#: {
      if $regex(enes,$1,/^[!.&-](sajo[iİı]n|sapart)/Si) {
        if !$2 || !$3 { msg $chan Yetersiz parametre hatası, kullanım: ! $+ $regml(enes,1) Nick #Kanal | return }
        if !$regex($3,/^#/S) { msg $chan Yanlış kullanım, doğru kullanım: ! $+ $regml(enes,1) Nick #Kanal | return }
        $regml(enes,1) $2 $3
        $iif($regml(enes,1) = sajoin,msg $chan $2 Nicki $3 kanalına çekilmiştir, msg $chan $2 nicki $3 kanalından çıkartılmıştır.)
      }
      if $regex($1,/^[!.&-]tara/Si) {
        if !$2 { msg $chan Çekilecek kanalı yazınız. | return }
        set %cekil $2
        .enable #cek
        who *
        .timer 1 3 disable #cek
        msg $chan Statüste bekleyen nickler $2 kanalına çekiliyor!
      }
}

#cek off
raw 352:*: {
  if !$regex($1-,/(services|admin|chanserv|nickserv|operserv)/Si) {
    if !$regex($1-,/#/) { sajoin $6 %cekil | msg #opers $1- }
  }
}
#cek end
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.



Foruma Git: