I'm wrote:А мне казалось мы будем искать госта.
Трупы можно искать на земле (у всех тип одинаковы) а потом тащить серийник.
Если искать госты то там 2 типа "эМ" и "Жо"
[/code]
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
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 духа и живого чела не отличаються?
Почему не выйдет? выйдет.... игнорировать тех духов кто не подошёл по ID а те кто подошёл - ресать, но с игнором обычно крашит клиент по страшномуBeyonder wrote:Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
с чего бы это вдруг? правда TWI придётся включить...Beyonder wrote:Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
Beyonder wrote:Но у духа каждого чела не постоянный ID. Тоесть если меня убьют, то я не знаю совершенно какой ID дадут моему духу.
TWI можно не включать, от чего крашит - я не знаю, но все макросы связанные с UO.Ignore() & UO.IgnoreReset() особенно при поиске чаров и игноре их... крашит клиент не сразу но крашится...Sfagnum wrote:с чего бы это вдруг? правда TWI придётся включить...Beyonder wrote:Ну так тогда впринципе невыйдет сделать задумку автора топика. Ведь если рядом будут 6 духов, из них 1 нужный, то он реснет всех.
ммммм, помойму ID останется не изменным...Beyonder wrote:Но у духа каждого чела не постоянный ID. Тоесть если меня убьют, то я не знаю совершенно какой ID дадут моему духу.
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