on @*:BAN:#: { if ($nick == $me) { .auser nounban $banmask } }
on @*:UNban:#: { if ($nick == $me) { .ruser nounban $banmask | return } | if ($level($banmask) == nounban) && ($nick != $me) { raw -q mode # +b-k $banmask Secured.Ban } }
on *:EXIT: { .rlevel -r nounban }

Kod:2 ( Açma kapatma menülü)

#banlock on
on me:*:ban:#: {
  if ($banmask !iswm $ial($me)) {
    writeini -n bans.ini $chan $banmask 1
  }
}
on me:*:unban:#: {
  if ($readini(bans.ini,$chan,$banmask)) {
    .remini bans.ini $chan $banmask
  }
}
on !*:Unban:#: {
  if ($readini(bans.ini,$chan,$banmask)) && ($nick($chan,$me,oh)) {
    mode $chan +b $banmask
  }
}
#Banlock end
#banlock_jcheck off
on me:*:join:#: {
  mode $chan +b
  .timer 1 2 banlock_build $chan
}
alias banlock_build {
  var %x = 1, %y = $ibl($1,0)
  while (%x <= %y) {
    if ($ibl($1,%x).by == $me) writeini -n bans.ini $1 $+($1,.,$ibl($1,%x)) 1
    inc %x
  }
}
raw 367:*: halt
raw 368:*: halt
#banlock_jcheck end
Menu * {
  .Ban Lock 
  ..Turn banlock $iif($group(#Banlock) == on,Off,On) : $iif($group(#Banlock) == on,disable,enable) #banlock 
  ..-
  ..$iif($group(#banlock_jcheck) == on,Disable,Enable) Banlock join update: $iif($group(#banlock_jcheck) == on,.Disable,.Enable) #banlock_jcheck
}