BBot - The best bot of the world
Portal

Welcome, Guest
You have to register before you can post on our site.

Username
  

Password
  

Search Forums

(Advanced Search)

Forum Statistics
» Members: 42,533
» Latest member: triip
» Forum threads: 21,053
» Forum posts: 108,637

Full Statistics

Online Users
There are currently 8 online users.
» 0 Member(s) | 2 Guest(s)
Applebot, Baidu, Bing, Google, UptimeRobot, Yandex

Latest Threads
Looter by browse field
Forum: Sugestions
Last Post: oskleiver
09-24-2025, 09:05 AM
» Replies: 6
» Views: 4,013
faster reaction to go to ...
Forum: Sugestions
Last Post: jhonnathanmuller
09-23-2025, 02:38 PM
» Replies: 2
» Views: 2,439
Macro Check Supply
Forum: General
Last Post: sieger
09-21-2025, 11:18 PM
» Replies: 7
» Views: 11,533
Kasteria 8.54
Forum: Sugestions
Last Post: rodrigugomes
09-18-2025, 10:54 AM
» Replies: 4
» Views: 4,118
10s "sleep" after start b...
Forum: Sugestions
Last Post: jesusazr25
09-17-2025, 09:55 PM
» Replies: 1
» Views: 2,341
Walkabe or not?
Forum: Sugestions
Last Post: noway23
09-10-2025, 07:17 PM
» Replies: 3
» Views: 3,428
Latest tibia 10 and bbot ...
Forum: General
Last Post: [email protected]
09-09-2025, 05:58 PM
» Replies: 10
» Views: 7,188
variable reconect
Forum: Sugestions
Last Post: [email protected]
09-07-2025, 01:19 PM
» Replies: 12
» Views: 7,866
confidential adult chat r...
Forum: Off-Topic
Last Post: [email protected]
09-03-2025, 04:54 AM
» Replies: 1
» Views: 2,152
@Update 10.61
Forum: General
Last Post: MaudHemi
02-07-2025, 09:47 AM
» Replies: 4
» Views: 3,930

 
  Variables of Opening Corpses for Hexera
Posted by: Kazan - 03-08-2017, 09:20 PM - Forum: Free Scripts - Replies (1)

Hello!
Here you have BEST VARIABLES SETTING for CORPSE OPENING ON HEXERA.NET checked by me

BBot.OpenCorpses.DelayBeforeOpen=1200
BBot.OpenCorpses.NoCorpseTimeout=2000
BBot.OpenCorpses.NormalTimeout=180000
BBot.OpenCorpses.RunTick=1200
BBot.OpenCorpses.TargetDead.Lock=600
BBot.OpenCorpses.WaitLock.NewCorpse=1200
BBot.OpenCorpses.WaitLock.Run=1500

Print this item

  NEW Lure macro
Posted by: Catar - 03-08-2017, 09:13 PM - Forum: Free Scripts - Replies (4)

IM NOT SURE IF IT STILL WORKS ON 82.2+

[spoiler]
If anyone used my OLD lure macro must know,
it based on the command that didn't work properly. (Killer.Stop)
And macro needs to be updated now.

Since beta 81.1, macro command Killer.Stop was fixed, and now clears list/queue of monsters to kill.

The old macro will stop attacking if u kill one of the lured monsters.


I have NEW solution for lure macro.
Change name/s of monster/s of course.

Now there are 3 conditions.


[table=100]
[tr]
[th]
example for One type of monster
[/th]
[th]
multiple monsters
[/th]
[/tr]
[tr]
[td]
[macro]500 {grimtime} Creatures.ByRangeName(5, Grim Reaper)==1 [ad] VarAdd(grimtime, 1) exit() {ad} grimtime:=0 exit() [/macro]
[macro]500 {Lure} grimy:=Creatures.ByRangeName(8, Grim Reaper) ilem:=Creatures.ByRange(5) !ilem!<=!grimy! [poz] !grimy!>=2 [zabij] Killer.Start() HUD.Print(2, 1, 200, 222, 250, 500, Attack) Exit() {zabij} !grimtime!>=4 [zabij2] Killer.Start() HUD.Print(2, 1, 200, 222, 250, 500, Attack) exit() {zabij2} Killer.Stop() HUD.Print(2, 1, 200, 222, 250, 500, Lure) Exit() {poz} Misc.StandTime()>2 Killer.Start() HUD.Print(2, 1, 200, 222, 250, 500, Attack) Exit() [/macro]
[/td]
[td]
[macro]500 {mobtimer} mon1:=Creatures.ByRangeName(8, Crystal Spider) mon2:=Creatures.ByRangeName(8, Ice Golem) mon3:=Creatures.ByRangeName(8, Ice Witch) mon4:=Creatures.ByRangeName(8, Just Put Another Name Here) mons:=!mon1! VarAdd(mons, !mon2!) VarAdd(mons, !mon3!) VarAdd(mons, !mon4!) !mobbs!>=1 [ad] VarAdd(mobtime, 1) exit() {ad} mobtime:=0 exit()[/macro]

[macro]500 {Lure} ilem:=Creatures.ByRange(5) mob1:=Creatures.ByRangeName(8, Crystal Spider) mob2:=Creatures.ByRangeName(8, Ice Golem) mob3:=Creatures.ByRangeName(8, Ice Witch) mob4:=Creatures.ByRangeName(8, Just Put Another Name Here) mobs:=!mob1! VarAdd(mobs, !mob2!) VarAdd(mobs, !mob3!) VarAdd(mobs, !mob4!) !ilem!<=!mobs! [poz] !mobs!>=2 [zabij] Killer.Start() HUD.Print(2, 1, 200, 222, 250, 500, Attack) Exit() {zabij} !mobtime!>=6 [zabij2] Killer.Start() HUD.Print(2, 1, 200, 222, 250, 500, Attack) exit() {zabij2} Killer.Stop() HUD.Print(2, 1, 200, 222, 250, 500, Lure) Exit() {poz} Misc.StandTime()>2 Killer.Start() HUD.Print(2, 1, 200, 222, 250, 500, Attack) Exit()[/macro]
[/td]
[/tr]
[/table]


ALL Hud.Print commands can be deleted, Ionly use them to see what is happening in real time.


CODE for better visibility

500 {lure}
Code:
ilem:=Creatures.ByRange(5)
mob1:=Creatures.ByRangeName(8, Crystal Spider)
mob2:=Creatures.ByRangeName(8, Ice Golem)
mob3:=Creatures.ByRangeName(8, Ice Witch)
mob4:=Creatures.ByRangeName(8, Just Put Another Name Here)
mobs:=!mob1!
VarAdd(mobs, !mob2!)
VarAdd(mobs, !mob3!)
VarAdd(mobs, !mob4!)
!ilem!<=!mobs! [poz]
!mobs!>=2 [zabij]
Killer.Start()
HUD.Print(2, 1, 200, 222, 250, 500, Attack)
Exit()
{zabij}
!mobtime!>=6 [zabij2]
Killer.Start()
HUD.Print(2, 1, 200, 222, 250, 500, Attack)
exit()
{zabij2}
Killer.Stop()
HUD.Print(2, 1, 200, 222, 250, 500, Lure)
Exit()
{poz}
Misc.StandTime()>2
Killer.Start()
HUD.Print(2, 1, 200, 222, 250, 500, Attack)
Exit()

500 {mobtimer}
Code:
mon1:=Creatures.ByRangeName(8, Crystal Spider)
mon2:=Creatures.ByRangeName(8, Ice Golem)
mon3:=Creatures.ByRangeName(8, Ice Witch)
mon4:=Creatures.ByRangeName(8, Just Put Another Name Here)
mons:=!mon1!
VarAdd(mons, !mon2!)
VarAdd(mons, !mon3!)
VarAdd(mons, !mon4!)
!mobbs!>=1 [ad]
VarAdd(mobtime, 1)
exit()
{ad}
mobtime:=0
exit()


Someone please test it and leave feedback,
I modified my macros all in Notepad++, had no way of testing it yet[/spoiler]

Print this item

  Anti-waste haste macro
Posted by: Kazan - 02-21-2017, 06:00 AM - Forum: Free Scripts - Replies (2)

I created anti-waste macro for haste (when you're botting on monsters what have paralyse in attacks, without this your waste is much higher).

I already tested this on Guzzlemaws and it's working perfect. It will start using haste after 8~ secounds since when your character will not have any target.
You just need to put those 2 macros in your script;

500 {Target timer} Self.Attacking()==1 [jest] w8safetarget:=0 exit() {jest} VarAdd(w8safetarget, 1) exit()

500 {antispam haste} rdmhaste:=Misc.Random(12, 16) Self.Mana>=60 Status.Haste==0 !w8safetarget!>=!rdmhaste! Self.Say(utani hur) Exit()

Print this item

  Macro Commands for Follow/Stand, Atk/Balance/Def
Posted by: Catar - 02-13-2017, 07:06 PM - Forum: Free Scripts - Replies (3)

This Macros/Commands work only when your Tibia IS NOT MINMIZED and Health bar, map, Inventory setup looks like below
[table=90]
[tr]
[td]HEALTH BAR BELOW EQ
[Image: rPnPg9N.png][/td]
[td]HEALTH BAR ABOVE EQ
[Image: XsPvv88.png][/td]
[td]HP BELOW MINMIZED EQ
[Image: oUMs2lg.png][/td]
[td]HP ABOVE MINMIZED EQ
[Image: ZuDlWyZ.png][/td]
[/tr]
[tr]
[td]
Stand

Code:
STiW:=Tibia.WindowWidth()
STiH:=134
VarSub(STiW, 16)
Misc.ClickEx(!STiW!, !STiH!)
exit()

Follow
Code:
FTiW:=Tibia.WindowWidth()
FTiH:=152
VarSub(FTiW, 16)
Misc.ClickEx(!FTiW!, !FTiH!)
exit()


Offensive
Code:
OTiW:=Tibia.WindowWidth()
OTiH:=133
VarSub(OTiW, 40)
Misc.ClickEx(!OTiW!, !OTiH!)
exit()


Balanced
Code:
BTiW:=Tibia.WindowWidth()
BTiH:=152
VarSub(BTiW, 40)
Misc.ClickEx(!BTiW!, !BTiH!)
exit()


Defensive
Code:
DTiW:=Tibia.WindowWidth()
DTiH:=174
VarSub(DTiW, 40)
Misc.ClickEx(!DTiW!, !DTiH!)
exit()
[/td]
[td]
Stand
Code:
STiW:=Tibia.WindowWidth()
STiH:=164
VarSub(STiW, 16)
Misc.ClickEx(!STiW!, !STiH!)
exit()

Follow
Code:
FTiW:=Tibia.WindowWidth()
FTiH:=182
VarSub(FTiW, 16)
Misc.ClickEx(!FTiW!, !FTiH!)
exit()


Offensive
Code:
OTiW:=Tibia.WindowWidth()
OTiH:=163
VarSub(OTiW, 40)
Misc.ClickEx(!OTiW!, !OTiH!)
exit()


Balanced
Code:
BTiW:=Tibia.WindowWidth()
BTiH:=182
VarSub(BTiW, 40)
Misc.ClickEx(!BTiW!, !BTiH!)
exit()


Defensive
Code:
DTiW:=Tibia.WindowWidth()
DTiH:=204
VarSub(DTiW, 40)
Misc.ClickEx(!DTiW!, !DTiH!)
exit()
[/td]
[td]
Stand
Code:
STiW:=Tibia.WindowWidth()
STiH:=155
VarSub(STiW, 108)
Misc.ClickEx(!STiW!, !STiH!)
exit()

Follow
Code:
FTiW:=Tibia.WindowWidth()
FTiH:=155
VarSub(FTiW, 85)
Misc.ClickEx(!FTiW!, !FTiH!)
exit()


Offensive
Code:
OTiW:=Tibia.WindowWidth()
OTiH:=133
VarSub(OTiW, 108)
Misc.ClickEx(!OTiW!, !OTiH!)
exit()


Balanced
Code:
BTiW:=Tibia.WindowWidth()
BTiH:=133
VarSub(BTiW, 85)
Misc.ClickEx(!BTiW!, !BTiH!)
exit()


Defensive
Code:
DTiW:=Tibia.WindowWidth()
DTiH:=133
VarSub(DTiW, 68)
Misc.ClickEx(!DTiW!, !DTiH!)
exit()
[/td]
[td]
Stand
Code:
STiW:=Tibia.WindowWidth()
STiH:=185
VarSub(STiW, 108)
Misc.ClickEx(!STiW!, !STiH!)
exit()

Follow
Code:
FTiW:=Tibia.WindowWidth()
FTiH:=185
VarSub(FTiW, 85)
Misc.ClickEx(!FTiW!, !FTiH!)
exit()


Offensive
Code:
OTiW:=Tibia.WindowWidth()
OTiH:=163
VarSub(OTiW, 108)
Misc.ClickEx(!OTiW!, !OTiH!)
exit()


Balanced
Code:
BTiW:=Tibia.WindowWidth()
BTiH:=163
VarSub(BTiW, 85)
Misc.ClickEx(!BTiW!, !BTiH!)
exit()


Defensive
Code:
DTiW:=Tibia.WindowWidth()
DTiH:=163
VarSub(DTiW, 68)
Misc.ClickEx(!DTiW!, !DTiH!)
exit()
[/td]
[/tr]
[/table]




How you gonna use them, is up to You..
This are only parts, that do certain action of clicking in specifiic spot.

Make your own conditions to them.

Print this item

  Upgrade Skripts for my self
Posted by: omishiro - 02-06-2017, 06:25 PM - Forum: Free Scripts - Replies (2)

Hello Big Grin
Yes , again me ^^
I have something for start for all profesion scripts
Test and if you like get Rep ;D
GL & HF ^^



Attached Files
.bbot   MS Tivol Piraty 50+.bbot (Size: 11.09 KB / Downloads: 124)
.bbot   EDMS Tivol Bonebeasts Ramoe.bbot (Size: 10.05 KB / Downloads: 111)
.bbot   EK MinoDarashia+Leather.bbot (Size: 6.42 KB / Downloads: 114)
.bbot   MS Tivol Earth Elementals 35+.bbot (Size: 9.29 KB / Downloads: 112)
.bbot   MS Tivol Nibelor Crystal Spider+Ice Golem.bbot (Size: 15.45 KB / Downloads: 115)
.bbot   EK Tivol Rorc.bbot (Size: 10.03 KB / Downloads: 109)
.bbot   EDMS Tivol Wailing Widow Lancers+FireBug.bbot (Size: 13.21 KB / Downloads: 118)
.bbot   EK Darashia WaspTower.bbot (Size: 1.23 KB / Downloads: 104)
.bbot   EK Tivol zolwie.bbot (Size: 12.24 KB / Downloads: 119)
Print this item