IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

S.a. Arkadaşlar karmaşık gelebilir fakat yardım edersiniz diye düsündüm.
öncelikle bu codeleri birlestirip Sadece Nomercy sunucuya giricek oper girmeden nick'ine gecip identify edicek
+ codelerde kil, gline var onlarında +b kick atabilir duruma getirmek
badnick girdigi zaman 30 saniye beklemeden atılmasını istiyorum
samanlık gibi birsey oldu da yardımcı olucagınızı umuyorum

[script]
n0=on *:start: {
n1= unset %*
n2= hmake kufur
n3= hmake badnick
n4= hmake kickno
n5= hload kufur kufur.mercy
n6= hload badnick badnick.mercy
n7= hload kickno kickno.mercy
n8= .timer 0 5 NoMercy
n9= echo -s 4NoMercy:2 NoMercy socket botu ayarlandi.
n10= echo -s 4NoMercy:2 Artik herhangi birsey yapmaniza gerek yok. NoMercy size gorunmeden islevini yapacaktir.
n11= write -c haber.txt
n12=}
n13=
n14=alias sw {
n15= if $sock($1).status == active {
n16= sockwrite -nt $1-
n17= }
n18=}
n19=
n20=alias botfnick {
n21= return $remove($gettok($1,1,33),:)
n22=}
n23=
n24=alias kickno {
n25= return 10-{5Kickledigim04 $hget(kickno,kick) $+ . 5kisisiniz10}-
n26=}
n27=
n28=alias kicksay {
n29= hinc kickno kick
n30= hsave kickno kickno.mercy
n31=}
n32=
n33=alias NoMercy {
n34= if !$sock(NoMercy) && !$sock(nm) && !$sock(nm2) && !$sock(nm3) {
n35= if $hget(mesaj) {
n36= hfree mesaj
n37= hmake mesaj
n38= }
n39= unset %*
n40= .timermercy* off
n41= }
n42= if !$sock(NoMercy) {
n43= sockopen NoMercy 72.20.27.12 7575
n44= }
n45= if !$sock(nm) {
n46= ;sockopen nm 91.191.162.221 6667
n47= }
n48= if !$sock(nm2) {
n49= ;sockopen nm2 91.191.162.221 6667
n50= }
n51= if !$sock(nm3) {
n52= ;sockopen nm3 91.191.162.221 6667
n54= if !$sock(chancontrolX) {
n55= ;sockopen chancontrolX 91.191.162.221 6667
n56= }
n57= if !$sock(chancontrolZ) {
n58= ;sockopen chancontrolZ 91.191.162.221 6667
n59= }
n60= if !$sock(chancontrolL) {
n61= ;sockopen chancontrolL 91.191.162.221 6667
n62= }
n63= if !$sock(chancontrolA) {
n64= ;sockopen chancontrolA 91.191.162.221 6667
n65= }
n66= if !$sock(helpbot) {
n67= ;sockopen helpbot 91.191.162.221 6667
n68= }
n69= if !$sock(irobot) {
n70= ;sockopen irobot 91.191.162.221 6667
n71= }
n72= if !$sock(user) {
n73= ;sockopen user 91.191.162.221 6667
n74= }
n75=}
n593=on *:SOCKOPEN:NoMercy: {
n594= %NoMercynick = Grr $+ $r(100,9999)
n595= sw $sockname NICK %NoMercynick
n596= sw $sockname USER ArTiST "" " $+ $iif($host,$host,$ip) $+ " : $+ 9,1 NoMercy v1.2 4 X 9 by ArTiST
n597=}
n598=
n599=alias NoMercyonjoin {
n600= var %n 1
n601= while %n <= $lines(onjoins.txt) {
n602= sw NoMercy SAJOIN NoMercy $read(onjoins.txt,%n)
n603= inc %n
n604= }
n605=}
n607=on *:SOCKREAD:NoMercy: {
n608= var %a
n609= sockread %a
n610= tokenize 32 %a
n611= if $1 == PING {
n612= sw $sockname PONG $2
n613= }
n684= if +*q* iswm $4 {
n685= sw $sockname PRIVMSG $3 : $+ $5 su anda kanal sahibi konumuna gecti. (1. seviye)
n686= sw $sockname NOTICE $5 :Su anda kanal operatoru oldunuz $5 $+ . Kullanabileceginiz komutlari gormek icin ozelime !komutlar yaziniz.
n687= opekle $3 $5
n688= }
n689= elseif +*a* iswm $4 {
n690= sw $sockname PRIVMSG $3 : $+ $5 su anda kanal super operatoru konumuna gecti. (2. seviye)
n691= sw $sockname NOTICE $5 :Su anda kanal operatoru oldunuz $5 $+ . Kullanabileceginiz komutlari gormek icin ozelime !komutlar yaziniz.
n692= opekle $3 $5
n693= }
n694= elseif +*o* iswm $4 {
n695= sw $sockname PRIVMSG $3 : $+ $5 su anda kanal operatoru konumuna gecti. (3. seviye)
n696= sw $sockname NOTICE $5 :Su anda kanal operatoru oldunuz $5 $+ . Kullanabileceginiz komutlari gormek icin ozelime !komutlar yaziniz.
n697= opekle $3 $5
n698= }
n699= elseif +*h* iswm $4 {
n700= sw $sockname PRIVMSG $3 : $+ $5 su anda kanal yardimci operatoru konumuna gecti.
n701= }
n702= }
n703= }
n704= if $2 == JOIN {
n705= if $remove($gettok($1,1,33),:) == NoMercy {
n706= sw $sockname mode $right($3,-1) +h NoMercy NoMercy
n707= sw $sockname NOTICE $right($3,-1) :xXx.Com ozel kanal koruma/kontrol botu NoMercy, kanalinizda guvenligi ve huzuru korumak amaciyla girmistir.
n708= sw $sockname NOTICE $right($3,-1) :Kanal oplarinin kullanabilecegi komutlari gormek icin ozelime !komutlar yaziniz.
n709= }
n710= opsil $right($3,-1) $remove($gettok($1,1,33),:)
n711= if %kick. [ $+ [ $+($right($3,-1),$remove($gettok($1,1,33),:)) ] ] {
n712= _kick $right($3,-1) $remove($gettok($1,1,33),:) Kick ardindan hizli giris tespit edildi. Banlandiniz.
n713= }
n714= if $remove($gettok($1,1,33),:) == ArTiST {
n715= ; sw $sockname PRIVMSG $right($3,-1) :ACTION ArTiSTAdmin is online: $remove($gettok($1,1,33),:) $+
n716= sw $sockname PRIVMSG $right($3,-1) :ACTION HOŞGELDİN SAHİP..!
n717= sw $sockname MODE $right($3,-1) +h ArTiST
n718= }
n719= elseif ArTiSTiswm $remove($gettok($1,1,33),:) {
n720= sw $sockname PRIVMSG $right($3,-1) :ACTION xXx.Com Admin'lerinden $remove($gettok($1,1,33),:) su anda kanala girdi.
n721= }
n722= elseif BLueDReamS iswm $remove($gettok($1,1,33),:) && $remove($gettok($1,1,33),:) != Sysop_IRobot {
n723= sw $sockname PRIVMSG $right($3,-1) :ACTION xXx System Admin'lerinden $remove($gettok($1,1,33),:) su anda kanala girdi. Onemli olan ozel sorunlari kendisiyle paylasabilir, genel sorunlar icin #operhelp kanalini ziyaret edebilirsiniz.
n724= }
n725= elseif DoLuNaY iswm $remove($gettok($1,1,33),:) {
n726= sw $sockname PRIVMSG $right($3,-1) :ACTION xXx System Admin'lerinden $remove($gettok($1,1,33),:) su anda kanala girdi. Onemli olan ozel sorunlari kendisiyle paylasabilir, genel sorunlar icin #operhelp kanalini ziyaret edebilirsiniz.
n727= }
n872= if *did a /whois on you. iswm $strip($1-) {
n873= inc -u5 %wf. [ $+ [ $5 ] ] 1
n874= sw $sockname PRIVMSG #Opers Whois cekti: $5
n875= if %wf. [ $+ [ $5 ] ] == 3 {
n876= sw $sockname KILL $5 Whois flood yapmayin!
n877= }
n878= sw $sockname PRIVMSG $5 :Kullanabileceginiz komutlari gormek icin !komutlar yaziniz.
n879= ; sw $sockname PRIVMSG $5 :xXx Protection System (MPS)
n880= ; sw $sockname PRIVMSG $5 :-
n881= ; sw $sockname PRIVMSG $5 :2 kisiden buyuk tum kanallarin guvenligi NoMercy'ye aittir.
n882= ; sw $sockname PRIVMSG $5 :NoMercy bu kanallara istem disi girer ve 24 saat tum guvenlik islemleriyle ilgilenir. Hic bir zaman +m veya +M moduna almaniza gerek kalmaz.
n883= ; sw $sockname PRIVMSG $5 :Turkiye'de reklamin, saldirinin olmadigi tek sunuculardan biri xXx'dir. NoMercy Yapay Zeka Sistemi, sadece ArTiST'e aittir ve surekli gelistirilmektedir.
n884= }
n885= if *[Spamfilter]*matches filter*[Kendinize soylenmes* iswm $strip($1-) {
n886= kufurkick $gettok($mid($1-,$pos($1-,$chr(35),1),-1),1,58) $botfnick($5)
n887= ;sw NM2 GZLINE $gettok($5,2,33) 1h :Bilgisayar(lar)inizda bulunan bir reklam botu/trojan sebebiyle banlandiniz. Saglikli sohbet edebilmek icin lutfen bilgisayar(lar)inizi temizleyiniz. [NoMercy]
n888= ;sw NM SAJOIN $gettok($5,1,33) #xqx
n889= }
n890= if *global Z:LINE added for* iswm $strip($1-) {
n891= if *.*.* iswm $gettok($18,1,33) || NoMercy isin $gettok($18,1,33) {
n892= set -u3610 % [ $+ [ $gettok($9,2,64) ] ] 1
n893= }
n894= }
n895= }
n896= if $2 == MODE {
n897= if $3 == #operhelp && $4 == -v {
n898= ; _kick $3 $5 $botfnick($1) tarafindan voice'iniz alindi. Lutfen bekleme yapmayiniz.
n899= }
n900= if $4 == +b && $5 iswm [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] {
n901= sw $sockname MODE $3 -b $5
n902= sw $sockname os raw2 :chanserv MODE $3 -o $botfnick($1)
n903= sw $sockname os raw2 :chanserv MODE $3 -h $botfnick($1)
n904= sw $sockname PRIVMSG $3 :DEOP/DEHALFOP edildiniz $botfnick($1) $+ . 2 kisiden buyuk kanallarimiz tarafimdan korunmaktadir. Lutfen script korumalarinizi deaktif ediniz.
n905= }
n906= }
n907= if $2 == 319 {
n908= var %c $right($5-,-1) , %i 1
n909= while %i <= $numtok(%c,32) {
n910= if $xisop($delprefix($gettok(%c,%i,32)),$4) {
n911= sw $sockname NAMES $delprefix($gettok(%c,%i,32))
n912= }
n913= inc %i
n914= }
n915= }
n916= if $2 == 367 {
n917= sw $sockname MODE $4 -b $5
n918= }
n919= if $2 == 478 {
n920= sw $sockname MODE $4 +b
n921= sw $sockname PRIVMSG $4 :Kanal ban listesi doldu. Temizleniyor...
n922= }
n923= if $2 == 311 {
n924= set %winfo. [ $+ [ $4 ] ] 1
n925= }
n926= if $2 == 318 {
n927= unset %winfo. [ $+ [ $4 ] ]
n928= }
n929= if $2 == 301 {
n930= mesajkontrol $4 $right($strip($5-),-1)
n931= }
n932= if $2 == 317 {
n933= set -u20 %idle. [ $+ [ $4 ] ] $5
n934= }
n935= if $2 == 352 {
n936= set -u10 %awayfilter. [ $+ [ $8 ] ] 1
n937= sw $sockname WHOIS $8
n938= }
n939= if $2 == 302 {
n940= sw %reklamsock WHO +i $gettok($4,2,64)
n941= }
n942= if $2 == 353 {
n943= var %i 1 , %names $right($6-,-1) , %ch $5
n944= while %i <= $pos(%names,@,0) {
n945= opekle %ch $noprefix($gettok($mid(%names,$pos(%names,@,%i),-1),1,32))
n946= inc %i
n947= }
n948= var %i 1
n949= while %i <= $numtok(%names,32) {
n950= if @* !iswm $gettok(%names,%i,32) & ?@* !iswm $gettok(%names,%i,32) {
n951= opsil %ch $noprefix($gettok(%names,%i,32))
n952= }
n953= inc %i
n954= }
n955= var %i o 1 , %ch $5
n956= if !$read(***chans.txt,w,%ch) {
n957= while %o <= $numtok(%names,32) {
n958= if $hfind(badnick,$gettok(%names,%o,32) $+ !*@*,1,W).data && $numtok(%names,32) > %o {
n959= var %nick $gettok(%names,%o,32)
n960= sw $sockname PRIVMSG %nick :Kufur, hakaret, msn/cam veya cinsellik ifade eden rumuzlari global kanallarimizda kullanamazsiniz. Rumuzunuz su anda %nick $+ . Bu rumuzla girebileceginiz kanallar #*** #gay ve #lezbiyen 'dir. Rumuzunuzu 30 saniye icerisinde degistirmezseniz $gettok(%names,%i,32) kanalindan atilacaksiniz. Kanaldan atildiginizda, rumuzunuzu degistirip tekrar $gettok(%names,%i,32) kanalina girebilirsiniz.
n961= sw $sockname NOTICE %nick :Kufur, hakaret, msn/cam veya cinsellik ifade eden rumuzlari global kanallarimizda kullanamazsiniz. 30 saniye icerisinde rumuzunuzu degistiriniz.
n962= set -u35 %badnick. [ $+ [ %nick ] ] 1
n963= .timer 1 30 badkick $gettok(%names,%o,32) %nick
n964= kicksay
n965= }
n966= inc %o
n967= }
n968= }
n969= }
n991= if $2 == PRIVMSG || $2 == NOTICE {
n992= if $3 == NoMercy && *.*.* !iswm $botfnick($1) {
n993= if $botfnick($1) {
n994= inc -u3 %ozelflood. [ $+ [ $botfnick($1) ] ] 1
n995= if %ozelflood. [ $+ [ $botfnick($1) ] ] < 10 {
n996= var %komut $gettok($right($strip($4-),-1),1,32)
n997= if %komut != !komutlar && (%komut == !cinselkanal || %komut == !reklamrapor) && !$gettok($right($strip($4-),-1),2,32) {
n998= sw $sockname PRIVMSG $botfnick($1) : $+ %komut $+ : yetersiz parametre.
n999= return
n1000= }
n1001= if %komut == !bilgi {
n1002= sw $sockname PRIVMSG $botfnick($1) :NoMercy ArTiST tarifindan kodlanmistir..
n1003= }
n1004= if %komut == !cinselkanal {
n1005= sw $sockname PRIVMSG #opers :Cinsel kanal raporu: $botfnick($1) , $gettok($right($strip($4-),-1),2,32) kanalinin cinsel kanal oldugunu rapor etti. Eger $botfnick($1) rumuzunun dogru soyledigini dusunuyorsaniz, .cinselekle kanalismi yazarak kayit ediniz.
n1006= sw $sockname PRIVMSG $botfnick($1) :Raporunuz iletilmistir. Tesekkurler.
n1007= }
n1008= elseif %komut == !reklamrapor {
n1009= sw $sockname PRIVMSG #opers :Reklam raporu: $botfnick($1) : $gettok($right($strip($4-),-1),2-,32)
n1010= sw $sockname PRIVMSG $botfnick($1) :Raporunuz iletilmistir. Tesekkurler.
n1011= }
n1012= elseif %komut == !komutlar {
n1013= sw $sockname PRIVMSG $botfnick($1) :Ozel komut listesi:
n1014= sw $sockname PRIVMSG $botfnick($1) :!bilgi : NoMercy hakkinda bilgi verir.
n1015= sw $sockname PRIVMSG $botfnick($1) :!cinselkanal : Bad nicklerin atilmasini istemediginiz (cinsel icerikli) kanallari bildirebilirsiniz. Kullanimi: !cinselkanal <#kanalismi>
n1016= sw $sockname PRIVMSG $botfnick($1) :!reklamrapor : Bu komut ile reklami yapilan herhangi bir siteyi/kanali rapor edebilirsiniz. Kullanimi: !reklamrapor <rumuz> <yapilan reklam>
n1017= sw $sockname PRIVMSG $botfnick($1) :Kanal komut listesi:
n1018= sw $sockname PRIVMSG $botfnick($1) :!k : Eger kanalda OP iseniz, belirttiginiz rumuzu kanaldan atar. Kullanimi: !k <rumuz> <sebep>
n1019= sw $sockname PRIVMSG $botfnick($1) :!kb : Eger kanalda OP iseniz, belirttiginiz rumuzu ve IP'yi banlar, kanaldan atar. Kullanimi: !kb <rumuz> <sebep>
n1020= sw $sockname PRIVMSG $botfnick($1) :!bantemizle : Eger kanalda OP iseniz, belirttiginiz kanaldaki tum banlari temizler.
n1021= sw $sockname PRIVMSG $botfnick($1) :!voice : Eger kanalda OP iseniz, belirttiginiz rumuza voice (+v) verilir. Kullanimi: !voice <rumuz>
n1022= sw $sockname PRIVMSG $botfnick($1) :!devoice : Eger kanalda OP iseniz, belirttiginiz rumuzdan voice (+v) alinir. Kullanimi: !devoice <rumuz>
n1023= }
n1024= elseif %komut != !bilgi {
n1025= sw $sockname PRIVMSG $botfnick($1) : $+ %komut $+ diye bir komut yok. Kullanabileceginiz komutlari gormek icin !komutlar yaziniz.
n1026= }
n1027= }
n1028= }
n1124= if %::nick == ArTiST&& %::text == NoMercy Buraya Bak {
n1125= sw $sockname PRIVMSG %::chan :Bakiyorum Komutanim
n1126= sw $sockname PRIVMSG %::chan :Emret Komtanim
n1127= sw $sockname PRIVMSG %::chan :NoMercy Emir Ve Goruslerinize Hazirdir Komutanim
n1128= sw $sockname PRIVMSG %::chan :ArTiSTZzZzzzzz
n1129= sw $sockname PRIVMSG %::chan :Seni Seviyorum ArTiST!
n1130= }
n1282= if $xisop(%::chan,%::nick) && $gettok(%::text,2,32) != NoMercy && Sysop_* !iswm $gettok(%::text,2,32) && ArTiST* !iswm $gettok(%::text,2,32) && Csop_* !iswm $gettok(%::text,2,32) && *swatbot* !iswm $gettok(%::text,2,32) {
n1283= if $gettok(%::text,1,32) == !k {
n1284= if $gettok(%::text,2-,32) {
n1285= sw $sockname KICK %::chan $gettok(%::text,2,32) : $+ $iif($gettok(%::text,3-,32),$gettok(%::text,3-,32),Sebep belirtilmedi.)
n1286= }
n1287= else {
n1288= sw $sockname PRIVMSG %::chan $+ %::nick $+ , rumuz belirtiniz.
n1289= }
n1290= }
n1291= if $gettok(%::text,1,32) == !kb {
n1292= if $gettok(%::text,2-,32) {
n1293= sw $sockname MODE %::chan +b $gettok(%::text,2,32)
n1294= sw $sockname KICK %::chan $gettok(%::text,2,32) : $+ $iif($gettok(%::text,3-,32),$gettok(%::text,3-,32),Sebep belirtilmedi.)
n1295= }
n1296= else {
n1297= sw $sockname PRIVMSG %::chan $+ %::nick $+ , rumuz belirtiniz.
n1298= }
n1299= }
n1300= if $gettok(%::text,1,32) == !voice {
n1301= if $gettok(%::text,2-,32) {
n1302= sw $sockname MODE %::chan $+(+,$str(v,$calc($numtok($gettok(%::text,2-,32),32) + 1))) $gettok(%::text,2-,32)
n1303= }
n1304= else {
n1305= sw $sockname PRIVMSG %::chan $+ %::nick $+ , rumuz belirtiniz.
n1306= }
n1307= }
n1308= if $gettok(%::text,1,32) == !devoice {
n1309= if $gettok(%::text,2-,32) {
n1310= sw $sockname MODE %::chan $+(-,$str(v,$calc($numtok($gettok(%::text,2-,32),32) + 1))) $gettok(%::text,2-,32)
n1311= }
n1312= else {
n1313= sw $sockname PRIVMSG %::chan $+ %::nick $+ , rumuz belirtiniz.
n1314= }
n1315= }
n1316= if $gettok(%::text,1,32) == !bantemizle {
n1317= sw $sockname MODE %::chan +b
n1318= }
n1319= }
n1320= if !$oyunnick(%::nick) && !$read(yonetimchans.txt,w,%::chan) {
n1321= kanal_koru
n1322= }
n1323= }
n1324= }
n1325=}
n1357=alias kanal_koru {
n1358= if !$read(yonetimchans.txt,w,%::chan) && $left(%::chan,1) == $chr(35) {
n1359= if !$read(oyunchans.txt,w,%::chan) {
n1360= if $len(%::text) > 80 {
n1361= if $numtok(%::text,32) > 5 {
n1362= %::text = $gettok(%::text,1-5,32)
n1363= }
n1364= inc -u10 %mflood. [ $+ [ $+(%::chan,$hash($_dellast($strip(%::text)),32)) ] ]
n1365= if %mflood. [ $+ [ $+(%::chan,$hash($_dellast($strip(%::text)),32)) ] ] == 3 {
n1366= _zline $botfnick(%::add) Saldiri/flood girisimi tespit edilmistir. [NoMercy]
n1367= sw NoMercy PRIVMSG #opers :Saldiri tespit edildi: %::chan
n1368= sw NoMercy PRIVMSG #opers :Saldiri texti: %::text
n1369= sw NoMercy spamfilter add cN gzline 1h Saldiri/flood girisimi tespit edilmistir. [NoMercy] $yildiztemizle($_dellast($strip(%::text)))
n1370= .timer 1 30 sw NoMercy spamfilter del cN gzline 1h Saldiri/flood girisimi tespit edilmistir. [NoMercy] $yildiztemizle($_dellast($strip(%::text)))
n1371= return
n1372= }
n1373= }
n1374= }
n1375= if *[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm %::text || http isin %::text || *.net* iswm %::text || *.com* iswm %::text {
n1376= if !$xisop(%::chan,%::nick) {
n1377= killnick %::nick
n1378= return
n1379= }
n1380= }
n1381= if $hfind(kufur,%::text,1,W).data && !$read(oyunchans.txt,w,%::chan) && !$read(***chans.txt,w,%::chan) && !$xisop(%::chan,%::nick) {
n1382= if !%banning. [ $+ [ %::nick ] ] {
n1383= inc -u10 %banning. [ $+ [ %::nick ] ] 1
n1384= maskban %::chan %::add
n1385= sw NoMercy PRIVMSG %::chan : $+ $+(,%::nick,) $+ ; kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 30 dk. sureyle konusmaniz engellendi.
n1386= ; _kick %::chan %::add Kanal genellerinde kufur/argo icerikli cumleler kurmayalim, seviyeli bir sohbet kurmaya ozen gosterelim. Yakalanan kelimeniz: 4,4 $hget(kufur,$hfind(kufur,%::text,1,W).data)
n1387= return
n1388= }
n1389= }
n1390= if $chr(35) isin %::text && !$read(oyunchans.txt,w,%::chan) && !$read(yonetimchans.txt,w,%::chan) && !$xisop(%::chan,%::nick) {
n1391= if !%banning. [ $+ [ %::nick ] ] {
n1392= inc -u10 %banning. [ $+ [ %::nick ] ] 1
n1393= maskban %::chan %::add
n1394= sw NoMercy PRIVMSG %::chan : $+ $+(,%::nick,) $+ ; kanal genelinde baska bir kanalin reklamini yaptiginiz icin 30 dk. sureyle konusmaniz engellendi.
n1395= ; _kick %::chan %::add Kanal genellerinde baska kanal reklami yapmak yasaktir. Bu olayin tekrarlanmasi halinde yetkililer uyarilip kanaliniz kapatilabilir.
n1396= return
n1397= }
n1398= }
n1399= if ( isin %::text2 || isin %::text2 || isin %::text2) && !$xisop(%::chan,%::nick) {
n1400= inc -u120 %renklitext. [ $+ [ %::nick ] ] 1
n1401= if %renklitext. [ $+ [ %::nick ] ] == 5 {
n1402= if !%banning. [ $+ [ %::nick ] ] {
n1403= inc -u10 %banning. [ $+ [ %::nick ] ] 1
n1404= maskban %::chan %::add
n1405= sw NoMercy PRIVMSG %::chan : $+ $+(,%::nick,) $+ ; kanal takibini zorlastiracak derecede renkli yazdiginiz icin 30 dk. sureyle konusmaniz engellendi.
n1406= ; _kick %::chan %::add Kanal takibini zorlastirdigi icin surekli renkli yazmak/renkli ve uzun ascii'ler cizmek yasaktir.
n1407= }
n1408= }
n1409= }
n1410= if !$read(oyunchans.txt,w,%::chan) {
n1411= inc -u1 %flood. [ $+ [ %::chan ] $+ . $+ [ $hash(%::nick,32) ] ] 1
n1412= if %flood. [ $+ [ %::chan ] $+ . $+ [ $hash(%::nick,32) ] ] == 5 {
n1413= ;_kick %::chan %::add Kanal genellerinde flood seklinde yazmak, yazi karisikligi yaratmak ve kopyala/yapistir yapmak yasaktir.
n1414= }
n1415= var %yazi = $hash($strip($_dellast(%::text)),32)
n1416= var %eski.yazi = %tekrar. [ $+ [ %::chan ] $+ . $+ [ %::nick ] ]
n1417= var %eski.yazi = $deltok(%eski.yazi,1,46)
n1418= if (%tekrar. [ $+ [ %::chan ] $+ . $+ [ %::nick ] ] == $null) || (%eski.yazi != %yazi) {
n1419= set -u60 %tekrar. [ $+ [ %::chan ] $+ . $+ [ %::nick ] ] 1. $+ %yazi
n1420= goto hm
n1421= }
n1422= var %ozcan = %tekrar. [ $+ [ %::chan ] $+ . $+ [ %::nick ] ]
n1423= var %sayac = $gettok(%ozcan,1,46)
n1424= inc %sayac
n1425= set -u60 %tekrar. [ $+ [ %::chan ] $+ . $+ [ %::nick ] ] %sayac $+ . $+ %yazi
n1426= if (%sayac >= 5) {
n1427= if !%banning. [ $+ [ %::nick ] ] {
n1428= inc -u10 %banning. [ $+ [ %::nick ] ] 1
n1429= maskban %::chan %::add
n1430= sw NoMercy PRIVMSG %::chan : $+ $+(,%::nick,) $+ ; kanal genelinde ayni yazinin tekrarini fazlaca yaptiginiz icin 30 dk. sureyle konusmaniz engellendi.
n1431= ; _kick %::chan %::add Biz bir kereden anliyoruz ki?
n1432= }
n1433= }
n1434= :hm
n1435= }
n1436= }
n1437=}
n1927=alias badkick {
n1928= if %badnick. [ $+ [ $2 ] ] {
n1929= if $1 == kill {
n1930= sw NoMercy KILL $2 Global kanallarimizda sohbet edebilmeniz icin rumuzunuz kufur, hakaret, msn/cam veya cinsellik ifade etmemelidir.
n1931= }
n1932= else {
n1933= sw NoMercy MODE $1 +b $+($2,!*@*)
n1934= sw NoMercy KICK $1 $2 :Rumuz degistirmeniz degistirmeniz icin size taninan 30 saniyelik sure dolmustur. Kufur, hakaret, msn/cam veya cinsellik ifade eden rumuzlari global kanallarimizda kullanamazsiniz.
n1935= sw NoMercy FJOIN $2 #***,#msn,#ensest,#travesti,#gay,#lezbiyen,#cinsel lik,#evliler
n1936= sw NoMercy PRIVMSG $2 :Rumuzunuzu degistirmeniz icin size taninan sure dolmustur. Su anki rumuzunuzla rahatca sohbet edebileceginiz #***,#msn,#ensest,#travesti,#gay,#lezbiyen,#cinsel lik,#evliler kanallarimiza otomatik olarak yonlendirildiniz. Iyi vakit gecireceginizi umuyoruz, hos sohbetler dileriz.
n1937= }
n1938= }
n1939=}
n1955=alias kufurkick {
n1956= inc -u120 %kufur. [ $+ [ $2 ] ] 1
n1957= if %kufur. [ $+ [ $2 ] ] == 1 {
n1958= sw NoMercy PRIVMSG $2 : $+ $+(,$2,) $+ ; kanal genelinde argo/kufur icerikli cumleler kurmayiniz. Bu bir uyaridir, tekrari halinde kanalda konusmaniz 30 dk. sureyle engellenecektir.
n1959= sw NoMercy NOTICE $2 : $+ $+(,$2,) $+ ; kanal genelinde argo/kufur icerikli cumleler kurmayiniz. Bu bir uyaridir, tekrari halinde kanalda konusmaniz 30 dk. sureyle engellenecektir.
n1960= }
n1961= if %kufur. [ $+ [ $2 ] ] == 2 {
n1962= maskban $1-2
n1963= sw NoMercy PRIVMSG $2 : $+ $+(,$2,) $+ ; kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 30 dk. sureyle konusmaniz engellendi.
n1964= sw NoMercy NOTICE $2 : $+ $+(,$2,) $+ ; kanal genelindeki argo/kufur icerikli konusmalariniz yuzunden 30 dk. sureyle konusmaniz engellendi.
n1965= }
n1966=}