An Ordinary cctv channel bot

;/*
;Addons Name: BASIC CHANNEL CCTV BOT
;Author: Lestat 
;Beta Tester: MasTer-PriNce
;Personal Team: DevilzCrewz(Leader) RimauCrewz(Members) EyiezINC(Members)
;Webchat Scripting Channel: #Myx,#eyiezinc,#rimau

;[NOTE]
;-------
;If You Like About Scripting Please Join Us At #myx,#eyiezinc or #rimau
;Come As Guest Stay Like Family.. :)
;Any Ideas/Addons/Helps Please Visit Us There..
;We Need More Scripters For Help User In #myx (Webchat Scripting Channel) 
;We Just Same Ordinary Human Like You..  
;*/

menu channel {
  CCTV
  .SETTING
  ..CCTVVIEW(CHANNEL VIEW):.set %ccview $+($chr(35),$remove($$?"MAIN CHANNEL VIEW",$chr(35))) | if ($me !ison %ccview) { .join %ccview }
  ..-
  ..CCTVSPY(SPY THIS CHANNEL):.set %cctv $+($chr(35),$remove($$?"CHANNEL TO SPY",$chr(35))) | if ($me !ison %cctv) { .join %cctv }
  ..-
  ..CLEAR:.unset %cctv %ccview  | .echo -a CCTV BEEN CLEAR 
  ..-
  ..MASTER
  ...ADD:.set %addmaster $$?"MASTER NICK?" | .auser master %addmaster | .echo -a %addmaster Has Been Added To Master List
  ...-
  ...RESET:.rlevel master
  .-
  .$iif($group(#cctv) = ON,$style(1)) ON:.enable #cctv | .echo -a [INFO]:- MAIN CHAN: $iif(%ccview,$+(9,$ifmatch,),4NONE) SPYCHAN: $iif(%cctv,$+(9,$ifmatch,),4NONE)
  .-  
  .$iif($group(#cctv) = OFF,$style(1)) OFF:.disable #cctv | .echo -a [INFO]:- CCTV TURN OFF
}
#cctv on
On *:text:*:%cctv: { cctv $1- }
On *:action:*:%cctv: { cctv $1- }
On *:notice:*:%cctv: { cctv $1- }
alias -l cctv { inc -u2 %ccsafe | $iif(%ccsafe <= 5,msg %ccview $+([,$chan,][,$event,] $iif($event = action,$+(13*,$chr(32)),$iif($event = notice,5-,8<)),$nick,$iif($event = action,$null,$iif($event = notice,5-,8>))) $1-,blocked) } 
alias blocked { .ignore -u7 *!*@* | .timer $+ $chan 1 1 msg %ccview BLOCKED LINE TO FAST }
#cctv end
On +master:text:*:#: {
  if ($1- == !info) { .msg $chan [INFO]:- MAIN CHAN: $iif(%ccview,$+(9,$ifmatch,),4NONE) SPYCHAN: $iif(%cctv,$+(9,$ifmatch,),4NONE) | halt }
  if ($1 == !ccspy) { if ($2) { .set %cctv $+($chr(35),$remove($2,$chr(35))) | if ($me !ison %cctv) { .join %cctv } | .msg $chan CHANNEL TO SPY9 %cctv } | else { .msg $chan COMMAND: !ccspy <channel to spy> example: !ccspy #rimau } }
  if ($1 == !ccview) { if ($2) { .set %ccview $+($chr(35),$remove($2,$chr(35))) | if ($me !ison %ccview) { .join %ccview } | .msg $chan MAIN VIEW CHANNEL9 %ccview } | else { .msg $chan COMMAND: !ccview <main channel view> example: !ccview $chan (MSG WILL BEEN SEND TO THIS CHANNEL) } } 
  if ($1- == !CCRESET) { .unset %cctv %ccview | .msg $chan CCTV BEEN RESET }
  if ($1 == !CCTV) { if ($2) { if ($2 == ON) { .enable #cctv | .msg $chan CCTV ON NOW } | else { if ($2 == OFF) { .msg $chan CCTV OFF NOW } } } | else { .msg $chan COMMAND: !cctv on/off (TURN ON/OFF CCTV) } }
  if ($1- == !help) { .notice $nick !info,!ccspy,!ccview,!ccreset and !cctv }
}