Открывать автоматом двери.

Ask for help

Moderators: Murderator+, Murderator

Post Reply
v038449
Posts: 6
Joined: 2015-03-17 03:42:34

Открывать автоматом двери.

Post by v038449 »

Прошу сильно не пинать, может глупый вопрос.

Но не нашел, как в инжекте - это реализовать?

Неужели скрипт нужно писать.

Скрипты искал, но они очень старые 2008 год - где указывают все типы дверей в закрытом и открытом состоянии :roll:

PS. Просто в разоре, достаточно просто галку поставить.
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Открывать автоматом двери.

Post by Mirage »

хз стоит ли на инжекте такое делать вообще. Хотя может быть чтото типо разорной галки запиликать...
На стелсе это выглядит вот так:

Code: Select all

Program Door;
var
    Door_id : Cardinal;
    i : Integer;
    door_type : array of Word;
    jTimer : TDateTime;
BEGIN
IgnoreReset;
  FindDistance := 1;
  door_type := [$06E9,$06F1,$06F3,$06A9,$06E5,$06E7,$06ED,$06EF,$06A5,$06A7,$06AD,$06AF,$0675,$0677,$067D,$067F,$06DD,$06DF,$06B3,$06B5,$06B7,$06D5,$06D7,$0824,$0826,$0870,$0874,$0866,$0868,$0839,$083B];
  While not Dead do
    begin
      for i := 0 to GetArrayLength(door_type) - 1 do
      if findtype(door_type[i],ground) > 0 then
      begin
         Door_id := FindItem;
         jTimer:= now;
         UseObject(Door_id);
         wait(100);
            if InJournalBetweenTimes('door is locked', jTimer, Now)>0 then
            Ignore(Door_id);
      end;
    end;
end.
Тут двери с 3 городов. Нет металлических ворот (решоток) - ибо иногда заборина ДОЛЖНА быть закрыта ;) По городу бегает ровно - открывает вроде бы все.
v038449
Posts: 6
Joined: 2015-03-17 03:42:34

Re: Открывать автоматом двери.

Post by v038449 »

Mirage wrote:хз стоит ли на инжекте такое делать вообще. Хотя может быть чтото типо разорной галки запиликать...
На стелсе это выглядит вот так:

Code: Select all

Program Door;
var
    Door_id : Cardinal;
    i : Integer;
    door_type : array of Word;
    jTimer : TDateTime;
BEGIN
IgnoreReset;
  FindDistance := 1;
  door_type := [$06E9,$06F1,$06F3,$06A9,$06E5,$06E7,$06ED,$06EF,$06A5,$06A7,$06AD,$06AF,$0675,$0677,$067D,$067F,$06DD,$06DF,$06B3,$06B5,$06B7,$06D5,$06D7,$0824,$0826,$0870,$0874,$0866,$0868,$0839,$083B];
  While not Dead do
    begin
      for i := 0 to GetArrayLength(door_type) - 1 do
      if findtype(door_type[i],ground) > 0 then
      begin
         Door_id := FindItem;
         jTimer:= now;
         UseObject(Door_id);
         wait(100);
            if InJournalBetweenTimes('door is locked', jTimer, Now)>0 then
            Ignore(Door_id);
      end;
    end;
end.
Тут двери с 3 городов. Нет металлических ворот (решоток) - ибо иногда заборина ДОЛЖНА быть закрыта ;) По городу бегает ровно - открывает вроде бы все.



Спасибо попробую. Написал сообщение в ЛС. Глянь пожалуйста.

PS На инже скрипто то будет работать?
Juicy Fruit
Posts: 820
Joined: 2011-06-11 19:54:23

Re: Открывать автоматом двери.

Post by Juicy Fruit »

Нет, для инжекта его нужно переписать.
admir
Posts: 528
Joined: 2005-01-13 07:20:54

Re: Открывать автоматом двери.

Post by admir »

На своем опыте скажу что самый лучший способ это встроенный в клиент макрос ОпенДор.
Нет ступора подвисания при срабатывании, в отличии от стелса и скрипта.
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва
Post Reply