Yoko

All sides of Injection
It is currently 2018-07-22 14:18:38

All times are UTC+02:00




Post new topic  Reply to topic  [ 2 posts ] 
Author Message
PostPosted: 2012-12-26 14:54:58 
Offline

Joined: 2012-12-22 09:29:47
Posts: 3
sub main()
var mx, my, mz, i, j, TIME
var number = 1
Uo.exec("set norbcheck 0"); для рекола
uo.exec("set norbcalc 0"); тоже
uo.canceltarget()
uo.print('!!Выбери Лопату!! ')
uo.exec('addobject shovel')
while uo.targeting()
wait(100)
wend
while not uo.Dead()
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-1 to mx+1
for j = my-1 to my+1
UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j))
While not UO.InJournal("There is nothing here to mine for") and not UO.InJournal("That is too far away") and not UO.InJournal("You decide not to mine for now") and not UO.InJournal("You put the") and not UO.InJournal("You cannot mine so close to yourself") and not UO.InJournal("You have no line of sight to that location")
uo.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Waittargettile('1341', str(i), str(j), str(mz))
UO.exec("useobject shovel")
TIME = 0
while not TIME == 6000 and not UO.InJournal("There is nothing here to mine for") and not UO.InJournal("That is too far away") and not UO.InJournal("You decide not to mine for now") and not UO.InJournal("You put the") and not UO.InJournal("You cannot mine so close to yourself") and not UO.InJournal("You have no line of sight to that location")
TIME = 0
uo.DeleteJournal()
while not UO.InJournal("You put the") and not TIME == 4000 and not UO.InJournal("There is nothing here to mine for") and not UO.InJournal("That is too far away") and not UO.InJournal("You decide not to mine for now") and not UO.InJournal("You cannot mine so close to yourself") and not UO.InJournal("You have no line of sight to that location")
wait (100)
TIME = TIME + 100
wend
wait(1000)
uo.Print('pereskok')
wend
if uo.weight > Weight then
if NaZemly == 1 then
Drop()
else
uo.exec("terminate all")
endif
wait(100)
endif
wend
UO.DeleteJournal()
next
next
wend
end sub

Есть вот такой скрипт, капает вокруг себя, как его доработать чтобы он двигался по заданным координатам и делал по 1 копки. За помощь отблагодарю.


Top
   
PostPosted: 2013-01-22 08:37:30 
Offline
User avatar

Joined: 2013-01-21 14:55:12
Posts: 9
А зачем тебе что бы он ходил ? он что во круг себя мало обкапывает ?
Есть скрипт без ходилке по шахте, то если дом рядом с шахтой то он ходит туда и обратно!


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 2 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited