All pastes #464884 Raw Edit

Untitled

public text v1 · immutable
#464884 ·published 2007-04-29 19:29 UTC
rendered paste body
on *:TEXT:!change *:#super_pcw:{ 
  if ($nick isvoice #) notice $nick You cannot change the world! 
  if ($nick isreg #) notice $nick You cannot change the world!  
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) set %pctime $ctime 
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) set %pcnick $nick 
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) set %pcworld $2 
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) msg $chan 3,1X1,3x9,3X3,9x0,9X3,0xXx0,9X3,9x9,3X1,3x3,1xPCW World has been changed by %pcnick 3,1X1,3x9,3X3,9x0,9X3,0xXx0,9X3,9x9,3X1,3x3,1Xtype !world or !pcw to view it 
  if  ($nick isop # || $nick ishop #) && ($2 > 139) notice $nick Error! The PC World must be lower than 139! 
} 

on *:TEXT:!world:#super_pcw:{ 
  notice $nick 12Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago  by: %pcnick 
} 
on *:TEXT:!pcw:#super_pcw:{ 
  notice $nick 12Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago by: %pcnick 
} 

on *:TEXT:@world:#super_pcw:{ 
  if ( $nick isop # ) msg $chan 8,2Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  if ( $nick isop # ) msg $chan 4,2This world was set by: %pcnick 
  if ( $nick ishop # ) msg $chan 8,2Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  if ( $nick ishop # ) msg $chan 4,2This world was set by: %pcnick 
} 

on *:TEXT:!suggest*:#super_pcw:{ if ($2 !isnum 2-138) { halt }
  elseif (%suggestedw) { notice $nick There is already a suggested world }
  elseif ($2 isnum 2-138) && (!%suggestedw) {
    msg #super_pcw.verify 4 $nick has suggested world: $2  Type !checking !accept <worldhere> or !decline <worldhere> 
    notice |Rise_Against| $nick suggested world: $2 
    set %suggestedw $2
    set %suggester $nick
  }
}
on *:TEXT:!decline*:#super_pcw.verify:{ if ($2 !isnum 2-138) { halt }
  elseif (!$2) { 
  msg #super_pcw.verify Use !decline <worldhere> }  
  elseif ($2 isnum 2-138) && ($nick isop #super_pcw) || ($nick ishop #super_pcw) {
    msg #super_pcw 4World %suggestedw was DECLINED..   
    unset %suggestedw
    unset %suggester
    unset %checker
  }
}
on *:TEXT:!accept*:#super_pcw.verify:{ if ($2 !isnum 2-138) { halt }
  if (!$2) {
  msg #free_pcw Use accept <worldhere> }
  if ($2 isnum 2-138) && ($nick isop #super_pcw) || ($nick ishop #super_pcw) {
    msg #super_pcw World %suggestedw was suggested by %suggester . It has been accepted 
    msg #super_pcw 4New PCW1 - !pcw to view 
    unset %suggestedw
    unset %suggester
    unset %checker
    set %settime $ctime
    set %pcworld $2
    set %pcsetter $nick
    msg #super_pcw.verify 4World changed to %pcworld
  }
}

on *:TEXT:!checking*:#super_pcw.verify:{ if ($nick isop #super_pcw) || ($nick ishop #super_pcw) && (%checker) { 
    msg $chan already being checked by %checker } {
    if ($nick isop #super_pcw) || ($nick ishop #free_pcw) && (!%checker) 
    msg #super_pcw 4Suggested1 world is being checked by $nick
    msg #super_pcw This command must be followed by !accept or !decline
    set %checker
  }
}