Скрипт на ресс с бинта (ДРВ)

Ask for help

Moderators: Murderator+, Murderator

Post Reply
Kenny
Posts: 38
Joined: 2005-03-31 19:22:32
Location: +7, 095.
Contact:

Скрипт на ресс с бинта (ДРВ)

Post by Kenny »

Можно ли сделать так, чтобы скрипт сам искал в оруге введенные в скрипт ID друзей, и при нахождении ресал?
То есть не постоянный локатор, а просто скрипт, а-ля универсальная поднималка ...
Слухи о моей смерти сильно преувеличены.
© Марк Твен
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Можно...
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

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

Только я почему-то думаю, что ищем мы - трупы, а новый труп - новый ИД.
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

А мне казалось мы будем искать госта. :lol:
Трупы можно искать на земле (у всех тип одинаковы) а потом тащить серийник.
Если искать госты то там 2 типа "эМ" и "Жо" :lol:
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

I'm wrote:А мне казалось мы будем искать госта. :lol:
Трупы можно искать на земле (у всех тип одинаковы) а потом тащить серийник.
Если искать госты то там 2 типа "эМ" и "Жо" :lol:

Извиняюсь - ступил, просто почему-то подумал что ресают не души, а трупы - не правда ли странно? :twisted: [/code]
Kenny
Posts: 38
Joined: 2005-03-31 19:22:32
Location: +7, 095.
Contact:

Post by Kenny »

Если кто может, замутите скрипт плз (если он не геморный) ...
С одним ID все нормально, там UO.waittargetobject, да UO.Usetype ...
А вот чтоб много искал гостов... Это за гранью моих скудных возможностей ... :cry:
Слухи о моей смерти сильно преувеличены.
© Марк Твен
Beyonder
Expert!
Posts: 388
Joined: 2005-04-23 10:19:43
Contact:

Post by Beyonder »

Не проверял но должно работать. Так как нет рядом ультимы и типы вещей я не знаю, то впиши их сам.

Code: Select all

sub Ress()
var GhostCnt=3
var GhostTypeCnt=1

dim GhostID[100]
dim GhostType[2]

GhostID[0]='0x00000000' # ID чела 1
GhostID[1]='0x10000000' # ID чела 2
GhostID[2]='0x20000000' # ID чела 3
GhostID[3]='0x30000000' # ID чела 4

var GhostType[1]='0x0001' # Первый тип духов
var GhostType[2]='0x0002' # Второй тип духов

UO.set('finddistance',3)

var iID,iType

for iType=0 to GhostTypeCnt
  Uo.FindType(GhostType[iType],-1,'ground')
  while UO.FindCount()>0
    for i=0 to GhostCnt
      if UO.GetSerial('findtype')==GhostID[i] then
        BandageFunction(GhostID[i]) # Функция применения бинтов к духу. Напишешь сам =)
      end if
    next
    Uo.FindType(GhostType[iType],-1,'ground')
  wend
next
end sub


Да и кстати, ID духа и живого чела не отличаються?
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

Beyonder wrote:Не проверял но должно работать. Так как нет рядом ультимы и типы вещей я не знаю, то впиши их сам.

Code: Select all

sub Ress()
var GhostCnt=3
var GhostTypeCnt=1

dim GhostID[100]
dim GhostType[2]

GhostID[0]='0x00000000' # ID чела 1
GhostID[1]='0x10000000' # ID чела 2
GhostID[2]='0x20000000' # ID чела 3
GhostID[3]='0x30000000' # ID чела 4

var GhostType[1]='0x0001' # Первый тип духов
var GhostType[2]='0x0002' # Второй тип духов

UO.set('finddistance',3)

var iID,iType

for iType=0 to GhostTypeCnt
  Uo.FindType(GhostType[iType],-1,'ground')
  while UO.FindCount()>0
    for i=0 to GhostCnt
      if UO.GetSerial('findtype')==GhostID[i] then
        BandageFunction(GhostID[i]) # Функция применения бинтов к духу. Напишешь сам =)
      end if
    next
    Uo.FindType(GhostType[iType],-1,'ground')
  wend
next
end sub


Да и кстати, ID духа и живого чела не отличаються?


Неа неотличаются единственное что меняется это тип такчто лучше ресать госты по нему чисто моё мнение конечно.
Beyonder
Expert!
Posts: 388
Joined: 2005-04-23 10:19:43
Contact:

Post by Beyonder »

Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Beyonder wrote:Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
Почему не выйдет? выйдет.... игнорировать тех духов кто не подошёл по ID а те кто подошёл - ресать, но с игнором обычно крашит клиент по страшному :)
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Beyonder wrote:Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
с чего бы это вдруг? правда TWI придётся включить...
Beyonder
Expert!
Posts: 388
Joined: 2005-04-23 10:19:43
Contact:

Post by Beyonder »

Но у духа каждого чела не постоянный ID. Тоесть если меня убьют, то я не знаю совершенно какой ID дадут моему духу.
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Beyonder wrote:Но у духа каждого чела не постоянный ID. Тоесть если меня убьют, то я не знаю совершенно какой ID дадут моему духу.

uo.getName или как его. Вобщем ищем тип - смотрим имя, если верно - ресаем, если нет - игнорим.
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Sfagnum wrote:
Beyonder wrote:Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
с чего бы это вдруг? правда TWI придётся включить...
TWI можно не включать, от чего крашит - я не знаю, но все макросы связанные с UO.Ignore() & UO.IgnoreReset() особенно при поиске чаров и игноре их... крашит клиент не сразу но крашится...
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Beyonder wrote:Но у духа каждого чела не постоянный ID. Тоесть если меня убьют, то я не знаю совершенно какой ID дадут моему духу.
ммммм, помойму ID останется не изменным...
kostya11
Posts: 32
Joined: 2004-10-28 13:39:41

Post by kostya11 »

takoi negoditsa?

Code: Select all

sub Ress()
var tBandage = '0x0E21'
if UO.Count(tBandage) < 20 then
UO.Print("No Bandages for ress")
return
end if
UO.SetArm('CWeapon')
UO.waittargetobject('laststatus')
UO.UseType(tBandage)
wait(500)
UO.Arm('CWeapon')
end sub
Kenny
Posts: 38
Joined: 2005-03-31 19:22:32
Location: +7, 095.
Contact:

Post by Kenny »

Неа.)
Help, pls. :wink:
Слухи о моей смерти сильно преувеличены.
© Марк Твен
kostya11
Posts: 32
Joined: 2004-10-28 13:39:41

Post by kostya11 »

просто отянуть надо статус и ресай.

а проблема в чём?
Beyonder
Expert!
Posts: 388
Joined: 2005-04-23 10:19:43
Contact:

Post by Beyonder »

Ну а мой на предыдущей странице тоже негодиться?
Post Reply