Кормление животного

[pannir]

просто нужно чтобы кидало на животное (Кол.) еды

Code: Select all

Program HungryMob;


Const 
Enemy = $00049B59;	// ИД животного
HungryTime=10000;	// интервал времни кормки
Meat=$09F1;		// тип еды


{$Include 'all.inc'}


Begin
SetARStatus(true);
clearjournal;
while true do
begin
if Connected then
begin
while true do
begin
CheckSave;
MoveItem(findtype(Meat,backpack),1,Enemy,0,0,0);
AddToSystemJournal('Осталось мясо ' + IntToStr(FindFullQuantity));
Wait(HungryTime);
end;
end;
end;
End.

постоянно пишет (System: Some inspecific error when moving item!)

подскажите в чем трабл ?

[drabadan]

просто нужно чтобы кидало на животное (Кол.) еды

Твой скрипт

Code: Select all

Program HungryMob;


Const 
Enemy = $00049B59;	// ИД животного
HungryTime=10000;	// интервал времни кормки
Meat=$09F1;		// тип еды


{$Include 'all.inc'}


Begin
SetARStatus(true);
clearjournal;
while true do
begin
if Connected then
begin
while true do
begin
CheckSave;
MoveItem(findtype(Meat,backpack),1,Enemy,0,0,0);
AddToSystemJournal('Осталось мясо ' + IntToStr(FindFullQuantity));
Wait(HungryTime);
end;
end;
end;
End.

постоянно пишет (System: Some inspecific error when moving item!)

подскажите в чем трабл ?

вероятно Enemy - не контейнер...

Code: Select all

function DropHere(ItemID : Cardinal) : Boolean

[Vizit0r]

или далеко. например, на дистанции 4.
или на другом этаже.
или еда залочена.

или еще что-то.

[pannir]

Code: Select all

findtype(Meat,backpack);
DragItem(finditem,2);
wait(1000);
DropHere(Enemy);

пишет You cannot pick up this item(cannot lift item), ID: $00023C99

[drabadan]

Code: Select all

findtype(Meat,backpack);
DragItem(finditem,2);
wait(1000);
DropHere(Enemy);

пишет You cannot pick up this item(cannot lift item), ID: $00023C99

даже хрен знает... попробуй не на енеми, а просто на землю бросить. Может дело в конячке...

Code: Select all

function DropItem(MoveIntoID : Cardinal; X,Y,Z : Integer) : Boolean

[pannir]

пробовал и dropitem... даже xyz вписывал...
pol95.. если нужно дам сервер...
Животное рядом в дистанции 1 клетка

[pannir]

можно это как то обойти ??

я так понимаю не работает из за того что он не контейнер, нужно чтоб он просто на него кидал еду

[pannir]

вот на injection сделал "работает"

точти экрана вычислил с помощью (uopilot)
UO.Drag(905,379, 417,259, 1)

Code: Select all

sub main()
UO.Set('finddistance','2')
UO.Set('distance','2')
While UO.WEIGHT < 30000
UO.Say("all follow me")
UO.Drag(905,379, 417,259, 1)
wait(3600000)
wend
wend

можно ли чтото подобное на стелсе реализовать ?

[CFA]

pol95..
пробовал и dropitem... даже xyz вписывал...

Попробуй в moveitem в качестве координат куда бросать указать координаты животного. Когда то на pol095 на животных можно было брость итем только так.

[pannir]

что так
MoveItem(findtype($09F1,backpack),1,findtype($006F,ground),2275,1199,0);
что так
MoveItem(findtype($09F1,backpack),1,$IDDDDD,2275,1199,0);

все равно пишет System: Some inspecific error when moving item! (

[Vizit0r]

чара давай, который стоит возле животного, гляну что там да как.

[pannir]

проблема решена..
сорри сам затупил, так как пользуюсь в основном стелсом 3+, в 6+ все работает