02-01-2013, 04:26 PM
Estou postando aqui pra quem ainda não tem e quer um
Só altera o que esta em vermelho:
Qualquer duvida deixa um post aqui que estou sempre olhando ou ADM responde
Só altera o que esta em vermelho:
Quote:#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