All pastes #147637 Raw Edit

Untitled

public text v1 · immutable
#147637 ·published 2006-08-24 15:00 UTC
rendered paste body
alias c1 { return $+(,$1-) } 
alias c2 { return $+(,$1-) } 

on *:text:*:#: { if ($address($nick,2) == $readini(Ignore.ini,Ignore,$address($nick,2))) { /halt } { 

    tokenize 32 $strip($1-) 
    if ($left($1,1) !isin @!) halt 
    if ($right($1,-1) == pcw) var %style = pcworld 
    elseif ($right($1,-1) == pc-world) var %style = pcworld 
    elseif ($right($1,-1) == pcworld) var %style = pcworld 
    elseif ($right($1,-1) == world) var %style = pcworld 
    elseif ($right($1,-1) == pc-cash) var %style = pccash 

    set $+(%,stats.display.,%ID) $iif($left($1,1) == @,msg $nick,notice $nick) 

    alias process { 
      var %display = $($+(%,stats.display.,%ID),2) 

      if (%style == pcworld) { 
        if ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan) { %display $c1(The current PC world is:) $c2($readini(PCWorld.ini,PC-World,PCWorld)) } 
        else { %display $c1(The current PC world is:) $c2(Get Voice to see!) } 
      } 
      elseif (%style == pccash) { 
        if ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan || $address($nick,2) == $address($me,2)) { 
          if ($2 isnum 3-126) { 
            if ($3 isnum 1-50000) { 
              %display $c1(You will get) $c2($calc((10 * $$2) * $$3) $+ gp) $c1(for) $c2($$3) $c1(PC Games.) 
            } 
            else { %display $c1(Error... Please try again) } 
          } 
          else { %display $c1(Error... Please try again) } 
        } 
      } 
    } 
  } 
}