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,052
» Forum posts: 108,626

Full Statistics

Online Users
There are currently 7 online users.
» 0 Member(s) | 1 Guest(s)
Applebot, Bing, DuckDuckGo, Google, UptimeRobot, Yandex

Latest Threads
@Update 10.61
Forum: General
Last Post: MaudHemi
02-07-2025, 09:47 AM
» Replies: 4
» Views: 2,226
Downloadlink defekt?
Forum: General
Last Post: [email protected]
02-07-2025, 08:23 AM
» Replies: 2
» Views: 1,272
Ezodus scripts
Forum: General
Last Post: luis226
02-06-2025, 09:30 PM
» Replies: 2
» Views: 2,061
How to add id item to scr...
Forum: General
Last Post: Cloudjf
02-04-2025, 03:51 AM
» Replies: 5
» Views: 2,526
Bbot don't working
Forum: General
Last Post: [email protected]
02-03-2025, 10:56 PM
» Replies: 1
» Views: 1,469
Real Tbia BBOT
Forum: General
Last Post: artista
02-02-2025, 12:52 PM
» Replies: 4
» Views: 3,954
Variables
Forum: General
Last Post: artista
02-01-2025, 11:02 PM
» Replies: 2
» Views: 1,623
framerat limit
Forum: General
Last Post: Malinowamamba
01-30-2025, 03:58 PM
» Replies: 2
» Views: 2,262
Help-me Bmega / Computer ...
Forum: General
Last Post: FabioPuniisher
01-27-2025, 02:06 PM
» Replies: 5
» Views: 3,253
otion or exhaustion bug,
Forum: General
Last Post: erickpdl
01-27-2025, 12:35 AM
» Replies: 3
» Views: 1,308

 
  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: 95)
.bbot   EDMS Tivol Bonebeasts Ramoe.bbot (Size: 10.05 KB / Downloads: 90)
.bbot   EK MinoDarashia+Leather.bbot (Size: 6.42 KB / Downloads: 89)
.bbot   MS Tivol Earth Elementals 35+.bbot (Size: 9.29 KB / Downloads: 88)
.bbot   MS Tivol Nibelor Crystal Spider+Ice Golem.bbot (Size: 15.45 KB / Downloads: 90)
.bbot   EK Tivol Rorc.bbot (Size: 10.03 KB / Downloads: 79)
.bbot   EDMS Tivol Wailing Widow Lancers+FireBug.bbot (Size: 13.21 KB / Downloads: 90)
.bbot   EK Darashia WaspTower.bbot (Size: 1.23 KB / Downloads: 76)
.bbot   EK Tivol zolwie.bbot (Size: 12.24 KB / Downloads: 93)
Print this item