Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Перемещение итема на НПС

тут можно задать вопрос по скриптингу
Post Reply
scf
Neophyte
Neophyte
Posts: 20
Joined: 06.02.2008 11:56

Перемещение итема на НПС

Post by scf »

Возможно как-нибудь переместить итем на НПС?
Edred
Moderator
Moderator
Posts: 559
Joined: 28.03.2006 21:29

Post by Edred »

Наверняка. Надо просто пробовать. Ты пробовал? Наверняка НПС при таком перемещении можно использовать просто как приемный контейнер...
KaToK
Neophyte
Neophyte
Posts: 40
Joined: 31.01.2008 22:40
Contact:

Post by KaToK »

Edred wrote:Наверняка. Надо просто пробовать. Ты пробовал? Наверняка НПС при таком перемещении можно использовать просто как приемный контейнер...
странно что у тебя тон какой-то неуверенный :)

итем в/на серийник неписи. (не контейнера неписи а серийник ее)
Edred
Moderator
Moderator
Posts: 559
Joined: 28.03.2006 21:29

Post by Edred »

А с чего мне быть уверенным? У меня стелса для проверок, да и УО, уже больше года под рукой нет, так что проверять будешь сам.
Last edited by Edred on 07.02.2008 15:50, edited 1 time in total.
scf
Neophyte
Neophyte
Posts: 20
Joined: 06.02.2008 11:56

Post by scf »

Собственно я так и не понял, что нужно сделать.
Вот скрипт:

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.

scf
Neophyte
Neophyte
Posts: 20
Joined: 06.02.2008 11:56

Post by scf »

По ID итем перемещяется.
Как получиться этот айди при поиске по типу?
AGRS
Neophyte
Neophyte
Posts: 15
Joined: 04.02.2008 17:13
Contact:

Re: Перемещение итема на НПС

Post by AGRS »

scf wrote:Возможно как-нибудь переместить итем на НПС?
Можно. НПС такой же объект как и сундук и яблочный пирог.

Подробнее о перемещении объектов тут: http://stealth.od.ua/help.php?item=moveitem

В качестве координат перемещения указывай нулевые.
scf
Neophyte
Neophyte
Posts: 20
Joined: 06.02.2008 11:56

Post by scf »

Разобрался. Спасибо за помощь :)
Post Reply