Macro HUD loot/gasto/Lucro

[careca66]

Estou postando aqui pra quem ainda não tem e quer um

Só altera o que esta em vermelho:

#ITEMS
goldCoin:=Misc.ItemCountEx(3031)
goldCoinValue:=1
VarMult(goldCoin, !goldCoinValue!)

Qntitem1:=Misc.ItemCountEx(10275)
item1:=Misc.ItemCountEx(10275)
item1Value:=35
VarMult(item1, !item1Value!)

Qntitem2:=Misc.ItemCountEx(9692)
item2:=Misc.ItemCountEx(9692)
item2Value:=10
VarMult(item2, !item2Value!)


profitItems:=0
VarAdd(profitItems, !goldCoin!)
VarAdd(profitItems, !item1!)
VarAdd(profitItems, !item2!)

#POTIONS
manaPotion:=30
manaPotionNow:=Misc.ItemCountEx(268)
manaPotionValue:=50
VarSub(manaPotion, !manaPotionNow!)
manaPotionGP:=!manaPotion!
VarMult(manaPotionGP, !manaPotionValue!)

profitPotions:=0
VarAdd(profitPotions, !manaPotionGP!)

#HUD ITEMS
HUD.Setup(1, 0, 255, 255, 0)
HUD.Display()
HUD.Setup(1, 0, 106, 106, 255)
HUD.Display(ITEMS LOOTED)
HUD.Setup(1, 0, 183, 183, 183)
HUD.Display(Gold Coin: !goldCoin!)
HUD.Display(Carrion Fang: !Qntitem1! (!item1!gp))
HUD.Display(Lumps of dirt: !Qntitem1! (!item2!gp))

#HUD POTIONS
HUD.Setup(1, 0, 255, 255, 255)
HUD.Display()
HUD.Setup(1, 0, 106, 106, 255)
HUD.Display(SUPPLIES USED)
HUD.Setup(1, 0, 183, 183, 183)
HUD.Display(Mana Potion: !manaPotion! (!manaPotionGP! gp))

#PRINT PROFIT TOTAL HUNT
profitTotal:=0
VarAdd(profitTotal, !profitItems!)
VarSub(profitTotal, !profitPotions!)
HUD.Display()
HUD.Setup(1, 0, 255, 0, 0)
HUD.Display(GASTO !profitPotions!)
HUD.Setup(1, 0, 0, 255, 0)
HUD.Display(LUCRO !profitTotal! gp)
HUD.Display()
HUD.Display()

Qualquer duvida deixa um post aqui que estou sempre olhando ou ADM responde