Anonymous

on $*:TEXT:*:#: {
  if ($chan == #heart) {
    if (%carey.nick !ison $chan && %carey.nick !isop $chan) {
      if ($level($address($nick,2)) >= 1000) {
        if ($left($1,1) !isin @!.) halt
        elseif ($right($1,-1) == op) var %style = op
        elseif ($right($1,-1) == deop) var %style = deop
        elseif ($right($1,-1) == hop) var %style = mehop
        elseif ($right($1,-1) == dehop) var %style = medehop

      }
      if ($level($address($nick,2)) >= 4) {
        if ($left($1,1) !isin @!.) halt
        elseif ($right($1,-1) == hop) var %style = hop
        elseif ($right($1,-1) == dehop) var %style = dehop
        elseif ($right($1,-1) == voice) var %style = mevoice
        elseif ($right($1,-1) == devoice) var %style = medevoice
      }
      if ($level($address($nick,2)) >= 3) {
        elseif ($right($1,-1) == voice) var %style = voice
        elseif ($right($1,-1) == devoice) var %style = devoice
        elseif ($right($1,-1) == k) var %style = kick
        elseif ($right($1,-1) == kb) var %style = kban
        elseif ($right($1,-1) == unban) var %style = unban
        elseif ($right($1,-1) == tb) var %style = temp
      }
    }
  }
  if ($chan == #lung || $chan == #stomach) {
    if (%dawn.nick !ison $chan && %dawn.nick !isop $chan || %kaara.nick !ison $chan && %kaara.nick !isop $chan) {
      if ($level($address($nick,2)) >= 4) {
        if ($left($1,1) !isin @!.) halt
        elseif ($right($1,-1) == op) var %style = op
        elseif ($right($1,-1) == deop) var %style = deop
        elseif ($right($1,-1) == hop) var %style = mehop
        elseif ($right($1,-1) == dehop) var %style = medehop
      }
      if ($level($address($nick,2)) >= 3) {
        if ($left($1,1) !isin @!.) halt
        elseif ($right($1,-1) == hop) var %style = hop
        elseif ($right($1,-1) == dehop) var %style = dehop
        elseif ($right($1,-1) == voice) var %style = mevoice
        elseif ($right($1,-1) == devoice) var %style = medevoice
      }
      if ($level($address($nick,2)) >= 2) {
        elseif ($right($1,-1) == voice) var %style = voice
        elseif ($right($1,-1) == devoice) var %style = devoice
        elseif ($right($1,-1) == k) var %style = kick
        elseif ($right($1,-1) == kb) var %style = kban
        elseif ($right($1,-1) == unban) var %style = unban
        elseif ($right($1,-1) == tb) var %style = temp
      }
    }
  }
  if (%style == temp) {
    if ($2 == $me) { HALT }
    else { kick $chan $$2
      ban $chan $$2 $iif($4,$4-,Requested by: $nick)
      time 1 $calc( $3 * 60 ) unban $chan $2

    }
  }
  if (%style == unban) {
    unban $chan $$2
  }
  if (%style == kban) {
    if ($2 == $me) { HALT }
    else {
      kick $chan $$2
      ban $chan $$2 $iif($3,$3,Requested by: $nick)
    }
  }
  if (%style == kick) {
    if ($2 == $me) { HALT }
    else {
      kick $chan $$2
    }
  }
  if (%style == op) {
    mode $chan +o $iif($2,$2,$nick)
  }
  if (%style == deop) {
    mode $chan -o $iif($2,$2,$nick)
  }
  if (%style == mehop) {
    mode $chan +h $iif($2,$2,$nick)
  }
  if (%style == medehop) {
    mode $chan -h $iif($2,$2,$nick)
  }
  if (%style == mevoice) {
    mode $chan +v $iif($2,$2,$nick)
  }
  if (%style == medevoice) {
    mode $chan -v $iif($2,$2,$nick)
  }
  if (%style == hop) {
    mode $chan +h $nick
  }
  if (%style == dehop) {
    mode $chan -h $nick
  }
  if (%style == voice) {
    mode $chan +v $nick
  }
  if (%style == devoice) {
    mode $chan -v $nick
  }
}


Join Section:


CODE
on $*:join:#: { 
  if ($address($nick,2) == *!*@Nitrous-B9E5817.hsd1.va.comcast.net) { set %carey.nick $nick }
  if ($address($nick,2) == *!*@Nitrous-5794CF8C.hsd1.fl.comcast.net) { set %dawn.nick $nick }
  if ($address($nick,2) == *!*@nitrous-A1AFDD6D.dsl.chmpil.ameritech.net) { set %justin.nick $nick }
  if ($address($nick,2) == *!*@nitrous-C080EE15.ds1-rd.adsl.cybercity.dk) { set %kaara.nick $nick }
  if ($chan == #heart) {
    if (%carey.nick !ison $chan && %carey.nick !isop $chan) {
      if ($level($address($nick,2)) >= 1000) {
        mode #heart +o $nick
      }
      if ($level($address($nick,2)) == 4) {
        mode #heart +h $nick
      }
      if ($level($address($nick,2)) == 3) {
        mode #heart +v $nick
      }
    }
  }
  if ($chan == #stomach || $chan == #lung) {
    if (%dawn.nick !ison $chan && %dawn.nick !isop $chan) {
      if ($level($address($nick,2)) >= 4) {
        mode #heart +o $nick
      }
      if ($level($address($nick,2)) == 3) {
        mode #heart +h $nick
      }
      if ($level($address($nick,2)) == 2) {
        mode #heart +v $nick
      }
    }
  }
  if ($chan == #eyes) {
    if (eyes[bot] !isop $chan) {
      if ($level($address($nick,2)) >= 4) {
        mode #heart +o $nick
      }
      if ($level($address($nick,2)) == 3) {
        mode #heart +h $nick
      }
      if ($level($address($nick,2)) == 2) {
        mode #heart +v $nick
      }
    }
  }
}

ctcp 2:access:?: { 
  if ($nick == eyes[bot]) {
    if ($2 == add) { 
      /add.access.user $3 $4 
    }
    if ($2 == remove) { 
      /remove.access.user $3 
    }
  }
}
alias add.access.user {
  /auser $2 $1 | ctcp eyes[bot] added $2 to access list as $1 

}
alias remove.access.user {
  /ruser $1 | ctcp eyes[bot] removed $1 from access list.
}

on *:NICK:#heart: {
  if (%carey.nick == $nick) { set %carey.nick $newnick }
  if (%dawn.nick == $nick) { set %dawn.nick $newnick }
  if (%justin.nick == $nick) { set %justin.nick $newnick }
  if (%kaara.nick == $nick) { set %kaara.nick $newnick }
}