luizbrt

Todos Macros Em Um Só Lugar!

.



.



Refiller Macros:



.



.



1000 {Pot Reffil} VarSetEx(Total, POTS) VarSet(Potnow) Misc.ItemCountEx(266) VarSub(Total, !Potnow!) HUD.Display(!Total!) Self.Say(hi) Macro.Wait(2000) NPC.Say(trade) NPC.Buy(266, !Total!, 1) Macro.Wait(2000) NPC.Say(bye)) 1000 {ManaPot Reffil} VarSetEx(Total, MPS) VarSet(Potnow) Misc.ItemCountEx(268) VarSub(Total, !Potnow!) HUD.Display(!Total!) Self.Say(hi) Macro.Wait(2000) NPC.Say(trade) NPC.Buy(268, !Total!, 1) Macro.Wait(2000) NPC.Say(bye)) 1000 {Withdraw} VarSetEx(Total, NUMBEROFPOTS) VarSet(Potnow) Misc.ItemCountEx(266) VarSub(Total, !Potnow!) VarMult(Total, 50) HUD.Display(!Total!) Self.Say(hi) Macro.Wait(2000) NPC.Say(withdraw) Macro.Wait(2000) NPC.Say(!Total!) Macro.Wait(2000) NPC.Say(yes)) . War Macros: . . 200 {PushMax} VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z VarSub(Y, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(X, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(Y, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarAdd(Y, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(X, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(X, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(Y, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!)<>1 VarSub(Y, 1) Map.PickUp(3031, -1, 0, !X!, !Y!, !Z!) 200 {Anti Push} VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z Map.HasID(3031, !X!, !Y!, !Z!)<>1 Map.Thrown(3031, 2, !X!, !Y!, !Z!)<>1 . 200 {Cortador de Wild-Insert} Tibia.KeyDown(45) HUD.Display(Para trocar a tecla: http://wiki.bmega.net/doku.php?id=virtual_key_codes) VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z Map.UseOn(3308, 2130, !X!, !Y!, !Z!, 1) . . Support Macros: . . Change weapon if no mana. 1000 {Rod in Hand} Self.Mana>=X Self.Equip.LeftHand(IDROD) 1000 {Sword in Hand} Self.Mana<X Self.Equip.LeftHand(IDSWORD) 10000 {Drop Itens} Misc.ItemCountEx(3578)>=1 Self.Cap<=50 VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z Map.Thrown(3031, -1, !X!, !Y!, !Z!)<>1 Change weapon if no have small stones. 2000 {Equip Stone} Misc.ItemCountEx(1781)>=1 Self.Equip.LeftHand(1781) 2000 {Equip Axe} Misc.ItemCountEx(1781)<1 Self.Equip.LeftHand(3317) Use Soft/Equip BOH if Low/High Mana 1000 {Equip Soft} Self.Mana<=100 Self.Equip.Boots(6529) 1000 {UnEquip Soft/Use BOH} Self.Mana>=500 Self.Equip.Boots(3079) Change Worn Soft Boots/Boh 1000 {Equip BOH} Self.Inventory.Boots=6530 Self.Equip.Boots(3079) Re Use spears quando pouca Munição 1000 {Spear} [/i]Self.Inventory.LeftHand<10[i] Self.Equip.LeftHand(3277) Broken Furtunites 500 {Anti Trap} VarSet(X) Self.X VarSet(Y) Self.Y VarSet(Z) Self.Z Map.UseOn(WEAPON, 2524, !X!, !Y!, !Z!, 1) Safe Spell 2000 {Safe Spell } Self.Mana>=200 Self.Attacking Creatures.Beside>=3 Creatures.PlayersOnScreen=01 Self.Say(exori)



.



.



Se você nao achou o macro desejado pode pedir
.


Credits: Alaskim/Hunger