Statüs tarama, sajoin, sapart

Aytac

nicktag
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
379
Tepkime puanı
50
Puanları
28
Konum
ircland
Web sitesi
www.ircalem.net
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
 

Benzer konular

Üst