Yoko
http://forum.yoko.com.ua/

Не могу понять
http://forum.yoko.com.ua/viewtopic.php?f=17&t=14895		 Page 1 of 1
Author:  crutch [ 2009-06-28 21:41:27 ]
Post subject:  Не могу понять
Ребят вот такая проблема с одевалкой вот скрипт
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

ну могу понять какие где значение тоесть где че он делает вот мне нужно вставить ид столбов вещей ток куда я хз объясните какие где значение за ранее спасибо
Сервер пвп альфа
Author:  Everix [ 2009-06-28 21:59:47 ]
Post subject: 
tut UO.Recall('0x4001361C','26')
Author:  crutch [ 2009-06-28 22:06:31 ]
Post subject: 
Everix wrote:
tut UO.Recall('0x4001361C','26')

чет не могу понять и что это значит?:
Author:  Everix [ 2009-06-29 03:07:13 ]
Post subject: 
Tam stone ID ili serial , knopka.
Prosto testi!
Author:  Mirage [ 2009-06-29 05:37:12 ]
Post subject: 
Скажем при открытии столба появляется окошко с 3 кнопками
1 одецо
2 раздецо
3 выход

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

Паняно? :roll:
Author:  crutch [ 2009-06-29 09:46:51 ]
Post subject: 
Mirage wrote:
Скажем при открытии столба появляется окошко с 3 кнопками
1 одецо
2 раздецо
3 выход

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

Паняно? :roll:


Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???
Author:  Mirage [ 2009-06-29 14:16:14 ]
Post subject: 
crutch wrote:
Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

Смотря что такое ID
если рунбук то это номер руны
если столб с одеждой то номер кнопки одежды
Если в моем примере рассматривать то фига с маслом :D так как у меня только 3 кнопки.
Author:  crutch [ 2009-06-29 14:27:11 ]
Post subject: 
Mirage wrote:
crutch wrote:
Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

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


Да это столб с ресурсами и как вычислить эту кнопку?
Author:  Mirage [ 2009-06-29 21:51:19 ]
Post subject: 
посчитать :lol:

Неужели до сих пор не заработал скрипт?
Author:  crutch [ 2009-06-29 22:22:49 ]
Post subject: 
Mirage wrote:
посчитать :lol:

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

все уже разобрался=)
Это еще ребят есть ли такой скрипт чтоб например когда я забегаю на арену и там много народо можно ли как нить автоматом на них стрелки кидать за ранее спасибо буду очень благодарен.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/