(Skrip)-sBiasa-Lite — File Browser
Skrip-sBiasa-Litev1.01c / Skrip-sBiasa-Litev1.01c / sBiasaLite_Skrip / sbiasa_lite_s_setup_prot_chan_01.ini
sbiasa_lite_s_setup_prot_chan_01.ini — 29.52 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.options.init { did -b sBiasa.prot.ch.options 5,841,842,846
n3= if (%sBiasa-prot.ch_data == $null) { set %sBiasa-prot.ch_data 0111011000011110011011011011011001110011111000100000000000 }
n4= elseif ($len(%sBiasa-prot.ch_data) < 58) { set %sBiasa-prot.ch_data %sBiasa-prot.ch_data $+ $str(0,$calc(58 - $len(%sBiasa-prot.ch_data))) }
n5= ; set %sBiasa-prot.ch_data.old %sBiasa-prot.ch_data
n6= if (%sBiasa-prot.ch.chan == $null) { set %sBiasa-prot.ch.chan #NorthSumatera,#Medan,#indoflasher }
n7= did - $+ $iif($sBiasa.prot.ch(2),c,u) sBiasa.prot.ch.options 202
n8= did - $+ $iif($sBiasa.prot.ch(2),e,b) sBiasa.prot.ch.options 203,204,205,206,207,208,209,210,211,221,222,223,224,225,226,227,228,229,231,232,233,234,235,236,237,238,239
n9= did - $+ $iif($sBiasa.prot.ch(3),c,u) sBiasa.prot.ch.options 252
n10= did - $+ $iif($sBiasa.prot.ch(3),e,b) sBiasa.prot.ch.options 253,254,255,261,262,263
n11= var %sBiasa-prot.ch.options.init.i = 1
n12= while (%sBiasa-prot.ch.options.init.i <= 3) { did -o sBiasa.prot.ch.options $calc(204 + %sBiasa-prot.ch.options.init.i * 3 - 3) 1 $gettok(%sBiasa-channel.flood.limit.codes_data,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n13= var %sBiasa-prot.ch.options.init.i = 1
n14= while (%sBiasa-prot.ch.options.init.i <= 3) { did -o sBiasa.prot.ch.options $calc(222 + %sBiasa-prot.ch.options.init.i * 3 - 3) 1 $gettok(%sBiasa-channel.flood.limit.length_data,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n15= var %sBiasa-prot.ch.options.init.i = 1
n16= while (%sBiasa-prot.ch.options.init.i <= 3) { did -o sBiasa.prot.ch.options $calc(232 + %sBiasa-prot.ch.options.init.i * 3 - 3) 1 $gettok(%sBiasa-channel.flood.limit.line_data,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n17= var %sBiasa-prot.ch.options.init.i = 1
n18= while (%sBiasa-prot.ch.options.init.i <= 2) { did -o sBiasa.prot.ch.options $calc(254 + %sBiasa-prot.ch.options.init.i * 8 - 8) 1 $gettok(%sBiasa-FloodNick_data,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n19= var %sBiasa-prot.ch.options.init.i = 1
n20= while (%sBiasa-prot.ch.options.init.i <= 2) { did -o sBiasa.prot.ch.options $calc(273 + %sBiasa-prot.ch.options.init.i * 9 - 9) 1 $gettok(%sBiasa-channel.flood_data,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n21= did - $+ $iif($sBiasa.prot.ch(5),c,u) sBiasa.prot.ch.options 306
n22= did - $+ $iif($sBiasa.prot.ch(5),e,b) sBiasa.prot.ch.options 307,308
n23= did - $+ $iif($sBiasa.prot.ch(4),c,u) sBiasa.prot.ch.options 302
n24= if ($sBiasa.prot.ch(4)) { did -e sBiasa.prot.ch.options 303,304,305 }
n25= else { did -b sBiasa.prot.ch.options 303,304,305,306,307,308 }
n26= if ($sBiasa.prot.ch(4)) && ($sBiasa.prot.ch(5)) { did -e sBiasa.prot.ch.options 307,308 }
n27= did - $+ $iif($sBiasa.prot.ch(6),c,u) sBiasa.prot.ch.options 311
n28= did - $+ $iif($sBiasa.prot.ch(6),e,b) sBiasa.prot.ch.options 312,313,314,315,316,317
n29= did - $+ $iif($sBiasa.prot.ch(8),c,u) sBiasa.prot.ch.options 321
n30= did - $+ $iif($sBiasa.prot.ch(9),c,u) sBiasa.prot.ch.options 331
n31= did - $+ $iif($sBiasa.prot.ch(10),c,u) sBiasa.prot.ch.options 341
n32= did - $+ $iif($sBiasa.prot.ch(11),c,u) sBiasa.prot.ch.options 351
n33= did - $+ $iif($sBiasa.prot.ch(12),c,u) sBiasa.prot.ch.options 361
n34= did - $+ $iif($sBiasa.prot.ch(13),c,u) sBiasa.prot.ch.options 326
n35= did - $+ $iif($sBiasa.prot.ch(14),c,u) sBiasa.prot.ch.options 336
n36= did - $+ $iif($sBiasa.prot.ch(15),c,u) sBiasa.prot.ch.options 346
n37= did - $+ $iif($sBiasa.prot.ch(16),c,u) sBiasa.prot.ch.options 356
n38= did - $+ $iif($sBiasa.prot.ch(17),c,u) sBiasa.prot.ch.options 366
n39= did - $+ $iif($sBiasa.prot.ch(18),c,u) sBiasa.prot.ch.options 376
n40= did - $+ $iif($sBiasa.prot.ch(1),u,c) sBiasa.prot.ch.options 381
n41= did - $+ $iif($sBiasa.prot.ch(1),b,e) sBiasa.prot.ch.options 382,383,384,385,386,387
n42= if ($sBiasa.prot.ch(20)) { did -c sBiasa.prot.ch.options 392 | did -e sBiasa.prot.ch.options 393,394 }
n43= else { did -u sBiasa.prot.ch.options 392 | did -b sBiasa.prot.ch.options 393,394 }
n44= if ($sBiasa.prot.ch(19)) { did -c sBiasa.prot.ch.options 391 }
n45= else { did -u sBiasa.prot.ch.options 391 | did -b sBiasa.prot.ch.options 393,394 }
n46= did - $+ $iif($sBiasa.prot.ch(21),c,u) sBiasa.prot.ch.options 402
n47= did - $+ $iif($sBiasa.prot.ch(21),e,b) sBiasa.prot.ch.options 403,404,405
n48= did - $+ $iif($sBiasa.prot.ch(22),c,u) sBiasa.prot.ch.options 411
n49= did - $+ $iif($sBiasa.prot.ch(22),e,b) sBiasa.prot.ch.options 412,413,414
n50= did - $+ $iif($sBiasa.prot.ch(23),c,u) sBiasa.prot.ch.options 421
n51= did - $+ $iif($sBiasa.prot.ch(23),e,b) sBiasa.prot.ch.options 422,423,424
n52= did - $+ $iif($sBiasa.prot.ch(24),c,u) sBiasa.prot.ch.options 431
n53= did - $+ $iif($sBiasa.prot.ch(24),e,b) sBiasa.prot.ch.options 432,433,434
n54= did - $+ $iif($sBiasa.prot.ch(26),c,u) sBiasa.prot.ch.options 458
n55= did - $+ $iif($sBiasa.prot.ch(25),c,u) sBiasa.prot.ch.options 451
n56= did - $+ $iif($sBiasa.prot.ch(25),e,b) sBiasa.prot.ch.options 452,453,454,455,456,457,458
n57= did - $+ $iif($sBiasa.prot.ch(27),c,u) sBiasa.prot.ch.options 461
n58= did - $+ $iif($sBiasa.prot.ch(27),e,b) sBiasa.prot.ch.options 462,463,464,465,466,467
n59= did - $+ $iif($sBiasa.prot.ch(29),c,u) sBiasa.prot.ch.options 503
n60= did - $+ $iif($sBiasa.prot.ch(28),c,u) sBiasa.prot.ch.options 502
n61= did - $+ $iif($sBiasa.prot.ch(28),e,b) sBiasa.prot.ch.options 503
n62= if ($sBiasa.prot.ch(33)) { did -c sBiasa.prot.ch.options 519 | did -u sBiasa.prot.ch.options 515,516 | did -b sBiasa.prot.ch.options 517,518 }
n63= else { did - $+ $iif($sBiasa.prot.ch(32),u,c) sBiasa.prot.ch.options 515 | did - $+ $iif($sBiasa.prot.ch(32),c,u) sBiasa.prot.ch.options 516 | did - $+ $iif($sBiasa.prot.ch(32),e,b) sBiasa.prot.ch.options 517,518 }
n64= did - $+ $iif($sBiasa.prot.ch(31),u,c) sBiasa.prot.ch.options 512
n65= did - $+ $iif($sBiasa.prot.ch(31),c,u) sBiasa.prot.ch.options 513
n66= did - $+ $iif($sBiasa.prot.ch(31),e,b) sBiasa.prot.ch.options 515,516,519
n67= if ($sBiasa.prot.ch(30)) { did -c sBiasa.prot.ch.options 511 | did -e sBiasa.prot.ch.options 512,513 }
n68= else { did -u sBiasa.prot.ch.options 511 | did -b sBiasa.prot.ch.options 512,513,515,516,517,518,519 }
n69= did - $+ $iif($sBiasa.prot.ch(34),c,u) sBiasa.prot.ch.options 521
n70= did - $+ $iif($sBiasa.prot.ch(34),e,b) sBiasa.prot.ch.options 522,523,524,525,526,527
n71= did - $+ $iif($sBiasa.prot.ch(35),c,u) sBiasa.prot.ch.options 531
n72= did - $+ $iif($sBiasa.prot.ch(35),e,b) sBiasa.prot.ch.options 532,533,534,535,536,537
n73= did - $+ $iif($sBiasa.prot.ch(38),c,u) sBiasa.prot.ch.options 609
n74= did - $+ $iif($sBiasa.prot.ch(37),c,u) sBiasa.prot.ch.options 608
n75= did - $+ $iif($sBiasa.prot.ch(37),b,e) sBiasa.prot.ch.options 607
n76= did - $+ $iif($sBiasa.prot.ch(37),u,c) sBiasa.prot.ch.options 606
n77= did - $+ $iif($sBiasa.prot.ch(36),c,u) sBiasa.prot.ch.options 602
n78= did - $+ $iif($sBiasa.prot.ch(36),e,b) sBiasa.prot.ch.options 603,604,605,606,608,609
n79= if ($sBiasa.prot.ch(36) != $true) { did -b sBiasa.prot.ch.options 607 }
n80= did - $+ $iif($sBiasa.prot.ch(39),c,u) sBiasa.prot.ch.options 611
n81= did - $+ $iif($sBiasa.prot.ch(39),e,b) sBiasa.prot.ch.options 612,613,614
n82= did - $+ $iif($sBiasa.prot.ch(41),c,u) sBiasa.prot.ch.options 621
n83= did - $+ $iif($sBiasa.prot.ch(41),e,b) sBiasa.prot.ch.options 622,623,624
n84= did - $+ $iif($sBiasa.prot.ch(42),c,u) sBiasa.prot.ch.options 632
n85= did - $+ $iif($sBiasa.prot.ch(43),c,u) sBiasa.prot.ch.options 636
n86= did - $+ $iif($sBiasa.prot.ch(44),c,u) sBiasa.prot.ch.options 641
n87= sBiasa.prot.ch.options.init.d 646
n88= did - $+ $iif($sBiasa.prot.ch(45),c,u) sBiasa.prot.ch.options 651
n89= did - $+ $iif($sBiasa.prot.ch(46),c,u) sBiasa.prot.ch.options 656
n90= did - $+ $iif($sBiasa.prot.ch(47),c,u) sBiasa.prot.ch.options 661
n91= did - $+ $iif($sBiasa.prot.ch(48),u,c) sBiasa.prot.ch.options 802
n92= did - $+ $iif($sBiasa.prot.ch(48),c,u) sBiasa.prot.ch.options 803
n93= did - $+ $iif($sBiasa.prot.ch(48),e,b) sBiasa.prot.ch.options 806,807,808,811,812,813,814
n94= did - $+ $iif($sBiasa.prot.ch(51),c,u) sBiasa.prot.ch.options 552
n95= did - $+ $iif($sBiasa.prot.ch(52),c,u) sBiasa.prot.ch.options 553
n96= did - $+ $iif($sBiasa.prot.ch(53),c,u) sBiasa.prot.ch.options 554
n97= did - $+ $iif($sBiasa.prot.ch(54),c,u) sBiasa.prot.ch.options 555
n98= did - $+ $iif($sBiasa.prot.ch(55),c,u) sBiasa.prot.ch.options 556
n99= did - $+ $iif($sBiasa.prot.ch(56),c,u) sBiasa.prot.ch.options 557
n100= did - $+ $iif($sBiasa.prot.ch(57),c,u) sBiasa.prot.ch.options 561
n101= did - $+ $iif($sBiasa.prot.ch(58),c,u) sBiasa.prot.ch.options 562
n102= did - $+ $iif($sBiasa.prot.ch(51),e,b) sBiasa.prot.ch.options 553,554,555,556,557,561,562
n103= did -o sBiasa.prot.ch.options 304 1 $gettok(%sBiasa-repeattextv2_data,1,58)
n104= did -o sBiasa.prot.ch.options 307 1 $gettok(%sBiasa-repeattextv2_data,2,58)
n105= did -a sBiasa.prot.ch.options 313 1 | var %sBiasa-prot.ch.options.i = 1
n106= while (%sBiasa-prot.ch.options.i < 11) { did -a sBiasa.prot.ch.options 313 $calc(%sBiasa-prot.ch.options.i * 5) | inc %sBiasa-prot.ch.options.i 1 }
n107= did -a sBiasa.prot.ch.options 313 51 | var %sBiasa-prot.ch.options.i = 11
n108= while (%sBiasa-prot.ch.options.i < 20) { did -a sBiasa.prot.ch.options 313 $calc(%sBiasa-prot.ch.options.i * 5) | inc %sBiasa-prot.ch.options.i 1 }
n109= did -a sBiasa.prot.ch.options 313 99 | did -a sBiasa.prot.ch.options 313 100
n110= if ($gettok(%sBiasa-capskick_data,1,58) == 1) { did -kc sBiasa.prot.ch.options 313 1 }
n111= elseif ($gettok(%sBiasa-capskick_data,1,58) == 51) { did -kc sBiasa.prot.ch.options 313 12 }
n112= elseif ($gettok(%sBiasa-capskick_data,1,58) isnum 2-50) { var %sBiasa-prot.ch.options.i = $calc($gettok(%sBiasa-capskick_data,1,58) / 5 + 1)) | did -kc sBiasa.prot.ch.options 313 $iif(%sBiasa-prot.ch.options.i < 2, 2, %sBiasa-prot.ch.options.i) }
n113= elseif ($gettok(%sBiasa-capskick_data,1,58) isnum 52-98) { did -kc sBiasa.prot.ch.options 313 $calc($gettok(%sBiasa-capskick_data,1,58) / 5 + 2) }
n114= elseif ($gettok(%sBiasa-capskick_data,1,58) isnum 99-100) { var %sBiasa-prot.ch.options.i = 0 | while (%sBiasa-prot.ch.options.i < 2) { did -kc sBiasa.prot.ch.options 313 $calc($gettok(%sBiasa-capskick_data,1,58) / 4.304348) | inc %sBiasa-prot.ch.options.i 1 } }
n115= did -o sBiasa.prot.ch.options 316 1 $gettok(%sBiasa-capskick_data,2,58)
n116= did -o sBiasa.prot.ch.options 383 1 $gettok(%sBiasa-Underlined-Text-Flood_Protection_data,1,58)
n117= did -o sBiasa.prot.ch.options 386 1 $gettok(%sBiasa-Underlined-Text-Flood_Protection_data,2,58)
n118= did -o sBiasa.prot.ch.options 393 1 $gettok(%sBiasa-advertisetextkick_data,1,58)
n119= did -o sBiasa.prot.ch.options 404 1 $gettok(%sBiasa-masslimit_data,1,58)
n120= did -o sBiasa.prot.ch.options 413 1 $gettok(%sBiasa-masslimit_data,2,58)
n121= did -o sBiasa.prot.ch.options 423 1 $gettok(%sBiasa-masslimit_data,3,58)
n122= did -o sBiasa.prot.ch.options 433 1 $gettok(%sBiasa-masslimit_data,4,58)
n123= did -o sBiasa.prot.ch.options 453 1 $gettok(%sBiasa-joinflood_data,1,58)
n124= did -o sBiasa.prot.ch.options 456 1 $gettok(%sBiasa-joinflood_data,2,58)
n125= did -o sBiasa.prot.ch.options 463 1 $gettok(%sBiasa-jumlahklon_data,1,58)
n126= did -o sBiasa.prot.ch.options 466 1 $gettok(%sBiasa-jumlahklon_data,2,58)
n127= did -o sBiasa.prot.ch.options 517 1 $gettok(%sBiasa-banprot_data,1,58)
n128= did -o sBiasa.prot.ch.options 523 1 $gettok(%sBiasa-AutoUnban2Masklength_data,1,58)
n129= did -o sBiasa.prot.ch.options 526 1 $gettok(%sBiasa-AutoUnban2Masklength_data,2,58)
n130= did -o sBiasa.prot.ch.options 533 1 $gettok(%sBiasa-kickbanwildsite_data,1,58)
n131= did -o sBiasa.prot.ch.options 536 1 $gettok(%sBiasa-kickbanwildsite_data,2,58)
n132= did -o sBiasa.prot.ch.options 604 1 $gettok(%sBiasa-cycle.channel_data,1,58)
n133= did -o sBiasa.prot.ch.options 613 1 $gettok(%sBiasa-cyclecleaningchannellamaban,1,58)
n134= did -o sBiasa.prot.ch.options 623 1 $gettok(%sBiasa-protinvitekicklamaban,1,58)
n135= did -o sBiasa.prot.ch.options 647 1 $gettok(%sBiasa-stdbanneduser_data,1,58)
n136= did -o sBiasa.prot.ch.options 823 1 $gettok(%sBiasa-lockchannel_data,1,58)
n137= sBiasa.prot.ch.options.init.channel %sBiasa-prot.ch.chan
n138= sBiasa.prot.ch.options.init.file
n139=}
n140=alias sBiasa.prot.ch.options.init.channel { if ($1 != $null) { did -r sBiasa.prot.ch.options 806,807,808
n141= var %sBiasa-prot.ch.options.i = 1, %sBiasa-prot.ch.options.j = 1, %sBiasa-prot.ch.options.k = 806
n142= while (%sBiasa-prot.ch.options.i <= $gettok($1-,0,44)) {
n143= if (%sBiasa-prot.ch.options.i = 4) { var %sBiasa-prot.ch.options.j = 1, %sBiasa-prot.ch.options.k = 807 }
n144= elseif (%sBiasa-prot.ch.options.i = 7) { var %sBiasa-prot.ch.options.j = 1, %sBiasa-prot.ch.options.k = 808 }
n145= did -i sBiasa.prot.ch.options %sBiasa-prot.ch.options.k %sBiasa-prot.ch.options.j $gettok($1-,%sBiasa-prot.ch.options.i,44)
n146= inc %sBiasa-prot.ch.options.i 1 | inc %sBiasa-prot.ch.options.j 1
n147=} } }
n148=alias sBiasa.prot.ch.options.init.file { cdid -r sBiasa.prot.ch.options 836,837
n149= var %sBiasa-prot.ch.options.i = 1, %sBiasa-prot.ch.options.j = $findfile($sBiasadir.prot.ch,*.spc,0)
n150= while (%sBiasa-prot.ch.options.i <= %sBiasa-prot.ch.options.j) {
n151= set %sBiasa-prot.ch.options.k $nopath($findfile($sBiasadir.prot.ch,*.spc,%sBiasa-prot.ch.options.i))
n152= set %sBiasa-prot.ch.options.k $left(%sBiasa-prot.ch.options.k,$calc($len(%sBiasa-prot.ch.options.k) - 4))
n153= cdid -i sBiasa.prot.ch.options 836,837 %sBiasa-prot.ch.options.i %sBiasa-prot.ch.options.k
n154= cdid -i sBiasa.prot.ch.options.load 12 %sBiasa-prot.ch.options.i %sBiasa-prot.ch.options.k
n155= cdid -i sBiasa.prot.ch.options.del 12 %sBiasa-prot.ch.options.i %sBiasa-prot.ch.options.k
n156= unset %sBiasa-prot.ch.options.k | inc %sBiasa-prot.ch.options.i 1
n157=} }
n158=alias sBiasa.prot.ch.options.apply { did -b sBiasa.prot.ch.options 5
n159= var %sBiasa-prot.ch.options.init.i = 1, %sBiasa-prot.ch.options.error = 0
n160= while (%sBiasa-prot.ch.options.init.i <= 3) { var %sBiasa-prot.ch.options.init.j = $calc(204 + %sBiasa-prot.ch.options.init.i * 3 - 3)
n161= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j) isnum 1-999) { set %sBiasa-channel.flood.limit.codes_data $puttok(%sBiasa-channel.flood.limit.codes_data,$did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j),%sBiasa-prot.ch.options.init.i,58) }
n162= else { inc %sBiasa-prot.ch.options.error 1 }
n163= inc %sBiasa-prot.ch.options.init.i 1
n164= }
n165= var %sBiasa-prot.ch.options.init.i = 1
n166= while (%sBiasa-prot.ch.options.init.i <= 3) { var %sBiasa-prot.ch.options.init.j = $calc(222 + %sBiasa-prot.ch.options.init.i * 3 - 3)
n167= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j) isnum 1-999) { set %sBiasa-channel.flood.limit.length_data $puttok(%sBiasa-channel.flood.limit.length_data,$did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j),%sBiasa-prot.ch.options.init.i,58) }
n168= else { inc %sBiasa-prot.ch.options.error 1 }
n169= inc %sBiasa-prot.ch.options.init.i 1
n170= }
n171= var %sBiasa-prot.ch.options.init.i = 1
n172= while (%sBiasa-prot.ch.options.init.i <= 3) { var %sBiasa-prot.ch.options.init.j = $calc(232 + %sBiasa-prot.ch.options.init.i * 3 - 3)
n173= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j) isnum 1-999) { set %sBiasa-channel.flood.limit.line_data $puttok(%sBiasa-channel.flood.limit.line_data,$did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j),%sBiasa-prot.ch.options.init.i,58) }
n174= else { inc %sBiasa-prot.ch.options.error 1 }
n175= inc %sBiasa-prot.ch.options.init.i 1
n176= }
n177= var %sBiasa-prot.ch.options.init.i = 1
n178= while (%sBiasa-prot.ch.options.init.i <= 2) { var %sBiasa-prot.ch.options.init.j = $calc(254 + %sBiasa-prot.ch.options.init.i * 8 - 8)
n179= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j) isnum 1-999) { set %sBiasa-FloodNick_data $puttok(%sBiasa-FloodNick_data,$did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j),%sBiasa-prot.ch.options.init.i,58) }
n180= else { inc %sBiasa-prot.ch.options.error 1 }
n181= inc %sBiasa-prot.ch.options.init.i 1
n182= }
n183= var %sBiasa-prot.ch.options.init.i = 1
n184= while (%sBiasa-prot.ch.options.init.i <= 2) { var %sBiasa-prot.ch.options.init.j = $calc(273 + %sBiasa-prot.ch.options.init.i * 9 - 9)
n185= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j) isnum 0-999) { set %sBiasa-channel.flood_data $puttok(%sBiasa-channel.flood_data,$did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.init.j),%sBiasa-prot.ch.options.init.i,58) }
n186= else { inc %sBiasa-prot.ch.options.error 1 }
n187= inc %sBiasa-prot.ch.options.init.i 1
n188= }
n189= set %sBiasa-prot.ch_data $left(%sBiasa-prot.ch_data,1) $+ $did(sBiasa.prot.ch.options,202).state $+ $did(sBiasa.prot.ch.options,252).state $+ $did(sBiasa.prot.ch.options,302).state $+ $did(sBiasa.prot.ch.options,306).state $+ $did(sBiasa.prot.ch.options,311).state $+ $did(sBiasa.prot.ch.options,311).state $+ $did(sBiasa.prot.ch.options,321).state $+ $did(sBiasa.prot.ch.options,331).state $+ $did(sBiasa.prot.ch.options,341).state $+ $did(sBiasa.prot.ch.options,351).state $+ $did(sBiasa.prot.ch.options,361).state $+ $did(sBiasa.prot.ch.options,326).state $+ $did(sBiasa.prot.ch.options,336).state $+ $did(sBiasa.prot.ch.options,346).state $+ $did(sBiasa.prot.ch.options,356).state $+ $did(sBiasa.prot.ch.options,366).state $+ $did(sBiasa.prot.ch.options,376).state $+ $did(sBiasa.prot.ch.options,391).state $+ $did(sBiasa.prot.ch.options,392).state $+ $mid(%sBiasa-prot.ch_data,21,38)
n190= if ($did(sBiasa.prot.ch.options,516).state) { set %sBiasa-prot.ch.options.data 10 }
n191= elseif ($did(sBiasa.prot.ch.options,519).state) { set %sBiasa-prot.ch.options.data 11 }
n192= else { set %sBiasa-prot.ch.options.data 00 }
n193= set %sBiasa-prot.ch_data $left(%sBiasa-prot.ch_data,20) $+ $did(sBiasa.prot.ch.options,402).state $+ $did(sBiasa.prot.ch.options,411).state $+ $did(sBiasa.prot.ch.options,421).state $+ $did(sBiasa.prot.ch.options,431).state $+ $did(sBiasa.prot.ch.options,451).state $+ $did(sBiasa.prot.ch.options,458).state $+ $did(sBiasa.prot.ch.options,461).state $+ $did(sBiasa.prot.ch.options,502).state $+ $did(sBiasa.prot.ch.options,503).state $+ $did(sBiasa.prot.ch.options,511).state $+ $did(sBiasa.prot.ch.options,513).state $+ %sBiasa-prot.ch.options.data $+ $did(sBiasa.prot.ch.options,521).state $+ $did(sBiasa.prot.ch.options,531).state $+ $did(sBiasa.prot.ch.options,602).state $+ $did(sBiasa.prot.ch.options,608).state $+ $did(sBiasa.prot.ch.options,609).state $+ $did(sBiasa.prot.ch.options,611).state $+ $mid(%sBiasa-prot.ch_data,40,19)
n194= unset %sBiasa-prot.ch.options.data
n195= set %sBiasa-prot.ch_data $left(%sBiasa-prot.ch_data,39) $+ $did(sBiasa.prot.ch.options,611).state $+ $did(sBiasa.prot.ch.options,621).state $+ $did(sBiasa.prot.ch.options,632).state $+ $did(sBiasa.prot.ch.options,636).state $+ $did(sBiasa.prot.ch.options,641).state $+ $did(sBiasa.prot.ch.options,651).state $+ $did(sBiasa.prot.ch.options,656).state $+ $did(sBiasa.prot.ch.options,661).state $+ $did(sBiasa.prot.ch.options,803).state $+ $mid(%sBiasa-prot.ch_data,49,2) $+ $did(sBiasa.prot.ch.options,552).state $+ $did(sBiasa.prot.ch.options,553).state $+ $did(sBiasa.prot.ch.options,554).state $+ $did(sBiasa.prot.ch.options,555).state $+ $did(sBiasa.prot.ch.options,556).state $+ $did(sBiasa.prot.ch.options,557).state $+ $did(sBiasa.prot.ch.options,561).state $+ $did(sBiasa.prot.ch.options,562).state
n196= if ($did(sBiasa.prot.ch.options,381).state) { set %sBiasa-prot.ch_data 0 $+ $mid(%sBiasa-prot.ch_data,2,57) }
n197= else { set %sBiasa-prot.ch_data 1 $+ $mid(%sBiasa-prot.ch_data,2,57) }
n198= if ($did(sBiasa.prot.ch.options,383) isnum 0-9999) { set %sBiasa-Underlined-Text-Flood_Protection_data $puttok(%sBiasa-Underlined-Text-Flood_Protection_data,$did(sBiasa.prot.ch.options,383),1,58) }
n199= else { inc %sBiasa-prot.ch.options.error 1 }
n200= if ($did(sBiasa.prot.ch.options,386) isnum 0-9999) { set %sBiasa-Underlined-Text-Flood_Protection_data $puttok(%sBiasa-Underlined-Text-Flood_Protection_data,$did(sBiasa.prot.ch.options,386),2,58) }
n201= else { inc %sBiasa-prot.ch.options.error 1 }
n202= if ($did(sBiasa.prot.ch.options,304) isnum 2-999) { set %sBiasa-repeattextv2_data $puttok(%sBiasa-repeattextv2_data,$did(sBiasa.prot.ch.options,304),1,58) }
n203= else { inc %sBiasa-prot.ch.options.error 1 }
n204= if ($did(sBiasa.prot.ch.options,307) isnum 0-9999) { set %sBiasa-repeattextv2_data $puttok(%sBiasa-repeattextv2_data,$did(sBiasa.prot.ch.options,307),2,58) }
n205= else { inc %sBiasa-prot.ch.options.error 1 }
n206= if ($did(sBiasa.prot.ch.options,313).seltext isnum 1-100) { set %sBiasa-capskick_data $puttok(%sBiasa-capskick_data,$did(sBiasa.prot.ch.options,313).seltext,1,58) }
n207= else { inc %sBiasa-prot.ch.options.error 1 }
n208= if ($did(sBiasa.prot.ch.options,316) isnum 1-999) { set %sBiasa-capskick_data $puttok(%sBiasa-capskick_data,$did(sBiasa.prot.ch.options,316),2,58) }
n209= else { inc %sBiasa-prot.ch.options.error 1 }
n210= if ($did(sBiasa.prot.ch.options,393) isnum 0-9999) { set %sBiasa-advertisetextkick_data $did(sBiasa.prot.ch.options,393) }
n211= else { inc %sBiasa-prot.ch.options.error 1 }
n212= if ($did(sBiasa.prot.ch.options,404) isnum 1-999) { set %sBiasa-masslimit_data $puttok(%sBiasa-masslimit_data,$did(sBiasa.prot.ch.options,404),1,58) }
n213= else { inc %sBiasa-prot.ch.options.error 1 }
n214= if ($did(sBiasa.prot.ch.options,413) isnum 1-999) { set %sBiasa-masslimit_data $puttok(%sBiasa-masslimit_data,$did(sBiasa.prot.ch.options,413),2,58) }
n215= else { inc %sBiasa-prot.ch.options.error 1 }
n216= if ($did(sBiasa.prot.ch.options,423) isnum 1-999) { set %sBiasa-masslimit_data $puttok(%sBiasa-masslimit_data,$did(sBiasa.prot.ch.options,423),3,58) }
n217= else { inc %sBiasa-prot.ch.options.error 1 }
n218= if ($did(sBiasa.prot.ch.options,433) isnum 1-999) { set %sBiasa-masslimit_data $puttok(%sBiasa-masslimit_data,$did(sBiasa.prot.ch.options,433),4,58) }
n219= else { inc %sBiasa-prot.ch.options.error 1 }
n220= if ($did(sBiasa.prot.ch.options,453) isnum 1-999) { set %sBiasa-joinflood_data $puttok(%sBiasa-joinflood_data,$did(sBiasa.prot.ch.options,453),1,58) }
n221= else { inc %sBiasa-prot.ch.options.error 1 }
n222= if ($did(sBiasa.prot.ch.options,456) isnum 0-9999) { set %sBiasa-joinflood_data $puttok(%sBiasa-joinflood_data,$did(sBiasa.prot.ch.options,456),2,58) }
n223= else { inc %sBiasa-prot.ch.options.error 1 }
n224= if ($did(sBiasa.prot.ch.options,463) isnum 2-999) { set %sBiasa-jumlahklon_data $puttok(%sBiasa-jumlahklon_data,$did(sBiasa.prot.ch.options,463),1,58) }
n225= else { inc %sBiasa-prot.ch.options.error 1 }
n226= if ($did(sBiasa.prot.ch.options,466) isnum 0-9999) { set %sBiasa-jumlahklon_data $puttok(%sBiasa-jumlahklon_data,$did(sBiasa.prot.ch.options,466),2,58) }
n227= else { inc %sBiasa-prot.ch.options.error 1 }
n228= if ($did(sBiasa.prot.ch.options,517) isnum 0-9999) { set %sBiasa-banprot_data $puttok(%sBiasa-banprot_data,$did(sBiasa.prot.ch.options,517),1,58) }
n229= else { inc %sBiasa-prot.ch.options.error 1 }
n230= if ($did(sBiasa.prot.ch.options,523) isnum 0-9999) { set %sBiasa-AutoUnban2Masklength_data $puttok(%sBiasa-AutoUnban2Masklength_data,$did(sBiasa.prot.ch.options,523),1,58) }
n231= else { inc %sBiasa-prot.ch.options.error 1 }
n232= if ($did(sBiasa.prot.ch.options,526) isnum 1-48) { set %sBiasa-AutoUnban2Masklength_data $puttok(%sBiasa-AutoUnban2Masklength_data,$did(sBiasa.prot.ch.options,526),2,58) }
n233= else { inc %sBiasa-prot.ch.options.error 1 }
n234= if ($did(sBiasa.prot.ch.options,533) isnum 1-999) { set %sBiasa-kickbanwildsite_data $puttok(%sBiasa-kickbanwildsite_data,$did(sBiasa.prot.ch.options,533),1,58) }
n235= else { inc %sBiasa-prot.ch.options.error 1 }
n236= if ($did(sBiasa.prot.ch.options,536) isnum 0-9999) { set %sBiasa-kickbanwildsite_data $puttok(%sBiasa-kickbanwildsite_data,$did(sBiasa.prot.ch.options,536),2,58) }
n237= else { inc %sBiasa-prot.ch.options.error 1 }
n238= if ($did(sBiasa.prot.ch.options,604) isnum 10-9999) { set %sBiasa-cycle.channel_data $puttok(%sBiasa-cycle.channel_data,$did(sBiasa.prot.ch.options,604),1,58) }
n239= else { inc %sBiasa-prot.ch.options.error 1 }
n240= if ($did(sBiasa.prot.ch.options,613) isnum 0-9999) { set %sBiasa-cyclecleaningchannellamaban $puttok(%sBiasa-cyclecleaningchannellamaban,$did(sBiasa.prot.ch.options,613),1,58) }
n241= else { inc %sBiasa-prot.ch.options.error 1 }
n242= if ($did(sBiasa.prot.ch.options,623) isnum 0-9999) { set %sBiasa-protinvitekicklamaban $puttok(%sBiasa-protinvitekicklamaban,$did(sBiasa.prot.ch.options,623),1,58) }
n243= else { inc %sBiasa-prot.ch.options.error 1 }
n244= if ($did(sBiasa.prot.ch.options,647) isnum 0-9999) { set %sBiasa-stdbanneduser_data $puttok(%sBiasa-stdbanneduser_data,$did(sBiasa.prot.ch.options,647),1,58) }
n245= else { inc %sBiasa-prot.ch.options.error 1 }
n246= unset %sBiasa-prot.ch.chan | var %sBiasa-prot.ch.options.i = 806
n247= while (%sBiasa-prot.ch.options.i <= 808) { var %sBiasa-prot.ch.options.j = 1
n248= while (%sBiasa-prot.ch.options.j <= 3) {
n249= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.i,%sBiasa-prot.ch.options.j).text != $null) {
n250= if (%sBiasa-prot.ch.chan == $null) { set %sBiasa-prot.ch.chan $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.i,%sBiasa-prot.ch.options.j) }
n251= else { set %sBiasa-prot.ch.chan %sBiasa-prot.ch.chan $+ , $+ $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.i,%sBiasa-prot.ch.options.j) }
n252= }
n253= else { break }
n254= inc %sBiasa-prot.ch.options.j 1
n255= }
n256= inc %sBiasa-prot.ch.options.i 1
n257= }
n258= if ($did(sBiasa.prot.ch.options,823) isnum 0-9999) { set %sBiasa-lockchannel_data $did(sBiasa.prot.ch.options,823) }
n259= else { inc %sBiasa-prot.ch.options.error 1 }
n260= if ($did = 5) { sBiasa.prot.ch.options.init }
n261= if (%sBiasa-prot.ch.options.error >= 1) { sBiasa.dialog.info.small Channel Protection error...:Possibly You has been entered invalid numbers. There's %sBiasa-prot.ch.options.error option $+ $iif(%sBiasa-prot.ch.options.error >= 2, s) that can't change or can't be saved. Please make sure that the options with the valid numbers. You can restore the default settings by clicking 'Restore Defaults' button or menu in the Channel Protection options. }
n262=}
n263=on *:DIALOG:sBiasa.prot.ch.options.addchan:init:0:{ did -f sBiasa.prot.ch.options.addchan 12 }
n264=on *:DIALOG:sBiasa.prot.ch.options.addchan:sclick:3:{ if ($did(sBiasa.prot.ch.options.addchan,12) != $null) {
n265= if ($left($did(sBiasa.prot.ch.options.addchan,12),1) != $chr(35)) { sBiasa.prot.ch.options.addchan $chr(35) $+ $did(sBiasa.prot.ch.options.addchan,12) }
n266= else { sBiasa.prot.ch.options.addchan $did(sBiasa.prot.ch.options.addchan,12) }
n267=} }
n268=alias sBiasa.prot.ch.options.addchan { var %sBiasa-prot.ch.options.addchan.i = 1, %sBiasa-prot.ch.options.addchan.d = 806, %sBiasa-prot.ch.options.chan.updown.t = $sBiasa.prot.ch.options.chan.updown.t, %sBiasa-prot.ch.options.addchan.j = 1
n269= while (%sBiasa-prot.ch.options.addchan.i <= %sBiasa-prot.ch.options.chan.updown.t) { if (%sBiasa-prot.ch.options.addchan.i = 7) { var %sBiasa-prot.ch.options.addchan.d = 808, %sBiasa-prot.ch.options.addchan.j = 1 }
n270= elseif (%sBiasa-prot.ch.options.addchan.i = 4) { var %sBiasa-prot.ch.options.addchan.d = 807, %sBiasa-prot.ch.options.addchan.j = 1 }
n271= if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.addchan.d,%sBiasa-prot.ch.options.addchan.j) = $1-) { return }
n272= inc %sBiasa-prot.ch.options.addchan.i 1 | inc %sBiasa-prot.ch.options.addchan.j 1
n273= }
n274= if (%sBiasa-prot.ch.options.chan.updown.t isnum 1-2) { var %sBiasa-prot.ch.options.addchan.d = 806, %sBiasa-prot.ch.options.addchan.l = $calc(1 + %sBiasa-prot.ch.options.chan.updown.t) }
n275= elseif (%sBiasa-prot.ch.options.chan.updown.t isnum 3-5) { var %sBiasa-prot.ch.options.addchan.d = 807, %sBiasa-prot.ch.options.addchan.l = $calc(%sBiasa-prot.ch.options.chan.updown.t - 2) }
n276= else { var %sBiasa-prot.ch.options.addchan.d = 808, %sBiasa-prot.ch.options.addchan.l = $calc(%sBiasa-prot.ch.options.chan.updown.t - 5) }
n277= cdid -i sBiasa.prot.ch.options %sBiasa-prot.ch.options.addchan.d %sBiasa-prot.ch.options.addchan.l $$1-
n278=}
n279=dialog sBiasa.prot.ch.options.addchan {
n280= title "BÃasa Channel Protection Add Chan"
n281= size -1 -1 214 84
n282= button "Add", 3, 90 55 54 23, default Ok
n283= button "Cancel", 4, 151 55 54 23, Cancel
n284= text "&Channel:", 11, 8 6 60 15
n285= edit "", 12, 7 23 200 24
n286= ; link $analog, 100, 5 115 165 17
n287= ; icon 99, 192 118 79 20, $logobiasa
n288=}
n289=alias sBiasa.prot.ch.options.chan.updown.c { var %sBiasa-prot.ch.options.chan.updown.c = 806
n290= while (%sBiasa-prot.ch.options.chan.updown.c <= 808) { if ($did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.chan.updown.c).seltext != $null) { break } | inc %sBiasa-prot.ch.options.chan.updown.c 1 }
n291= if (%sBiasa-prot.ch.options.chan.updown.c isnum 806-808) { return %sBiasa-prot.ch.options.chan.updown.c $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.chan.updown.c).sel }
n292=}
n293=alias sBiasa.prot.ch.options.chan.updown.t { return $calc($did(sBiasa.prot.ch.options,806).lines + $did(sBiasa.prot.ch.options,807).lines + $did(sBiasa.prot.ch.options,808).lines) }