🔔 Çevrimdışı bildirim almak ister misiniz?
Bir konuya etiketlendiğinizde, özel mesaj aldığınızda, bir mesajınız alıntılandığında forumda olmasanız bile anlık bildirim almak için lütfen izni verin.
on *:TEXT:*:#:{
var %::chan = $chan
var %::nick = $nick
var %p = 0
while (%p < $numtok($1-,32)) {
inc %p
if ($nick !isop $chan) {
if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
gzline $nick : 7,1 Küfür! Aciz İnsanların İşidir | Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »10 Suç:7 KüFüR Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. 4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
}
}
}
on *:action:*:#:{
var %::chan = $chan
var %::nick = $nick
var %p = 0
while (%p < $numtok($1-,32)) {
inc %p
if ($nick !isop $chan) {
if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
gzline $nick : 7,1 Küfür! Aciz İnsanların İşidir | Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »10 Suç:7 KüFüR Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. 4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
}
}
}
on *:notice:*:#:{
var %::chan = $chan
var %::nick = $nick
var %p = 0
while (%p < $numtok($1-,32)) {
inc %p
if ($nick !isop $chan) {
if ($istok(%badwords,$gettok($1-,%p,32),32)) && (%badword.detect == on) {
gzline $nick : 7,1 Küfür! Aciz İnsanların İşidir | Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »10 Suç:7 KüFüR Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. 4 $+ $gettok($1-,%p,32),32) $+ ) 10nick:7 $nick 10KaNaL:7 $chan 10 BaN Süresi:7 süresiz 10 Zaman:7 $time }
}
}
}
alias badword {
if ($1 == add) {
set %badwords $addtok(%badwords,$2,32)
echo -a 14»1»15»1 Listeye $2 Eklendi..!
}
if ($1 == del) {
if ($istok(%badwords,$2,32)) {
set %badwords $remtok(%badwords,$2,32)
echo -a 14»1»15»1 Listeden $2 Silindi..!
}
}
if ($1 == delall) {
unset %badwords
echo -a 14»1»15»1 Kufur Listesi Boşaltıldı..!
}
if ($1 == list) {
if ($window(@Kufur-List) == $null) {
window -ab @Kufur-List
}
if ($numtok(%badwords,32) == 0) { aline @Kufur-List 14»1»15»1 Listede Hicbir Kelime YoK..! | halt }
aline @Kufur-List 14»1»14»1 KufurLu Kelimeler Listeleniyor... 7,1 ToPLam Kufur : ( $+ $numtok(%badwords,32) $+ )
var %n = 1
while (%n <= $numtok(%badwords,32)) {
aline $color(info 2) @Kufur-List 4»»» $gettok(%badwords,%n,32)
inc %n
}
aline @Kufur-List 14»1»15»1 LisTe Sonu ..
}
}
alias Badword dialog -m Badword Badword
dialog Badword {
title "Kufur Koruma"
size -1 -1 355 200
button "«:KaPaT:»"2, 25 125 300 25,ok
button "«:Kufur Korumayı Aktif Yap:»"3, 25 25 150 25
button "«:Kufur Korumayı KapaT:»"4, 175 25 150 25
button "«:Kelime EkLe:»"5, 25 50 150 25
button "«:KeLime SiL:»"6, 175 50 150 25
button "«:Listedeki Tum Kelimeleri SiL:»"7, 25 75 300 25
button "«:Kufur Listesine Bak:»"8, 25 100 300 25
box "Kufur Koruma "9, 2 1 350 190
}
on 1:dialog Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. adword:sclick:*:{
if ($did == 3) { /set %badword.detect on | echo -a 3«(14 *** Kufur Koruması Simdi ACIK 3)» }
if ($did == 4) { /unset %badword.detect | echo -a 3«(14 *** Kufur Koruması Simdi KAPALI 3)» }
if ($did == 5) { /badword add $$?="Kufur Gir:" }
if ($did == 6) { /badword del $$?="Kufur Gir:" }
if ($did == 7) { /badword delall }
if ($did == 8) { /badword list }
}
Menu Channel {
|-Kufur Koruma-|:/dialog -m Badword Badword
}
alias badnick { Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »10 10Suç:7BaDnick 10Nick:7 $nick 10KaNaL:7 # 10 BaN Süresi:7 Süresiz 10 Zaman:7 $time | ban # $nick 2 | kick # $nick 4 $chan 12 kanaLı 2Sohbet odalaSı kurallarına ( 4 Uygun bir nick KuLLanmama 2) sebebinden dolayı 4 $chan 2 odasından 4 Süresiz 2 uzakla$tırıldınız.Daha fazla bilgi icin 4/motd 2yazınız ! | halt }
#blacklist2 on
on karaliste:JOiN:#:{
var %::chan = $chan
var %::nick = $nick
if (%nickkor == ON) {
gzline $nick : 7,1 Küfür! Aciz İnsanların İşidir
}
}
#blacklist2 END
Kod Alıntıdır Kod Guzel Calısıyor Koda txt Dosyası Ekleme Sansımız varmı Yanı SoyLe Eklenen Kufurler Kulanıcı BoLumune Gıdıyor Ama Benım Demek Istedıgım Txt Dosya Halınde Olsun
Mircin içine text klasörü oluşturup textin içine yukarıdaki remoteleri atın. Texte bir ad belirleyin, mesela xyz.txt şeklinde belirlediniz: mircinizi açıp /load -rs xyz.txt şeklinde mircinize yükleyip remoteyi aktif edebilirsiniz.
__________________
kar havası gibisin dışarda, içimde elmanın dişlenişi.
03 Mart 2018, 16:01
Benzer Konular 
Ağaç şeklinde
