Yoko
http://forum.yoko.com.ua/

Помогите доработать скрипт на магию
http://forum.yoko.com.ua/viewtopic.php?f=20&t=4160		 Page 1 of 1
Author:  prodam iron [ 2005-06-07 19:52:44 ]
Post subject:  Помогите доработать скрипт на магию
Code:
sub Magery() 

  UO.Print( 'ID руны' ) 
  UO.Exec( 'addobject KACT HA' ) 
     While UO.Targeting() 
       Wait( 200 ) 
     Wend 
  Wait( 1000 ) 

  Repeat 
         
    While UO.Mana >= 9 
       UO.Cast( 'Poison', KACT HA ) 
       Wait(3000) 
    Wend 
         
    UO.DeleteJournal() 
      Repeat 
        UO.UseSkill( 'Meditation' ) 
        Wait( 1000 ) 
      Until UO.InJournal('at peace') 
  Until UO.Dead() 

end sub

Вот собсно скрипт, но даже когда маны после медита становится больше 9, чар продолжает медитировать. А мне нужно чтобы, как только маны 9 сразу кастовал.
Author:  I'm [ 2005-06-07 20:05:27 ]
Post subject: 
Code:
Repeat 
UO.UseSkill( 'Meditation' ) 
Wait( 1000 ) 
Until UO.InJournal('at peace')

Что делает это? :shock:
А это юзает медитацию каждую секунду до тех пор пока в журнале не появится "'at peace'"
Исправить сможеш?
Author:  prodam iron [ 2005-06-07 20:07:45 ]
Post subject: 
Не уверен :roll: , если не сложно подскажи как.
Author:  prodam iron [ 2005-06-07 20:12:04 ]
Post subject: 
Хотя я тут подумал, разницы то в скорости прокачки вроде нету. Что до упора медитировать, что до 9. Или я ошибаюсь?
Author:  flake [ 2005-06-07 22:35:09 ]
Post subject: 
Ты прав.
Так что можешь не беспокоиться, нормальный скрипт.
Author:  I'm [ 2005-06-08 13:08:26 ]
Post subject: 
Кадат писал :D
Он берет еще реги из сундучка :wink:
Code:
############################################################### 
#        #             Magery (Poison) v0.9a            #     # 
#       # #     "Whith The Help Of Ancient Gods."      # #    # 
#        #         Crafted by I'm [ICQ:138088]          #     # 
############################################################### 
sub Magery() 
############## 
# Описание. ################################################### 
############## 
# Чар берет из сундука NightShade, кастует Poison (In Nox) на цель. 
# - Сперва вас попросят указать сундук с реагентами (Container).
# - Затем на цель (Target). 
############################################################### 

UO.AddObject("Container") 
While UO.Targeting() 
 Wait(100) 
Wend 

UO.AddObject("Target") 
While UO.Targeting() 
 Wait(100) 
Wend 

##########################

While NOT UO.Dead() 

   While UO.Mana>10 AND UO.Count("0x0F88")>0 
      UO.Cast("Poison","Target") 
      Wait(4000) 
      CheckLag() 
   Wend 

   While UO.Mana<UO.Int 
      UO.WarMode("0") 
      UO.UseSkill("Meditation") 
      Wait(1000) 
   Wend 

   If UO.Count("0x0F88")==0 Then 
      UO.Useobject("Container") 
      CheckLag() 
      UO.FindType("0x0F88",-1,"Container") 
      UO.Grab("50","finditem") 
      CheckLag() 
   EndIf 
Wend 
end sub 

sub CheckLag() 
  UO.DeleteJournal() 
  UO.Click('backpack') 
  Repeat 
    Wait(500) 
  Until UO.InJournal("backpack") 
end sub
Author:  prodam iron [ 2005-06-09 11:47:36 ]
Post subject: 
Еще 1 вопрос, чтобы хавал, когда голоден достаточно этой строчки

UO.UseType(TypeFood)
wait(1000)
Until UO.InJournal('You are stuffered!') or UO.Dead()


:?:
Author:  flake [ 2005-06-09 11:49:48 ]
Post subject: 
Вот так:

Code:
Repeat
  UO.UseType(TypeFood) 
  wait(1000) 
Until UO.InJournal('You are stuffered!') or UO.Dead()
Author:  prodam iron [ 2005-06-09 12:31:53 ]
Post subject: 
Пасибки.
Author:  prodam iron [ 2005-06-09 13:09:19 ]
Post subject: 
Кстати маленькая ошибка тут, мож кому пригодится тоже, пишется не stuffered, а stuffed
Собс-но все.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/