Wersja do druku
Sprobuj tego Skrypt rusza się co 30s gdy postać stoi w miejscu ;]Cytuj:
Królowiec napisał
Cytuj:
Const
SecondsBetweenChecks = 30
while not terminated do
begin
UpdateWorld;
X := Self.X;
Y := Self.Y;
Z := Self.Z;
Sleep(SecondsBetweenChecks*1000);
UpdateWorld;
if (X = Self.X) and (Y = Self.Y) and (Z = Self.Z) then
begin
Self.MoveUp;
sleep(500);
Self.MoveLeft;
Sleep(500);
Self.MoveRight;
Sleep(500);
Self.MoveDown;
end;
end;
Witam.
Nie znalazłem do tej pory szukanego przeze mnie skryptu. Jest nim skrypt "góra, dół". Czyli, że jak zaznacze potworka, wejde na górę i później znowu zejdę na dół to będzie zaznaczony. Zna ktoś takiego skrypta? Byłbym bardzo wdzięczny.
Cytuj:
Koksik napisał
Kod:var
LockID:integer;
function GetCreatureByID(ID: integer): TCreature;
var
x: integer;
begin
Result := nil;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].ID = ID then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
begin
updateworld;
while self.attacking=0 do
begin
sleep(200);
updateworld;
end;
LockID:=self.attacking;
while not terminated do
begin
updateworld;
ProcessEvents;
if ((self.attacking)<>(LockID)) and ((self.attacking)<>(0)) then
LockID:=Self.Attacking;
If Self.Attacking=0 then
begin
Creature:=GetCreatureByID(LockID);
If Creature<>nil then Creature.Attacking:=true;
end;
sleep(100);
end;
end;
Potrzebuje skrypt do ng który alramuje gdy many jest poniżej XX np. poniżej 100.
oraz
Potrzebuje skrypt do BlackdProxy na zbieranie itemkow do baga którego ma ona toczyć ze sobą;p
Mam pytanie i prosbe:
Mogl by mi ktos odpowiedziec gdzie te skrypty wklejac?
2. Prosilbym o takiego skrypta zeby jak bedize miec bp kasy zeby szedl do banku wplacil to i wrocil na expienie?
W blackd proxy wystarczy wpisać Exiva kill XCytuj:
Koksik napisał
Gdzie X to monster/player
Cytuj:
Hylon Tris napisał
Ponawiam moją prośbe ;)
Potrzebuje skrypt do Tibia Auto aby postać sama odnosiła złoto do depo z trolli ab dendriel i oczywiście na nich expiła
czy można zrobić skrypta żeby po seve serva postać wlogowała się i expila dalej
? sorry nie banujcie myślałem pomyliłem datę posta z data rejestracji sorry jestem nowy i proszę o skrypta na same dwarfy :) bez solidow itp.
z strone dalej badz dwie sproboj tegoCytuj:
MatikMatrix napisał
Cytuj:
$mymana$
#number<=#
10000
0
1000
0
exiva testding
jak zrobic w blackdtools aby gold wkladal do bp wyzaczonych przeze mnie i aby jadl z cial
z cial na expie to on chyba zawsze je nie? a z goldem jest tak. musisz te bp do ktorych ma wkladac otworzyc jako pierwsze.
szukam skryptow dla knighta (facc) do zarabiania kasy - bot blackd
ponadto skrypty dla palla depositer i rs buyer :
tortoises ph
dworki ph
laguna island powierzchnia
Potrzebuje depositera do ng ;)
Oraz takiego skrypta, który jak postać bedzie miała X many pojdzie w odpowiednie miejsce i poczeka aż mana dojdzie do poziomu Y.
#Hylon Tris
Depositera mozesz zastapic skryptem do wysylania parceli np. ten:
Kod:
const
FISHID = 3578; ////////// id przedmiotu ktory ma byc wyslany
CAP = 1000; // daj jak najwiecej jak bedziesz moj sposob stosowal
mX = 1030; ////]
mY = 996; ////> wspolzedne obok mailboxa
mZ = 7; ////]
function GoToPos(x,y,z:integer):boolean;
var
i:integer;
begin
return:=false;
self.moveto(x,y,z);
for i:=0 to 10 do
begin
if (self.x=x) and (self.y=y) and (self.z=z) then
begin
return := true;
exit;
end;
sleep(500);
end;
end;
procedure isMailbox;
var
x,y,z:integer;
begin
updateworld;
result:=true;
for x:=0 to 14 do
begin
for y:=0 to 10 do
begin
for z:=0 to screen.tile[x][y].count-1 do
begin
if screen.tile[x][y].item[z].properties.mailbox=true then exit;
end;
end;
end;
result := false;
end;
function findparcel : integer;
var
i:integer;
begin
result := -1;
for i:=0 to self.Containers.Container[0].Count -1 do
if self.containers.container[0].item[i].id = 3503 then result := i;
end;
procedure sendparcel;
var
x,y,z:integer;
begin
for x:=0 to 14 do
begin
for y:=0 to 10 do
begin
for z:=0 to screen.tile[x][y].count-1 do
begin
if screen.tile[x][y].item[z].properties.mailbox=true then
begin
// self.say('X='+inttostr(x)+'; Y='+inttostr(y)+'; Z='+inttostr(z)+'; ID='+inttostr(screen.tile[x][y].item[z].ID));
if findparcel >=0 then
begin
self.containers.container[0].item[findparcel].movetoground(self.x+(x-7),self.y+(y-5),self.z,1);
exit;
end;
end;
end;
end;
end;
end;
var
x,i:integer;
begin
updateworld;
if self.capacity < CAP then
begin
for i:=0 to self.Containers.Container[0].Count -1 do
begin
updateworld;
if self.containers.container[0].item[i].id = FISHID then
begin
if findparcel >-1 then
begin
self.containers.container[0].item[i].movetocontainer(self.containers.container[0],findparcel,0);
sleep(1000);
i:=-1;
end
else begin
self.displaytext('Nie znaleziono parcela!');
exit;
end;
end;
if i >= self.Containers.Container[0].Count -1 then break;
end;
updateworld;
for i:=1 to 5 do
begin
if GoToPos(mX,mY,mZ) then break;
end;
if not isMailBox then
begin
self.displaytext('Nie znaleziono mail boxa!');
exit;
end;
sendparcel;
end;
end;
jak expisz np na trollach w ab to musisz mapke otworzyc przez notatnik, skopowac ja (dajesz tylko kopi w ile uzbiera np pelny bp kasy) potem zalaczasz bota otwierasz ta mapke i na samym koncu mapy dajesz wpt od expowiska do mailboxa potem add>script i ten wysylacz i spowrotem wpt na expowisko ;] [Jak nie bedzie dzialal to usun te depiski]
Ja mam prosbe o skrypt ze gdy 3 potwory na raz mnie bija to ubija jednego z mocniejszej broni zeby bily mnie tylko 2 i gdy sa 2 zaklada slaba bron
oraz takiego: gdy hp spadnie ponizej x% to zamienia bron na mocna i bije z niej az hp odrosnie do yX
Uzywam ng
TY :p
Ja potrzebuje skrypta ktory bedzie expil ze sperami a jak sie skoncza to zmienai na sword i jak wyloci z trolla speara to znowu z nim bedzie expil
i Zeby atakowal potwora jesli ma 50 %