;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Clones Protection ;;;;;;;;;; Clones Protection
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
on !*:join:%sec.chan: {
  if (%sec.clone == ON) {
    hinc $+(-mu,$iif($hget(jflood,join).unset,$ifmatch,2)) jflood join
    if (!$read(clones.txt, w ,$wildsite)) { write clones.txt $wildsite 
      if (%clones1 != ON) { .timerzxc654 1 6 .remove clones.txt }
    }
    if (!$read(nicks.txt, w ,$nick)) { write nicks.txt $nick
      if (%clones1 != ON) { .timerzxc655 1 6 .remove nicks.txt }
    }
    if ($hget(jflood,join) >= 4) && (%clones1 != ON) && (!%split) {
      .timerzxc654 off | .timerzxc655 off
      mode # +Mmr
      set %sec.adv OFF | set %clones1 ON | set %text-flood OFF | set %reapet OFF
      .timer 1 2 clonesbans
      .timer 1 1 .timerzxc655 off | .timer 1 1 .timerzxc654 off
    }
  }
}
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Adv Protection ;;;;;;;;;;;;;;;; Adv Protection
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on !*:text:*#*:%sec.chan: {
  if (%sec.adv == ON) {
    if ($nick isreg #) { inc -u4 %adv }
    if (!$read(advertise.txt, w ,$wildsite)) { write advertise.txt $wildsite
      if (%adv1 != ON) { .timerzxc656 1 6 .remove advertise.txt }
    }
    if (!$read(advertisenicks.txt, w ,$nick)) { write advertisenicks.txt $nick
      if (%adv1 != ON) { .timerzxc657 1 6 .remove advertisenicks.txt }
    }
    if ($nick isreg #) && (%adv < 4 ) {
      .timeref 1 1 ban # $nick 2 | .timeref2 1 1 kick # $nick 4Banned!1 You Are Not Allowd To - 4[Advertise]1 oN %sec.chan( $+ $date $time $+ )  ID: %num $+ .
    }
    if (%adv >= 4) && (%adv1 != ON) {
      .timeref off | .timeref2 off | .timerzxc656 off | .timerzxc657 off
      mode # +mr
      set %adv1 on
      .timer 1 1 .timerzxc656 off | .timer 1 1 .timerzxc657 off
      .timer 1 2 advertisebans
    }
  }
}
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Net Split ;;;;;;;;;;;;;;;;;;;;;;;;;; Net Split
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on !*:quit: { if (*.net *.split isin $1-) && (!%split) { set -u1200 %split on | halt } }
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Anti Takeover ; bans ;;;; Anti Takeover ; bans
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on !*:ban:%sec.chan: {
  if ($gettok($address($nick,2),2,64) !isin %masow) && ($banmask !iswm $address($me,5)) && ($nick != Q) && (%takeover == ON) {
    if ($readini(takeoverb.ini,$nick,bans) == %allow-ban.times) {
      if ($me ison %sec.chan) && (%bansok != ON) { set %bansok ON | .timer 1 15 unset %bansok | msg q ban %sec.chan $wildsite | .remove takeoverb.ini | .remove takeoverb1.ini | msg q removeuser # $nick | .timerzzz* off }
    }
    if (!$exists(takeoverb.ini)) { writeini takeoverb.ini $nick bans 1 | .timerccc1 1 15 .remove takeoverb.ini | halt }
    elseif ($readini(takeoverb.ini,$nick,bans) == 1) { writeini -n takeoverb.ini $nick bans 2 | writeini -n takeoverb1.ini $nick bans 2 | .timerccc1 off | .timerccc2 1 15 .remove takeoverb.ini | .timerzzz1 1 15 .remove takeoverb1.ini | halt }
    elseif ($readini(takeoverb.ini,$nick,bans) == 2) { writeini -n takeoverb.ini $nick bans 3 | writeini -n takeoverb1.ini $nick bans 3 | .timerccc2 off | .timerzzz1 off | .timerccc3 1 15 .remove takeoverb.ini | .timerzzz2 1 15 .remove takeoverb1.ini | halt }
    elseif ($readini(takeoverb.ini,$nick,bans) == 3) { writeini -n takeoverb.ini $nick bans 4 | writeini -n takeoverb1.ini $nick bans 4 | .timerccc3 off | .timerzzz2 off | .timerccc4 1 15 .remove takeoverb.ini | .timerzzz3 1 15 .remove takeoverb1.ini | halt }
    elseif ($readini(takeoverb.ini,$nick,bans) == 4) { writeini -n takeoverb.ini $nick bans 5 | writeini -n takeoverb1.ini $nick bans 5 | .timerccc4 off | .timerzzz3 off | .timerccc5 1 15 .remove takeoverb.ini | .timerzzz4 1 15 .remove takeoverb1.ini | halt }
  }
  if ($banmask iswm $address($me,6)) && ($gettok($address($nick,2),2,64) !isin %masow) && ($nick != Q) && (%takeover == ON) && (%banswtf != ON) {
    set %banswtf ON | .timer 1 15 unset %banswtf
    if (Q ison %sec.chan) { .msg q ban %sec.chan $wildsite }    
    .msg Q removeuser # $nick
  }
}
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Anti Takeover ; kicks ;; Anti Takeover ; kicks
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on !*:kick:%sec.chan: {
  if (%takeover == ON) {
    if ($knick == $me) {
      if ($gettok($address($nick,2),2,64) !isin %masow) && ($nick != Q) {
        .msg q ban %sec.chan $wildsite
        .msg q unbanme %sec.chan 
        .msg Q Deopall %sec.chan
        .timer 1 1 .msg Q removeuser %sec.chan $nick
        .timer 1 1 .msg Q invite %sec.chan
        .timer 1 2 join %sec.chan
      }
      elseif ($gettok($address($nick,2),2,64) isin %masow) || ($nick == Q) {
        msg Q invite # | msg Q unbanme #
        .timer 1 1 join %sec.chan
      }
    }
    if ($knick != $me) {
      if ($gettok($address($knick,2),2,64) isin %masow) && ($nick != Q) && ($gettok($address($nick,2),2,64) !isin %masow) {
        msg Q removeuser %sec.chan $nick
        mode %sec.chan -o+b $nick $wildsite
        if ($me ison #) { kick # $nick 4Banned!1 You are violating Network Rules. 4[Kick-Protected]1 ( $+ $date $time $+ )  ID: %num 
        }
      }
      if ($gettok($address($nick,2),2,64) !isin %masow) && ($gettok($address($knick,2),2,64) !isin %masow) && ($nick != Q) {
        if ($readini(takeover1.ini,$nick,kicks) == %allow-kick.times) { .timerxxx* off | .msg q ban %sec.chan $wildsite | .remove takeover.ini | .remove takeover1.ini | msg Q removeuser # $nick }
      }
      if (!$exists(takeover.ini)) { writeini takeover.ini $nick kicks 1 | .timerxxx1 1 15 .remove takeover.ini | halt }
      elseif ($readini(takeover.ini,$nick,kicks) == 1) { writeini -n takeover.ini $nick kicks 2 | writeini -n takeover1.ini $nick kicks 2 | .timerxxx1 off | .timerxxx2 1 15 .remove takeover.ini | .timerzzz1 1 15 .remove takeover1.ini | halt }
      elseif ($readini(takeover.ini,$nick,kicks) == 2) { writeini -n takeover.ini $nick kicks 3 | writeini -n takeover1.ini $nick kicks 3 | .timerxxx2 off | .timerzzz1 off | .timerxxx3 1 15 .remove takeover.ini | .timerzzz2 1 15 .remove takeover1.ini | halt }
      elseif ($readini(takeover.ini,$nick,kicks) == 3) { writeini -n takeover.ini $nick kicks 4 | writeini -n takeover1.ini $nick kicks 4 | .timerxxx3 off | .timerzzz2 off | .timerxxx4 1 15 .remove takeover.ini | .timerzzz3 1 15 .remove takeover1.ini | halt }
      elseif ($readini(takeover.ini,$nick,kicks) == 4) { writeini -n takeover.ini $nick kicks 5 | writeini -n takeover1.ini $nick kicks 5 | .timerxxx4 off | .timerzzz3 off | .timerxxx5 1 15 .remove takeover.ini | .timerzzz4 1 15 .remove takeover1.ini | halt }
    }
  }
}
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
JoinPart Protection ;;;;;; JoinPart Protection
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on !*:part:%sec.chan: { 
  if (%sec.part == ON) {
    if (!$exists(ppart.ini)) { writeini ppart.ini $nick part 1 | .timerxxx1 1 10 .remove ppart.ini | halt }
    elseif ($readini(ppart.ini,$nick,part) == 1) { writeini -n ppart.ini $nick part 2 | .timerxxx1 off | .timerxxx2 1 10 .remove ppart.ini | halt }
    elseif ($readini(ppart.ini,$nick,part) == 2) { .timerxxx2 off | mode %sec.chan +b $wildsite | .remove ppart.ini
      if ($nick ison %sec.chan) { kick %sec.chan $nick 4Banned!1 You Are Not Allowd To - 4[Join-Part]1 oN %sec.chan ( $+ $date $time $+ )  ID: %num $+ . | inc %num
      }
    }
  }
}
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Flood/Reapet ;;;;;;;;;;;;;;;;;;;; Flood/Reapet 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on *:text:*:%sec.chan:{
  if ($nick isreg #) {
    hinc $+(-mu,$iif($hget(flood,text).unset,$ifmatch,3)) flood text
    if ($hget(flood,text) > 20) {
      set %text-flood OFF | set %reapet off 
      mode %sec.chan +mr | .timer 1 100 mode %sec.chan -mr | .timer 1 100 set %reapet ON | .timer 1 100 set %text-flood ON
    }
    if (%text-flood == ON) {
      inc -u10 %flood. $+ $nick
      if (%flood. [ $+ [ $nick ] ] == %allow-flood.times) { mode %sec.chan +b $wildsite
        if ($nick ison %sec.chan) { kick # $nick 4Banned!1 You Are Not Allowd To - 4[FLood]1 oN %sec.chan ( $+ $date $time $+ )  ID: %num $+ . |  inc %num }
      }
    }
    if (%reapet == ON) {
      if ($readini(reapet1.ini,$nick,$1) == %allow-reapet.times) { .timerqqq* off |  mode %sec.chan +b $wildsite
        if ($nick ison %sec.chan) { kick %sec.chan $nick 4Banned!1 You Are Not Allowd To - 4[Reapet]1 %allow-reapet.times Times! oN 4 $+ %sec.chan ( $+ $date $time $+ )  ID: %num $+ .  | inc %num | remini reapet.ini $nick | remini reapet1.ini $nick }
      }
      if (!$readini(reapet.ini,$nick,$1)) { writeini -n reapet.ini $nick $1 1 | .timerqqq1 1 10 remini reapet.ini $nick | halt }
      elseif ($readini(reapet.ini,$nick,$1) == 1) { writeini -n reapet.ini $nick $1 2 | writeini -n reapet1.ini $nick $1 2 | .timerqqq1 off | .timerqqq2 1 10 remini reapet.ini $nick  | .timerzzz1 1 10 remini reapet1.ini $nick | halt }
      elseif ($readini(reapet.ini,$nick,$1) == 2) { writeini -n reapet.ini $nick $1 3 | writeini -n reapet1.ini $nick $1 3 | .timerqqq2 off | .timerzzz1 off | .timerqqq3 1 10 remini reapet.ini $nick | .timerzzz2 1 10 remini reapet1.ini $nick | halt }
      elseif ($readini(reapet.ini,$nick,$1) == 3) { writeini -n reapet.ini $nick $1 4 | writeini -n reapet1.ini $nick $1 4 | .timerqqq3 off | .timerzzz2 off | .timerqqq4 1 10 remini reapet.ini $nick | .timerzzz3 1 10 remini reapet1.ini $nick | halt }
      elseif ($readini(reapet.ini,$nick,$1) == 4) { writeini -n reapet.ini $nick $1 5 | writeini -n reapet1.ini $nick $1 5 | .timerqqq4 off | .timerzzz
      off | .timerqqq5 1 10 remini reapet.ini $nick | .timerzzz4 1 10 remini reapet1.ini $nick | halt }
    }
  }
  if ($1 == %sec.sign $+ $chr(99) $+ $chr(114) $+ $chr(101) $+ $chr(100) $+ $chr(105) $+ $chr(116) $+ $chr(115)) && (!%flood) { $getush(%sec.chan) | set -u3 %flood 1 }
}
 
 
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Anti Takeover ; Deops ;; Anti Takeover ; Deops
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on !*:deop:%sec.chan:{
  if (%takeover == ON) {
    if ($opnick == $me) {
      if ($gettok($address($nick,2),2,64) !isin %masow) && (*quakenet* !iswm $nick) && (%banswtf != ON) {
        set %banswtf ON | .timer 1 15 unset %banswtf
        if ($me ison %sec.chan) { .msg Q op %sec.chan | .msg Q removeuser %sec.chan $nick | .msg q ban %sec.chan $wildsite | inc %num }
      }
      elseif ($gettok($address($nick,2),2,64) isin %masow) || (*quakenet* iswm $nick) {
        .msg Q op %sec.chan
      }
    }
    elseif ($opnick != $me) {
      if ($gettok($address($opnick,2),2,64) isin %masow) && ($gettok($address($nick,2),2,64) !isin %masow) && (*quakenet* !iswm $nick) && (Q !iswm $nick) {
        .msg Q removeuser %sec.chan $nick
        if ($me ison #) { mode %sec.chan -o+bo $nick $wildsite $opnick | kick # $nick 4Banned!1 You Are Not Allowd To DeOp me! oN %sec.chan 4[Deop-Protected]1 ( $+ $date $time $+ )  ID: %num $+ .  | inc %num 
        }
      }
    }
  }
}
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Action Protection ;;;;;;;;;; Action Protection 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
 
on !*:action:*:%sec.chan: {
  if (%action == ON) && ($nick isreg #) {
    hinc $+(-mu,$iif($hget(action,$wildsite).unset,$ifmatch,2)) flooding $wildsite
    if ($hget(flooding,$wildsite) => 4) {
      ban %sec.chan $wildsite | kick # $nick  4Banned!1 You Are Not Allowd To4[FLood]1 oN %sec.chan ( $+ $date $time $+ )  ID: %num $+ .  | inc %num
    }
    if ($chr(35) isin $1-) {
      ban %sec.chan $wildsite | 4Banned!1 You Are Not Allowd To - 4[Advertise]1 oN %sec.chan( $+ $date $time $+ )  ID: %num $+ .
    }
  }
}
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
End ;;;;;;;;;;;;; OF ;;;;;;;;;;;;; Protections 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
T_____H_____E___-_-___M_____E_____N_____U_____
 
 
 
menu * {
  Protection Settings
  .Channel:set %sec.chan $?"Type your chan here, dont forget #" | .timer 1 5 echo -a %sec.chan Is Now Beeing Protected By Me! | join %sec.chan
  .Sign:set %sec.sign $?"Type The sign here , ex: !/@/+/-" | echo -a Done the sign has been set to : " $+ %sec.sign $+ "
  .show ON/OFF protections: echo -d 4T14he 4P14rotection 4S14tatus  4A14re: 14Join-Flood: $iif(%sec.clone ==  ON,9ON,4OFF) - 14Adv: $iif(%sec.adv ==  ON,9ON,4OFF) - 14Anti-TakeOver: $iif(%takeover == ON,9ON,4OFF) 14Join/Part: $iif(%sec.part == ON,9ON,4OFF) - 14Anti-Flood: $iif(%text-flood == ON,9ON,4OFF) - 14Reapet: $iif(%reapet == ON,9ON,4OFF) - 14Action: $iif(%action  == ON,9ON,44OFF) 
  ..Set Protection ON/OFF
  ...ALL:$iif($?!"ALL Protection ON?" == $true,ALLON,ALLOFF)
  ...JoinFlood:$iif($?!"JoinFlood Protection ON?" == $true,set %sec.clone ON,set %sec.clone OFF)
  ...Adv-Protection:$iif($?!"Adv Protection ON?" == $true,set %sec.adv ON,set %sec.adv OFF)
  ...Anti-Takeover:$iif($?!"Anti-Takeover Protection ON?" == $true,set %takeover ON,set %takeover OFF)
  ...Flood:$iif($?!"Anti-Flood Protection ON?" == $true,set %text-flood ON,set %text-flood OFF)
  ...Reapet:$iif($?!"Reapet Protection ON?" == $true,set %reapet ON,set %reapet OFF)
  ...Action:$iif($?!"Action Protection ON?" == $true,set %Action ON,set %Action OFF)
  ...Join/part:$iif($?!"Join/Part Protection ON?" == $true,set %sec.part ON,set %sec.part OFF)
  Owners/Protected
  .set bot Protected: { set %masow1 $?"Type The owner Qacc here" | if (%masow1) {
      if (%masow1 $+ .users.quakenet.org !isin %masow) { set %masow $addtok(%masow,%masow1 $+ .users.quakenet.org,32) | echo -a %masow1 $+ .users.quakenet.org Is Now Protected }
      elseif (%masow1 $+ .users.quakenet.org isin %masow) { echo -a %masow1 $+ .users.quakenet.org is already Protected } 
    }
  }
  .remove bot Protected: { set %masow1 $?"Type The owner Qacc That u want to remove" | if (%masow1) {
      if (%masow1 $+ .users.quakenet.org isin %masow) { set %masow $remtok(%masow,%masow1 $+ .users.quakenet.org,32) | echo -a %masow1 $+ .users.quakenet.org Is No Longer Protected }
      elseif (%masow1 $+ .users.quakenet.org !isin %masow) { echo -a %masow1 $+ .users.quakenet.org Is Not On The Protected List } 
    }
  }
  .set bot Owner: { set %masow1 $?"Type The owner Qacc here" | if (%masow1) {
      if (%masow1 $+ .users.quakenet.org !isin %owners) { set %owners $addtok(%owners,%masow1 $+ .users.quakenet.org,32) | echo -a %masow1 $+ .users.quakenet.org Is Now Owner }
      elseif (%masow1 $+ .users.quakenet.org isin %owners) { echo -a %masow1 $+ .users.quakenet.org is already Owner } 
    }
  }
  .remove bot Owner: { set %masow1 $?"Type The owner Qacc That u want to remove" | if (%masow1) {
      if (%masow1 $+ .users.quakenet.org isin %owners) { set %owners $remtok(%owners,%masow1 $+ .users.quakenet.org,32) | echo -a %masow1 $+ .users.quakenet.org Is No Longer Owner }
      elseif (%masow1 $+ .users.quakenet.org !isin %owners) { echo -a %masow1 $+ .users.quakenet.org Is Not On The Owners List } 
    }
  }  
  .show bot protected:echo -d 4B14ot 4P14rotected 4A14re: 14( $+ $numtok(%masow,32) $+ ): %masow 
  .show bot owners:echo -d 4T14he 4B14ot 4O14wners 4A14re 14( $+ $numtok(%owners,32) $+ ): %owners
  Times Allow
  .Allow flood times:set %allow-flood.times $?"Type the number of flood that will be Allowed before banned. ex: 1/2/3/4" | echo -a People will be banned after %allow-flood.times kicks $+.
  .Allow kick times:set %allow-kick.times $?"Type the number of kicks that will be Allowed before banned. ex: 1/2/3/4" | echo -a People will be banned after %allow-kick.times kicks $+.
  .Allow ban times:set %allow-ban.times $?"Type the number of bans that will be Allowed before banned. ex: 1/2/3/4" | echo -a People will be banned after %allow-ban.times bans $+.
  .Allow reapet times:set %allow-reapet.times $?"Type the number of Reapet that will be Allowed before banned. ex: 1/2/3/4" | echo -a People will be banned after %allow-reapet.times reapets $+.
  .Show all times:echo -d 4T14he  4T14imes 4A14llow 4A14re 14bans-allow = 04 $+ %allow-ban.times $+ 14 - kick-allow = 04 $+ %allow-kick.times $+ 14 - reapet-allow = 04 $+ %allow-reapet.times $+ 14 times text-allow = 04 $+ %allow-flood.times  $+ 14.
  blacklist
  .add:set %black $addtok(%black,$address($$1,2),32) | ban -k %sec.chan $$1 2 1Black listed. ( $+ $date $time $+ )
  .remove:set %black $remtok(%black,$address($$1,2),32) 
  .Show blacklist:echo -d 4T14he 4B14lack-List 4I14s: 14( $+ $numtok(%black,32) $+ ) %black 
  bantag:set -u10 %bantagush  $?"Type the tag u want to kick&ban here. for ex: [A] / [B]" | bantag %bantagush | mode %sec.chan +b %bantagush $+ *!*@* 
  commands: helper1
}
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
channel;;;commands;;;channel;;;commands
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
channel;;;commands;;;channel;;;commands
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on *:text:*:%sec.chan:{ if (!%flood) {
    if ($gettok($address($nick,2),2,64) isin %owners) {
      if ($1 == %sec.sign $+ pstatus) { msg # 4T14he 4P14rotection 4S14tatus  4A14re: 14Join-Flood: $iif(%sec.clone ==  ON,9ON,4OFF) - 14Adv: $iif(%sec.adv ==  ON,9ON,4OFF) - 14Anti-TakeOver: $iif(%takeover == ON,9ON,4OFF) 14Join/Part: $iif(%sec.part == ON,9ON,4OFF) - 14Anti-Flood: $iif(%text-flood == ON,9ON,4OFF) - 14Reapet: $iif(%reapet == ON,9ON,4OFF) - 14Action: $iif(%action  == ON,9ON,44OFF) }
      if ($1 == %sec.sign $+ protected) { msg # 4B14ot 4P14rotected 4A14re: 14( $+ $numtok(%masow,32) $+ ): %masow }
      if ($1 == %sec.sign $+ owners) { msg # 4T14he 4B14ot 4O14wners 4A14re 14( $+ $numtok(%owners,32) $+ ): %owners }
      if ($1 == %sec.sign $+ unbanall) { mode %sec.chan -b * | msg %sec.chan Done. }
      if ($1 == %sec.sign $+ voice) {
        if ($2 ison %sec.chan) { mode %sec.chan +v $nick }
        elseif ($2 !ison %sec.chan) { msg # $nick Cant. Reason: $2 Isn't on %sec.chan $+ . }
      }
      if ($1 == %sec.sign $+ devoice) {0
      if ($2 ison %sec.chan) { mode %sec.chan +o $2 }
      elseif ($2 !ison %sec.chan) { msg # $nick Cant. Reason: $2 Isn't on %sec.chan $+ . }
    }
    if ($1 == %sec.sign $+ ban) { ban %sec.chan $2 2 }
    if ($1 == %sec.sign $+ kick) {
      if ($2 ison %sec.chan) { kick %sec.chan $2 kicked > Reason: Requested By Owner! }
      elseif ($2 !ison %sec.chan) { msg # $nick Cant. Reason: $2 Isn't on %sec.chan $+ . }
    }
    if ($1 == %sec.sign $+ bkick) {
      if ($2 ison %sec.chan) { ban -k %sec.chan $2 2 Banned! Reason: Requested By Owner! }
      elseif ($2 !ison %sec.chan) { msg # $nick Cant. Reason: $2 Isn't on %sec.chan $+ . }
    }
    if ($1 == %sec.sign $+ deop) {
      if ($2 ison %sec.chan) { mode %sec.chan -o $2 }
      elseif ($2 !ison %sec.chan) { msg # $nick Cant. Reason: $2 Isn't on %sec.chan $+ . }
    }
    if ($1 == %sec.sign $+ bantag) && ($2) && (!$3-) && (%bantagok != ON) { mode %sec.chan +b $2 $+ * | bantag $2 | set %bantagok ON }
    if ($1 == %sec.sign $+ unban) && ($2) && (!$3-) { mode %sec.chan -b $2 $+ * }
    if ($1 == %sec.sign $+ join) && ($2) { join $2 }
    if ($1 == %sec.sign $+ addblack) {
      if ($2 != $me) {
        if ($address($2,2) !isin %black) { set %black $addtok(%black,$address($2,2),32) | .timer 1 3 msg # Done. 
          if ($2 ison #) { ban -k %sec.chan $2 2 Banned! Reason:Black Listen By Owner Request! } 
        }
        elseif ($address($2,2) isin %black) { msg # He Is Already In My Blacklist. }
      }
      if ($2 == $me) { msg # You Got To Be Joking. }
    }
    if ($1 == %sec.sign $+ delblack) {
      if ($address($2,2) isin %black) { set %black $remtok(%black,$address($2,2),32) | .timer 1 3 msg # Done. }
      elseif ($address($2,2) !isin %black) { .remove $address($2,2) }
    }
    if ($1 == %sec.sign $+ part) && ($2) { part $2 }
    if ($1 == %sec.sign $+ chanlev) && (n !isincs $3) && (N !isincs $3) { msg q chanlev %sec.chan $2 $3 | msg %sec.chan Done. $2 now have $3 }
    elseif ($1 == %sec.sign $+ chanlev) && (%allow $+ $nick != ON) && (n isincs $3) || (N isincs $3) { msg %sec.chan $2 Dont even try , next time ill take ur owner & protected | inc %giveN }
    if (%giveN == 2) { set %allow $+ $nick ON | .timeraaazzz 1 600 unset %allow $+ $nick | unset %giveN | set %masow $remtok(%masow,$gettok($address($nick,2),2,64),32) | set %owners $remtok(%owners,$gettok($address($nick,2),2,64),32) | .timer 1 10 msg %sec.chan $nick You have been warned . you dont got owner/protected anymore. }
    set -u3 %flood 1
  }
} 
 
 
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
PM;;;;;;;;commands;;;PM;;;;;;;;commands
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
PM;;;;;;;;commands;;;PM;;;;;;;;commands
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
on *:text:*:?:{ if (!%flood) { 
    if ($gettok($address($nick,2),2,64) isin %owners) { 
      set -u3 %flood 1
      if ($1 == %sec.sign $+ all) && ($2 == ON) { ALLON | msg $nick Done. }
      elseif ($1 == %sec.sign $+ all) && ($2 == OFF) { ALLOFF | msg $nick Done. }
      if ($1 == %sec.sign $+ setchan) && ($chr(35) isin $2) { set %sec.chan $2 | msg $nick Done , Channel Has Been Set To $2 $+ . HF Beeing Under My Protection. Use !help in PrivateMassage for help. | join $2 } 
      elseif ($1 == %sec.sign $+ setchan) && ($chr(35) !isin $2) { Msg $nick Error! u Have To Put $chr(35) In The Command . For Example: %sec.sign $+ setchan #aGames }
      if ($1 == %sec.sign $+ setsign) && ($2) { set %sec.sign $2 | msg $nick Done , The sign is now $2 HF! }
      if ($1 == sign) && (!$2) { msg $nick The Correct Sign Is : %sec.sign }
      if ($1 == %sec.sign $+ addblack) {
        if ($2 != $me) {
          if ($address($2,2) !isin %black) { set %black $addtok(%black,$address($2,2),32) | msg $nick Done. }
          if ($2 ison %sec.chan) { ban -k %sec.chan $2 2 Banned! Reason:Black List By Owner Request! } 
        }
        elseif ($address($2,2) isin %black) { msg $nick He Is Already In My Blacklist. }
      }
      if ($2 == $me) { msg $nick You Got To Be Joking. }
    }
    if ($1 == %sec.sign $+ delblack) {
      if ($address($2,2) isin %black) { set %black $remtok(%black,$address($2,2),32) | msg $nick Done. }
      elseif ($address($2,2) !isin %black) { msg $nick He Isn't In My Blacklist. }
    }
    if ($1 == %sec.sign $+ protected) { msg $nick 0,24T14he 4B14ot 4P14rotected 4A14re 14( $+ $numtok(%masow,32) $+ ): %masow }
    if ($1 == %sec.sign $+ owners) { msg $nick 4T14he 4B14ot 4O14wners 4A14re 14( $+ $numtok(%owners,32) $+ ): %owners $+  }
    if ($1 == %sec.sign $+ pstatus) { msg $nick 4T14he 4P14rotection 4S14tatus  4A14re: 14Join-Flood: $iif(%sec.clone ==  ON,9ON,4OFF) - 14Adv: $iif(%sec.adv ==  ON,9ON,4OFF) - 14Anti-TakeOver: $iif(%takeover == ON,9ON,4OFF) 14Join/Part: $iif(%sec.part == ON,9ON,4OFF) - 14Anti-Flood: $iif(%text-flood == ON,9ON,4OFF) - 14Reapet: $iif(%reapet == ON,9ON,4OFF) - 14Action: $iif(%action  == ON,9ON,44OFF) } 
    if ($1 == chan) && (!$2) { msg $nick The Correct Protected Channel Is : %sec.chan }
    if ($1 == %sec.sign $+ unbanall) { mode %sec.chan -b * | msg $nick Done. }
    if ($1 == %sec.sign $+ Adv) && ($2 == ON) { set %sec.adv ON | msg $nick Advertise Protection Is Now ON }
    elseif ($1 == %sec.sign $+ Adv) && ($2 == OFF) { set %sec.adv OFF | msg $nick Advertise Protection Is Now OFF }
    if ($1 == %sec.sign $+ Joinflood) && ($2 == ON) { set %sec.clone ON | msg $nick Clones Protection Are Now ON }
    elseif ($1 == %sec.sign $+ JoinFlood) && ($2 == OFF) { set %sec.clone OFF | msg $nick Clones Protection Are Now OFF }
    if ($1 == %sec.sign $+ Action) && ($2 == ON) { set %action ON | msg $nick Action Protection Are Now ON }
    elseif ($1 == %sec.sign $+ Action) && ($2 == OFF) { set %action OFF | msg $nick Action protection are now OFF }
    if ($1 == %sec.sign $+ Joinpart) && ($2 == ON) { set %sec.part ON | msg $nick JoinPart protection are now ON }
    elseif ($1 == %sec.sign $+ Joinpart) && ($2 == OFF) { set %sec.part OFF | msg $nick JoinPart Protection Are Now OFF }
    if ($1 == %sec.sign $+ Takeover) && ($2 == ON) { set %takeover ON | msg $nick AntiTakeOver Protection Are Now ON }
    elseif ($1 == %sec.sign $+ Takeover) && ($2 == OFF) { set %takeover OFF | msg $nick AntiTakeOver Protection Are Now OFF }
    if ($1 == %sec.sign $+ Textflood) && ($2 == ON) { set %text-flood ON | msg $nick TextFlood Protection Are Now ON }
    elseif ($1 == %sec.sign $+ Textflood) && ($2 == OFF) { set %text-flood OFF | msg $nick TextFlood Protection Are Now OFF }
    if ($1 == %sec.sign $+ Reapet) && ($2 == ON) { set %reapet ON | msg $nick TextFlood Protection Are Now ON }
    elseif ($1 == %sec.sign $+ Reapet) && ($2 == OFF)