Tekil Mesaj gösterimi
Alt 16 Nisan 2023, 10:46   #1
Çevrimdışı
RahmetLi
Üyelik tarihi: 07 Aralık 2022
Konular: 21245
Mesajlar: 24.248
Nerden: İstanbul
Cinsiyet: Erkek
Web Site: TRmIRC.Net
IRC Sunucu: IRC.TRmIRC.Net
Alınan Beğeni: 3770
Beğendikleri: 6794
@RahmetLi
Ruh Hali : : Olu Gibi
Standart Atilan banlari oto kayit /sorgula

Kullanim amaci :Kodu eklediğiniz de belirlenmiş olan kanalda atılan banları raporlama adında dosyanın icine atılan nick e ait txt dosyası oluşturur ve o nick e ait o kanalda atılan ne kadar ban varsa kayıt eder ve atılan kişi istediği zaman bu kayıtlara bakabilir. Ayrıca atılan kişiye özelden şu sebepten dolayı şu kişi tarafından atıldınız şeklinde bildirim mesajı gönderir

Kod : Kodu kopyalamak için üzerine çift tıklayın!

on $*:text:/^[\.!]ban/Si:#kanal: { if (!$3) { msg # Hatalı kullanım; ( .ban nick sebep ) } elseif ($2 !ison #) && $regex($2,/\d+?/i) || ($2 !isreg #) { msg # $qt($2) $+ , nickine ban atamazsınız. Kanalda görevli veya bulunmuyor. ( kanal sopları/founderi ile görüşün. ) } elseif ($nick isreg #) { msg # $nick Bu komutu kullanmaya yetkili değilsiniz. } else { mode # +b $2 chanserv kick # $2 $3- $iif(!$isdir(raporlama),mkdir raporlama) write $+(raporlama/,$2,.,txt) $2 - $3- Sebebi ile $nick tarafından atılmıştır. $+ $fulltime privmsg $2 $2 , $3- sebebi ile # kanalından atıldınız. Atan nick: $nick ( Bu zamana kadar atılan banları görmek için .infoban yazın lütfen. ) } } on $*:text:/^[\.!][ıli]nf[0öo]ban/Si:?: { if ($read $+(raporlama/,$nick,.,txt)) { privmsg $nick kayıtlara bakılıyor lütfen bekleyin. play $nick $+(raporlama/,$nick,.,txt) } }



Kalbim Atar Cansız, Geçmez Gün Ahsız, Vahsız..
  Alıntı ile Cevapla