Yoko

All sides of Injection
It is currently 2024-03-28 19:24:37

All times are UTC+02:00




Post new topic  Reply to topic  [ 1 post ] 
Author Message
PostPosted: 2010-12-21 19:20:50 
Offline

Joined: 2010-12-02 23:00:07
Posts: 20
Quote:
VAR Doll=0x0094ED1B; тут id партнера
VAR Weapon=0x13F6;0x1B76; тут type оружия
sub Warskill()
uo.Attack(str(Doll))
repeat
Healing()
WaitTool(Weapon,"Rhand")
Wait(500)
until false
end sub
sub WaitTool(type,layer)
VAR Serial
if not uo.ObjAtLayer(layer) then
uo.FindType(type,0,"backpack")
if uo.FindCount() then
Serial=uo.GetSerial("finditem")
uo.Equip(layer,Serial)
repeat
Wait(50)
until Serial==uo.ObjAtLayer(layer)
endif
endif
end sub
sub Healing()
VAR Serial,Count
VAR R=uo.ObjAtLayer("Rhand")
VAR L=uo.ObjAtLayer("Lhand")
if uo.GetHP(str(Doll))<uo.GetMaxHP(str(Doll))/3*2 then
uo.print("1")
uo.FindType(0x0E21,0,2)
if uo.FindCount() then
Serial=uo.GetSerial("finditem")
Count=uo.GetQuantity(Serial)
uo.Warmode(0)
uo.DeleteJournal()
uo.WaitTargetObject(str(Doll))
uo.UseObject(Serial)
repeat
Wait(50)
until uo.GetQuantity(Serial)<Count
repeat
Wait(50)
until uo.InJournal("Вы восстановили") or uo.InJournal("Попытка лечения")
Healing.Equip("Rhand",R)
Healing.Equip("Lhand",L)
uo.Attack(str(Doll))
uo.print("2")
endif
endif
end sub
sub Healing.Equip(Layer,Weapon)
if uo.Hex2Int(Weapon) then
uo.Equip(Layer,Weapon)
endif
end sub


Я так понимаю сдесь надо подправить

Quote:
VAR Doll

тоесть переправить на животное
или тут
Quote:
(type,layer)


Ивот сдесь переделать на животное а не на игрока ?

Quote:
uo.ObjAtLayer("Rhand")

Quote:
VAR Serial,Count
VAR R=uo.ObjAtLayer("Rhand")
VAR L=uo.ObjAtLayer("Lhand")

Только я не знаю команды уо для животины:(

Помогите подправить
Заранее блогодарин вам!!!


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 8 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:  
cron
Powered by phpBB® Forum Software © phpBB Limited