Welcome, Guest |
You have to register before you can post on our site.
|
Forum Statistics |
» Members: 42,533
» Latest member: triip
» Forum threads: 20,984
» Forum posts: 108,484
Full Statistics
|
Online Users |
There are currently 5 online users. » 0 Member(s) | 1 Guest(s) Bing, Google, UptimeRobot, Yandex
|
Latest Threads |
Update
Forum: General
Last Post: jimmytox23
04-05-2024, 02:37 PM
» Replies: 11
» Views: 4,437
|
Help-me Bmega / Computer ...
Forum: General
Last Post: Cloudjf
04-02-2024, 06:48 PM
» Replies: 4
» Views: 2,457
|
BOT Update 23/09/2023 13:...
Forum: Support & Help
Last Post: Samuel157
09-23-2023, 04:33 PM
» Replies: 0
» Views: 5,046
|
How To Loot Everything
Forum: Free Scripts
Last Post: Ramonxx
03-17-2023, 08:47 AM
» Replies: 0
» Views: 8,822
|
tibia 8.6 selling loot
Forum: Support & Help
Last Post: kicko99
03-05-2023, 09:59 PM
» Replies: 1
» Views: 1,013
|
★ LЭØ Scripts ★ Ezodus & ...
Forum: Paid Scripts
Last Post: erleo
02-28-2023, 04:20 PM
» Replies: 216
» Views: 214,726
|
Lvl 200 Summon Macro
Forum: Free Scripts
Last Post: [email protected]
01-20-2023, 12:43 AM
» Replies: 0
» Views: 3,840
|
@pump_upp - best crypto p...
Forum: Off-Topic
Last Post: shreekpila
01-13-2023, 08:17 AM
» Replies: 0
» Views: 864
|
Verifpro.net - paypal, eb...
Forum: Off-Topic
Last Post: shreekpila
01-11-2023, 04:05 PM
» Replies: 0
» Views: 374
|
Self.equipe (MACRO)
Forum: Support & Help
Last Post: Rodrigo Iorio
12-26-2022, 01:13 PM
» Replies: 0
» Views: 1,239
|
|
|
Move items in backpack |
Posted by: Rinus - 11-29-2018, 02:49 PM - Forum: Free Scripts
- Replies (1)
|
|
Since in my experience it is not possible to stack backpacks with mana potions i made these macro's. After buying mana's the will sort them into other backpacks.
#Moves potion from backpack 0 to backpack 2#
Container.Item.ID(0, 0)==268 (checks if first slot of backpack 0 is item ID 268)
Container.Item.ID(1, 19)==0 (checks if last slot of backpack 1 is item ID 268)
Container.Item.Move(0, 0, 1, 100) (moves item of first slot of first backpack to second backpack)
#Moves potion from backpack 0 to backpack 3# (for second backpack mana)
"Move mana 2"
Container.Item.ID(1, 19)==268
Container.Item.ID(0, 0)==268
Container.Item.Move(0, 0, 2, 100)
I have not found anyone using these macro commands here so i hope people find this usefull.
|
|
|
Switching whole EQ set with Hotkey |
Posted by: Catar - 11-27-2018, 09:25 PM - Forum: Free Scripts
- Replies (5)
|
|
Okay,
We made it, I mean, Mega did most of work with new macros and strings.
So this consists of 2 macros and bunch of Variables, that will allow you to save and change between different equipment sets (default key is - minus), for example, set for Haste, or set for certain resistance.
And you can have as many sets as you want.
All you need to do is set your variables
Following CODE below is just an example.
X_Name=Name your set (string variable)
X_itemslot=put ID of unequipped (in backpack)
X_itemslotOn= put ID of item Equipped (example active soft boots, check item set 3 in example variables)
X_Color_R,G,B= use for changing colors RGB of text displaying on screen for each set
In # Configuration - Advanced you can add extra slots you want to change,
like SetChanger_5=Ring, then add this item to the set like X_Ring=...ID...
(where X stands for set number)
Code: #Set - 1
1_Name=Main Set
1_Helmet=10385
1_Armor=11686
1_Legs=10387
1_Ammo=9596
1_Boots=4033
1_Color_R=93
1_Color_G=0
1_Color_B=253
#Set - 2
2_Name=Set Number Two
2_Helmet=5917
2_Armor=3567
2_Legs=14087
2_Ammo=3003
2_Boots=3079
2_Color_R=18
2_Color_G=196
2_Color_B=232
#Set - 3
3_Name=Set Number Three
3_Helmet=3369
3_Armor=3381
3_Legs=3364
3_Ammo=3449
3_Boots=6529
3_BootsOn=3549
3_Color_R=18
3_Color_G=245
3_Color_B=253
# Configuration - Advanced
SetChanger_0=Helmet
SetChanger_1=Armor
SetChanger_2=Legs
SetChanger_3=Ammo
SetChanger_4=Boots
Copy and don't mess with these two macros.
[macro]100 {Change EQ - Wearer} Cooldown.UnBlocked(StopChanging)==:True VarAdd(SlotIndex, 1) HasVar(SetChanger_!SlotIndex)==:False [Do the change] SlotIndex:=0 {Do the change} Str.Copy(SetChanger_!SlotIndex, Slot) ID:=VarGet(!SetType_!Slot) HasVar(!SetType_!SlotOn)==:True [Has a OnId] IDOn:=VarGet(!SetType_!SlotOn) GoLabel(Change Slot) {Has a OnId} IDOn:=!ID {Change slot} Self.Inventory.ID(!Slot)<>!IDOn Self.Equip(!Slot, !ID)[/macro]
[macro]70 {Change EQ - Key Listener} Tibia.KeyDown(:K_SUBTRACT)==1 [EquipChange] Cooldown.Blocked(CDkey)==0 Cooldown.Create(CDkey, 600) VarAdd(SetType, 1) HasVar(!SetType!_Helmet)==:False [Ok] SetType:=1 {Ok} Str.Copy(!SetType!_Name, SetName) Str.Copy(!SetType!_Color, Color) Color_R:=VarGet(!SetType!_Color_R) Color_G:=VarGet(!SetType!_Color_G) Color_B:=VarGet(!SetType!_Color_B) HUD.Print(:HRight, :VTop, !Color_R, !Color_G, !Color_B, 1000, !SetName) Cooldown.Create(StopChanging, 2000) [/macro]
|
|
|
Wand of Darkness macro |
Posted by: Catar - 03-25-2018, 05:17 PM - Forum: Free Scripts
- Replies (3)
|
|
Macro only for servers that have following item and spell
Exception is, on ots I made this macro for item has duration 15 minutes instead of 250 shots.
in 82.6 or lower version of bbot requires adding item to BBot.Items.txt
copy and paste this at the bottom of the file
Code: 25760,1,3200,0,0,wand of darkness
There are 3 macros working together
Spell Wand - uses skill 15 minutes after Wand of Darkness disappeared
Equip Wands - puts on WoD when avaiable, or your normal wand if not
DW Timer - shows cooldown on exevo gran mort
Put into variables wand you normally using, example:
Macros:
[macro]500 {Spell Wand} DWand:=25760 LHand:=Self.Inventory.ID(LeftHand) !LHand==!DWand [blc] Cooldown.Create(SpellCD, 900000) {blc} Cooldown.Blocked(SpellCD)==0 Self.Mana()>=250 Self.Say(exevo gran mort) exit() [/macro]
[macro]50 {Equip Wands} DWand:=25760 LHand:=Self.Inventory.ID(LeftHand) Misc.ItemCountEx(!DWand)>=1 [nodark] !LHand<>!DWand Self.Equip.LeftHand(!DWand) exit() {nodark} !LHand<>!NormalWand Self.Equip.LeftHand(!NormalWand) exit() [/macro]
[macro]1000 {DW Timer} remainDW:=Cooldown.Rest(SpellCD) !remainDW<=894000 VarDiv(remainDW, 1000) remainDWm:=!remainDW remainDWs:=!remainDW remainDWm:=!remainDWs VarDiv(remainDWm, 60) VarMod(remainDWs, 60) !remainDWs>10 [1] HUD.Print(2, 1, 10, 150, 100, 1070, Next Wand of Darkness in !remainDWm : !remainDWs) exit() {1} HUD.Print(2, 1, 10, 150, 100, 1070, Next Wand of Darkness in !remainDWm : 0!remainDWs) exit() [/macro]
[spoiler]
CODES
Code: variable
NormalWand:=8092
500 {Spell Wand}
DWand:=25760
LHand:=Self.Inventory.ID(LeftHand)
!LHand==!DWand [blc]
Cooldown.Create(SpellCD, 900000)
{blc}
Cooldown.Blocked(SpellCD)==0
Self.Mana()>=250
Self.Say(exevo gran mort)
exit()
50 {Equip Wands}
DWand:=25760
LHand:=Self.Inventory.ID(LeftHand)
Misc.ItemCountEx(!DWand)>=1 [nodark]
!LHand<>!DWand
Self.Equip.LeftHand(!DWand)
exit()
{nodark}
!LHand<>!NormalWand
Self.Equip.LeftHand(!NormalWand)
exit()
1000 {DW Timer}
remainDW:=Cooldown.Rest(SpellCD)
!remainDW<=894000
VarDiv(remainDW, 1000)
remainDWm:=!remainDW
remainDWs:=!remainDW
remainDWm:=!remainDWs
VarDiv(remainDWm, 60)
VarMod(remainDWs, 60)
!remainDWs>10 [1]
HUD.Print(2, 1, 10, 150, 100, 1070, Next Wand of Darkness in !remainDWm : !remainDWs)
exit()
{1}
HUD.Print(2, 1, 10, 150, 100, 1070, Next Wand of Darkness in !remainDWm : 0!remainDWs)
exit()
[/spoiler]
|
|
|
|