(Skrip)-sBiasa-Lite — File Browser

Skrip-sBiasa-Litev1.01c / Skrip-sBiasa-Litev1.01c / sBiasaLite_Skrip / sbiasa_lite_s_setup_prot_chan_03.ini

sbiasa_lite_s_setup_prot_chan_03.ini — 26.99 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.chan.updown { if ($1 = +) {
n3=    if ($gettok($sBiasa.prot.ch.options.chan.updown.c,0,32) == 2) && ($sBiasa.prot.ch.options.chan.updown.c != 806 1) {
n4=      var %sBiasa-prot.ch.options.chan.updown.d = $gettok($sBiasa.prot.ch.options.chan.updown.c,1,32), %sBiasa-prot.ch.options.chan.updown.n = $gettok($sBiasa.prot.ch.options.chan.updown.c,2,32)
n5=      set -u0 %sBiasa-prot.ch.options.chan.updown.1 $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.chan.updown.d,%sBiasa-prot.ch.options.chan.updown.n)
n6=      var %sBiasa-prot.ch.options.chan.updown.n = $gettok(3.1.2,%sBiasa-prot.ch.options.chan.updown.n,46)
n7=      if (%sBiasa-prot.ch.options.chan.updown.n == 3) { dec %sBiasa-prot.ch.options.chan.updown.d 1 }
n8=      set -u0 %sBiasa-prot.ch.options.chan.updown.2 $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.chan.updown.d,%sBiasa-prot.ch.options.chan.updown.n)
n9=      cdid -o sBiasa.prot.ch.options %sBiasa-prot.ch.options.chan.updown.d %sBiasa-prot.ch.options.chan.updown.n %sBiasa-prot.ch.options.chan.updown.1
n10=      cdid -o sBiasa.prot.ch.options $sBiasa.prot.ch.options.chan.updown.c %sBiasa-prot.ch.options.chan.updown.2
n11=      did -kc sBiasa.prot.ch.options %sBiasa-prot.ch.options.chan.updown.d %sBiasa-prot.ch.options.chan.updown.n
n12=      cdid -e sBiasa.prot.ch.options 5
n13=  } }
n14=  elseif ($1 = -) { if ($gettok($sBiasa.prot.ch.options.chan.updown.c,0,32) == 2) && ($sBiasa.prot.ch.options.chan.updown.c != 808 3) {
n15=      var %sBiasa-prot.ch.options.chan.updown.t = $calc($did(sBiasa.prot.ch.options,806).lines + $did(sBiasa.prot.ch.options,807).lines + $did(sBiasa.prot.ch.options,808).lines)
n16=      var %sBiasa-prot.ch.options.chan.updown.d = $gettok($sBiasa.prot.ch.options.chan.updown.c,1,32), %sBiasa-prot.ch.options.chan.updown.n = $gettok($sBiasa.prot.ch.options.chan.updown.c,2,32)
n17=      set -u0 %sBiasa-prot.ch.options.chan.updown.1 $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.chan.updown.d,%sBiasa-prot.ch.options.chan.updown.n)
n18=      var %sBiasa-prot.ch.options.chan.updown.n = $gettok(2.3.1,%sBiasa-prot.ch.options.chan.updown.n,46)
n19=      if (%sBiasa-prot.ch.options.chan.updown.n == 1) { inc %sBiasa-prot.ch.options.chan.updown.d 1 }
n20=      set -u0 %sBiasa-prot.ch.options.chan.updown.2 $did(sBiasa.prot.ch.options,%sBiasa-prot.ch.options.chan.updown.d,%sBiasa-prot.ch.options.chan.updown.n)
n21=      if (%sBiasa-prot.ch.options.chan.updown.2 == $null) { return }
n22=      cdid -o sBiasa.prot.ch.options %sBiasa-prot.ch.options.chan.updown.d %sBiasa-prot.ch.options.chan.updown.n %sBiasa-prot.ch.options.chan.updown.1
n23=      cdid -o sBiasa.prot.ch.options $sBiasa.prot.ch.options.chan.updown.c %sBiasa-prot.ch.options.chan.updown.2
n24=      did -kc sBiasa.prot.ch.options %sBiasa-prot.ch.options.chan.updown.d %sBiasa-prot.ch.options.chan.updown.n
n25=      cdid -e sBiasa.prot.ch.options 5
n26=  } }
n27=  unset %sBiasa-prot.ch.options.chan.updown.*
n28=}
n29=on *:DIALOG:sBiasa.prot.ch.options:menu:*:{
n30=  if ($did == 901) { sBiasa.prot.ch.options.restore.do | did -e sBiasa.prot.ch.options 5 }
n31=  elseif ($did == 903) { if ($sBiasa.prot.ch.options.check.ld) { sBiasa.prot.ch.options.load } | else { sBiasa.prot.ch.options.check.ld.info } }
n32=  elseif ($did == 904) { sBiasa.prot.ch.options.save }
n33=  elseif ($did == 905) { if ($sBiasa.prot.ch.options.check.ld) { sBiasa.prot.ch.options.del } | else { sBiasa.prot.ch.options.check.ld.info } }
n34=  elseif ($did == 908) { sBiasa.prot.ch.options.apply $did | closedialog sBiasa.prot.ch.options sBiasa.prot.ch.options }
n35=  elseif ($did == 909) { closedialog sBiasa.prot.ch.options sBiasa.prot.ch.options }
n36=}
n37=on *:DIALOG:sBiasa.prot.ch.options.load:sclick:3:{ if ($did(sBiasa.prot.ch.options.load,12).seltext) {
n38=    set %sBiasa-prot.ch.options.load.file $sBiasadir.prot.ch($did(sBiasa.prot.ch.options.load,12).seltext) $+ .spc
n39=    closedialog sBiasa.prot.ch.options.load sBiasa.prot.ch.options.load
n40=    sBiasa.prot.ch.options.load.file %sBiasa-prot.ch.options.load.file
n41=    unset %sBiasa-prot.ch.options.load.file
n42=} }
n43=dialog sBiasa.prot.ch.options.load {
n44=  title "BĂ­asa Load Channel Protection Setting..."
n45=  size -1 -1 178 208
n46=  button "Load", 3, 30 179 56 23, default Ok
n47=  button "Cancel", 4, 92 179 56 23, Cancel
n48=  text "Please &select one!", 11, 14 7 100 15
n49=  list 12, 12 24 154 154, vsbar
n50=  ;  link $analog, 100, 5 115 165 17
n51=  ;  icon 99, 192 118 79 20, $logobiasa
n52=}
n53=alias sBiasa.prot.ch.options.load.file { if ($isfile($1-)) { sBiasa.prot.ch.options.load.proc $1- } }
n54=alias sBiasa.prot.ch.options.save.file { if ($gettok($1-,$gettok($1-,0,46),46) != spc) { sBiasa.prot.ch.options.save.proc $replacecs($$1-,$chr(32),_) $+ .spc } | else { sBiasa.prot.ch.options.save.proc $1- } }
n55=alias sBiasa.prot.ch.options.del.file { if ($isfile($1-)) { opendialog sBiasa.prot.ch.options.del.proc sBiasa.deleting.proc -ma | sBiasa.prot.ch.options.del.proc confirm file $1- } }
n56=alias sBiasa.prot.ch.options.del.proc { if ($1 = confirm) && ($2 != $null) {
n57=    dialog -t sBiasa.prot.ch.options.del.proc BĂ­asa Confirm Delete A Channel Protection Setting... | cdid -v sBiasa.prot.ch.options.del.proc 3,4
n58=    cdid -i sBiasa.prot.ch.options.del.proc 11 1 Are you sure you want to delete ' $+ $left($nopath($$3-),$calc($len($nopath($3-)) - 4)) $+ '?
n59=    set %sBiasa-deleting.proc $$2-
n60=} }
n61=on *:DIALOG:sBiasa.prot.ch.options.del.proc:sclick:*:{ if ($did == 3) {
n62=    if ($gettok(%sBiasa-deleting.proc,1,32) = file) && ($isfile($gettok(%sBiasa-deleting.proc,2-,32))) { .remove " $+ $gettok(%sBiasa-deleting.proc,2-,32) $+ " | closedialog sBiasa.prot.ch.options.del.proc sBiasa.prot.ch.options.del.proc | sBiasa.dialog.info.small Channel Protection deleted:Succesfully deleted ' $+ $left($nopath($gettok(%sBiasa-deleting.proc,2-,32)),$calc($len($nopath($gettok(%sBiasa-deleting.proc,2-,32))) - 4)) $+ ' channel protection setting. | ecinfo Options Succesful removing ' $+ $left($nopath($gettok(%sBiasa-deleting.proc,2-,32)),$calc($len($nopath($gettok(%sBiasa-deleting.proc,2-,32))) - 4)) $+ ' channel protection setting. }
n63=    elseif ($gettok(%sBiasa-deleting.proc,2,32) = dir) && ($isdir($gettok(%sBiasa-deleting.proc,2-,32))) { .remove " $+ $gettok(%sBiasa-deleting.proc,2-,32) $+ " }
n64=    unset %sBiasa-deleting.proc
n65=  }
n66=  elseif ($did == 4) { unset %sBiasa-deleting.proc }
n67=  sBiasa.prot.ch.options.init
n68=}
n69=alias sBiasa.prot.ch.options.load.proc { set %sBiasa-prot.ch_data $readini $1- sBiasa.prot.ch.options sBiasa-prot.ch_data
n70=  set %sBiasa-prot.ch.options.load.proc $1-
n71=  opendialog sBiasa.prot.ch.options.load.confirm sBiasa.prot.ch.options.load.confirm -ma
n72=}
n73=dialog sBiasa.prot.ch.options.load.confirm {
n74=  title "BĂ­asa Load Channel Protection Confirm..."
n75=  size -1 -1 194 93
n76=  button "&Yes", 3, 37 61 58 23, Ok default
n77=  button "&No", 4, 102 61 58 23, Cancel
n78=  text "", 11, 14 9 168 41
n79=  ;  link $analog, 100, 79 233 165 17
n80=  ;  icon 99, 121 66 79 20, $logobiasa, noborder
n81=}
n82=on *:DIALOG:sBiasa.prot.ch.options.load.confirm:sclick:3:{ closedialog sBiasa.prot.ch.options.load.confirm sBiasa.prot.ch.options.load.confirm
n83=  if ($isfile(%sBiasa-prot.ch.options.load.proc)) { sBiasa.prot.ch.options.load.proc.do %sBiasa-prot.ch.options.load.proc }
n84=  unset %sBiasa-prot.ch.options.load.proc
n85=}
n86=on *:DIALOG:sBiasa.prot.ch.options.load.confirm:sclick:4:{ unset %sBiasa-prot.ch.options.load.proc }
n87=on *:DIALOG:sBiasa.prot.ch.options.load.confirm:init:0:{
n88=  if ($isfile(%sBiasa-prot.ch.options.load.proc)) { did -o sBiasa.prot.ch.options.load.confirm 11 1 Are you sure you want to load ' $+ $left($nopath(%sBiasa-prot.ch.options.load.proc),$calc($len($nopath(%sBiasa-prot.ch.options.load.proc)) - 4)) $+ ' channel protection setting? }
n89=  else { closedialog sBiasa.prot.ch.options.load.confirm sBiasa.prot.ch.options.load.confirm | unset %sBiasa-prot.ch.options.load.proc }
n90=}
n91=alias sBiasa.prot.ch.options.load.proc.do { set %sBiasa-prot.ch_data $readini $1- sBiasa.prot.ch.options sBiasa-prot.ch_data
n92=  set %sBiasa-Underlined-Text-Flood_Protection_data $readini $1- sBiasa.prot.ch.options sBiasa-Underlined-Text-Flood_Protection_data
n93=  set %sBiasa-prot.ch_data $readini $1- sBiasa.prot.ch.options sBiasa-prot.ch_data
n94=  set %sBiasa-prot.ch.chan $readini $1- sBiasa.prot.ch.options sBiasa-prot.ch.chan
n95=  set %sBiasa-Underlined-Text-Flood_Protection_data $readini $1- sBiasa.prot.ch.options sBiasa-Underlined-Text-Flood_Protection_data
n96=  set %sBiasa-channel.flood_data $readini $1- sBiasa.prot.ch.options sBiasa-channel.flood_data
n97=  set %sBiasa-channel.flood.limit.codes_data $readini $1- sBiasa.prot.ch.options sBiasa-channel.flood.limit.codes_data
n98=  set %sBiasa-channel.flood.limit.length_data $readini $1- sBiasa.prot.ch.options sBiasa-channel.flood.limit.length_data
n99=  set %sBiasa-channel.flood.limit.line_data $readini $1- sBiasa.prot.ch.options sBiasa-channel.flood.limit.line_data
n100=  set %sBiasa-FloodNick_data $readini $1- sBiasa.prot.ch.options sBiasa-FloodNick_data
n101=  set %sBiasa-masslimit_data $readini $1- sBiasa.prot.ch.options sBiasa-masslimit_data
n102=  set %sBiasa-joinflood_data $readini $1- sBiasa.prot.ch.options sBiasa-joinflood_data
n103=  set %sBiasa-jumlahklon_data $readini $1- sBiasa.prot.ch.options sBiasa-jumlahklon_data
n104=  set %sBiasa-repeattextv2_data $readini $1- sBiasa.prot.ch.options sBiasa-repeattextv2_data
n105=  set %sBiasa-capskick_data $readini $1- sBiasa.prot.ch.options sBiasa-capskick_data
n106=  set %sBiasa-advertisetextkick_data $readini $1- sBiasa.prot.ch.options sBiasa-advertisetextkick_data
n107=  set %sBiasa-stdbanneduser_data $readini $1- sBiasa.prot.ch.options sBiasa-stdbanneduser_data
n108=  set %sBiasa-AutoUnban2Masklength_data $readini $1- sBiasa.prot.ch.options sBiasa-AutoUnban2Masklength_data
n109=  set %sBiasa-FloodNick_data $readini $1- sBiasa.prot.ch.options sBiasa-FloodNick_data
n110=  set %sBiasa-kickbanwildsite_data $readini $1- sBiasa.prot.ch.options sBiasa-kickbanwildsite_data
n111=  set %sBiasa-cycle.channel_data $readini $1- sBiasa.prot.ch.options sBiasa-cycle.channel_data
n112=  set %sBiasa-cyclecleaningchannellamaban $readini $1- sBiasa.prot.ch.options sBiasa-cyclecleaningchannellamaban
n113=  set %sBiasa-protinvitekicklamaban $readini $1- sBiasa.prot.ch.options sBiasa-protinvitekicklamaban
n114=  set %sBiasa-banprot_data $readini $1- sBiasa.prot.ch.options sBiasa-banprot_data
n115=  set %sBiasa-lockchannel_data $readini $1- sBiasa.prot.ch.options sBiasa-lockchannel_data
n116=  sBiasa.prot.ch.options.init | sBiasa.dialog.info.small Channel Protection load:Succesfully loaded ' $+ $left($nopath($1-),$calc($len($nopath($1-)) - 4)) $+ ' channel protection setting.
n117=  ecinfo Options Succesful loading ' $+ $left($nopath($1-),$calc($len($nopath($1-)) - 4)) $+ ' channel protection setting.
n118=}
n119=alias sBiasa.prot.ch.options.mkdir { if ($isdir($mircdirsBiasaLite_Data) != $true) { .mkdir " $+ $mircdirsBiasaLite_Data $+ " } | if ($isdir($sBiasadir.prot.ch) != $true) { .mkdir " $+ $sBiasadir.prot.ch $+ " } }
n120=alias sBiasa.prot.ch.options.save.proc { unset %sBiasa-prot.ch.options.save.file | if ($isfile($1-)) { set %sBiasa-prot.ch.options.save.overwrite $1- | opendialog sBiasa.prot.ch.options.save.overwrite sBiasa.prot.ch.options.save.overwrite -ma } | else { sBiasa.prot.ch.options.save.proc.do $1- } }
n121=dialog sBiasa.prot.ch.options.save.overwrite {
n122=  title "BĂ­asa Save Channel Protection Confirm..."
n123=  size -1 -1 391 111
n124=  button "&Yes", 3, 207 77 84 23, Ok default
n125=  button "&No", 4, 298 77 84 23, Cancel
n126=  text "", 11, 15 10 356 60
n127=  ;  link $analog, 100, 79 233 165 17
n128=  ;  icon 99, 121 66 79 20, $logobiasa, noborder
n129=}
n130=on *:DIALOG:sBiasa.prot.ch.options.save.overwrite:sclick:3:{ closedialog sBiasa.prot.ch.options.save.overwrite sBiasa.prot.ch.options.save.overwrite | sBiasa.prot.ch.options.save.proc.do %sBiasa-prot.ch.options.save.overwrite | unset %sBiasa-prot.ch.options.save.overwrite }
n131=on *:DIALOG:sBiasa.prot.ch.options.save.overwrite:sclick:4:{ unset %sBiasa-prot.ch.options.save.overwrite }
n132=on *:DIALOG:sBiasa.prot.ch.options.save.overwrite:init:0:{ if (%sBiasa-prot.ch.options.save.overwrite != $null) { cdid -o sBiasa.prot.ch.options.save.overwrite 11 1 ' $+ $left($nopath(%sBiasa-prot.ch.options.save.overwrite),$calc($len($nopath(%sBiasa-prot.ch.options.save.overwrite)) - 4)) $+ ' allready exists. Are you sure to replace it? } | else { closedialog sBiasa.prot.ch.options.save.overwrite sBiasa.prot.ch.options.save.overwrite | unset %sBiasa-prot.ch.options.save.overwrite } }
n133=alias sBiasa.prot.ch.options.save.proc.do { if ($1) { sBiasa.prot.ch.options.apply | if ($isfile($1-)) { .remini $1- sBiasa.prot.ch.options }
n134=    .writeini $1- sBiasa.prot.ch.options sBiasa-prot.ch_data %sBiasa-prot.ch_data
n135=    .writeini $1- sBiasa.prot.ch.options sBiasa-prot.ch.chan %sBiasa-prot.ch.chan
n136=    .writeini $1- sBiasa.prot.ch.options sBiasa-Underlined-Text-Flood_Protection_data %sBiasa-Underlined-Text-Flood_Protection_data
n137=    .writeini $1- sBiasa.prot.ch.options sBiasa-channel.flood_data %sBiasa-channel.flood_data
n138=    .writeini $1- sBiasa.prot.ch.options sBiasa-channel.flood.limit.codes_data %sBiasa-channel.flood.limit.codes_data
n139=    .writeini $1- sBiasa.prot.ch.options sBiasa-channel.flood.limit.length_data %sBiasa-channel.flood.limit.length_data
n140=    .writeini $1- sBiasa.prot.ch.options sBiasa-channel.flood.limit.line_data %sBiasa-channel.flood.limit.line_data
n141=    .writeini $1- sBiasa.prot.ch.options sBiasa-FloodNick_data %sBiasa-FloodNick_data
n142=    .writeini $1- sBiasa.prot.ch.options sBiasa-masslimit_data %sBiasa-masslimit_data
n143=    .writeini $1- sBiasa.prot.ch.options sBiasa-joinflood_data %sBiasa-joinflood_data
n144=    .writeini $1- sBiasa.prot.ch.options sBiasa-jumlahklon_data %sBiasa-jumlahklon_data
n145=    .writeini $1- sBiasa.prot.ch.options sBiasa-repeattextv2_data %sBiasa-repeattextv2_data
n146=    .writeini $1- sBiasa.prot.ch.options sBiasa-capskick_data %sBiasa-capskick_data
n147=    .writeini $1- sBiasa.prot.ch.options sBiasa-advertisetextkick_data %sBiasa-advertisetextkick_data
n148=    .writeini $1- sBiasa.prot.ch.options sBiasa-stdbanneduser_data %sBiasa-stdbanneduser_data
n149=    .writeini $1- sBiasa.prot.ch.options sBiasa-AutoUnban2Masklength_data %sBiasa-AutoUnban2Masklength_data
n150=    .writeini $1- sBiasa.prot.ch.options sBiasa-kickbanwildsite_data %sBiasa-kickbanwildsite_data
n151=    .writeini $1- sBiasa.prot.ch.options sBiasa-cycle.channel_data %sBiasa-cycle.channel_data
n152=    .writeini $1- sBiasa.prot.ch.options sBiasa-cyclecleaningchannellamaban %sBiasa-cyclecleaningchannellamaban
n153=    .writeini $1- sBiasa.prot.ch.options sBiasa-protinvitekicklamaban %sBiasa-protinvitekicklamaban
n154=    .writeini $1- sBiasa.prot.ch.options sBiasa-banprot_data %sBiasa-banprot_data
n155=    .writeini $1- sBiasa.prot.ch.options sBiasa-lockchannel_data %sBiasa-lockchannel_data
n156=    sBiasa.prot.ch.options.init | closedialog sBiasa.prot.ch.options.save sBiasa.prot.ch.options.save
n157=    sBiasa.dialog.info.small Channel Protection save:Succesfully saving ' $+ $left($nopath($1-),$calc($len($nopath($1-)) - 4)) $+ ' channel protection setting.
n158=    ecinfo Options Succesful saving ' $+ $left($nopath($1-),$calc($len($nopath($1-)) - 4)) $+ ' channel protection setting.
n159=} }
n160=alias sBiasa.prot.ch.options.restore.do { set %sBiasa-prot.ch_data_def 0111011000011110011011011011011001110011111000100001011110
n161=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,2,1),c,u) sBiasa.prot.ch.options 202
n162=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,2,1),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
n163=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,3,1),c,u) sBiasa.prot.ch.options 252
n164=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,3,1),e,b) sBiasa.prot.ch.options 253,254,255,261,262,263
n165=  var %sBiasa-prot.ch.options.init.i = 1
n166=  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(350:400:450,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n167=  var %sBiasa-prot.ch.options.init.i = 1
n168=  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(100:430:470,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n169=  var %sBiasa-prot.ch.options.init.i = 1
n170=  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(7:10:4,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n171=  var %sBiasa-prot.ch.options.init.i = 1
n172=  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(4:6:180,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n173=  var %sBiasa-prot.ch.options.init.i = 1
n174=  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(3:300,%sBiasa-prot.ch.options.init.i,58) | inc %sBiasa-prot.ch.options.init.i 1 }
n175=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,5,1),c,u) sBiasa.prot.ch.options 306
n176=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,5,1),e,b) sBiasa.prot.ch.options 307,308
n177=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,4,1),c,u) sBiasa.prot.ch.options 302
n178=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,4,1),e,b) sBiasa.prot.ch.options 303,304,305
n179=  if ($mid(%sBiasa-prot.ch_data_def,4,1)) && ($mid(%sBiasa-prot.ch_data_def,5,1)) { did -e sBiasa.prot.ch.options 307,308 }
n180=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,6,1),c,u) sBiasa.prot.ch.options 311
n181=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,6,1),e,b) sBiasa.prot.ch.options 312,313,314,315,316,317
n182=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,8,1),c,u) sBiasa.prot.ch.options 321
n183=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,9,1),c,u) sBiasa.prot.ch.options 331
n184=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,10,1),c,u) sBiasa.prot.ch.options 341
n185=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,11,1),c,u) sBiasa.prot.ch.options 351
n186=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,12,1),c,u) sBiasa.prot.ch.options 361
n187=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,13,1),c,u) sBiasa.prot.ch.options 326
n188=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,14,1),c,u) sBiasa.prot.ch.options 336
n189=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,15,1),c,u) sBiasa.prot.ch.options 346
n190=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,16,1),c,u) sBiasa.prot.ch.options 356
n191=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,17,1),c,u) sBiasa.prot.ch.options 366
n192=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,18,1),c,u) sBiasa.prot.ch.options 376
n193=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,1,1),u,c) sBiasa.prot.ch.options 381
n194=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,1,1),b,e) sBiasa.prot.ch.options 382,383,384,385,386,387
n195=  if ($mid(%sBiasa-prot.ch_data_def,20,1)) { did -c sBiasa.prot.ch.options 392 | did -e sBiasa.prot.ch.options 393,394 }
n196=  else { did -u sBiasa.prot.ch.options 392 | did -b sBiasa.prot.ch.options 393,394 }
n197=  if ($mid(%sBiasa-prot.ch_data_def,19,1)) { did -c sBiasa.prot.ch.options 391 }
n198=  else { did -u sBiasa.prot.ch.options 391 | did -b sBiasa.prot.ch.options 393,394 }
n199=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,21,1),c,u) sBiasa.prot.ch.options 402
n200=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,21,1),e,b) sBiasa.prot.ch.options 403,404,405
n201=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,22,1),c,u) sBiasa.prot.ch.options 411
n202=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,22,1),e,b) sBiasa.prot.ch.options 412,413,414
n203=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,23,1),c,u) sBiasa.prot.ch.options 421
n204=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,23,1),e,b) sBiasa.prot.ch.options 422,423,424
n205=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,24,1),c,u) sBiasa.prot.ch.options 431
n206=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,24,1),e,b) sBiasa.prot.ch.options 432,433,434
n207=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,26,1),c,u) sBiasa.prot.ch.options 458
n208=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,25,1),c,u) sBiasa.prot.ch.options 451
n209=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,25,1),e,b) sBiasa.prot.ch.options 452,453,454,455,456,457,458
n210=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,27,1),c,u) sBiasa.prot.ch.options 461
n211=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,27,1),e,b) sBiasa.prot.ch.options 462,463,464,465,466,467
n212=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,29,1),c,u) sBiasa.prot.ch.options 503
n213=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,28,1),c,u) sBiasa.prot.ch.options 502
n214=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,28,1),e,b) sBiasa.prot.ch.options 503
n215=  if ($mid(%sBiasa-prot.ch_data_def,33,1)) { did -c sBiasa.prot.ch.options 519 | did -u sBiasa.prot.ch.options 515,516 | did -b sBiasa.prot.ch.options 517,518 }
n216=  else { did - $+ $iif($mid(%sBiasa-prot.ch_data_def,32,1),u,c) sBiasa.prot.ch.options 515 | did - $+ $iif($mid(%sBiasa-prot.ch_data_def,32,1),c,u) sBiasa.prot.ch.options 516 | did - $+ $iif($mid(%sBiasa-prot.ch_data_def,32,1),e,b) sBiasa.prot.ch.options 517,518 }
n217=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,31,1),u,c) sBiasa.prot.ch.options 512
n218=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,31,1),c,u) sBiasa.prot.ch.options 513
n219=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,31,1),e,b) sBiasa.prot.ch.options 515,516,519
n220=  if ($mid(%sBiasa-prot.ch_data_def,30,1)) { did -c sBiasa.prot.ch.options 511 | did -e sBiasa.prot.ch.options 512,513 }
n221=  else { did -b sBiasa.prot.ch.options 512,513,515,516,517,518,519 }
n222=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,34,1),c,u) sBiasa.prot.ch.options 521
n223=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,34,1),e,b) sBiasa.prot.ch.options 522,523,524,525,526,527
n224=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,35,1),c,u) sBiasa.prot.ch.options 531
n225=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,35,1),e,b) sBiasa.prot.ch.options 532,533,534,535,536,537
n226=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,38,1),c,u) sBiasa.prot.ch.options 609
n227=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,37,1),c,u) sBiasa.prot.ch.options 608
n228=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,37,1),b,e) sBiasa.prot.ch.options 607
n229=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,37,1),u,c) sBiasa.prot.ch.options 606
n230=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,36,1),c,u) sBiasa.prot.ch.options 602
n231=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,36,1),e,b) sBiasa.prot.ch.options 603,604,605,606,608,609
n232=  if ($mid(%sBiasa-prot.ch_data_def,36,1) != 1) { did -b sBiasa.prot.ch.options 607 }
n233=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,39,1),c,u) sBiasa.prot.ch.options 611
n234=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,39,1),e,b) sBiasa.prot.ch.options 612,613,614
n235=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,41,1),c,u) sBiasa.prot.ch.options 621
n236=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,41,1),e,b) sBiasa.prot.ch.options 622,623,624
n237=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,42,1),c,u) sBiasa.prot.ch.options 632
n238=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,43,1),c,u) sBiasa.prot.ch.options 636
n239=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,44,1),c,u) sBiasa.prot.ch.options 641
n240=  did -e sBiasa.prot.ch.options 646,647,648
n241=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,45,1),c,u) sBiasa.prot.ch.options 651
n242=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,46,1),c,u) sBiasa.prot.ch.options 656
n243=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,47,1),c,u) sBiasa.prot.ch.options 661
n244=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,48,1),u,c) sBiasa.prot.ch.options 802
n245=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,48,1),c,u) sBiasa.prot.ch.options 803
n246=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,48,1),e,b) sBiasa.prot.ch.options 806,807,808,811,812,813,814
n247=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,51,1),c,u) sBiasa.prot.ch.options 552
n248=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,52,1),c,u) sBiasa.prot.ch.options 553
n249=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,53,1),c,u) sBiasa.prot.ch.options 554
n250=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,54,1),c,u) sBiasa.prot.ch.options 555
n251=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,55,1),c,u) sBiasa.prot.ch.options 556
n252=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,56,1),c,u) sBiasa.prot.ch.options 557
n253=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,57,1),c,u) sBiasa.prot.ch.options 561
n254=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,58,1),c,u) sBiasa.prot.ch.options 562
n255=  did - $+ $iif($mid(%sBiasa-prot.ch_data_def,51,1),e,b) sBiasa.prot.ch.options 553,554,555,556,557,561,562
n256=  did -o sBiasa.prot.ch.options 304 1 4
n257=  did -o sBiasa.prot.ch.options 307 1 300 
n258=  did -a sBiasa.prot.ch.options 313 1 | var %sBiasa-prot.ch.options.i = 1
n259=  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 }
n260=  did -a sBiasa.prot.ch.options 313 51 | var %sBiasa-prot.ch.options.i = 11
n261=  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 }
n262=  did -a sBiasa.prot.ch.options 313 99 | did -a sBiasa.prot.ch.options 313 100
n263=  did -kc sBiasa.prot.ch.options 313 20
n264=  did -o sBiasa.prot.ch.options 316 1 50
n265=  did -o sBiasa.prot.ch.options 383 1 900
n266=  did -o sBiasa.prot.ch.options 386 1 60
n267=  did -o sBiasa.prot.ch.options 393 1 300
n268=  did -o sBiasa.prot.ch.options 404 1 3
n269=  did -o sBiasa.prot.ch.options 413 1 6
n270=  did -o sBiasa.prot.ch.options 423 1 9
n271=  did -o sBiasa.prot.ch.options 433 1 5
n272=  did -o sBiasa.prot.ch.options 453 1 8
n273=  did -o sBiasa.prot.ch.options 456 1 600
n274=  did -o sBiasa.prot.ch.options 463 1 15
n275=  did -o sBiasa.prot.ch.options 466 1 300
n276=  did -o sBiasa.prot.ch.options 517 1 300
n277=  did -o sBiasa.prot.ch.options 523 1 1800
n278=  did -o sBiasa.prot.ch.options 526 1 1
n279=  did -o sBiasa.prot.ch.options 533 1 5
n280=  did -o sBiasa.prot.ch.options 536 1 300
n281=  did -o sBiasa.prot.ch.options 604 1 2000
n282=  did -o sBiasa.prot.ch.options 613 1 1200
n283=  did -o sBiasa.prot.ch.options 623 1 900
n284=  did -o sBiasa.prot.ch.options 647 1 300
n285=  did -o sBiasa.prot.ch.options 823 1 60
n286=  sBiasa.prot.ch.options.init.channel #NorthSumatera,#Medan,#Picauly,#indoflasher
n287=  sBiasa.prot.ch.options.init.file
n288=  unset %sBiasa-prot.ch_data_def
n289=}