All pastes #943821 Raw Edit

Eric

public text v1 · immutable
·published 2008-03-15 16:56 UTC
rendered paste body

      %newv = $calc($readini(sabb.ini,$nick,LongBow) + $10)
      %pl = LongBow
    }
    if ($14 == "Steelbow") {
      %val = $calc($10 * 16400)
      %newv = $calc($readini(sabb.ini,$nick,Steelbow) + $10)
      %pl = Steelbow 
      %wep = Steelbow
    }
    if ($14 == "Steed") {
      %val = $calc($10 * 50000)
      %newv = $calc($readini(sabb.ini,$nick,Steed) + $10)
      %pl = Steed
      %wep = Steed
    }
    if ($14 == "Flamming" && $15 == "Arrow") {
      %val = $calc($10 * 200000)
      %newv = $calc($readini(sabb.ini,$nick,FlammingArrow) + $10)
      %pl = FlammingArrow
      %wep = Flamming Arrow
    }
    if ($14 == "Staff") {
      %val = $calc($10 * 1800)
      %newv = $calc($readini(sabb.ini,$nick,Staff) + $10)
      %pl = Staff
      %wep = Staff
    }
    if ($14 == "Long" && $15 == "Sword") {
      %val = $calc($10 * 3200)
      %newv = $calc($readini(sabb.ini,$nick,LongSword) + $10)
      %pl = LongSword
      %wep = Long Sword
    }

    if ($14 == "Lance") {
      %val = $calc($10 * 5100)
      %newv = $calc($readini(sabb.ini,$nick,Lance) + $10)
      %pl = Lance
      %wep = Lance
    }
    if ($14 == "Broadsword") {
      %val = $calc($10 * 16400)
      %newv = $calc($readini(sabb.ini,$nick,Broadsword) + $10)
      %pl = Broadsword
      %wep = Broadsword
    }
    if ($14 == "Excalibur") {
      %val = $calc($10 * 200000)
      %newv = $calc($readini(sabb.ini,$nick,Excalibur) + $10)
      %pl = Excalibur
      %wep = Excalibur
    }
    if ($14 == "Hatchet") {
      %val = $calc($10 * 1800)
      %newv = $calc($readini(sabb.ini,$nick,Hatchet) + $10)
      %pl = Hatchet
      %wep = Hatchet  
    }
    if ($14 == "Pike") {
      %val = $calc($10 * 3200)
      %newv = $calc($readini(sabb.ini,$nick,Pike) + $10)
      %pl = Pike
      %wep = Pike
    }
    if ($14 == "Mace") {
      %val = $calc($10 * 5100)
      %newv = $calc($readini(sabb.ini,$nick,Mace) + $10)
      %pl = Mace
      %wep = Mace  
    }
    if ($14 == "Warhammer") {
      %val = $calc($10 * 16400)
      %newv = $calc($readini(sabb.ini,$nick,Warhammer) + $10)
      %pl = Warhammer
      %wep = Warhammer
    }
    if ($14 == "Hammer" && $15 == "of" && $16 == "Thor") {
      %val = $calc($10 * 50000)
      %newv = $calc($readini(sabb.ini,$nick,HammerofThor) + $10)
      %pl = HammerofThor
      %wep = Hammer of Thor
    }
    if ($14 == "Battle" && $15 == "Axe") {
      %val = $calc($10 * 200000)
      %newv = $calc($readini(sabb.ini,$nick,BattleAxe) + $10)
      %pl = BattleAxe
      %wep = Battle Axe
    }
    if ($14 == "Helmet") {
      %val = $calc($10 * 2000)
      %newv = $calc($readini(sabb.ini,$nick,Helmet) + $10)
      %pl = Helmet
      %wep = Helmet
    }
    if ($14 == "Shield") {
      %val = $calc($10 * 3200)
      %newv = $calc($readini(sabb.ini,$nick,Shield) + $10)
      %pl = Shield
      %wep = Shield
    }
    if ($14 == "Chainmail") {
      %val = $calc($10 * 5100)
      %newv = $calc($readini(sabb.ini,$nick,Chainmail) + $10)
      %pl = Chainmail
      %wep = Chainmail
    }
    if ($14 == "Gauntlets") {
      %val = $calc($10 * 50000)
      %newv = $calc($readini(sabb.ini,$nick,Gauntlets) + $10)
      %pl = Gauntlets
      %wep = Gauntlets
    }
    if ($14 == "Elven" && $15 == "Cloak") {
      %val = $calc($10 * 50000)
      %newv = $calc($readini(sabb.ini,$nick,ElvenCloak) + $10)
      %pl = ElvenCloak
      %wep = Elven Cloak
    }
    if ($14 == "Dragonskin") {
      %val = $calc($10 * 200000)
      %newv = $calc($readini(sabb.ini,$nick,Dragonskin) + $10)
      %pl = Dragonskin
      %wep = Dragonskin
    }
    if ($14 == "Invisibility" && $15 == "Shield") {
      %val = $calc($10 * 750000)
      %newv = $calc($readini(sabb.ini,$nick,InvisibilityShield) + $10)
      %pl = InvisibilityShield
      %wep = Invisibility Shield
    }
    if ($14 == "Rope") {
      %val = $calc($10 * 36000)
      %newv = $calc($readini(sabb.ini,$nick,Rope) + $10)
      %pl = Rope
      %wep = Rope
    }
    if ($14 == "Dirk") {
      %val = $calc($10 * 70000)
      %newv = $calc($readini(sabb.ini,$nick,Dirk) + $10)
      %pl = Dirk
      %wep = Dirk
    }
    if ($14 == "Cloak") {
      %val = $calc($10 * 120000)
      %newv = $calc($readini(sabb.ini,$nick,Dirk) + $10)
      %pl = Dirk
      %wep = Dirk
    }
    if ($14 == "Grappling" && $15 == "Hook") {
      %val = $calc($10 * 225000)
      %newv = $calc($readini(sabb.ini,$nick,GrapplingHook) + $10)
      %pl = GrapplingHook
      %wep = Grappling Hook
    }
    if ($14 == "Skeleton" && $15 == "Key") {
      %val = $calc($10 * 450000)
      %newv = $calc($readini(sabb.ini,$nick,SkeletonKey) + $10)
      %pl = SkeletonKey
      %wep = Skeleton Key
    }
    if ($14 == "Nunchaku") {
      %val = $calc($10 * 725000)
      %newv = $calc($readini(sabb.ini,$nick,Nunchaku) + $10)
      %pl = Nunchaku
      %wep = Nunchaku
    }
    if ($14 == "Big" && $15 == "Candle") {
      %val = $calc($10 * 40000)
      %newv = $calc($readini(sabb.ini,$nick,BigCandle) + $10)
      %pl = BigCandle
      %wep = Big Candle
    }
    if ($14 == "Horn") {
      %val = $calc($10 * 75000)
      %newv = $calc($readini(sabb.ini,$nick,Horn) + $10)
      %pl = Horn
      %wep = Horn
    }
    if ($14 == "Tripwire") {
      %val = $calc($10 * 140000)
      %newv = $calc($readini(sabb.ini,$nick,Tripwire) + $10)
      %pl = Tripwire
      %wep = Tripwire
    }
    if ($14 == "Guard" && $15 == "Dog") {
      %val = $calc($10 * 250000)
      %newv = $calc($readini(sabb.ini,$nick,GuardDog) + $10)
      %pl = GuardDog
      %wep = Guard Dog
    }
    if ($14 == "Mithril") {
      %val = $calc($10 * 50000)
      %newv = $calc($readini(sabb.ini,$nick,Mithril) + $10)
      %pl = Mithril
      %wep = Mithril
    }
    if ($14 == "Plate" && $15 == "Armor") {
      %val = $calc($10 * 16400)
      %newv = $calc($readini(sabb.ini,$nick,PlateArmor) + $10)
      %pl = PlateArmor
      %wep = Plate Armor
    }
    if ($14 == "Dragon" && $15 == "Claw") {
      %val = $calc($10 * 16400)
      %newv = $calc($readini(sabb.ini,$nick,DragonClaw) + $10)
      %pl = DragonClaw
      %wep = Dragon Claw
    }
    if ($14 == "Scimitar") {
      %val = $calc($10 * 5100)
      %newv = $calc($readini(sabb.ini,$nick,Scimitar) + $10)
      %pl = Scimitar
      %wep = Scimitar
    }

    /writeini -n sabb.ini $nick %pl %newv
    %g = $calc($gettok($read(sabb.txt,s,$nick),2,32) + %val)
    %eg = $calc($gettok($read(lsabb.txt,s,%name),2,32) + %val)
    /write -s $nick sabb.txt $nick %g
    /write -s %name lsabb.txt %name %eg
    notice $nick Your sabb on %name for $10 %wep Was Successful Added
  }
}