on *:TEXT:!hug*:#: {
  if ($2 = $null) msg $chan $nick hugs $nick
  else msg $chan $nick hugs $2
}

on *:TEXT:!toungue*:#: {
  if ($2 = $null) msg $chan $nick sticks their toungue out to everyone!
  else msg $chan $nick sticks their tongue out to $2
}

on *:TEXT:!stare*:#: {
  if ($2 = $null) msg $chan $nick stares long and hard at everyone
  else msg $chan $nick stares long and hard at $2
}

on *:TEXT:!kiss*:#: {
  if ($2 = $null) msg $chan $nick takes everyone into their arms and passionately kisses
  else msg $chan $nick takes $2 into their arms and passionately kisses
}

on *:INPUT:* {
  if ($1 == !count) && ($left($active,1) == $chr(35)) {
    msg $chan 2[4 $+ $chan $+ 2]4  4Has A Record Of 2[4 $+ ! $+ $nick($chan,0) $+ ! $+ 2]4 4Users.
    Halt
  }
}

on *:TEXT:*!setgreet*:#: {
  set %personal.greet.lol. $+ $nick on
  set %personal.greet $+ $nick $2-
  msg $chan 15 $+ $nick $+ , Your Personal Greet Has Been Set To:7 $2- $+ .
}
on *:JOIN:#: {
  if (%personal.greet.lol. [ $+ [ $nick ] ] == on) {
    msg $chan [7 $+ $nick $+ ]: %personal.greet [ $+ [ $nick ] ]
  }
  if (%personal.greet.lol. [ $+ [ $nick ] ] == $null) {
    notice $nick Get A Greet! [ !setgreet GREET ]
  }
  if (%quit.set [ $+ [ $nick ] ] == on) {
    set %join.time [ $+ [ $nick ] ] $asctime(h:nntt)
  }
}
on *:QUIT: {
  set %quit.set [ $+ [ $nick ] ] on
  set %quit.time [ $+ [ $nick ] ] $asctime(h:nntt)
  set %quit.date [ $+ [ $nick ] ] $asctime(mm/dd/yy)
}