Отладка Inscription'a

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
gobzter
Posts: 17
Joined: 2009-02-27 21:32:56

Отладка Inscription'a

Post by gobzter »

Добрый день, наваял я скрипт энное время назад, скрипт работает, пишет всё как надо, всячески радует глаз процессом автоматизации, но огорчает то, что переодически падает, ругаясь на "Unhandled exception in parser".

Гуру, не подскажите в чем проблема?

Code: Select all

sub Inscription()
var blank='0x0e34'
var ink='0x0FC0'
While NOT UO.Dead()
   if UO.Mana > 20 Then
      UO.FindType(ink, 0x0064)
         If UO.FindCount(ink, 0x0064) > 0 Then
            UO.UseType( ink, 0x064 )
         Else
            UO.UseFromGround(ink, 0x0064)
      EndIf
         UO.DeleteJournal()
         UO.WaitTargetGround(blank)
         Wait(1000)
         UO.LClick(329,250)
            While NOT UO.InJournal('мессага на русском')
               Wait(500)
            WEnd
   Else
      UO.DeleteJournal()
         While UO.Mana < 98
         UO.UseSkill('Meditation')
         Wait(2000)
            While UO.InJournal('мессага на русском')
               Wait(1000)
                  If UO.InJournal('мессага на русском') Then
                     UO.DeleteJournal()
                  EndIf
            WEnd
         WEnd
   EndIf
WEnd
end sub
Post Reply