(Skrip)-sBiasa-Lite — File Browser
Skrip-sBiasa-Litev1.01c / Skrip-sBiasa-Litev1.01c / sBiasaLite_Skrip / sbiasa_lite_s_prot_chan_03.ini
sbiasa_lite_s_prot_chan_03.ini — 23.18 KB — Download this file
[script]
n0=;# Skrip Bíasa Lite -#- Roní Tua -#- http://www.picauly.f2s.com/ -#- v1.01c #
n1=
n2=alias sBiasa.prot.ch.check.text { if ($me !isop $1) || ($5 == $null) { return }
n3= if ($sBiasa.prot.ch(2)) { inc %DefTFT [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] 1
n4= if ($len($5-) >= $gettok(%sBiasa-channel.flood.limit.length_data,1,58)) { inc %DefTFT [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] 1 }
n5= .timerDefFDly [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-channel.flood_data,1,58) { unset %DefTFT [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] }
n6= if ($4 = ctcp) || ($4 = ctcp-reply) { inc %chnfldctcp [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] 1
n7= if ($len($5-) >= $gettok(%sBiasa-channel.flood.limit.length_data,1,58)) { inc %chnfldctcp [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] 1 }
n8= .timerchnfldctcp [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-channel.flood_data,1,58) { unset %chnfldctcp [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] }
n9= } }
n10= if ($sBiasa.prot.ch(4)) { if (%reptxt [ $+ [ $1 ] $+ [ $2 ] ] == $strip($$5-)) && ($strip($$5-) != $null) { inc -u30 %reptxtl [ $+ [ $1 ] $+ [ $2 ] ] 1 }
n11= elseif (%reptxt [ $+ [ $1 ] $+ [ $2 ] ] == stripabis) && ($strip($$5-) == $null) { inc -u30 %reptxtl [ $+ [ $1 ] $+ [ $2 ] ] 1 }
n12= if (%reptxt [ $+ [ $1 ] $+ [ $$2 ] ] != $$5-) { set -u30 %reptxtl [ $+ [ $1 ] $+ [ $$2 ] ] 1 | set -u28 %reptxt [ $+ [ $1 ] $+ [ $2 ] ] $$5- }
n13= }
n14= if ($sBiasa.prot.ch(6)) { var %sBiasa-capstextcap = $calc($len($5-) - $len($removecs($5-,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z))) }
n15= if ($sBiasa.prot.ch(1) != $true) && ($len($5-) > 50) && (* ? ? ? ? * ? ? ? ? * iswm $5-) { inc -u60 %sBiasa-chkchanFld [ $+ [ $1 ] ] 1.25
n16= if (%sBiasa-chkchanFld [ $+ [ $1 ] ] >= 5) { unset %sBiasa-chkchanFld [ $+ [ $1 ] ] | lockchannel flood $1 }
n17= sBiasa.add.chan.mode $1 +b $mask($$3,2)
n18= .timerubadd2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-Underlined-Text-Flood_Protection_data,1,58) { ubmask $1 $mask($$3,2) }
n19= ckick $1 $$2 Banned: Bíasa Underline text flood detected..!!
n20= }
n21= if ($sBiasa.prot.ch(2)) {
n22= if ($calc($len($5-) - $len($strip($5-))) > $gettok(%sBiasa-channel.flood.limit.codes_data,3,58)) {
n23= sBiasa.add.chan.mode $1 +b $mask($$3,3)
n24= ckick $1 $$2 Banned: Too many control codes in your text.. ( $+ $calc($len($5-) - $len($strip($5-))) code $+ $iif($calc($len($5-) - $len($strip($5-))) > 1, s) $+ )
n25= .timerubadd3 [ $+ [ $1 ] $+ [ $mask($$3,3) ] ] -o 1 $gettok(%sBiasa-channel.flood_data,2,58) { ubmask $1 $mask($$3,3) }
n26= }
n27= elseif ($calc($len($5-) - $len($strip($5-))) > $gettok(%sBiasa-channel.flood.limit.codes_data,2,58)) {
n28= if (%kicknick [ $+ [ $1 ] $+ [ $$2 ] ] != $null) {
n29= sBiasa.add.chan.mode $1 +b $$2 $+ !*@*
n30= ckick $1 $$2 Too many control codes in your text.. ( $+ $calc($len($5-) - $len($strip($5-))) code $+ $iif($calc($len($5-) - $len($strip($5-))) > 1, s) $+ ).. (one minute ban)
n31= .timerub60nick [ $+ [ $1 ] $+ [ $$2 ] ] -o 1 60 { ubmask $1 $$2 $+ !*@* }
n32= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ]
n33= }
n34= else { ckick $1 $$2 Too many control codes in your text.. ( $+ $calc($len($5-) - $len($strip($5-))) code $+ $iif($calc($len($5-) - $len($strip($5-))) > 1, s) $+ )
n35= inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n36= } }
n37= elseif ($calc($len($5-) - $len($strip($5-))) > $gettok(%sBiasa-channel.flood.limit.codes_data,1,58)) {
n38= if ($findtok(%sBiasa-channel.flood.limit.codes.warnsent,$$2,32) = $null) && ($calc($len($5-) - $len($strip($5-))) > 0) {
n39= myspoken -nl $$2 You were using $calc($len($5-) - $len($strip($5-))) control codes in your text. It's make the mIRC seems look bad. Use colour only to emphasize a point; just like ircII users have always done with bold.
n40= set %sBiasa-channel.flood.limit.codes.warnsent $$2 %sBiasa-channel.flood.limit.codes.warnsent
n41= } }
n42= elseif ($len($5-) >= $gettok(%sBiasa-channel.flood.limit.length_data,3,58)) { sBiasa.add.chan.mode $1 +b $mask($$3,2)
n43= ckick $1 $$2 Banned: Your text is too long.. ( $+ $len($5-) character $+ $iif($len($5-) > 1, s) or more)
n44= .timerubadd2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-channel.flood_data,2,58) { ubmask $1 $mask($$3,2) }
n45= }
n46= elseif ($len($5-) >= $gettok(%sBiasa-channel.flood.limit.length_data,2,58)) {
n47= if (%kicknick [ $+ [ $1 ] $+ [ $$2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $$2 $+ !*@*
n48= ckick $1 $$2 Your text is too long.. ( $+ $len($5-) character $+ $iif($len($5-) > 1, s) or more).. (one minute ban)
n49= .timerub60nick [ $+ [ $1 ] $+ [ $2 ] ] -o 1 60 { ubmask $1 $$2 $+ !*@* }
n50= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ]
n51= }
n52= else { ckick $1 $$2 Your text is too long.. ( $+ $len($5-) character $+ $iif($len($5-) > 1, s) or more)
n53= inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n54= } }
n55= if (%DefTFT [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] >= $gettok(%sBiasa-channel.flood.limit.line_data,2,58)) {
n56= if (%banaddress2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] == $null) {
n57= sBiasa.add.chan.mode $1 +b $mask($$3,2)
n58= inc -u60 %banaddress2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] 1
n59= .timerubadd2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-channel.flood_data,2,58) { ubmask $1 $mask($$3,2) }
n60= ckick $1 $$2 Banned: $4 $+ -Flood!
n61= inc -u60 %sBiasa-chkchanFld [ $+ [ $$1 ] ] 1
n62= if (%sBiasa-chkchanFld [ $+ [ $1 ] ] >= 5) { unset %sBiasa-chkchanFld [ $+ [ $$1 ] ] | lockchannel flood $$1 }
n63= }
n64= unset %DefTFT [ $+ [ $1 ] $+ [ $mask($$3,2) ] ]
n65= sBiasa.prot.ch.check.text.unset | halt
n66= }
n67= elseif (($4 = ctcp) || ($4 = ctcp-reply)) && (%chnfldctcp [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] >= $gettok(%sBiasa-channel.flood.limit.line_data,3,58)) {
n68= ckick $1 $$2 $4 $+ -Flood | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n69= }
n70= elseif (($4 != ctcp) || ($4 = ctcp-reply)) && (%DefTFT [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] >= $gettok(%sBiasa-channel.flood.limit.line_data,1,58)) {
n71= ckick $1 $$2 $4 $+ -Flood | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n72= } }
n73= if ($sBiasa.prot.ch(4)) {
n74= if (%reptxtl [ $+ [ $1 ] $+ [ $2 ] ] == $gettok(%sBiasa-repeattextv2_data,1,58)) {
n75= unset %reptxt [ $+ [ $1 ] $+ [ $$2 ] ] %reptxtl [ $+ [ $1 ] $+ [ $$2 ] ]
n76= inc -u30 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n77= if ($sBiasa.prot.ch(5) != $true) && (%kicknick [ $+ [ $1 ] $+ [ $$2 ] ] >= 2) {
n78= sBiasa.add.chan.mode $1 +b $$2 $+ !*@*
n79= ckick $1 $$2 Do not repeat!.. (one minute ban)
n80= .timerub60nick [ $+ [ $1 ] $+ [ $$2 ] ] -o 1 60 { ubmask $1 $$2 $+ !*@* }
n81= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ]
n82= inc -u60 %sBiasa-chkchanFld [ $+ [ $1 ] ] 0.5
n83= if (%sBiasa-chkchanFld [ $+ [ $1 ] ] >= 5) { unset %sBiasa-chkchanFld [ $+ [ $$1 ] ] | sBiasa.lockchannel flood $$1 }
n84= }
n85= else { if ($gettok(%sBiasa-repeattextv2_data,1,58) == 2) { ckick $1 $$2 Once is enough.. }
n86= else { ckick $1 $$2 Do not repeat.. ( $+ $gettok(%sBiasa-repeattextv2_data,1,58) lines or more) }
n87= }
n88= if ($sBiasa.prot.ch(5)) { sBiasa.add.chan.mode $1 +b $mask($$3,2)
n89= .timerubadd2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-repeattextv2_data,2,58) { ubmask $1 $mask($$3,2) }
n90= inc -u60 %sBiasa-chkchanFld [ $+ [ $$1 ] ] 0.5
n91= if (%sBiasa-chkchanFld [ $+ [ $1 ] ] >= 5) { unset %sBiasa-chkchanFld [ $+ [ $$1 ] ] | sBiasa.lockchannel flood $$1 }
n92= sBiasa.prot.ch.check.text.unset | return
n93= } }
n94= if ($sBiasa.prot.ch(6)) {
n95= if ($calc(%sBiasa-capstextcap / $len($5-) * 100) >= 100) && ($len($5-) >= 298) {
n96= sBiasa.add.chan.mode $1 +b $mask($$3,3)
n97= ckick $1 $$2 Banned: Desynche flood
n98= .timerubadd3 [ $+ [ $1 ] $+ [ $mask($$3,3) ] ] -o 1 900 { ubmask $1 $mask($$3,3) }
n99= inc -u60 %sBiasa-chkchanFld [ $+ [ $$1 ] ] 1
n100= if (%sBiasa-chkchanFld [ $+ [ $$1 ] ] >= 5) { unset %sBiasa-chkchanFld [ $+ [ $$1 ] ] | sBiasa.lockchannel flood $$1 }
n101= }
n102= elseif ($calc(%sBiasa-capstextcap / $len($5-) * 100) >= $gettok(%sBiasa-capskick_data,1,58)) && ($len($5-) >= $gettok(%sBiasa-capskick_data,2,58)) {
n103= if (%kicknick [ $+ [ $1 ] $+ [ $$2 ] ] == 3) {
n104= sBiasa.add.chan.mode $1 +b $$2 $+ !*@*
n105= ckick $1 $$2 Turn off your CAPS.. (more $gettok(%sBiasa-capskick_data,1,58) percent in $len($5-) characters).. (one minute ban)
n106= .timerub60nick [ $+ [ $1 ] $+ [ $$2 ] ] -o 1 60 { ubmask $1 $$2 $+ !*@* }
n107= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ]
n108= }
n109= else { ckick $1 $$2 Too many caps in your text.. (more $gettok(%sBiasa-capskick_data,1,58) percent in $len($5-) characters)
n110= inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n111= } } }
n112= if ($sBiasa.prot.ch(13)) { if ($4 = action) && (*slap*with*trout* iswm $strip($5-)) {
n113= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] == 3) {
n114= sBiasa.add.chan.mode $1 +b $mask($$3,3)
n115= ckick $1 $$2 Banned: Take your trout and go jump to the lake, first!
n116= .timerubadd3 [ $+ [ $1 ] $+ [ $mask($$3,3) ] ] -o 1 300 { ubmask $1 $mask($$3,3) }
n117= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ]
n118= }
n119= else { ckick $1 $$2 Take your trout and go jump to the lake! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 } }
n120= elseif (((why isin $strip($5-)) || (what isin $strip($5-)) || (why isin $strip($5-))) && (blonde isin $strip($5-)) && ($chr(33) isin $strip($5-))) || (*yo*momma* iswm $strip($5-)) {
n121= inc %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 | if (%kicknick [ $+ [ $1 ] $+ [ $$2 ] ] > 2) {
n122= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | sBiasa.add.chan.mode $1 +b $mask($$3,3)
n123= .timerubadd3 [ $+ [ $1 ] $+ [ $mask($$3,3) ] ] -o 1 180 { ubmask $1 $mask($$3,3) }
n124= ckick $1 $$2 You must be in rehabilitations..!!.. (three minutes ban!)
n125= }
n126= else { ckick $1 $$2 I don't like that jokes! It's not pretty-funny jokes. }
n127= } }
n128= if ($sBiasa.prot.ch(15)) { var %sBiasa-bdwrd.chan.check.num = 1
n129= set -u0 %sBiasa-prot.bdwrd M:V]N=&]L(&MU;G1U;"!N9V5N=&]T(&ME;G1O="!P97!E:R!P97!E>"!B=7)IM="!A;F%L<V5X(&%N86QS96MS(&]R86QS97@@;W)A;'-E:W,@9&]G9WES='ELM92!P=7-S>2!V86=I;F$@:71I;"!C;&ET(&-L:7-T;W)I<R!P=71I;F<@<&%NM=&%T('!A=&%T(&IA;F-U:R!J86YC;VL@;F=E<V5K<R!T;W1O;F<@;F]N;VYG'(&MO;F-E=```
n130= while (%sBiasa-bdwrd.chan.check.num <= $gettok($decode(%sBiasa-prot.bdwrd),0,32)) {
n131= if ($gettok($decode(%sBiasa-prot.bdwrd),%sBiasa-bdwrd.chan.check.num,32) isin $strip($5-)) {
n132= sBiasa.add.chan.mode $1 +b $mask($$3,2)
n133= .timerubadd2 [ $+ [ $1 ] $+ [ $mask($$3,2) ] ] -o 1 $gettok(%sBiasa-stdbanneduser_data,1,58) { ubmask $1 $mask($$3,2) }
n134= ckick $1 $$2 Banned: Don't use badwords in here..!
n135= }
n136= inc %sBiasa-bdwrd.chan.check.num 1
n137= }
n138= unset %sBiasa-prot.bdwrd
n139= }
n140= if ($sBiasa.prot.ch(14)) { var %sBiasa-bdwrd.chan.check.num = 1
n141= set %sBiasa-prot.bdwrd M<V5X('-H:70@9G5C:R!S=6-K(&AO<FYY(',S>"!S96MS:2!S:#%T('-U8W@@2;F=E<V5K(&%S=74@86YJ:6YG````
n142= while (%sBiasa-bdwrd.chan.check.num <= $gettok($decode(%sBiasa-prot.bdwrd),0,32)) {
n143= if ($gettok($decode(%sBiasa-prot.bdwrd),%sBiasa-bdwrd.chan.check.num,32) isin $strip($5-)) {
n144= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] >= 3) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n145= .timerubadd3 [ $+ [ $1 ] $+ [ $mask($$3,3) ] ] -o 1 180 { ubmask $1 $mask($$3,3) }
n146= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Wazzap? Watch your mouth.. Losser!!
n147= }
n148= else { ckick $1 $$2 Wazzap? Watch your mouth..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1
n149= } }
n150= inc %sBiasa-bdwrd.chan.check.num 1
n151= }
n152= unset %sBiasa-prot.bdwrd
n153= }
n154= if ($sBiasa.prot.ch(8)) && ( isin $5-) {
n155= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n156= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Don't use the colours..!.. (one minute ban)
n157= }
n158= else { ckick $1 $$2 No colour please..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 }
n159= }
n160= if ($sBiasa.prot.ch(9)) && ( isin $5-) {
n161= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n162= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Don't use the bolds..!.. (one minute ban)
n163= }
n164= else { ckick $1 $$2 No bold please..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 }
n165= }
n166= if ($sBiasa.prot.ch(10)) && ( isin $5-) {
n167= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n168= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Don't use the underlines..!.. (one minute ban)
n169= }
n170= else { ckick $1 $$2 No underline please..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 }
n171= }
n172= if ($sBiasa.prot.ch(11)) && ( isin $5-) {
n173= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n174= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Don't use the reverses..!.. (one minute ban)
n175= }
n176= else { ckick $1 $$2 No reverse please..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 }
n177= }
n178= if ($sBiasa.prot.ch(16)) && (($4 = ctcp) || ($4 = ctcp-reply)) {
n179= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n180= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Don't ctcp channel..!.. (one minute ban)
n181= }
n182= else { ckick $1 $$2 No ctcp channel please..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 }
n183= }
n184= if ($sBiasa.prot.ch(17)) && ($4 = notice) {
n185= if (%kicknick [ $+ [ $1 ] $+ [ $2 ] ] != $null) { sBiasa.add.chan.mode $1 +b $mask($$3,3)
n186= unset %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] | ckick $1 $$2 Don't notice channel..!.. (one minute ban)
n187= }
n188= else { ckick $1 $$2 No notice channel please..! | inc -u60 %kicknick [ $+ [ $1 ] $+ [ $$2 ] ] 1 }
n189= }
n190= if ($sBiasa.prot.ch(18)) && ($len($5-) > 99) {
n191= set -u0 %sBiasa-floodtsunami ^^^ |@ # $ % | / * / * / * / 0,4- * 0,12- * 0,4- * 0,12- * |F | L | O | O| D| | ]]]]]]]]]] %%%%%%%%%%%%%%%%%%%%%%% æææææææææææ 4,12llIIIIIIIIIIIIIIIIIIIIIIIII BlizztBlizzt 412,4eL ite 4,12eL ite 12,4eL ite 57,8ill us8,7io n7,8ill us8,7io n7,8ill us8,7io n 44,3f 3,4L4,3o3,4o 4,3D3,4 1,3, |¥@ ¶!#tmC#!¶ $ % ^^^^^ 5d12k6s7f9h5d12k11j6s
n192= var %floodtsunamitextkatach = 1, %floodtsunamitextkatatotal = $gettok(%sBiasa-floodtsunami,0,32)
n193= while (%floodtsunamitextkatach <= %floodtsunamitextkatatotal) {
n194= if ($gettok(%sBiasa-floodtsunami,%floodtsunamitextkatach,32) isin $5-) {
n195= if (%floodtsunami [ $+ [ $1 ] $+ [ $2 ] ] != 1) {
n196= set -u60 %floodtsunami [ $+ [ $1 ] $+ [ $$2 ] ] 1
n197= ckick $1 $$2 Lamer: Don't try to flooding me!!
n198= sBiasa.add.chan.mode $1 +b $mask($$3,2)
n199= }
n200= inc -u60 %chkchanFld [ $+ [ $$1 ] ] 1
n201= if (%chkchanFld [ $+ [ $1 ] ] >= 5) { unset %chkchanFld [ $+ [ $$1 ] ] | lockchannel flood $$1 }
n202= .timerubadd2 [ $+ $1 ] $+ [ $mask($$3,2) ] ] off
n203= sBiasa.prot.ch.check.text.unset | halt
n204= }
n205= inc %floodtsunamitextkatach 1
n206= } } }
n207= if ($sBiasa.prot.ch(19)) && ((/j $chr(35) isin $strip($5-)) || (join $chr(35) isin $strip($5-)) || (*#??* isin $strip($5-)) || (http:/ isin $strip($5-)) || (www. isin $strip($5-)) || (ftp. isin $strip($5-)) || (ftp:/ isin $strip($5-))) {
n208= inc -u60 %kicknick [ $+ [ $1 [ $+ [ $2 ] ] ] ] 1
n209= if ($sBiasa.protch(20)) { sBiasa.add.chan.mode $1 +b $mask($3,2) | .timerubadd2 [ $+ [ $1 ] $+ [ $mask($3,2) ] ] 1 %sBiasa-advertisetextkick_data { ubmask $1 $mask($3,2) } }
n210= elseif (%kicknick [ $+ [ $1 [ $+ [ $2 ] ] ] ] == 2) {
n211= sBiasa.add.chan.mode $1 +b $$2 $+ !*@*
n212= ckick $1 $$2 Please don't advertising in this channel!.. (one minute ban)
n213= .timerub60nick [ $+ [ $1 ] $+ [ $2 ] ] 1 60 { ubmask $1 $2 $+ !*@* }
n214= unset %kicknick [ $+ [ $1 [ $+ [ $2 ] ] ] ] | goto aadverkicktend1
n215= }
n216= ckick $1 $$2 Please don't advertising in this channel!
n217= }
n218= ; if ($4 = ctcp) && (($5 = do) || ($5 = scriptver)) {
n219= ; .timerubadd3 [ $+ [ $1 ] $+ [ $mask($$3,3) ] ] -o 1 300 { ubmask $1 $mask($$3,3) }
n220= ; sBiasa.add.chan.mode $1 +b $mask($$3,3)
n221= ; ckick $1 $$2 Banned: Try Me?
n222= ; }
n223=} }
n224=on @1:TOPIC:#:{ if ($sBiasa.main(11)) && ($sBiasa.prot.ischan($chan)) && ($nick != $me) && ($sBiasa.prot.ch(24)) {
n225= if (((($nick = ChanServ) || ($nick = OperServ)) && (*.Undernet.Org !iswm $server) && (*.efnet.net !iswm $server))) || ($chan = #SkripBiasa) { return }
n226= elseif (($nick = X) || ($nick = W)) && (*.Undernet.Org iswm $server) { return }
n227= inc %tpcfldp [ $+ [ $chan ] $+ [ $wildsite ] ] 1
n228= .timertpcfldp [ $+ [ $chan ] $+ [ $wildsite ] ] -o 1 8 { unset %tpcfldp [ $+ [ $chan ] $+ [ $wildsite ] ] }
n229= if (%tpcfldp [ $+ [ $chan ] $+ [ $site ] ] > $gettok(%sBiasa-masslimit_data,4,58)) {
n230= ckick $chan $nick Don't changes the topic too fast! It seems look like flooding.
n231= unset %tpcfldp [ $+ [ $chan ] $+ [ $wildsite ] ]
n232= inc -u60 %sBiasa-chkchanFld [ $+ [ $chan ] ] 0.5
n233= if (%sBiasa-chkchanFld [ $+ [ $chan ] ] >= 5) { unset %sBiasa-chkchanFld [ $+ [ $chan ] ] | lockchannel flood $chan }
n234=} } }
n235=on @1:UNBAN:#:{
n236= if ($ial) && ($sBiasa.prot.ischan($chan)) { dec %banlistchan [ $+ [ $chan ] ] 1 | sBiasa.AutoUnban2Mask.check.chan }
n237=}
n238=on @1:MODE:#:{ unset %sBiasa-mode.detect.mode.* %sBiasa-mode.punish.*
n239= if ($sBiasa.main(11)) && ($sBiasa.prot.ischan($chan)) && ($nick != $me) && ($sBiasa.prot.ch(51)) {
n240= var %sBiasa-mode.detect.num = 1, %sBiasa-mode.detect.mode.notparm = 0, %sBiasa-mode.detect.mode.charnum = 0
n241= while (%sBiasa-mode.detect.num <= $len($1)) {
n242= set %sBiasa-mode.detect.mode.get $mid($1,%sBiasa-mode.detect.num,1)
n243= if ($istok(+.-,%sBiasa-mode.detect.mode.get,46)) { set %sBiasa-mode.detect.mode.tmp %sBiasa-mode.detect.mode.get }
n244= else { set %sBiasa-mode.detect.mode.char %sBiasa-mode.detect.mode.tmp $+ %sBiasa-mode.detect.mode.get
n245= inc %sBiasa-mode.detect.mode.charnum 1
n246= if ($istok(o.v.b.h,%sBiasa-mode.detect.mode.get,46)) {
n247= if ($calc(%sBiasa-mode.detect.mode.charnum - %sBiasa-mode.detect.mode.notparm) >= 1) { set %sBiasa-mode.detect.mode.parm $gettok($2-,$calc(%sBiasa-mode.detect.mode.charnum - %sBiasa-mode.detect.mode.notparm),32) }
n248= else { unset %sBiasa-mode.detect.mode.parm }
n249= }
n250= else { inc %sBiasa-mode.detect.mode.notparm 1 | unset %sBiasa-mode.detect.mode.parm }
n251= set %sBiasa-mode.detect.mode.result %sBiasa-mode.detect.mode.char %sBiasa-mode.detect.mode.parm
n252= if ($istok(%sBiasa-mode.detect.mode.detected,%sBiasa-mode.detect.mode.result,44) != $true) {
n253= if ($sBiasa.prot.ch(52)) && ($left(%sBiasa-mode.detect.mode.char,1) = -) && ($istok(n.t.s,$mid(%sBiasa-mode.detect.mode.char,2,1),46) == $true) {
n254= sBiasa.add.chan.mode $chan + $+ $mid(%sBiasa-mode.detect.mode.char,2,1)
n255= if ($sBiasa.prot.ch(58)) { if (%sBiasa-mode.punish.b [ $+ [ $mask($fulladdress,3) ] ] !isnum 1-99) { sBiasa.add.chan.modez $chan -o+b $nick $mask($fulladdress,3) | inc -u0 %sBiasa-mode.punish.b [ $+ [ $mask($fulladdress,3) ] ] 1 }
n256= if ($sBiasa.prot.ch(57)) { if (%sBiasa-mode.punish.n [ $+ [ $nick ] ] !isnum 1-99) { ckick $chan $nick Don't changes the channel mode..!.. (must +nt is this channel) } | inc -u0 %sBiasa-mode.punish.n [ $+ [ $nick ] ] 1 }
n257= }
n258= elseif ($sBiasa.prot.ch(53)) && (%sBiasa-mode.detect.mode.char = +i) { sBiasa.add.chan.mode $chan -i
n259= if ($sBiasa.prot.ch(58)) { if (%sBiasa-mode.punish.b [ $+ [ $wildsite ] ] !isnum 1-99) { sBiasa.add.chan.modez $chan -o+b $nick $wildsite } | inc -u0 %sBiasa-mode.punish.b [ $+ [ $wildsite ] ] 1 }
n260= if ($sBiasa.prot.ch(57)) { if (%sBiasa-mode.punish.n [ $+ [ $nick ] ] !isnum 1-99) { ckick $chan $nick Don't changes the channel mode..!.. (must -i is this channel) } | inc -u0 %sBiasa-mode.punish.n [ $+ [ $nick ] ] 1 }
n261= }
n262= elseif ($sBiasa.prot.ch(54)) && (%sBiasa-mode.detect.mode.char = +p) { sBiasa.add.chan.mode $chan -p
n263= if ($sBiasa.prot.ch(58)) { if (%sBiasa-mode.punish.b [ $+ [ $wildsite ] ] !isnum 1-99) { sBiasa.add.chan.modez $chan -o+b $nick $wildsite } | inc -u0 %sBiasa-mode.punish.b [ $+ [ $wildsite ] ] 1 }
n264= if ($sBiasa.prot.ch(57)) { if (%sBiasa-mode.punish.n [ $+ [ $nick ] ] !isnum 1-99) { ckick $chan $nick Don't changes the channel mode..!.. (must -p is this channel) } | inc -u0 %sBiasa-mode.punish.n [ $+ [ $nick ] ] 1 }
n265= }
n266= elseif ($sBiasa.prot.ch(55)) && (%sBiasa-mode.detect.mode.char = +k) { sBiasa.add.chan.mode $chan -k *
n267= if ($sBiasa.prot.ch(58)) { if (%sBiasa-mode.punish.b [ $+ [ $wildsite ] ] !isnum 1-99) { sBiasa.add.chan.modez $chan -o+b $nick $wildsite } | inc -u0 %sBiasa-mode.punish.b [ $+ [ $wildsite ] ] 1 }
n268= if ($sBiasa.prot.ch(57)) { if (%sBiasa-mode.punish.n [ $+ [ $nick ] ] !isnum 1-99) { ckick $chan $nick Don't changes the channel mode..!.. (must -k is this channel) } | inc -u0 %sBiasa-mode.punish.n [ $+ [ $nick ] ] 1 }
n269= }
n270= elseif ($sBiasa.prot.ch(56)) && (%sBiasa-mode.detect.mode.char = +l) { sBiasa.add.chan.mode $chan -l
n271= if ($sBiasa.prot.ch(58)) { if (%sBiasa-mode.punish.b [ $+ [ $wildsite ] ] !isnum 1-99) { sBiasa.add.chan.modez $chan -o+b $nick $wildsite } | inc -u0 %sBiasa-mode.punish.b [ $+ [ $wildsite ] ] 1 }
n272= if ($sBiasa.prot.ch(57)) { if (%sBiasa-mode.punish.n [ $+ [ $nick ] ] !isnum 1-99) { ckick $chan $nick Don't changes the channel mode..!.. (must -l is this channel) } | inc -u0 %sBiasa-mode.punish.n [ $+ [ $nick ] ] 1 }
n273= } }
n274= if (%sBiasa-mode.detect.mode.detected == $null) { set %sBiasa-mode.detect.mode.detected %sBiasa-mode.detect.mode.result }
n275= else { set %sBiasa-mode.detect.mode.detected %sBiasa-mode.detect.mode.detected $+ , $+ %sBiasa-mode.detect.mode.result }
n276= } }
n277= inc %sBiasa-mode.detect.num 1
n278= } }
n279= unset %sBiasa-mode.detect.mode.* %sBiasa-mode.punish.*
n280=}