Мининг

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
lpushech
Posts: 33
Joined: 2007-09-02 19:16:55

Мининг

Post by lpushech »

нельзя ли переделать этот скрипт чтобы он копал определенные 3 точки по координатам?

Code: Select all

sub mining() 
var mx, my, mz, i, j 
var ismining, ixx, isheavy 
mx = UO.GetX("self") 
my = UO.GetY("self") 
mz = UO.GetZ("self") 

uo.setcatchbag('0x4046A0D5') 

While not UO.Dead() 
UO.DeleteJournal() 
for i = mx-4 to mx+4 
for j = my -4 to my+4 
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j)) 
ismining = 1 
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 ismining 

UO.DeleteJournal() 
hide() 
UO.Waittargettile("1341", str(i), str(j), str(mz)) 
UO.Usetype('0x0E85') 
#UO.Usetype('0x0F39')
ixx = 0 
ismining=1 
while not UO.InJournal("You put") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ixx <= 100 
wait (100) 
ixx = ixx + 1 
wend 
while UO.InJournal("but fail") 
Wait (100) 
UO.DeleteJournal() 
wend 



if uo.injournal("Rusty") then 
ismining = 0 
endif 
if uo.injournal("Old Copper") then 
ismining = 0 
endif 
if uo.injournal("Dull Copper") then 
ismining = 0 
endif 
if uo.injournal("the Copper") then 
ismining = 0 
endif 
if uo.injournal("Iron") then 
ismining = 0 
endif 
if not ismining then 
uo.print("Not mining here") 
endif 
wend 
UO.DeleteJournal() 
next 
next 
wend 
end sub 

sub hide() 
while not UO.Hidden() 
UO.Warmode("0") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 
end sub 


sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 

repeat 
wait(50) 
until UO.InJournal('backpack') 
end sub
Last edited by lpushech on 2008-08-04 18:14:09, edited 1 time in total.
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Re: Мининг

Post by Kynep »

lpushech wrote:нельзя ли переделать этот скрипт чтобы он копал определенные 3 точки по координатам?
Можно, добавить в цикл while(я так понимаю что это не весь скрипт) еще один цикл for next, и массив из 3х координат точек копания ну и ходилку соответсвенно. После цикла обкопки, чар идет копать на следующую точку. И так три раза, потом опять по кругу.
lpushech
Posts: 33
Joined: 2007-09-02 19:16:55

Post by lpushech »

не весь скрипт докопировал )))

мне не надо чтобы он ходил, он стоит на месте. Мне надо чтобы он копал точки по координатам которые я укажу и как указано в скрипте вся вырытая руда сразу складывается в ящик.если можешь переделай плиз, а то я не понимаю практически ничего в скриптах. :)
Post Reply