Yoko

Ребят вот такая проблема с одевалкой вот скрипт
sub Dress_alfa_vamp()
While NOT UO.Dead()
var n
Dim Select[3]
Select[1]='21' ; Êðîâü 3
Select[2]='24' ; Õèìèÿ 4
Select[3]='13' ; Ðåãè 2
Dim Item[3]
Item[1]='0x0E21'
Item[2]='0x09B0'
Item[3]='0x0E76'
If UO.GetGlobal('DressMan')<>'yes' Then
UO.Set('norbcalc','1')
UO.SetGlobal('DressMan','yes')
EndIf
If UO.GetGlobal('DressManCheck')<>'on' Then
UO.SetGlobal('DressManCheck','on')
If UO.CountGround('0x0ED4','0x08BB') or UO.CountGround('0x0ED4','0x079B') Then
If NOT UO.ObjAtLayer('Torso') or UO.Count('0x0EFA')==0 Then ;Ïðîâåðêà íà ïàê
UO.UseObject('backpack')
Wait(1000)
EndIf
If NOT UO.ObjAtLayer('Torso') Then
UO.Recall('0x4001361C','26') ; Àðìîð(äðèä) ns
REPEAT
Wait(300)
Until UO.ObjAtLayer('Torso')
EndIf
EndIf
Wait(300)
If NOT UO.ObjAtLayer('Horse') Then
UO.Recall('0x40013766','10') ; LAMA COLOR
REPEAT
Wait(300)
Until UO.ObjAtLayer('Horse')
EndIf
Wait(300)
For n = 1 TO 3
If UO.Count(Item[n])==0 Then
UO.Recall('0x40013766',Select[n])
UO.DeleteJournal()
REPEAT
Wait(300)
Until UO.InJournal("You put")
EndIf
Next
UO.Print('Done!')
Else
UO.Print("I don't see equipment stone!")
EndIf
UO.SetGlobal('DressManCheck','off')
Else
UO.Print("Wait")
EndIf
uo.usetype ('0x1515')
uo.usetype ('0x1F08')
uo.usetype ('0x204E')
uo.usetype ('0x1F06')
uo.msg ('.arm')
end sub

ну могу понять какие где значение тоесть где че он делает вот мне нужно вставить ид столбов вещей ток куда я хз объясните какие где значение за ранее спасибо
Сервер пвп альфа

tut UO.Recall('0x4001361C','26')

Everix wrote:tut UO.Recall('0x4001361C','26')

чет не могу понять и что это значит?:

Tam stone ID ili serial , knopka.
Prosto testi!

Скажем при открытии столба появляется окошко с 3 кнопками
1 одецо
2 раздецо
3 выход

UO.Recall('ID столба','1') соответственно оденет
UO.Recall('ID столба','2') разденет
UO.Recall('ID столба','3') закроет окно

Паняно?

Mirage wrote:Скажем при открытии столба появляется окошко с 3 кнопками
1 одецо
2 раздецо
3 выход

UO.Recall('ID столба','1') соответственно оденет
UO.Recall('ID столба','2') разденет
UO.Recall('ID столба','3') закроет окно

Паняно?

Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

crutch wrote:Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

Смотря что такое ID
если рунбук то это номер руны
если столб с одеждой то номер кнопки одежды
Если в моем примере рассматривать то фига с маслом так как у меня только 3 кнопки.

Mirage wrote:

crutch wrote:Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

Смотря что такое ID
если рунбук то это номер руны
если столб с одеждой то номер кнопки одежды
Если в моем примере рассматривать то фига с маслом так как у меня только 3 кнопки.

Да это столб с ресурсами и как вычислить эту кнопку?

посчитать

Неужели до сих пор не заработал скрипт?

Mirage wrote:посчитать

Неужели до сих пор не заработал скрипт?

все уже разобрался=)
Это еще ребят есть ли такой скрипт чтоб например когда я забегаю на арену и там много народо можно ли как нить автоматом на них стрелки кидать за ранее спасибо буду очень благодарен.