![]() |
![]() |
![]() | #13 | ||||
Çevrimdışı ![]() IF Ticaret Sayısı: (0) | Cevap: Küfür ve Argo Cümle İçinde
arkadaşlar kusura bakmayın karısmamam lazım ama faydam olsun ıstıyorum bende paylaşım bendekını guzel opers ve ops olarak ayarladım her ıkısındede calısıyor buyurun kulanın #golge on on *:text:*:#: { if ($nick isop #) && (%oplari == on) { return } if ($nick isvoice #) && (%vlar == on) { return } if (*buraya muaf tutulacak serveri yazınız iswm $fulladdress) && (%operler == on) { return } kelimelerim $1- } on *:action:*:#: { if ($nick isop #) && (%oplari == on) { return } if ($nick isvoice #) && (%vlar == on) { return } if (*buraya muaf tutulacak serveri yazınız iswm $fulladdress) && (%operler == on) { return } kelimelerim $1- } on *:notice:*:#: { if ($nick isop #) && (%oplari == on) { return } if ($nick isvoice #) && (%vlar == on) { return } if (*buraya muaf tutulacak serveri yazınız iswm $fulladdress) && (%operler == on) { return } kelimelerim $1- } alias kelimelerim { var %x $strip($1-) , %i $numtok(%soybakalim,44) while (%i) { if ($gettok(%soybakalim,%i,44) iswm %x) || ($gettok(%soybakalim,%i,44) isin %x) { if (%kiketi == on) { /kick $chan $nick %kuralmsg 4(2 $server 4) } if (%baneti == on) { /shun $nick 1800s 4Dostluk ortamını 2bozmaya calıştıgınızdan uzaklaştırıldınız.! 1 $me } if (%killeti == on) { /kill $nick 4Dostluk ortamını 2bozmaya calıştıgınızdan uzaklaştırıldınız.! 1 $me } if (%banlt == on) { /raw -q mode $chan +b $mask($fulladdress,2) | /banac } if (%zileti == on) { /zline $nick 1800s 4Dostluk ortamını 2bozmaya calıştıgınızdan uzaklaştırıldınız.! 1 $me } return } dec %i } } dialog kelimelerim { title "Küfür-Reklam Koruma" size -1 -1 105 183 option dbu box "Eklenecek Kelimeyi Girin", 1, 5 1 94 79 combo 2, 9 10 87 53, size button "Ekle", 3, 13 66 31 10 button "Sil", 4, 60 65 31 10 box "", 5, 11 60 36 18 box "", 6, 58 60 36 18 check "Kick ", 8, 62 100 28 10 check "Shun ", 9, 62 111 32 10 edit "", 10, 9936 30 23 12, disable text "Saniye", 11, 562 32 21 8, disable check "@plar", 13, 6 98 33 10 check "@perler", 17, 6 87 31 10 check "voice", 14, 6 109 30 10 box "Ayır", 7, 1 80 41 44 check "Ban", 12, 62 122 25 10 check "Kill", 15, 62 133 32 10 check "Z-Line", 16, 62 90 29 8 button "Kapat", 19, 27 155 53 20, ok box "Ceza-Tipi", 18, 55 82 46 67 } alias bad { .dialog -m kelimelerim kelimelerim } on *:dialog:kelimelerim:init:*:{ if (%soybakalim) didtok $dname 2 44 $ifmatch if (%kiketi) { .did -c $dname 8 } if (%baneti) { .did -c $dname 9 } if (%banlt) { .did -c $dname 12 } if (%oplari) { .did -c $dname 13 } if (%vlar) { .did -c $dname 14 } if (%killeti) { .did -c $dname 15 } if (%zileti) { .did -c $dname 16 } if (%operler) { .did -c $dname 17 } did -a $dname 10 %banvaxti } on *:dialog:kelimelerim:sclick:*:{ if ($did == 3) { if ($did(2) != $null) { set -u %artir $did(2) | if (%artir) && (!$istok(%soybakalim,%artir,44)) { .set %soybakalim $addtok(%kifirler,%artir,44) | did -a $dname 2 %artir } } } if ($did == 4) { if ($did(2).sel > 0) { .set %soybakalim $remtok(%soybakalim,$did(2).seltext,1,44) | did -d $dname 2 $did(2).sel | did -c $dname 2 1 } } if ($did == 8) { if ($did(8).state == 1) { .set %kiketi on } | else { .unset %kiketi } } if ($did == 9) { if ($did(9).state == 1) { .set %baneti on | did -e $dname 10,11 } | else { .unset %baneti | did -b $dname 10,11 } } if ($did == 12) { if ($did(12).state == 1) { .set %banlt on | did -e $dname 10,11 } | else { .unset %banlt | did -b $dname 10,11 } } if ($did == 15) { if ($did(15).state == 1) { .set %killeti on | did -e $dname 10,11 } | else { .unset %killeti | did -b $dname 10,11 } } if ($did == 16) { if ($did(16).state == 1) { .set %zileti on | did -e $dname 10,11 } | else { .unset %zileti | did -b $dname 10,11 } } if ($did == 13) { if ($did(13).state == 1) { .set %oplari on } | else { .unset %oplari } } if ($did == 14) { if ($did(14).state == 1) { .set %vlar on } | else { .unset %vlar } } if ($did == 17) { if ($did(17).state == 1) { .set %operler on } | else { .unset %operler } } } on *:dialog:kelimelerim:edit:*:{ %banvaxti = $did(10) } #golge end | ||||
| ![]() |
Etiketler |
argo, cumle, cümle, icinde, kufur, küfür, mirc, mirc download, mirc indir, ve, İçinde |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| |
![]() | ||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
Cümle İçinde Kullanıldığında Kişiye Ayrı Bir Hava Katan 20 Kelime | Hesna | Merak Ettikleriniz | 0 | 08 Eylül 2018 07:44 |
Bir Cümle İçinde Geçen Her Karakterin Tekrar Sayısını Bulan Program | Swat | Programlama | 0 | 11 Temmuz 2014 11:12 |
gabilee:dd +18 argo/küfür | IrCbaStarD | Komik Loglar | 14 | 24 Kasım 2012 21:40 |
argo ban küfür ban | Realinferno | mIRC Scripting Sorunları | 10 | 10 Temmuz 2006 19:56 |
Rock ME Baby :)) [argo+küfür] | Chelt | Komik Loglar | 1 | 12 Temmuz 2005 18:46 |