All pastes #253789 Raw Edit

Anonymous

public text v1 · immutable
#253789 ·published 2006-11-21 02:42 UTC
rendered paste body
on *:text:!mine tin*:#: {
  if ($nick isop $chan) || ($nick == wat) {
    var %time = $rand(5,13)
    if ($nick isin $read(mnames.txt, w, $nick)) { /notice $nick please wait to mine again }
    else {
      /write mnames.txt $nick 
      .timer 1 %time /write -dw $+ $nick mnames.txt
      var %gem = $rand(0,20)
      var %tino = $rand(1,7)
      var %mlvl = $calc( %tino * 4)
      inc $+(%,tino.,$nick) %tino
      inc $+(%,mlvl.,$nick) %mlvl
      /notice $nick You go mine %tino tin ores. 4Wait %time seconds
      /notice $nick You have $eval($+(%,tino.,$nick),2) tin ore
      if (%gem == 7) { /notice $nick 3 You found a gem! |  /inc $+(%,gem.,$nick) 1  }
    }
  }
}
on *:text:!mine iron*:#: {
  if ($nick isop $chan) || ($nick == wat) {
    var %time = $rand(5,13)
    if ($nick isin $read(mnames.txt, w, $nick)) { /notice $nick please wait to mine again }
    else {
      /write mnames.txt $nick 
      .timer 1 %time /write -dw $+ $nick mnames.txt
      if ($eval($+(%,mlvl.,$nick),2) < -----) { /notice $nick You need to be atleast Lvl 15 to mine iron! }
else {
      var %gem = $rand(0,20)
      var %irono = $rand(1,7)
      var %mlvl = $calc( %irono * 4)
      inc $+(%,irono.,$nick) %irono
      inc $+(%,mlvl.,$nick) %mlvl
      /notice $nick You go mine %irono iron ores. 4Wait %time seconds
      /notice $nick You have $eval($+(%,irono.,$nick),2) iron ore
      if (%gem == 7) { /notice $nick 3 You found a gem! |  /inc $+(%,gem.,$nick) 1  }
    }
  }
}