ctcp 1000:add:?: { /add $2 $3 $nick | /jadd $2 $3 | /gadd $2 $3 | /fadd $2 $3 | /cadd $2 $3 | /kadd $2 $3
}
alias add {
  /auser $1 $address($2,2) | notice $3 $2 added to access lvl at $1
}
alias jadd {
  if (%dawn.nick ison #heart) {
    ctcp %dawn.nick add $1 $2
  }
  else {
    if (%dsave.1 == $null) { set %dsave.1 $1- }
    if (%dsave.2 == $null) { set %dsave.2 $1- }
    if (%dsave.3 == $null) { set %dsave.3 $1- }
    if (%dsave.4 == $null) { set %dsave.4 $1- }
    if (%dsave.5 == $null) { set %dsave.5 $1- }
  }
}
alias gadd {
  if (%carey.nick ison #heart) {
    ctcp %dawn.nick add $1 $2
  }
  else {
    if (%gsave.1 == $null) { set %gsave.1 $1- }
    if (%gsave.2 == $null) { set %gsave.2 $1- }
    if (%gsave.3 == $null) { set %gsave.3 $1- }
    if (%gsave.4 == $null) { set %gsave.4 $1- }
    if (%gsave.5 == $null) { set %gsave.5 $1- }
  }
}
alias fadd {
  if (%meg.nick ison #heart) {
    ctcp %dawn.nick add $1 $2
  }
  else {
    if (%fsave.1 == $null) { set %fsave.1 $1- }
    if (%fsave.2 == $null) { set %fsave.2 $1- }
    if (%fsave.3 == $null) { set %fsave.3 $1- }
    if (%fsave.4 == $null) { set %fsave.4 $1- }
    if (%fsave.5 == $null) { set %fsave.5 $1- }
  }
}
alias cadd {
  if (%justin.nick ison #heart) {
    ctcp %dawn.nick add $1 $2
  }
  else {
    if (%csave.1 == $null) { set %csave.1 $1- }
    if (%csave.2 == $null) { set %csave.2 $1- }
    if (%csave.3 == $null) { set %csave.3 $1- }
    if (%csave.4 == $null) { set %csave.4 $1- }
    if (%csave.5 == $null) { set %csave.5 $1- }
  }
}
alias kadd {
  if (%kaara.nick ison #heart) {
    ctcp %dawn.nick add $1 $2
  }
  else {
    if (%ksave.1 == $null) { set %ksave.1 $1- }
    if (%ksave.2 == $null) { set %ksave.2 $1- }
    if (%ksave.3 == $null) { set %ksave.3 $1- }
    if (%ksave.4 == $null) { set %ksave.4 $1- }
    if (%ksave.5 == $null) { set %ksave.5 $1- }
  }
}
on $*:join:#: { 
  if ($address($nick,2) == *!*@Nitrous-5794CF8C.hsd1.fl.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-FC833BC9.ed.shawcable.net) { set %meg.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 ($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 ($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
    }
  }
}