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

Помогите дополнить скрипт.
http://forum.yoko.com.ua/viewtopic.php?f=20&t=228		 Page 1 of 1
Author:  ChurchMan [ 2004-04-30 19:08:53 ]
Post subject:  Помогите дополнить скрипт.
У меня есть маленький скрипт и он вполне меня устраивает , но дело в том что он обкапывает вокруг себя и копает тока нужную руду, а ненужная по маленьку скапливаеться в паке, так вот мнебы хотелось , если кто знает как, дописать малость его чтобы он ненужную руду выкидывал на пол, если это возможно, или же складывал в сундук который находиться в пещере. Я сам пока неразбираюсь в них (скриптах).
во скрипт:

return
endif
while not UO.Hidden()
UO.Warmode("0")
UO.UseSkill("Stealth")
wait(4000)
wend
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock")and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper Ore") and not UO.InJournal("Rusty Ore") and not UO.InJournal("Old Copper Ore") and not UO.InJournal("Dull Copper Ore") and not UO.InJournal("Bronze Ore") and not UO.InJournal("Silver Ore") and not UO.InJournal("Gold Ore") and not UO.InJournal("Shadow Ore") and not UO.InJournal("Rose Ore")
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("pickaxe")
while not UO.InJournal("You put") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock")
wait (100)
wend
wend
UO.DeleteJournal()
next
next
main()
end sub

sub proverka()
if UO.InJournal("Now Mining In: -4 -4") then
UO.Exec(main)
return
UO.DeleteJournal()
endif


если тут никак неполучиться обьяснить стучите в ICQ 155609117. Буду очень благодарен.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/