All pastes #481933 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-05-11 02:10 UTC
rendered paste body
;## the setworld script ##
off *:text:!setworld*:#luckypc,#Luckypc.staff,#luckystaff:{ 
  else {
    if ($2 == %world)) {
      .notice $nick Do Not Waste My Time, $nick $+ ! This Is Already The Current World!
    }
    else {
      if ($2 !isnum) {
        .notice $nick The world must be a number xD !
      }
      if (!$3) {
        .notice $nick please put in a scouter!
      }  
      else {
        set %ctime3 $ctime 
        set %world $2 
        set %scouter $3 
        msg #Luckypc 3 $+ $chr(447) $+ World Change $+ ? Yes! Type !Pcw -or-  !World To View It!
        msg #luckypc 9 $+ $chr(443) $+ 3 $+ $chr(443) $+ Scout The World? Type !Info To View Your #LuckyPc Stats!
      }
    }
  }
}
on *:text:!*:#luckypc:{ 
  if ($1 == !world) || ($1 == !pcw) {
    if (%sworldz = $readini(test.ini, n, World, $chan)) {
      set %sworldz N/A 
    }
    var %ctime4 = $ctime
    var %times = $calc( %ctime4 - %ctime3 ) 
 notice $nick 3,15The Current World is: %world $+ .Set By: %scouter $+ . Suggested 2nd World: %sworldz $+ .Last Set: $duration($times,2)
}    
  elseif ($1 == !suggest) || ($1 == !wsuggest) {  
    if ($2 !isnum) {
      .notice $nick Hey! This must be a world xD
      halt
    }
    if (!$3) { 
      set %reason N/A
    }   
    else {  
      set %sworld $2
      set %snick $nick
      set %sreason $3-
      .notice $nick Are you sure you want to suggest this world? If you are positive it is a good world, then type !yes. 
      .notice $nick If this is an abuse of this command, you may get banned.
    }
  }
  elseif ($1 == !yes) {
    .notice $nick Thank you, your world suggestion has been recieved =]
    msg #luckypc 3,15 World Suggestion From:10 %snick 3<.> World:10 %sworld 3<.> Reason:10 %sreason 3
    set %sworldz %sworld
  }