Отладка 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