Page 1 of 1

НИД СКРИПТ НА ХЕЛ

Posted: 2005-09-27 17:25:54
by nEo1987
помогите юзал поиск не нашел скрипт на кач хелинга с курсой

Posted: 2005-09-27 19:09:14
by Destruction

Posted: 2005-09-27 19:12:05
by Leo

Code: Select all

sub Train_Healing() 
var i
while True
   UO.FindType(0x0E21,"-1","my")
   if UO.FindCount() then
      uo.usetype(0x13E3); Cursed Item
      CheckLag()
      if i==3 or not i then
uo.useskill ("Spirit Speak")
         i=1
      else
         i=i+1
      endif

         wait(2000)
      uo.undress()
      wait(100)
      uo.exec('bandageself')
      Wait(2000)
   else
      UO.FindType(0x0E20,"-1","my")
      if UO.FindCount() then
         uo.waittargettype(0x1008)   ;wash basin
         uo.UseType(0x0E20)  ;bloody bandages
         CheckLag()
      else
         uo.print("You haven't bandages")
         uo.exec("terminate Train_Healing")
      endif
   endif
wend
end sub

sub CheckLag()
   UO.DeleteJournal()
   UO.Click('backpack')
   repeat
      wait(500)
   until UO.InJournal('backpack')
end sub