Помогите немного дописать скрипт на ресс...

[kexwer]

Вот немного изменил скрипт...
Не знаю чей! Он ресает госта, но не всех...
Просто бывают разные типы гостов...
Как сделать,чтобы он ресал по всем типам!

0x0192-тип госта

Code: Select all

sub Ress()
 
uo.ignorereset() 
uo.print('autoRess Started') 
uo.DeleteJournal() 
UO.Set('finddistance','2') 
uo.findtype('0x0192',-1,'ground') 
if uo.findcount() then 
uo.waittargetobject('finditem') 
uo.usetype('0x0E21') 
uo.print(uo.getname('finditem')+' will be resurrecting') 
else 
uo.Print(uo.getname('finditem')+' (color: '+UO.JournalColor(UO.InJournal()+1)+')'+' is not guild member') 
end if 
end if 
wait(500) 
end sub

[derevo]

создать массив)
а вообще не типы гостов разные а чары и иды соответствено ресай по иду)

[kexwer]

Ты не понял...
Мне нужно ,ч тобы по разным типа ресал, а не по ID
По ID он только одного чара будет ресать...
У меня ресает только одно типа...
0x0192 Вот этого вот!
А есть ещё 0x0193...
Вот по этому типу не ресает =(

[Nmy]

Code: Select all

sub Ress()
VAR n
Dim ress[2]
ress[1] = '0x0192'
ress[2] = '0x0193'
uo.print('autoRess Started')
UO.Set('finddistance','2')
For n = 1 To 2
uo.findtype( ress[n] , -1 ,'ground')
if uo.findcount() then
uo.waittargetobject('finditem')
uo.usetype('0x0E21')
uo.print('resurrecting')
end if
Next
end sub

[kexwer]

О! Во ... Спасииба...
Вот о таком же я и думал Тока не знал как %)

[Nmy]

О! Во ... Спасииба...
Вот о таком же я и думал Тока не знал как %)

велкам

[Mihail]

скрипт был взят мой (ресал тока гостов-согильдийцев)
2 афтар - у тебя он обрезан и проще использывать:

Code: Select all

sub Ress() 
var i 
Dim a[2] 
a[1] = '0x0192' 
a[2] = '0x0193' 
UO.Set('finddistance','2') 
For i= 1 to 2 
uo.findtype(a[i], -1, 'ground') 
if uo.findcount() then 
uo.waittargetobject('finditem') 
uo.usetype('0x0E21')
#uo.cast('Resurrection') ; если надо ресать магией
else 
uo.print('ghost not found') 
end if 
Next 
end sub

[Scripts Writer]

скрипт был взят мой (ресал тока гостов-согильдийцев)
2 афтар - у тебя он обрезан и проще использывать:

Code: Select all

sub Ress() 
var i 
Dim a[2] 
a[1] = '0x0192' 
a[2] = '0x0193' 
UO.Set('finddistance','2') 
For i= 1 to 2 
uo.findtype(a[i], -1, 'ground') 
if uo.findcount() then 
uo.waittargetobject('finditem') 
uo.usetype('0x0E21')
#uo.cast('Resurrection') ; если надо ресать магией
else 
uo.print('ghost not found') 
end if 
Next 
end sub

Твой скрипт великолепен, я просто восхищаюсь им. Какие же умные люди порой бывают на белом свете, что создают такие творения исскуства. Спасибо тебе дорогой огромное, твоя помощь неоценима для всех нас-вечная память твоему скрипту.

[Mihail]

нет проблем