on *:TEXT:moo:#: {
  if ($chan != #heart) {
    msg $chan MooOoOoOo!! 
  } 
}


on *:TEXT:*:*:{ 
  if ($chan == #jewelz ) { halt }
  elseif ($address($nick,2) == *!*@Nitrous-5794CF8C.hsd1.fl.comcast.net ) { halt }
  elseif ( jewel isin $1- || dawn isin $1- || zje isin $1- ) { msg #jewelz 6 Jewelz -> 13 $nick 1tried talking to you on13 $iif($chan,$chan,Private message) 1 at $time $date with message: $1- $+ . 
  }
}
on *:action:*:*:{ 
  if ($chan == #jewelz ) { halt }
  elseif ($address($nick,2) == *!*@Nitrous-5794CF8C.hsd1.fl.comcast.net ) { halt }
  elseif ( jewel isin $1- || dawn isin $1- || zje isin $1- ) { msg #jewelz 6 Jewelz -> 13 $nick 1tried talking to you on13 $iif($chan,$chan,Private message) 1 at $time $date with message: $1- $+ . 
  }
}


on *:TEXT:*:#: { 
  if (($nick == Captainclut ) && ( beer isin $1- )) { describe $chan gives $nick an ice cold beer! 
  }
}

on *:TEXT:!tb *:#:{
  if ($nick !isreg $chan && $2 isreg $chan) {
    if ($chan == #stomach || $chan == #ass ) {
      /ban -ku $+ $calc( $3 * 60 ) $chan $address($2,2) | kick $chan $2 $iif($4,$4-,Please make your way to #heart if you please)
    }
  }
}




alias bye {
  ame is currently away for reason: $1- $time(hh:nn:ss:tt)
  set %away.reason $1- | away $1- $time(hh:nn:ss:tt) | set %away.time $ctime
} 




alias back {
  ame is back from: %away.reason $+ . Time gone: $duration($calc( $ctime - %away.time ))
  away
  unset %away.*
}
on *:Text:*:*: {
  if (%away.reason != $null) {
    if (%away. [ $+ [ $nick ] ] != $nick) {
      if ($me isin $1- ) { notice $nick I am currently away for reason: %away.reason I have been gone for $duration($calc( $ctime - %away.time )) This is a one time notice. Please leave me a message by using /msg $me <message>. Thank you.
        set %away. [ $+ [ $nick ] ] $nick
      }
    }
  }
}