on 1000:text:*:#:{
  if ($1 == !addo) && ($nick isop $chan) { write -i opadds.txt $address($2,2) | msg $chan 7 $2  14Has Been Added to Auto Operator. }
  if ($1 == !addv) && ($nick isop $chan) { write -i vadds.txt $address($2,2) | msg $chan 7 $2  14Has Been Added to Auto Voice. }
  if ($1 == !dela) && ($nick isop $chan) { write -d admin.txt $address($2,2) | msg $chan 7 $2  14Has Been Deleted From Auto Admin. }
  if ($1 == !delo) && ($nick isop $chan) { write -d opadds.txt $address($2,2) | msg $chan 7 $2  14Has Been Deleted From Auto Operator. }
  if ($1 == !delv) && ($nick isop $chan) { write -d vadds.txt $address($2,2) | msg $chan 7 $2  14Has Been Deleted From Auto Voice. }
  if ($1 == !adda) && ($nick isop $chan) { write -i admin.txt $address($2,2) | msg $chan 7 $2  14Has Been Added to Auto Admin. }
  if ($1- == !rchan $me) && ($nick isop $chan || $nick == Staton) { perform off | msg $chan 7 $me  14Has Been DISABLED in $chan }
  if ($1- == !achan $me) && ($nick isop $chan || $nick == Staton) { perform on | msg $chan 7 $me  14Has Been ACTIVATED in $chan }
  if ($1 == !botadmin) { guser 1000 $2 ) | msg $chan 7 $2 14Has Been Added to Botadmin Status }
  if ($1 == !rbotadmin) {  ruser 1000 $2! | msg $chan 7 $2 14Has Been Deleted From Botadmin Status }
  if ($1 == !perform) { $2-1000 }
}
}
on *:JOIN:#staton:{
  if ($read(vadds.txt,w,$address($nick,2)) != $null) { mode $chan +v $nick }
  if ($read(opadds.txt,w,$address($nick,2)) != $null) { mode $chan +o $nick }
  if ($read(admin.txt,w,$address($nick,2)) != $null) { mode $chan +ao $nick $nick }
} 
ON *:JOIN:#:{
  if ($nick == $me) { msg $chan 7[-STbot-] 14Scripted by Staton. For a Full list of Commands type !commands }
  Else { HALT }
}
on *:text:*:#:{
  if ($1 == !pv) && ($nick isop $chan) { cs access $chan add $2 3 }
  if ($1 == !po) && ($nick isop $chan) { cs access $chan add $2 5 }
  if ($1- == !leave $me) && ($nick isop $chan || $nick == Staton) { part $chan Requested. }
  if ($1 == !half) && ($nick isop $chan) { mode $chan +h $2 }
  if ($1 == !dehalf) && ($nick isop $chan) { mode $chan -h $2 }
  if ($1 == !del) && ($nick isop $chan) { cs access $chan del $2 }
  if ($1 == !join) && ($nick == Staton) { join $2 }
  if ($1 == !bsay) { msg $chan $2-100 }
  if ($1 == !invite) && ($nick isop $chan) { invite $2 $chan }
  if ($1 == !commands) {
    msg $nick These must be followed by a nickname !voice  !devoice !op !deop !half !dehalf !k !kb
    msg $nick !mode [+r/-r] sets the Registered flag on the channel on or off [users must be authed to join].
    msg $nick !mode [+m/-m] sets the Moderated flag for the channel on or off [only voiced users can talk].
    msg $nick !mode [+i/-i] sets the Invite flag for the channel on or off [people cannot join unless they are invited]. 
    msg $nick !mode [+c/-c] sets the Colours flag for the channel on or off . 
    msg $nick !top shows the current topic.
    msg $nick !mode [+s/-s] sets the secret mode, you won't be show in the channels listbe. 
    msg $nick !pv , !po set perm operator and perm voice on a nickname. The bot must be +a to do this. !del , deletes the nick from access.
    msg $nick !cycle . makes the bot rejoin the channel. !bsay text , makes the bot say whatever u want. !invite nick, allows u to invite a nick.
  }
  if (!k * iswm $1- && $nick isop $chan) && ($2 !isop $chan) { kick $chan $2- }
  if (!kb * iswm $1- && $nick isop $chan) && ($2 !isop $chan) { ban -k $chan $2- }
  if (!mode +r* iswm $1- && $nick isop $chan) { mode $chan +r }
  if (!mode -r* iswm $1- && $nick isop $chan) { mode $chan -r }
  if (!mode +m* iswm $1- && $nick isop $chan) { mode $chan +m }
  if (!mode -m* iswm $1- && $nick isop $chan) { mode $chan -m }
  if (!mode +i* iswm $1- && $nick isop $chan) { mode $chan +i }
  if (!mode -i* iswm $1- && $nick isop $chan) { mode $chan -i }
  if (!voice * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan +v $2- }
  if (!devoice * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan -v $2- }
  if (!op * iswm $1- && $nick isop $chan && $2 !isop $chan) { mode $chan +o $2- }
  if (!deop * iswm $1- && $nick isop $chan) { mode $chan -o $2- }
  if (!mode +c* iswm $1- && $nick isop $chan) { mode $chan +c }
  if (!mode -c* iswm $1- && $nick isop $chan) { mode $chan -c }
  if (!mode +s iswm $1- && $nick isop $chan) { mode $chan +s }
  if (!mode -s iswm $1- && $nick isop $chan) { mode $chan -s }
  if (!top* iswm $1-) { msg $chan $chan(#).topic }
  if (!cycle iswm $1- && $nick isop $chan) { hop $chan Rejoining }