Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7
Перемещение итема на НПС
Перемещение итема на НПС
Возможно как-нибудь переместить итем на НПС?
А с чего мне быть уверенным? У меня стелса для проверок, да и УО, уже больше года под рукой нет, так что проверять будешь сам.
Last edited by Edred on 07.02.2008 15:50, edited 1 time in total.
Собственно я так и не понял, что нужно сделать.
Вот скрипт:
Вот скрипт:
Code: Select all
program MoveItem_NPC;
{$Include 'all.inc'}
const
NPC = $0E76;
Items =$1BDD;
Counted = 1;
procedure MoveTM;
var tmp1 : cardinal;
begin
Finddistance := 2;
waitconnection(3000);
if Count(Items) < Counted then exit;
tmp1 := FindType(Items,backpack);
FindType(Items, Backpack);
while (Count(Items) >= Counted) do
begin
WaitConnection(3000);
Addtosystemjournal('Open Conteiners');
wait(1000);
checksave;
MoveItem(tmp1,1,NPC,0,0,0);
Addtosystemjournal('MOVEITEM');
wait(1000);
FindType(Items,backpack);
end;
Addtosystemjournal('NOT_MOVEITEM');
end;
Begin
while true do
begin
Finddistance := 2;
findtype(NPC,ground);
wait(500);
if findcount = 0 then
begin
Addtosystemjournal('NPC NOT_FINED');
end;
if findcount > 0 then
begin
wait(100);
Addtosystemjournal('NPC FINED');
wait(1000);
MoveTM;
end;
end;
End.
Re: Перемещение итема на НПС
Можно. НПС такой же объект как и сундук и яблочный пирог.scf wrote:Возможно как-нибудь переместить итем на НПС?
Подробнее о перемещении объектов тут: http://stealth.od.ua/help.php?item=moveitem
В качестве координат перемещения указывай нулевые.