BBot - The best bot of the world

Full Version: Is the ability to do something like this?
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
is the ability to do something like this?
Quote:X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
Map.Use(4236, !X!, !Y!-1, !Z!, 0)
Map.Use(4236, !X!-1, !Y!, !Z!, 0)
Map.Use(4236, !X!+1, !Y!, !Z!, 0)
Map.Use(4236, !X!, !Y!+1, !Z!, 0)
Map.Use(4236, !X!+1, !Y!+1, !Z!, 0)
I gave no trick and looks like this:
Quote: X+1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarAdd(X, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote: Y+1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarAdd(Y, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote: Y-1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarSub(Y, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote: X-1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarSub(X, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote: X+1 Y+1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarAdd(X, 1)
VarAdd(Y, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote:X+1 Y-1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarAdd(X, 1)
VarSub(Y, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote:X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarSub(X, 1)
VarAdd(Y, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)
Quote: X-1 Y-1
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
VarSub(X, 1)
VarSub(Y, 1)
Map.Use(2792, !X!, !Y!, !Z!, 0)

Big GrinCoolCoolBig Grin

All of adding:
Quote:X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
DedOpen:=2792
VarAdd(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarSub(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarSub(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(X, 1)
VarSub(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarSub(Y, 1)
VarSub(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(Y, 1)
VarSub(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(X, 1)
VarAdd(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
What do u wanna do exactly in game ?
Id opening around the character
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
DedOpen:=2792
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 3)

set automatic and should be good :S
check cuz ded after kill changing id after 10 sec
this macro just open only one.
He must work as looter
cannot work cuz cavebot will go away from mob.
and macro.wait stopping the looter operation.
I also tried do it
Use:

Cavebot.Stop()

Cavebot.Start()

like this:

1
Quote:auto 500
Creatures.ByRangeName(5, Rat)>=3
Cavebot.Stop()

2
Quote:auto 500
X:=Self.X()
Y:=Self.Y()
Z:=Self.Z()
DedOpen:=2792
VarAdd(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarSub(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarSub(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(X, 1)
VarSub(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarSub(Y, 1)
VarSub(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(Y, 1)
VarSub(X, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Macro.Wait(500)
VarAdd(X, 1)
VarAdd(Y, 1)
Map.Use(!DedOpen!, !X!, !Y!, !Z!, 0)
Cavebot.Start()