Атцы Посмотрите плиз скрипт!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Xabus
Posts: 117
Joined: 2004-05-18 02:24:25

Атцы Посмотрите плиз скрипт!

Post by Xabus »

sub go()
hide()
var i
var mx=uo.GetX()-2
var my=uo.GetY()-2
var rep=0
var MW=500
wait(1000)
UO.Press(35)
wait(3000)
uo.exec("waittargettile tilenum "+str(mx)+" "+str(my)+" 0")
i=0
i=i+1
my=my+1
if my>uo.GetY()+2 then
my=uo.GetY()-2
mx=mx+1
end if
if mx>uo.GetX()+2 then
goto minex
else
goto minst
end if
end if
UO.usetype("0x0e85")
end sub

sub hide()
while NOT UO.Hidden()
UO.DeleteJournal()
UO.UseSkill('Hiding')
repeat
wait(100)
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide')
wend
wait(100)
end sub

я хочк чтобы он копал чисто под собой 1 раз в клетке и делал шаг дальше! но хз почему он поворачивается в какуюто другую сторону хоть должен идти в обратном направлении!
или еще глюк он иногда пишет что невидит места копания хотя должен копать прямо под собой дибелизм хелп плизззз!
Biga
Posts: 76
Joined: 2004-04-04 21:04:43
Contact:

Post by Biga »

Твой скрипт делает далеко не то,что ты хочешь...

Вот скрипт; должен копать ОДНУ клетку ПОД СОБОЙ, после чего делать шаг вперед.

Code: Select all

sub go() 
 var i
 var mx=uo.GetX()
 var my=uo.GetY()
minst:
 hide()
 uo.exec("waittargettile 0 "+str(mx)+" "+str(my)+" 0")
 UO.usetype("0x0e85") ; Это кирка, наверное?

 wait(5000) ; тут лучше циклом ждать uo.injournal

 repeat                  ;
  UO.Press(35)       ; Хотьба по Y
  wait(3000)           ;
 until my<uo.GetY();
my=uo.GetY()

goto minst
end sub

sub hide()
 while NOT UO.Hidden()
  UO.DeleteJournal()
  UO.UseSkill('Hiding')
  repeat
   wait(200)
  until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide')
 wend
 wait(100)
end sub

А вообще стоит модифицировать этот скрипт на копку еще 4 клеток по сторонам.
Xabus
Posts: 117
Joined: 2004-05-18 02:24:25

Post by Xabus »

напиши плиз как коплть еще 4 посторонам? заранее сенка
Post Reply