Yoko

All sides of Injection
It is currently 2025-10-16 21:25:05

All times are UTC+02:00




Post new topic  Reply to topic  [ 10 posts ] 
Author Message
PostPosted: 2009-06-28 21:41:27 
Offline

Joined: 2009-02-09 13:30:13
Posts: 22
Ребят вот такая проблема с одевалкой вот скрипт
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

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


Top
   
 Post subject:
PostPosted: 2009-06-28 21:59:47 
Offline

Joined: 2008-02-08 18:38:55
Posts: 40
tut UO.Recall('0x4001361C','26')


Top
   
 Post subject:
PostPosted: 2009-06-28 22:06:31 
Offline

Joined: 2009-02-09 13:30:13
Posts: 22
Everix wrote:
tut UO.Recall('0x4001361C','26')

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


Top
   
 Post subject:
PostPosted: 2009-06-29 03:07:13 
Offline

Joined: 2008-02-08 18:38:55
Posts: 40
Tam stone ID ili serial , knopka.
Prosto testi!


Top
   
 Post subject:
PostPosted: 2009-06-29 05:37:12 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
Скажем при открытии столба появляется окошко с 3 кнопками
1 одецо
2 раздецо
3 выход

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

Паняно? :roll:


Top
   
 Post subject:
PostPosted: 2009-06-29 09:46:51 
Offline

Joined: 2009-02-09 13:30:13
Posts: 22
Mirage wrote:
Скажем при открытии столба появляется окошко с 3 кнопками
1 одецо
2 раздецо
3 выход

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

Паняно? :roll:


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


Top
   
 Post subject:
PostPosted: 2009-06-29 14:16:14 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
crutch wrote:
Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

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


Top
   
 Post subject:
PostPosted: 2009-06-29 14:27:11 
Offline

Joined: 2009-02-09 13:30:13
Posts: 22
Mirage wrote:
crutch wrote:
Ну вроде начинаю понимать а что значит UO.Recall('0x40013766','10')
десять в конце ???

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


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


Top
   
 Post subject:
PostPosted: 2009-06-29 21:51:19 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
посчитать :lol:

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


Top
   
 Post subject:
PostPosted: 2009-06-29 22:22:49 
Offline

Joined: 2009-02-09 13:30:13
Posts: 22
Mirage wrote:
посчитать :lol:

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

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


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 10 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited