sub battle() var t UO.CancelMenu() UO.DeleteJournal() UO.Setarm('arm') UO.AutoMenu('What','Polar') while NOT UO.Dead() if UO.Life<UO.Str then repeat UO.Bandageself() wait(5000) if UO.Count('0x0e21')==0 then uo.waittargettype('0x1008') uo.usetype('0x0E20') wait(500) UO.DeleteJournal() endif until UO.Life==UO.Str endif UO.Arm('arm') UO.WaitTargetSelf() UO.Cast('Summ. Crea') wait(500) if UO.InJournal('lack sufficient') then while UO.Mana<90 UO.WarMode(0) LastTimer=UO.Timer() UO.UseSkill('Meditation') repeat wait(100) until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200 if not UO.InJournal("You lose") then repeat wait(100) until UO.InJournal('You lose') or UO.Mana>=90 endif UO.DeleteJournal() wait(2000) wend endif t=0 repeat wait(500) t=t+1 if t>15 then UO.WaitTargetSelf() UO.Cast('Summ. Crea') t=0 if UO.InJournal('lack sufficient') then while UO.Mana<90 UO.WarMode(0) LastTimer=UO.Timer() UO.UseSkill('Meditation') repeat wait(100) until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200 if not UO.InJournal("You lose") then repeat wait(100) until UO.InJournal('You lose') or UO.Mana>=90 endif UO.DeleteJournal() wait(2000) wend endif endif UO.findtype('0x00D5',-1,'ground') until uo.FindCount()>0 UO.WarMode(1) repeat wait(500) if abs(UO.GetX('finditem')-UO.GetX())>2 or abs(UO.GetY('finditem')-UO.GetY())>1 then UO.UseType('0x0F4F') endif if UO.InJournal('too close') then UO.Arm('arm') endif if UO.Life<35 then UO.UseType('0x0F0E','0x09BB') endif UO.DeleteJournal() UO.Attack('finditem') wait(2000) UO.findtype('0x00D5',-1,'ground') until uo.FindCount()==0 wend end sub
народ помогите пожалуйсто, сделайте так чтобы етот скрипт сумонил медведя на землю
В передаче "За стеклом" стекло поменяли на лупу. Теперь думают как назвать передачу