Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Skrypt wyrzucanie Empty, skórki obsidian knife XENOBOT

speedyfighter

Przez speedyfighter
w Tibia

Rekomendowane odpowiedzi

michubak Pomocnik

michubak

Opublikowano
Pomocnik

michubak

Opublikowano

empty  czyli chodziło mu pozostałosci po potkach np. empty mana potion cos takiego ( nie znam dokładnej nazwy ani id)

Messpe - RL - PL - ANTICA - :) + 180


I pamiętaj jedno. Na tym świecie zawsze była,
jest i będzie w cenie tandeta,
Więc czym my się mamy przejmować...

O.S.T.R. & Marco Polo "Żywy lub martwy" feat. DJ Haem

JestemPolakiem Bywalec

JestemPolakiem

Opublikowano
Bywalec

JestemPolakiem

Opublikowano

empty mana potion ? przecież zużyta miksturka many i życia łączą się, więc empty flask.

Empty flask - 

while (true) do 
    Self.DropFlasks(Self.Position().x, Self.Position().y, Self.Position().z)
    wait(17000, 22000) 
end

qxv1fr.jpg


by NovusOrdo


It is better to keep your mouth closed and let people think you are a fool than to open it and remove all doubt. ~Mark Twain

michubak Pomocnik

michubak

Opublikowano
Pomocnik

michubak

Opublikowano

a na obsidian knife ma ktoś taki skrypt ? 

Messpe - RL - PL - ANTICA - :) + 180


I pamiętaj jedno. Na tym świecie zawsze była,
jest i będzie w cenie tandeta,
Więc czym my się mamy przejmować...

O.S.T.R. & Marco Polo "Żywy lub martwy" feat. DJ Haem

  • 4 tygodnie później...
  • 2 miesiące temu...
szeldo123 Rekrut

szeldo123

Opublikowano
Rekrut

szeldo123

Opublikowano

xenobot skinowanie

---------- Extra Information --------
-- Body IDs
-- 4011     -- Minotaur
-- 4047     -- Minotaur Mage
-- 4052     -- Minotaur Archer
-- 4057     -- Minotaur Guard
-- 4062     -- Dragon Lord
-- 4112     -- Behemoth
-- 4212     -- Bonebeast
-- 4321     -- Lizard Templar
-- 4324     -- Lizard Sentinel
-- 4327     -- Lizard Snakecharmer
-- 10352    -- Lizard High Guard
-- 10356    -- Lizard Legionnaire
-- 10360    -- Lizard Dragon Priest
-- 10364    -- Lizard Zaogun
-- 10368    -- Lizard Chosen




local knifeID = 5908
local corpseID = {4011,4047,4052,4057,4062,4112,4212,4321,4324,4327,10352,10356,10360,10364,10368}
local num = 0


while true do
dofile("Forgee.lua")
    if (#Self.GetTargets(7) < 1) then
        for x = -7, 7 do
            for y = -5, 5 do
                local item = Map.GetTopUseItem(Self.Position().x + x, Self.Position().y + y, Self.Position().z)
                if table.find(corpseID, item.id) then
                        setBotEnabled(false)
                        Self.UseItemWithGround(knifeID, Self.Position().x + x, Self.Position().y + y, Self.Position().z)
                        wait(800, 2200)
                        setBotEnabled(true)
                    break
                end
            end
        end
    end
sleep(500)
end

tibia auto skinowanie

const 
obsidian_knife = 5908; 
skin_body = [4011, 4047, 4052, 4057]; 

function searchIntArray(id:integer): boolean; 
var 
i: integer; 
begin 
result := false; 
for i := low(skin_body) to high(skin_body) do begin 
if skin_body[i] = id then result := true; 
end; 
end; 

function GetItemFromOpenBackpack(ID: integer): TItem; 
var 
y: integer; 
begin 
Result := nil; 
for x := 0 to Self.Containers.Count - 1 do 
begin 
if x >= Self.Containers.Count then Break; 
for y := 0 to Self.Containers.Container[x].Count - 1 do 
begin 
if y >= Self.Containers.Container[x].Count then Break; 
if Self.Containers.Container[x].Item[y].ID = ID then 
begin 
Result := Self.Containers.Container[x].Item[y]; 
Exit; 
end; 
end; 
end; 
end; 

function SkinBodies(id:integer): Boolean; 
var 
x, y: integer; 
knife: TItem; 
t: integer; 
begin 
UpdateWorld; 
knife := GetItemFromOpenBackpack(obsidian_knife); 
if knife = nil then 
begin 
Self.DisplayText('An Obsidian Knife could not be found, please open a container with it.'); 
exit; 
end; 
t := -1; 
for x := -1 to 1 do begin 
for y := -1 to 1 do begin 
// if Screen.Tile[7+x, 5+y].Count >= 3 then begin 
// t := -2 
// end else t := -1; 
if searchIntArray(Screen.Tile[7+x, 5+y].Item[Screen.Tile[7+x, 5+y].Count+t].ID) = true then begin 
UpdateWorld; 
knife := GetItemFromOpenBackpack(obsidian_knife); 
if knife <> nil then begin 
knife.UseWithGround(Self.X+X, Self.Y+Y, Self.Z); 
Self.DisplayText('Attempted to skin a creature with the ID ' + IntToStr(Screen.Tile[7+x, 5+y].Item[Screen.Tile[7+x, 5+y].Count-1].ID) + '.'); 
Sleep(100); 
UpdateWorld; 
end; 
end; 
end; 
end; 
end; 

begin 
while not terminated do begin 
UpdateWorld; 
SkinBodies(skin_body); 
Sleep(100); 
end; 
end;
  • 8 miesięcy temu...
ganar24 Bywalec

ganar24

Opublikowano
Bywalec

ganar24

Opublikowano

w folderze C:\Users\XXXX\Documents\XenoBot\Scripts tworzysz nowy plik  .lua i zapisujesz w nim podany kod 

w bocie wchodzisz w skrypter wybierasz ten plik co zrobiles i wciskasz execute skrypt i gotowe 

HDD1SRE.png                            

  

  • 2 miesiące temu...
Settler Rekrut

Settler

Opublikowano
Rekrut

Settler

Opublikowano

 

xenobot skinowanie

---------- Extra Information --------
-- Body IDs
-- 4011     -- Minotaur
-- 4047     -- Minotaur Mage
-- 4052     -- Minotaur Archer
-- 4057     -- Minotaur Guard
-- 4062     -- Dragon Lord
-- 4112     -- Behemoth
-- 4212     -- Bonebeast
-- 4321     -- Lizard Templar
-- 4324     -- Lizard Sentinel
-- 4327     -- Lizard Snakecharmer
-- 10352    -- Lizard High Guard
-- 10356    -- Lizard Legionnaire
-- 10360    -- Lizard Dragon Priest
-- 10364    -- Lizard Zaogun
-- 10368    -- Lizard Chosen




local knifeID = 5908
local corpseID = {4011,4047,4052,4057,4062,4112,4212,4321,4324,4327,10352,10356,10360,10364,10368}
local num = 0


while true do
dofile("Forgee.lua")
    if (#Self.GetTargets(7) < 1) then
        for x = -7, 7 do
            for y = -5, 5 do
                local item = Map.GetTopUseItem(Self.Position().x + x, Self.Position().y + y, Self.Position().z)
                if table.find(corpseID, item.id) then
                        setBotEnabled(false)
                        Self.UseItemWithGround(knifeID, Self.Position().x + x, Self.Position().y + y, Self.Position().z)
                        wait(800, 2200)
                        setBotEnabled(true)
                    break
                end
            end
        end
    end
sleep(500)
end

tibia auto skinowanie

const 
obsidian_knife = 5908; 
skin_body = [4011, 4047, 4052, 4057]; 

function searchIntArray(id:integer): boolean; 
var 
i: integer; 
begin 
result := false; 
for i := low(skin_body) to high(skin_body) do begin 
if skin_body[i] = id then result := true; 
end; 
end; 

function GetItemFromOpenBackpack(ID: integer): TItem; 
var 
y: integer; 
begin 
Result := nil; 
for x := 0 to Self.Containers.Count - 1 do 
begin 
if x >= Self.Containers.Count then Break; 
for y := 0 to Self.Containers.Container[x].Count - 1 do 
begin 
if y >= Self.Containers.Container[x].Count then Break; 
if Self.Containers.Container[x].Item[y].ID = ID then 
begin 
Result := Self.Containers.Container[x].Item[y]; 
Exit; 
end; 
end; 
end; 
end; 

function SkinBodies(id:integer): Boolean; 
var 
x, y: integer; 
knife: TItem; 
t: integer; 
begin 
UpdateWorld; 
knife := GetItemFromOpenBackpack(obsidian_knife); 
if knife = nil then 
begin 
Self.DisplayText('An Obsidian Knife could not be found, please open a container with it.'); 
exit; 
end; 
t := -1; 
for x := -1 to 1 do begin 
for y := -1 to 1 do begin 
// if Screen.Tile[7+x, 5+y].Count >= 3 then begin 
// t := -2 
// end else t := -1; 
if searchIntArray(Screen.Tile[7+x, 5+y].Item[Screen.Tile[7+x, 5+y].Count+t].ID) = true then begin 
UpdateWorld; 
knife := GetItemFromOpenBackpack(obsidian_knife); 
if knife <> nil then begin 
knife.UseWithGround(Self.X+X, Self.Y+Y, Self.Z); 
Self.DisplayText('Attempted to skin a creature with the ID ' + IntToStr(Screen.Tile[7+x, 5+y].Item[Screen.Tile[7+x, 5+y].Count-1].ID) + '.'); 
Sleep(100); 
UpdateWorld; 
end; 
end; 
end; 
end; 
end; 

begin 
while not terminated do begin 
UpdateWorld; 
SkinBodies(skin_body); 
Sleep(100); 
end; 
end;

Jeśli chodzi o skinowanie w xenobie, omija bardzo duzo ciał, albo proboje zeskinowac a walker mu na to nie pozwala i wychodzi na to ze przez chwile w kolo chodzi.

bobek21lw Nowicjusz

bobek21lw

Opublikowano
Nowicjusz

bobek21lw

Opublikowano

Mi w ogóle skrypt nie chce się wczytać głownie chodzi mi o skinnowanie behemotów 

to powinno być tak : 

 

 if (#Self.GetTargets(7) < 1) then
        for x = -7, 7 do
            for y = -5, 5 do
                local item = Map.GetTopUseItem(Self.Position().x + x, Self.Position().y + y, Self.Position().z)
                if table.find(4112, 5908) then
                        setBotEnabled(false)
                        Self.UseItemWithGround(knifeID, Self.Position().x + x, Self.Position().y + y, Self.Position().z)
                        wait(800, 2200)
                        setBotEnabled(true)
                    break
                end
            end
        end
    end
sleep(500)
end

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...