mining. Не переходит копать на след. таил.

[gmur]

Доброго времени суток.
Скрипт:

Code: Select all

sub main()
Dim Tile[6]
Tile[1] = 1339
Tile[2] = 1341
Tile[3] = 1353
Tile[4] = 1340
Tile[5] = 1358
Tile[6] = 1344
Var x,y,z,a,b, LastTimer
a = uo.GetSerial('self')
For x = -2 To 2
	For y = -2 To 2
		For b = 1 To 6
			repeat
			uo.DeleteJournal()
			uo.warmode(0)
			uo.Print('Now mine in: ' + Str(uo.GetX(a)+x) +" "+ Str(uo.GetY(a)+y))
			uo.WaitTargetTile(Tile[b],Str(uo.GetX(a)+x), Str(uo.GetY(a)+y),a)
			uo.usetype('0x0E86')
			LastTimer=UO.Timer()
				Repeat 
		        	wait(500) 
		       Until uo.InJournal("Вы выкопали") Or uo.InJournal("You loosen some") Or uo.Timer()> LastTimer + 50
			Until uo.InJournal("no metal")
		Next
	Next
Next
End Sub

Первый таил выкапывает нормально, а вот на след. почему то переходить не хочет.
Так же возможно ли в uo.WaitTargetTile указать не явный тип тайла, что бы не мучатся с массивом тайлов, в хелпе такого не нашел. Если это важно шард: NewUO

[Destruction]

Попробуй вместо типа тайла указывать "0" - если прокатит, то можно не париться.

Если не прокатит - продолжаешь парится.

[gmur]

0 не катит, буду парится с массивом.
А почему не переходит с следующему тайлу?

[GambiT]

Ms.Evil просто мы уже не умеем принимать такие подарки, как цветы - разучились или не учились вовсе нам так редко делают эти знаки внимания розы - это красиво и дорого, но гвоздики ведь не такие уж

[AGRS]

uo.WaitTargetTile(Tile,Str(uo.GetX(a)+x), Str(uo.GetY(a)+y),a)

Последний параметр требует координату Z, но никак не серийник твоего персонажа.

http://yoko.netroof.net/help/index.php? ... targettile

[gmur]

Сделал так:

Code: Select all

sub main() 
Var x,y,z,a,LastTimer 
a = uo.GetSerial('self') 
For x = -2 To 2 
   For y = -2 To 2 
         repeat 
         uo.DeleteJournal() 
         uo.warmode(0) 
         uo.Print('Now mine in: ' + Str(uo.GetX(a)+x) +" "+ Str(uo.GetY(a)+y)) 
         uo.WaitTargetTile("1339",Str(uo.GetX(a)+x), Str(uo.GetY(a)+y),Str(uo.GetZ(a))) 
         uo.usetype('0x0E86') 
         LastTimer=UO.Timer() 
            Repeat 
                 wait(500) 
             Until uo.InJournal("Вы выкопали") Or uo.InJournal("You loosen some") Or uo.Timer()> LastTimer + 50 
         Until uo.InJournal("no metal") 
   Next 
Next 
End Sub

Для простоты пока копает 1 тип таила, все равно перехода с следующиму нету, хотя сообщение "no metal" присутствует когда закончилась руда в первом тайле.

[Grin]

ты журнал посмотри через showjournal когда твой но метал появляется... (лутше в ручну. капнуть что ыбы журнал не затереть) и посмотри что это за ноу метал;) может клилок...

[gmur]

ты журнал посмотри через showjournal когда твой но метал появляется... (лутше в ручну. капнуть что ыбы журнал не затереть) и посмотри что это за ноу метал;) может клилок...

Похоже что да, как с этим работать?:

Code: Select all

------Journal [10]------
cliloc# 0xACF9
cliloc# 0xAD00

[Grin]

Все тоже самое находишь какая циферка относится к твоему сообщению;) и ищешь в журнале не сообщение а эту чифру;)

[gmur]

Все тоже самое находишь какая циферка относится к твоему сообщению;) и ищешь в журнале не сообщение а эту чифру;)

Спасибо огромное тебе добрый человек

[Grin]

да не за что