Code-Bin #70 - pickItem.lua

pickItem.lua
Posted by: Kryand | February 11, 2008 @ 11:15pm

Revision 3 - Original post on December 17, 2007 @ 3:41pm

Lua Code

function pickItem(item)
   if item.BaseItem == "pk2" then --Key of Hate
      return 8
   elseif item.BaseItem == "pk1" then --Key of Terror
      return 8
   elseif item.BaseItem == "pk3" then --Key of Destruction
      return 8
   elseif item.BaseItem == "r33" then --Zod
      return 10
   elseif item.BaseItem == "r32" then --Cham
      return 10
   elseif item.BaseItem == "r31" then --Jah
      return 10
   elseif item.BaseItem == "r30" then --Ber
      return 10
   elseif item.BaseItem == "r29" then --Sur
      return 10
   elseif item.BaseItem == "r28" then --Lo
      return 10
   elseif item.BaseItem == "r27" then --Ohm
      return 10
   elseif item.BaseItem == "r26" then --Vex
      return 10
   elseif item.BaseItem == "r25" then --Gul
      return 8
   elseif item.BaseItem == "r24" then --Ist
      return 10
   elseif item.BaseItem == "r23" then --Mal
      return 10
   elseif item.BaseItem == "r22" then --Um
      return 9
   elseif item.BaseItem == "r21" then --Pul
      return 8
   elseif item.BaseItem == "r20" then --Lem
      return 7
   elseif item.BaseItem == "r19" then --Fal
      return 7
   elseif item.BaseItem == "r18" then --Ko
      return 6
   elseif item.BaseItem == "r15" then --Hel
      return 5
   elseif item.BaseItem == "jew" and (item.Quality == Unique) then --Magic Jewels or Rainbow Facet
      return 9
   elseif item.BaseItem == "cm1" and item.Quality == Magic then --Magic Small Charms
      return 8
   elseif item.BaseItem == "cm3" and item.Quality == Magic then --Magic Grand Charms
      return 8
   elseif item.BaseItem == "rin" and item.Quality == Unique then --Unique Ring
      return 7
   elseif item.BaseItem == "amu" and item.Quality == Unique then --Unique Amulet
      return 7
   elseif item.BaseItem == "ci3" and item.Quality == Unique then --Griffon's Eye
      return 10
   elseif item.BaseItem == "uap" and item.Quality == Unique then --Shako
      return 8
   elseif item.BaseItem == "uhm" and item.Quality == Unique then --Nightwing's Veil, Veil of Steel
      return 8
   elseif item.BaseItem == "urn" and item.Quality == Unique then --CoA
      return 10
   elseif item.BaseItem == "usk" and item.Quality == Unique and item.Flags.Ethereal == 1 then --Andy's Mask
      return 9
   elseif item.BaseItem == "xh9" and item.Quality == Unique then --Vamp Gaze
      return 5
   elseif item.BaseItem == "uh9" and item.Quality == Unique and item.Flags.Socketed == 1 then --Giant Skull
      return 8
   elseif item.BaseItem == "xhm" and item.Quality == Unique then --Valkyrie Wing
      return 7
   elseif item.BaseItem == "ci0" and item.Quality == Magic then --Magic Circlet
      return 8
   elseif item.BaseItem == "ci1" and item.Quality == Magic then --Magic Coronet
      return 8
   elseif item.BaseItem == "ci2" and item.Quality == Magic then --Magic Tiara
      return 8
   elseif item.BaseItem == "ci3" and item.Quality == Magic then --Magic Diadem
      return 8
   elseif item.BaseItem == "ulc" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Arach's
      return 10
   elseif item.BaseItem == "umc" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Verdungo's
      return 9
   elseif item.BaseItem == "zhb" and item.Quality == Unique and item.Flags.Ethereal == 0 then --TGod's
      return 9
   elseif item.BaseItem == "ztb" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Snowclash
      return 5
   elseif item.BaseItem == "tgl" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Magefist
      return 6
   elseif item.BaseItem == "uvg" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Drac's
      return 9
   elseif item.BaseItem == "uvb" and item.Quality == Unique and item.Flags.Ethereal == 1 then --Sand Treks
      return 10
   elseif item.BaseItem == "xtb" and item.Quality == Unique and item.Flags.Ethereal == 0 then --War Travs
      return 6
   elseif item.BaseItem == "xvb" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Waterwalk
      return 8
   elseif item.BaseItem == "umb" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Marrow's
      return 9
   elseif item.BaseItem == "uhb" and item.Quality == Unique and item.Flags.Ethereal == 0 then --Shadow Dancer
      return 8
   elseif item.BaseItem == "upl" and item.Quality == Unique and item.Flags.Ethereal == 1 then --Arkaine's Valor
      return 7
   elseif item.BaseItem == "uar" and item.Quality == Unique then --Tyrael's Might or Templar's Might
      return 7
   elseif item.BaseItem == "xhn" and item.Quality == Unique and item.Flags.Ethereal == 1 then --Shaftshop
      return 6
   elseif item.BaseItem == "obc" and item.Quality == Unique then --Eschuta's
      return 10
   elseif item.BaseItem == "obf" and item.Quality == Unique then --Death Fathom
      return 10
   elseif item.BaseItem == "7gw" and item.Quality == Unique then --Death Web
      return 10
   elseif item.BaseItem == "6cs" and item.Quality == Unique then --Ondal's Wisdom
      return 8
   elseif item.BaseItem == "6ws" and item.Quality == Unique then --Mang Song's
      return 8
   elseif item.BaseItem == "uit" and item.Quality == Unique then --Stormshield
      return 7
   elseif item.BaseItem == "pa9" and item.Quality == Unique then --HoZ
      return 10
   elseif item.BaseItem == "nef" and item.Quality == Unique then --Darkforce
      return 10
   elseif item.BaseItem == "nea" and item.Quality == Unique then --Homunculus
      return 9
   elseif item.BaseItem == "gld" and item.GoldAmount > 500 then
      return 3
   elseif (item.BaseItem == "uar" or item.BaseItem == "ucl" or item.BaseItem == "uea" or item.BaseItem == "uhn" or item.BaseItem == "ula" or item.BaseItem == "uld" or item.BaseItem == "ult" or item.BaseItem == "ung" or item.BaseItem == "upl" or item.BaseItem == "urs" or item.BaseItem == "uth" or item.BaseItem == "utp" or item.BaseItem == "utu" or item.BaseItem == "uui" or item.BaseItem == "uul") and (item.Quality == Inferior or item.Quality == Normal or item.Quality == Superior or item.Quality == Magic or item.Quality == Rare) then --All Elite Armors (they are to be sold using my sellItem)
      return 2
   elseif item.BaseItem == "7wa" and item.Quality == Superior then --Sup Berserker Axe for runes
      return 6
   elseif item.BaseItem == "7cr" and item.Quality == Superior then --Sup Phase Blade for runes
      return 6
   elseif item.BaseItem == "7gd" and item.Quality == Superior and item.Flags.Ethereal == 1 then --Sup Eth Colossus Blade for runes
      return 7
   elseif item.BaseItem == "utp" and item.Quality == Superior then --Sup Archon Plate for runes
      return 6
   elseif item.BaseItem == "uui" and item.Quality == Superior then --Sup Dusk Shroud for runes
      return 6
   elseif item.BaseItem == "xtp" and item.Quality == Superior then --Sup Mage Plate for runes
      return 6
   elseif item.BaseItem == "ult" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Norm Eth Hellforge Plate for glitching
      return 7
   elseif item.BaseItem == "uth" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Norm Eth Laquered Plate for glitching
      return 7
   elseif item.BaseItem == "uul" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Norm Eth Shadow Plate for glitching
      return 7
   elseif item.BaseItem == "uar" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Norm Eth Sacred Armor for glitching
      return 7
   elseif item.BaseItem == "uit" and item.Quality == Superior then --Sup Monarch for runes
      return 7
   elseif item.BaseItem == "pab" and item.Quality == Superior then --Sup STarge for runes
      return 5
   elseif item.BaseItem == "pac" and item.Quality == Superior then --Sup SRondache for runes
      return 5
   elseif item.BaseItem == "ush" and item.Quality == Superior then --Sup Trolls for runes
      return 5
   elseif item.BaseItem == "7vo" and (item.Quality == Normal or item.Quality == Superior) and item.Flags.Ethereal == 1 then --Eth C Voulge for runes
      return 7
   elseif item.BaseItem == "7pa" and (item.Quality == Normal or item.Quality == Superior) and item.Flags.Ethereal == 1 then --Eth C Axe for runes
      return 7
   elseif item.BaseItem == "pab" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Normal Eth STarge for glitching
      return 8
   elseif item.BaseItem == "pac" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Normal Eth SRondache for glitching
      return 8
   elseif item.BaseItem == "paf" and item.Quality == Normal and item.Flags.Ethereal == 1 and item.Flags.Socketed == 0 then --Normal Eth Vortex for glitching
      return 8
   elseif item.BaseItem == "crs" and item.Quality == Rare and item.Flags.Ethereal == 1 then --Eth Rare Crystal Sword, if upped into a Pb, it can be pretty badass
      return 5
   else
      return 0
   end
end

Syntax Highlighting

[Open in new window]

Author Comments

For Diego/DS

Rating

4.57 / 8
216 Votes