Something

on *:text:@join eastpug*:#ls:{
  if ( %nick.S == Open) {
    /notice $nick There is no eastern pug at the moment
  }
  else {
    if (%y < 4) {
      inc %y
      set %nick. [ $+ [ %y ] ] $nick
      /invite $nick #PugTime
    }
    else { /notice $nick The Eastern Pug is Full }
  }
}