Yoko

All sides of Injection
It is currently 2025-10-15 10:43:53

All times are UTC+02:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
 Post subject: Паринг
PostPosted: 2011-06-09 08:55:55 
Offline
User avatar

Joined: 2007-05-23 19:51:18
Posts: 197
Доброго времени суток .
Помогите пожалуйста сделать такой скрипт на паринг :
чар стоит со щитом , если сломался - одевает новый и тупо хилится если стр меньше указанной отметки , при этом чар НЕ должен атачить в ответ того, кто его бьет - тупо хил .
заранее спасибо :)


Top
   
 Post subject: Re: Паринг
PostPosted: 2011-06-09 09:17:48 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
смысл в апе через минуту? Афигенно опустили?
3 действия в операторах условий в цикл забить - делов то.
Code:
sub Healing1()
   var x = uo.GetGraphic(uo.ObjAtLayer('Lhand')) ; не помню щит в левой или правой руке - если что на Rhand исправь
   var k
   While not UO.Dead()
      if uo.warmode() == 1 then
         uo.warmode(0)
         wait(100)
      endif
      If UO.Life < uo.str Then
         uo.bandageself()
         Wait(3000)
      Endif
      If x <> uo.GetGraphic(uo.ObjAtLayer('Lhand')) Then
         uo.Equipt('Lhand',x)
      Endif
      Wait(100)
   Wend
End Sub
sub Healing2() ; более понтовый но дольше настраивать.
   var x = uo.GetGraphic(uo.ObjAtLayer('Lhand')) ; не помню щит в левой или правой руке - если что на Rhand исправь
   var k
   While not UO.Dead()
      if uo.warmode() == 1 then
         uo.warmode(0)
         wait(100)
      endif
      If UO.Life < uo.str Then
         if uo.warmode() == 1 then
            uo.warmode(0)
            wait(100)
         endif
         UO.DeleteJournal()
         uo.bandageself()
         k=0
         repeat
            Wait(100)
            k=k+1
         until UO.InJournal('You put|You failed|but they barely') or k>300
      Endif
      If x <> uo.GetGraphic(uo.ObjAtLayer('Lhand')) Then
         uo.Equipt('Lhand',x)
      Endif
      Wait(100)
   Wend
End Sub

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
 Post subject: Re: Паринг
PostPosted: 2011-06-09 10:16:47 
Offline
User avatar

Joined: 2007-05-23 19:51:18
Posts: 197
fast question-fast answer
Спасибо :!:


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 0 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