Скрипт на открывание дверей

Anything and all.

Moderators: Murderator+, Murderator

1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Скрипт на открывание дверей

Post by 1a2a3a4a5a6a »

Нужен скрипт на открывание дверей на расстоянии 3х тайлов. Шард ДРВ.

Пробовал писать следующее:

Code: Select all

sub door()
uo.set('distance', '3')
UO.OpenDoor()
end sub

Но здесь не открывает калитки.

Видел еще нечно подобное, но у калиток несколько типов:

Code: Select all

var Oper() 
var close = '' ; типа закрытой калитки
  uo.set( 'finddistance' , '3' )
  uo.findtype( close, '-1', 'ground' )
       if uo.findcount() == 0 then
          uo.print( 'Рядом нет калиток' )
          return
      endif
    open:
  uo.useobject( 'finditem' )
  wait(600)
    if uo.getgraphic( 'finditem' ) == close then
      goto open
    endif
endsub

Поэтому тоже не подходит.

Если в самих Macro-опциях UO сделать бинд на открывание дверей, то может открыться совершенно ненужная мне дверь, даже если я нахожусь на другом этаже от нее.

Кто что может подсказать?
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Забить все типы калиток в массив и искать в цикле for to
DerMeister сейчас на нейрале!
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

DerMeister =) wrote:Забить все типы калиток в массив и искать в цикле for to

Можно набросочек без типов калиток?
И мне нужно чтобы открывались не только калитки, а все двери. Тогда нужно будет еще и типы всех дверей забивать в массив?
ДРВ
Posts: 121
Joined: 2006-04-14 10:51:44

Post by ДРВ »

Code: Select all

sub door() 
uo.msg('OPEN THE DOOR')
uo.opendoor()
end sub

Хотя хз,мож не то...
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

вместо var close = '' ставь Dim close[] потом перед uo.findtype( close[n], '-1', 'ground' ) ставь For n=1 To 21
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

ДРВ wrote:

Code: Select all

sub door() 
uo.msg('OPEN THE DOOR')
uo.opendoor()
end sub

Хотя хз,мож не то...

Я же в первом посте этот метод описал как не подходящий. :)
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

NMY wrote:вместо var close = '' ставь Dim close[] потом перед uo.findtype( close[n], '-1', 'ground' ) ставь For n=1 To 21

Тогда придется вписывать типы всех дверей во все стороны и во всех положениях.
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

А что, разве у двери тип разный в открыто/закрыто???
DerMeister сейчас на нейрале!
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

DerMeister =) wrote:А что, разве у двери тип разный в открыто/закрыто???


Естественно. Тип = графика (изображение объекта) в вердате. Если изображение открытой/закрытой двери разное (поворот - это тоже изменение графики) - тип разный. Берешь ИнсайдУО и смотришь.

ЗЫ: А функция такая есть в моем скрипте на беггинг. Открывает/закрывает двери. Типы - в массиве.
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

А что такое "ИнсайдУО" и где бы его взять...
ЗЫ: :?: :?: :?:
DerMeister сейчас на нейрале!
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

DerMeister =) wrote:А что такое "ИнсайдУО" и где бы его взять...
ЗЫ: :?: :?: :?:


Брать надо естественно на официальной странице автора, программа-то бесплатная...

http://uo.stratics.com/heptazane/insideuo/index.shtml
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
1a2a3a4a5a6a
Posts: 173
Joined: 2006-02-10 13:26:37

Post by 1a2a3a4a5a6a »

Edred wrote:ЗЫ: А функция такая есть в моем скрипте на беггинг. Открывает/закрывает двери. Типы - в массиве.

Носом меня туда, плиз. :)
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Edred wrote:
DerMeister =) wrote:А что такое "ИнсайдУО" и где бы его взять...
ЗЫ: :?: :?: :?:


Брать надо естественно на официальной странице автора, программа-то бесплатная...

http://uo.stratics.com/heptazane/insideuo/index.shtml


ЭЭЭ, эта шняго написана на дельфях??? Что то мне даже расхотелось её пробовать... :?
DerMeister сейчас на нейрале!
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Дер чтоты против дельфей имеешь???
Тулза очень хорошая и резвая...
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Так так так... ну непонтно как-то где тут тип или тут номер тайла...

http://img521.imageshack.us/img521/4483/10en3.jpg
http://img486.imageshack.us/img486/397/23ah.jpg -кстате, что это за шняга? Я тут недавно такую нашел, но не могу понять что это...

-------------
Вот бля последнего скрина инфо и инфотайл:
ID=0x63C83843 Type=0x3EA2 HXGJXKF Name=
Quantity: 1 Colour: 0x0000 Layer: 0 Has: 0
X=47 Y=105 Z=0 C=0x5E7D99A2 F=0x00

16034 47 105 0

-------------
Всё, извините, разобрался.

ЗЫ: Там просто таких штуки 2 было...
Last edited by DerMeister =) on 2006-06-27 22:15:17, edited 2 times in total.
DerMeister сейчас на нейрале!
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Grin wrote:Дер чтоты против дельфей имеешь???
Тулза очень хорошая и резвая...


АААААААА,... дельфи этож паскаль, а паскаль прошлый век!
DerMeister сейчас на нейрале!
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

С такойже древности...
А про асм вообще забыть стоит?;)
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Grin wrote:С такойже древности...
А про асм вообще забыть стоит?;)

Да тут и разговору нету, ненадёжная штука!
DerMeister сейчас на нейрале!
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

А чего внем не надежного??? Хочешь сказть если т на пишешь код на Cи то он будет на дежен??? А хрен там... Какие руки такие и проги...
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

1a2a3a4a5a6a wrote:Носом меня туда, плиз. :)


Носом куда? Подпись мою видишь? Заходишь в скрипты, берешь скрипт на автобеггинг и смотришь. Если не видишь - идешь по ссылке во второй строке подписи.
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
Post Reply