on 1:TEXT:!digz:#: {
  if (!$var($nick $+ spade)) {
    set $iif($left($nick,1) = %,$nick,$+(%,$nick,spade)) 1
  }
  if ($var($+($nick,spade))) {
    set %digrandom $rand(0,10)
    if ($($+(%,$nick,spade),3) > 0) {
      if (%digrandom >= 8) {
        inc $+(%,$nick,spade) 1
        msg $chan $nick just found a new spade and now has $($iif($left($nick,1) != %,$+(%,$nick,spade),$nick),3) spades.
      }
      if (%digrandom <= 6) {
        dec $+(%,$nick,spade) 1
        msg $chan $nick hits a rock and his spade broke he now has $($+(%,$nick,spade),3) spades left.
        if ($($+(%,$nick,spade),3) < 1) {
          msg $chan NO SPADES GTFO
        }
      }
      if (%digrandom == 7) {
        if (!$var($+($nick,money))) {
          set $iif($left($nick,1) = %,$nick,$+(%,$nick,money)) 200
        }
        elseif ($var($+($nick,spade))) {
          inc $+(%,$nick,money) 100
          msg $chan $nick found a treasure chest with 100 coins in it!
        }
      }
    }
    else { msg $chan NO SPADES GTFO }
  }
}

on 1:TEXT:!buy:#: {
  if (!$var($nick $+ money)) {
    inc $+(%,$nick,spade) 1
    set $iif($left($nick,1) = %,$nick,$+(%,$nick,money)) 75
    msg $chan $nick bought a spade and has $($+(%,$nick,money),3) gold coins left.
  }
  elseif ($var($nick $+ money)) {
    if ($($+(%,$nick,money),3) >= 25) {
      dec $+(%,$nick,money) 25
      inc $+(%,$nick,spade) 1
      msg $chan $nick bought a spade and has $($+(%,$nick,spade),3) spades now.
      msg $chan Though $nick $+ 's purse is now 25 coins lighter and has $($+(%,$nick,money),3) in it.
    }
    else { msg $chan NO MONEY GTFO }
  }
}