Народ вставте таймер в мининг!!!!
Posted: 2005-03-23 16:44:25
Нужен типа ласттаймер что бы можно было реконект в скрипт вставить, а то после дисконекта реконектит, а скрипт не работает ждет сообщения от УО!!!!!
Code: Select all
na4alo:
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-3 to mx+3
for j = my -3 to my+3
while not UO.Hidden()
UO.Warmode('0')
UO.UseSkill("Hiding")
wait(4000)
wend
infologs()
Poytka = 0
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("You have found some") and Poytka < qPopytok and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper Ore") and not UO.InJournal("Oops!")
UO.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject("Shovel")
while not UO.InJournal("You put") and not UO.InJournal("heavy") 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") and not UO.InJournal("You have found some")
wait (500)
if Uo.injournal("You have found some") then
podbor()
end if
if uo.injournal("heavy") then
##Pause()
endif
if uo.dead() then
##Pause()
endif
if UO.InJournal("but fail") then
Poytka = Poytka+1
end if
if uo.InJournal('Ore Elemental') or uo.InJournal('Earth Elemental') or uo.InJournal('You have been revealed')then
uo.usetype(0x0f09)
wait(500)
goto end
uo.DeleteJournal()
end if
for jor = 0 to 9
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then
if uo.waiting() then
uo.canceltarget()
endif
goto end
endif
next
wend
if uo.weight > uo.str*4 then ;Вес при котором домой
goto end
endif
wend
UO.DeleteJournal()
next
next
end:
if uo.waiting() then
uo.canceltarget()
endif
RecallRune('DRuna')
wait(5000)
while not UO.Hidden()
UO.Warmode("0")
uo.print("Ïðÿ÷åìñÿ...")
UO.UseSkill("Hiding")
wait(4000)
wend
loot()
UO.SetReceivingContainer(UnloadCont)
Wait(1000)
Wait(1000)
NRuna=NRuna+1
if NRuna>10 then
NRuna=1
endif
UO.UnSetReceivingContainer()
uo.useobject(UnloadCont)
Wait(1000)
GetRegy()
wait(1000)
EatingFood()
wait(500)
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
RecallRune(MRuna[NRuna])
wait(4000)
goto na4alo
end sub