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

script help
http://forum.yoko.com.ua/viewtopic.php?f=1&t=12973		 Page 1 of 1
Author:  Maxxx [ 2007-12-29 12:57:21 ]
Post subject:  script help
Помогоите, как добавить в скрипт проверку на не нужную руду , чтобы копал один раз а которая нужа до конца!:?

sub Mining()
var xc,yc,zc
var s
xc=UO.GetX("self")
yc=UO.GetY("self")
zc=UO.GetZ("self")
var i,j,k
For i=-2 to 2
For j=-2 to 2
Repeat
while not UO.Hidden()
UO.Warmode("0")
uo.print("hiding...")
UO.UseSkill("Hiding")
wait(4000)
wend
UO.DeleteJournal()
s="0 "+STR(xc+i)+" "+STR(yc+j)+" 0" #+STR(zc)
UO.Exec("waittargettile "+s+") #; usetype 0x0e85")
wait(2000)
k=0
Repeat
wait(500)
k=k+1
Until UO.InJournal("You put") or UO.InJournal("There is no ore here to mine.") or UO.InJournal("Vous etes trop loin") or UO.InJournal("You loosen some rocks") or UO.InJournal("That is too far") or UO.InJournal("thoughts of battle") or k>14
if UO.InJournal("destroy") and UO.Count("0x0e85") then
UO.Usetype("0x0e85")
endif
wait(500)
Until UO.InJournal("You have no line of sight") or UO.InJournal("There is no ore here to mine.") or UO.InJournal("That is too far") or UO.InJournal("thoughts of battle") or UO.InJournal("You put the Copper") or UO.InJournal("You put the Bronze") or UO.InJournal("You put the Gold") or UO.InJournal("You put the Rose") or UO.InJournal("There is nothing here") or UO.InJournal("That is too far") or UO.InJournal("elsewhere") or UO.InJournal("of sight to that location")
Next
Next
UO.print("Ana!!!")
end sub
Author:  Scripts Writer [ 2007-12-30 09:51:31 ]
Post subject: 
Забиваешь массив цветов той руды которая не нужна, и в случае сообщения "Вы положили к себе в бекпек руду", ищешь руду с цветом из массива-если она была найдена то ты выкопал не нужную, и выкидываешь её,- если нет то продолжаешь копать эту же точку.

2Забиваешь массив сообщений с именами руд которые тебе не нужны, и в каждом 'You put' делает вырез имени руды которая была выкопана в последний момент, а затем в цикле сравнение с каждым элементов массива сообщений.

'Iron'
'Copper'
'Rusty'

'You put 4 Iron ore in your backpack.'

Вырезаешь из сообщения всё до и после слова Iron и сравниваешь,-а дальше я написал что делать.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/