Unnamed

alias kb {
  var %i = 1,%x = 1,%bantok1,%bantok2,%banktok3,%banktok4
  while (%x <= $0) {
    %bantok1 = %bantok1 $address($gettok($1-,%x,32),1)
    %bantok2 = %bantok2 $address($gettok($1-,%x,32),2)
    %bantok3 = %bantok3 $address($gettok($1-,%x,32),3)
    %bantok4 = %bantok4 $address($gettok($1-,%x,32),4)
    inc %x
  }
  mode $chan $+(+,$str(b,$0)) %bantok1
  mode $chan $+(+,$str(b,$0)) %bantok2
  mode $chan $+(+,$str(b,$0)) %bantok3
  mode $chan $+(+,$str(b,$0)) %bantok4
  while (%i <= $0) {
    kick $chan $gettok($1-,%i,32) 4|_| <-- Exit's that way.
    inc %i
  }
}





###############

alias lock {
  /mode $chan +miNjfGQ 1:10 [4j#i10,4k#K10,4m#m10,4n#N10,5t#b]:10
  /msg $chan 7Lockdown. 10 On.
}

alias unlock {
  /mode $chan -miNjfGQ
  /msg $chan 7Lockdown. 10 Off.
}