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

помогите наити ошибку
http://forum.yoko.com.ua/viewtopic.php?f=20&t=661		 Page 1 of 1
Author:  durik [ 2004-06-25 10:59:55 ]
Post subject:  помогите наити ошибку
#BS

sub main()

While not UO.Dead()
UO.Exec("usetype 0x1bef") # использовать инги айрона
# можно и любые другие если поменять серийник
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Ringmail Armor' 'ringmail gloves'")
Wait(7800); #
if UO.Count("0x13eb") > 1 then # UO.Waittargettype(0x13eb); #
UO.Drop();
endif
if UO.Count("0x1bef") < 6 then # Проверяем есть ли айрон в паке, если нет берем 6 инга
Uo.Exec("waittargetground 0x1bef") # куча айрона под ногами
Uo.exec("grab 6") # взять 6
wait(500)
end if
wend
end sub


помогите пжалуста наити ошибку...он выбираетармор...а дальше не выбирает...ringmail armor...хелп плзз
Author:  Lord Ruslan Nightmare [ 2004-06-25 12:47:09 ]
Post subject: 
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Ringmail Armor' 'ringmail gloves'")
надо
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Armor' 'Ringmail Armor' 'Ringmail Armor' 'ringmail gloves'")
или типа того.
Меню, выбор, снова меню, выбор, еще меню, еще выбор. А у тебя только первое меню - и дальше одни выборы.

И еще - не обязательно писать полностью строку. Можно только часть - так зачастую лучше
Author:  durik [ 2004-06-25 13:15:08 ]
Post subject: 
#BS

sub main()

While not UO.Dead()
UO.Exec("usetype 0x1bef")
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Armor' 'Ringmail Armor' 'Ring Mail armor' 'ringmail gloves'")
Wait(7800);
if UO.Count("0x1bef") < 6 then
Uo.Exec("waittargetground 0x1bef")
Uo.exec("grab 6")
wait(500)
end if
wend
end sub


вот такое вот получается...только почему то с земли аирон брать не хочет...я стёр чтоб выкидывал !
помоги с землёй
Author:  SVG [ 2004-06-25 16:52:15 ]
Post subject: 
Когда береш ни какого вайттаргета не нуна.
напиши просто
uo.exec("grab 6 ~0x1BEF")
Author:  durik [ 2004-06-25 19:13:34 ]
Post subject: 
#BS

sub main()

While not UO.Dead()
UO.Exec("usetype 0x1bef")
UO.Exec("waitmenu 'Blacksmithing' 'Armor' 'Armor' 'Ringmail Armor' 'Ring Mail armor' 'ringmail gloves'")
Wait(7600);
if UO.Count("0x1bef") < 1 then
uo.exec("grab 10 ~0x1bef")
wait(500)
end if
wend
end sub


получилось такое..но брать с земли всёравно не хочет (((
Author:  Xpol [ 2004-06-25 22:38:01 ]
Post subject: 
добавь uo.exec('set finddistance 2')
и все заработает :wink:
Author:  durik [ 2004-06-26 00:32:25 ]
Post subject: 
спасибо...терь всё работает
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/