Yoko

All sides of Injection
It is currently 2025-10-12 21:49:45

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
PostPosted: 2008-04-06 23:30:05 
Offline

Joined: 2004-12-13 01:27:00
Posts: 190
пользуюсь след. скриптом, чар который бьет блейд спирита, запускает функцию Bladespirit1, но после убийства спирита не хилиться :(

Code:
sub bladespirit1()
var spirit = '0x023E', spiritid
while true
   uo.findtype(spirit,-1,'ground')
   if uo.findcount() > 0 then
      spiritid = uo.getserial('finditem')
      uo.warmode(true)
      uo.attack(spiritid)
      wait(5000)
   else
      if uo.gethp() < uo.str then
         uo.bandageself()
         wait(3000)
                        sword()
      endif
   endif
wend
endsub

sub sword()   ; Одевание щита и оружия
Var Svord='0x13E3' ;Тип оружия, используемый вами
Var Shield='0x1B76' ;Тип оружия, используемый вами
UO.Equipt('Lhand',Shield)
wait(1000)
UO.Equipt('Rhand',Svord)
wait(100)
end sub


Top
   
 Post subject:
PostPosted: 2008-04-07 08:57:58 
Offline
User avatar

Joined: 2005-04-04 18:23:12
Posts: 187
Строку
Code:
 if uo.gethp() < uo.str then

замени на
Code:
 if uo.gethp ('self') < uo.getmaxhp ('self') then

Должно помочь.


Top
   
 Post subject:
PostPosted: 2008-04-07 22:07:43 
Offline

Joined: 2006-03-10 00:19:11
Posts: 265
Location: http://drw.ru/
Врядле поможет, uo.str=uo.getmaxhp()
да и вообще одной бандагой не вылечишься то особо

_________________
DRW - Glorior Belli
Image


Top
   
 Post subject:
PostPosted: 2008-04-09 11:23:44 
Offline
User avatar

Joined: 2006-11-14 16:19:03
Posts: 257
Code:
sub e2()
UO.Exec("set finddistance 15")
repeat
UO.FindType('0x023E','0000x0',1)
If UO.FindCount('finditem')>0 then
UO.Attack('finditem')
repeat
wait(5000)
UO.FindType('0x023E','0000x0',1)
until UO.FindCount('finditem')<1
else
While uo.GetHP('self')<uo.GetMaxHP('self')

UO.SetArm('CWeapon')
stirka()
UO.Exec("bandageself")
wait (1000)
UO.Arm('CWeapon')
wait(5000)
wend
end if
wait(1000)
until UO.DEAD()
end sub


Стирать бинты
Code:
sub stirka() 
if UO.Count('0x0E21')<1 then
UO.FindType('0x0E20','0x0000','backpack')
UO.WaitTargetType('0x1008')
UO.UseObject('finditem')
wait(1000)
endif
end sub

_________________
Короли махаона


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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