on *:JOIN:#pcw:{
  IF (%nikki == $null) {
    /set %nikki $nick
    .timer1 1 60 /unset %nikki
  }
  ELSEIF (%nikki2 == $null) {
    /set %nikki2 $nick
    .timer2 1 60 /unset %nikki2
  }
  ELSEIF (%nikki3 == $null) {
    /set %nikki3 $nick
    .timer3 1 60 /unset %nikki3
  }
  ELSEIF ($nikki4 == $null) {
    /set %nikki4 $nick
    .timer4 1 60 /unset %nikki4
  }
  ELSEIF {
    /set %nikki5 $nick
    .timer5 1 60 /unset %nikki5
  }
  ELSE HALT
}


on *:PART:#pcw:{
  %channelp = #xtraordinary
  if ($nick == %nikki) { /mode $nick %channelp | .timer1 off | unset %nikki | unset %channelp }
  if ($nick == %nikki2) { /mode $nick %channelp | .timer2 off | unset %nikki2 | unset %channelp }
  if ($nick == %nikki3) { /mode $nick %channelp | .timer3 off | unset %nikki3 | unset %channelp }
  if ($nick == %nikki4) { /mode $nick %channelp | .timer4 off | unset %nikki4 | unset %channelp }
  if ($nick == %nikki5) { /mode $nick %channelp | .timer5 off | unset %nikki5 | unset %channelp }
  else HALT
}