All pastes #89413 Raw Edit

Anonymous

public text v1 · immutable
#89413 ·published 2006-07-16 06:25 UTC
rendered paste body
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 }
  }
}

on *:join:#pugtime:{
/msg #ls [PugTime] $nick has just joined the eastern pug! To join, please type @join eastpug
/msg #ls [PugTime] Line up: 14 $+ %nick.S $+  ; 14  $+ %nick.1 $+  ; 14  $+ %nick.2 $+  ; 14  $+ %nick.3 $+  ; 14  $+ %nick.4 $+
}

on *:part:#pugtime:{
  if ( %nick.S == $nick ) {
    set %nick.S Open
    /kick #pugtime %nick.1 The pug host has left
    /kick #pugtime %nick.2 The pug host has left
    /kick #pugtime %nick.3 The pug host has left
    /kick #pugtime %nick.4 The pug host has left
    set %nick.1 Open
    set %nick.2 Open
    set %nick.3 Open
    set %nick.4 Open
    set %y 0
    /msg #ls [PugTime] $nick has just left and ended the eastern pug!
    /msg #ls [PugTime] To start another eastern pug, please type @start eastpug
    /cs #pugtime topic Awaiting for Pug team to join
  }
  else { 
    if ( %nick.1 == $nick ) {
      set %nick.1 Open
      /msg #ls [PugTime] $nick has just left the eastern pug!
      /msg #ls [PugTime] Line up: 14 $+ %nick.S $+  ; 14  $+ %nick.1 $+  ; 14  $+ %nick.2 $+  ; 14  $+ %nick.3 $+  ; 14  $+ %nick.4 $+
    }
    else
      if ( %nick.2 == $nick ) {
        set %nick.2 Open
        /msg #ls [PugTime] $nick has just left the eastern pug!
        /msg #ls [PugTime] Line up: 14 $+ %nick.S $+  ; 14  $+ %nick.1 $+  ; 14  $+ %nick.2 $+  ; 14  $+ %nick.3 $+  ; 14  $+ %nick.4 $+
      }
      else
        if ( %nick.3 == $nick ) {
          set %nick.3 == Open
          /msg #ls [PugTime] $nick has just left the eastern pug!
          /msg #ls [PugTime] Line up: 14 $+ %nick.S $+  ; 14  $+ %nick.1 $+  ; 14  $+ %nick.2 $+  ; 14  $+ %nick.3 $+  ; 14  $+ %nick.4 $+
        }
        else
          if ( %nick.4 == $nick ) {
            set $nick.4 Open
            /msg #ls [PugTime] $nick has just left the eastern pug!
            /msg #ls [PugTime] Line up: 14 $+ %nick.S $+  ; 14  $+ %nick.1 $+  ; 14  $+ %nick.2 $+  ; 14  $+ %nick.3 $+  ; 14  $+ %nick.4 $+
          }
        }
      }
    }
  }
}