Page 1 of 1

Hide - Stealth

Posted: 2008-08-07 23:32:47
by murdoc89
Нужен скрипт на хайд + стелс .Тоесть встал в хайд подождал 10 сек , если не встал то повтор хайда , если встал - то стелс , если стелс удачно то опять стелс ,..... я такого плана не могу найти в поисковике .
Если не утруждает , прошу помочь. Заранее благодарен.

Re: Hide - Stealth

Posted: 2008-08-08 09:45:04
by murdoc89
ап

Posted: 2008-08-08 15:37:46
by lpushech

Code: Select all

sub Stealth()
   var i=1
   repeat
      for i=1 to 8
         if not uo.hidden() then
            UO.DeleteJournal()
            UO.UseSkill("Hiding")
            Repeat
               Wait(10)
            Until UO.InJournal("You have hidden yourself well") or UO.InJournal("You can't seem to hide here.")
         end if
         uo.press(35)
         wait(200)
      next
      for i=1 to 8
         if not uo.hidden() then
            UO.DeleteJournal()
            UO.UseSkill("Hiding")
            Repeat
               Wait(10)
            Until UO.InJournal("You have hidden yourself well") or UO.InJournal("You can't seem to hide here.")
         end if
         uo.press(33)
         wait(200)
      next
      Wait(100)
   until UO.Dead()
end sub


попробуй этот

Posted: 2009-06-26 10:01:20
by lobik
sub hiding()
UO.Print('в хайд')

UO.UseSkill('Hiding')
VAR i = 1
While i < 5
If UO.InJournal("You have hidden yourself well") Then
wait(600)
stealth()
Else
wait(2500)
UO.print('alibaba')
Endif
i = i + 1
Wend
end sub

sub stealth()
UO.DeleteJournal()
VAR i = 1
While i < 100
UO.Print('I Mig 35')
UO.UseSkill('Stealth')
If UO.InJournal('You have revealed yourself') or UO.InJournal('You must be hidden to use Stealth') Then
wait(100)
hiding()
Else
wait(7500)
Endif
i = i + 1
Wend
end sub