Stuff

on $*:TEXT:/^[!@]addbotowner/Si:#:{
  var %owners = Botowners.txt
  var %mods = Botmods.txt
  var %admins = Botadmins.txt
  if ($address($nick,2) == $address($me,2)) || ($read(%owners,w,$nick)) { 
    if ($read(%owners,w,$2)) { notice $nick $br($2) is already an owner of $br(Chrome) }
    if (!$read(%owners,w,$2)) {
      write %owner $2
      amsg $br(AMSG) $+ : Please welcome $br($2) as a new bot owner of Chrome! $br($nick)
    }
    else notice $nick 14Access denied
  }
}
on $*:TEXT:/^[!@]delbotowner/Si:#:{
  var %owners = Botowners.txt
  var %mods = Botmods.txt
  var %admins = Botadmins.txt
  if ($address($nick,2) == $address($me,2)) || ($read(%owners,w,$nick)) {
    if (!$read(%owners,w,$2)) { notice $nick $br($2) is not a part of $br(Chrome) staff | halt }
    elseif ($read(%owners,w,$2)) { 
      write $+(-ds,$2) %owners
    }
    else notice $nick 14Access denied
  }
}
on $*:TEXT:/^[!@]addbotadmin/Si:#:{
  var %owners = Botowners.txt
  var %mods = Botmods.txt
  var %admins = Botadmins.txt
  if ($address($nick,2) == $address($me,2)) || ($read(%owners,w,$nick)) {
    if ($read(%admins,w,$2)) { notice $nick $br($2) is already a part of $br(Chrome) Administrative staff | halt } 
    elseif (!$read(%admins,w,$2)) {
      write %admins $2
      amsg $br(AMSG) $+ : Please welcome $br($2) as a new part of $br(Chrome) Administrative staff! $br($nick)
    }
    else notice $nick 14Access denied
  }
}
on $*:TEXT:/^[!@]delbotadmin/Si:#:{
  var %owners = Botowners.txt
  var %mods = Botmods.txt
  var %admins = Botadmins.txt
  if ($address($nick,2) == $address($me,2)) || ($read(%owners,w,$nick)) {
    if (!$read(%admins,w,$2)) { notice $nick $br($2) is not a part of $br(Chrome) Administrative staff }
    elseif ($read(%admins,w,$2)) { 
      write $+(-ds,$2) %admins
      amsg $br(AMSG) $+ : $br($2) is no longer a part of Chrome administrative staff $br($nick)
    }
    else notice $nick 14Access denied.
  }
}
on $*:TEXT:/^[!@]addbotmod/Si:#:{
  var %owners = Botowners.txt
  var %mods = Botmods.txt
  var %admins = Botadmins.txt
  if ($address($nick,2) == $address($me,2)) || ($read(%owners,w,$nick)) || ($read(%admins,w,$nick)) {
    if ($read(%mods,w,$2)) { notice $nick $br($2) is already a $br(Chrome) bot moderator | halt }
    elseif (!$read(%mods,w,$2)) {
      write %mods $2
      amsg $br(AMSG) $+ : Please welcome $br($2) as a new bot moderator of $br(Chrome) $+ ! 
    }
    else notice $nick 14Access denied
  }
}
on $*:TEXT:/^[!@]delbotmod/Si:#:{
  var %owners = Botowners.txt
  var %mods = Botmods.txt
  var %admins = Botadmins.txt
  if ($address($nick,2) == $address($me,2)) || ($read(%owners,w,$nick)) || ($read(%admins,w,$nick)) {
    if (!$read(%mods,w,$2)) { notice $nick $br($2) is not a bot moderator of $br(Chrome) | halt }
    elseif ($read(%mods,w,$2)) {
      write $+(-ds,$2) %mods
      amsg $br(AMSG) $+ : $br($2) is no longer a bot moderator of $br(Chrome) $+ ! 
    }
    else notice $nick 14Access denied
  }
}