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

Таминг скопировал но не пашет:(
http://forum.yoko.com.ua/viewtopic.php?f=20&t=246		 Page 1 of 1
Author:  AntiKiller [ 2004-05-03 12:33:50 ]
Post subject:  Таминг скопировал но не пашет:(
Вот ниже был таминг классный! Я его позаимствовал)
Но он тамит первую лошадь и всё дальше ни-ни.......


sub Taming()
VAR i

DIM horse[44]
horse[1] = "0x0001BE97"
horse[2] = "0x000161C1"
horse[3] = "0x0001A560"
horse[4] = "0x00B1CD8B"
horse[5] = "0x0084AD2D"
horse[6] = "0x00F9763E"
horse[7] = "0x00D0E0ED"
horse[8] = "0x00DC71FC"
horse[9] = "0x000DA453"
horse[10] = "0x00FB4C23"
horse[11] = "0x00FB4C23"
horse[12] = "0x00A64584"
horse[13] = "0x006F6696"
horse[14] = "0x016E012D"
horse[15] = "0x00B075E8"
horse[16] = "0x003BEF38"
horse[17] = "0x0035197E"
horse[18] = "0x0037266F"
horse[19] = "0x00FD9966"
horse[20] = "0x00144034"
horse[21] = "0x00A3057F"
horse[22] = "0x001E5CB9"
horse[23] = "0x000176F1"
horse[24] = "0x00CC2C40"
horse[25] = "0x01695D43"
horse[26] = "0x00D6DE00"
horse[27] = "0x00CDE595"
horse[28] = "0x00205F5A"
horse[29] = "0x01416A1A"
horse[30] = "0x00057856"
horse[31] = "0x00712308"
horse[32] = "0x005F14EA"
horse[33] = "0x016875E9"
horse[34] = "0x0164FE0B"
horse[35] = "0x00B1CBD5"
horse[36] = "0x006C7751"
horse[37] = "0x0043274D"
horse[38] = "0x001438FF"
horse[39] = "0x0179E2EE"
horse[40] = "0x00B1CE6C"
horse[41] = "0x003FC22B"
horse[42] = "0x00F4783C"
horse[43] = "0x00ED9876"
horse[44] = "0x00B1CB76"


While 1<2
For i = 1 to 44
start:
UO.WaitTargetObject(horse[i])
UO.UseType('0x13F4')
UO.DeleteJournal()
While not UO.InJournal("It seems to accept you as master") and not UO.InJournal("You fail to tame the creature") and not UO.InJournal("is already tame")
Wait(500)
If UO.InJournal("You fail to tame the creature") then
goto start
End If
If UO.InJournal("It seems to accept you as master") or UO.InJournal("is already tame") then
Next
wait(500)
End If
Wend
wend
End sub
Author:  Edred [ 2004-05-03 16:51:05 ]
Post subject: 
А серийники всех своих 44 лошадей ты сюда вбил?

ЗЫ: Умеют же люди заморачиваться... ;)

ЗЗЫ: Как-то странно у тебя цикл for...next заканчивается внутри ифа... 8-)
Author:  AntiKiller [ 2004-05-03 17:30:45 ]
Post subject: 
Edred wrote:
А серийники всех своих 44 лошадей ты сюда вбил?

ЗЫ: Умеют же люди заморачиваться... ;)

ЗЗЫ: Как-то странно у тебя цикл for...next заканчивается внутри ифа... 8-)


Я ограничился в начале 3 лошадьми и их серийниками остальные заблочил и цикл в 3 этапа, Ну а то что ты говориш Заканчивается внутри ИФ) это не я делал)) попробую переделать этот момент.
Author:  Edred [ 2004-05-04 14:03:07 ]
Post subject: 
AntiKiller wrote:
Edred wrote:
А серийники всех своих 44 лошадей ты сюда вбил?

ЗЫ: Умеют же люди заморачиваться... ;)

ЗЗЫ: Как-то странно у тебя цикл for...next заканчивается внутри ифа... 8-)


Я ограничился в начале 3 лошадьми и их серийниками остальные заблочил и цикл в 3 этапа, Ну а то что ты говориш Заканчивается внутри ИФ) это не я делал)) попробую переделать этот момент.


Он не просто внутри ифа заканчивается, но еще и внутри вайла... Я такого стиля программирования еще не встречал в своей жизни... :shock: Ты задумывался, что происходит в скриптовом модуле, когда встречается команда next а вложенный цикл while еще не завершен?
Author:  AntiKiller [ 2004-05-04 14:10:48 ]
Post subject: 
хых работате)
я убрал While 1<2 и в конце Wend
и поменял фразы из журнала! работате как часики!
Author:  Biga [ 2004-05-04 20:39:41 ]
Post subject: 
У меня дурацкий вопрос к Yoko:
Разве индексы в массиве начинаются с единицы, а не с нуля?
Если да, то почему так?
Author:  totus [ 2004-05-04 21:48:05 ]
Post subject:  Дурацкий ответ.
С нуля.
Author:  Biga [ 2004-05-05 13:11:52 ]
Post subject: 
В таком случае должен возникнуть выход за границы массива...

DIM horse[44]
....
horse[44] = "0x00B1CB76"
Author:  AntiKiller [ 2004-05-05 19:20:44 ]
Post subject: 
Biga wrote:
В таком случае должен возникнуть выход за границы массива...

DIM horse[44]
....
horse[44] = "0x00B1CB76"

у меня заканчивает тамить последнюю лошадь и всё ок!
Скрипт выключается!
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/