on *:JOIN:#heart:{ .timer 1 1 .signal -n heart_join $nick }
on !*:SIGNAL:heart_join:{
  if ($1 isop #heart) || ($1 ishop #heart) { .notice $nick Welcome to #heart, please press !on to be on active list Thank You. }
  else { .notice $nick Welcome, please type !active now to get a list of those who are changing worlds.  Please pm only 1 of these.  If they do not respond in an orderly fashion(2 minutes) than pm another one.  Thank You. }
}

on *:TEXT:!on:#heart:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) {
    set %Active $addtok(%Active,$nick,32) | .notice $nick You have been added to the active list
  }
}
on *:TEXT:!off:#heart:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) && ($findtok(%Active,$nick,32)) {
    set %Active $deltok(%Active,$findtok(%Active,$nick,32),32) | .notice $nick You have been removed from the active list
  }
}
on *:TEXT:!active:#heart:{ 
  if (%Active) { .notice $nick The current world changing people are: $replacex(%Active,$chr(32),$+($chr(44),$chr(32))) }
  else { .notice $nick There are no staff currently available for changing the world.  Sorry :-( }
}
on *:JOIN:#lung:{ .timer 1 1 .signal -n lung_join $nick }
on !*:SIGNAL:lung_join:{
  if ($1 isop #lung) || ($1 ishop #lung) { .notice $nick Welcome to #lung, please press !on to be on validators list and do !off please before any nick changes or before you leave.  Thank You. }
  else { .notice $nick Welcome, please type !validators now to get a list of those who are validating.  Please pm only 1 of these.  If they do not respond in an orderly fashion(2 minutes) than pm another one.  Thank You. }
}
on *:TEXT:!on:#lung:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    set %Validating $addtok(%Validating,$nick,32) | .notice $nick You have been added to the validators list
  }
}
on *:TEXT:!off:#lung:{
  if ($nick isop $chan) || ($nick ishop $chan) && ($findtok(%Validating,$nick,32)) {
    set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $nick You have been removed from the validators list
  }
}
on *:TEXT:!validators:#lung:{ 
  if (%Validating) { .notice $nick The current staff validating are: $replacex(%Validating,$chr(32),$+($chr(44),$chr(32))) }
  else { .notice $nick There are no staff currently available for validating }
}
on *:QUIT:{
  if ($findtok(%Validating,$nick,32)) {
    set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32)
  }
  if ($findtok(%Active,$nick,32)) {
    set %Active $deltok(%Active,$findtok(%Active,$nick,32),32)
  }
}
on !*:DEOP:#lung:{
  if ($findtok(%Validating,$nick,32)) {
    set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $opnick You have been removed from the validators list
  }
}
on !*:DEHELP:#lung:{
  if ($findtok(%Validating,$nick,32)) {
    set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $hnick You have been removed from the validators list
  }
}
on !*:DEOP:#heart:{
  if ($findtok(%Active,$nick,32)) {
    set %Active $deltok(%Active,$findtok(%Active,$nick,32),32) | .notice $opnick You have been removed from the active list
  }
}
on !*:DEHELP:#heart:{
  if ($findtok(%Active,$nick,32)) {
    set %Active $deltok(%Active,$findtok(%Active,$nick,32),32) | .notice $hnick You have been removed from the active list
  }
}
on !*:DEVOICE:#heart:{
  if ($findtok(%Active,$nick,32)) {
    set %Active $deltok(%Active,$findtok(%Active,$nick,32),32) | .notice $vnick You have been removed from the active list
  }
}
on *:NICK:{
  if ($newnick isop #lung) || ($newnick ishop #lung) && ($findtok(%Validating,$nick,32)) { 
    set %Validating $replacex(%Validating,$nick,$newnick) 
  }
  if ($newnick isop #heart) || ($newnick ishop #heart) || ($newnick isvoice #heart) && ($findtok(%Active,$nick,32)) {
    set %Active $replacex(%Active,$nick,$newnick)
  }
}
on !*:PART:#lung:{
  if ($nick isop $chan) || ($nick ishop $chan) && ($findtok(%Validating,$nick,32)) {
    set %Validating $deltok(%Validating,$findtok(%Validating,$nick,32),32) | .notice $nick You have been removed from the validators list
  }
}
on !*:PART:#heart:{
  if ($nick isop $chan) || ($nick ishop $chan) && ($findtok(%Active,$nick,32)) {
    set %Active $deltok(%Active,$findtok(%Active,$nick,32),32) | .notice $nick You have been removed from the active list
  }
}