Yoko :: Нид хелп в правке мининга

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

Нид хелп в правке мининга http://forum.yoko.com.ua/viewtopic.php?f=17&t=15983	Page 1 of 1

Author:

Grinder [ 2010-12-01 02:40:47 ]

Post subject:

Нид хелп в правке мининга

Ребят,если не в лом,помогите подправить данный скрипт(конкретно его ходилку),что бы,допустим,после 6-7 прохождений низ,верх,право,он 1 раз шёл лево (допустим на 15 тайлов),и вверх (на 14-к примеру):

Code:

sub main()
var i
uo.print("Poneslas`!!!")
While UO.Life>0
for i=1 to 10
kopat()
        uo.press(34)
        wait(500)
        uo.press(34)
        wait(500)
        uo.press(34)
    next
        uo.press(33)
        wait(500)
        uo.press(33)
        wait(500)
        uo.press(33)
    uo.print("Idem nazad!!!")
kopat()
    for i=1 to 10
        uo.press(36)
        wait(500)
        uo.press(36)
        wait(500)
        uo.press(36)
    next
        uo.press(33)
        wait(500)
        uo.press(33)
        wait(500)
        uo.press(33)

wend
end sub

sub kopat()
var where_x,where_y,coords,i
UO.DeleteJournal()
where_x=uo.getx()
where_y=uo.gety()
for i=-2 to 2
uo.print("Kopaem "+str(i+3)+"/5")
coords="waittargettile "+" 0 "+str(where_x)+" "+str(where_y+i)+" 0"
uo.exec(coords)
uo.exec("usetype '0x0E85'")
UO.DeleteJournal()
while (not (UO.InJournal("stop mining") or UO.InJournal("dig anything there") or UO.InJournal("too far away") or UO.InJournal("world saved")))
wait(1000)
wend
next
end sub

Заранее пасиб :roll:

Author:

Mirage [ 2010-12-01 11:20:40 ]

Post subject:

Re: Нид хелп в правке мининга

Во первых вот так отступы правильно расставлены:

Code:

sub main()
   var i
   uo.print("Poneslas`!!!")
   While UO.Life>0
      for i=1 to 10
         kopat()
         uo.press(34)
         wait(500)
         uo.press(34)
         wait(500)
         uo.press(34)
      next
      uo.press(33)
      wait(500)
      uo.press(33)
      wait(500)
      uo.press(33)
      uo.print("Idem nazad!!!")
      kopat()
      for i=1 to 10
         uo.press(36)
         wait(500)
         uo.press(36)
         wait(500)
         uo.press(36)
      next
      uo.press(33)
      wait(500)
      uo.press(33)
      wait(500)
      uo.press(33)
   wend
end sub
sub kopat()
   var where_x,where_y,coords,i
   UO.DeleteJournal()
   where_x=uo.getx()
   where_y=uo.gety()
   for i=-2 to 2
      uo.print("Kopaem "+str(i+3)+"/5")
      coords="waittargettile "+" 0 "+str(where_x)+" "+str(where_y+i)+" 0"
      uo.exec(coords)
      uo.exec("usetype '0x0E85'")
      UO.DeleteJournal()
      while (not (UO.InJournal("stop mining|dig anything there|too far away|world saved")))
         wait(1000)
      wend
   next
end sub

Во вторых uo.press(33) ;34,36 это и есть перемещение чара. Добавь в нужное место - сосчитать то не проблема.
А в третьих лучше посмотреть скрипты с координатными ходилками. Брекера или Дестракшена. Там вроде не сложно но в десятки разов качественнее и изменить координаты проще.

Author:	Grinder [ 2010-12-01 18:07:47 ]
Post subject:	Re: Нид хелп в правке мининга
Ам...Пасиб за совет ща буду смотреть. Про направления я понял(ток сща допёр,почему 3 раза направление-первый раз поворот в нужную сторону,так?),только когда вставлял влево-вверх,он у мя после каждого цикла возвращалси назад,а мне над что бы через каждых 6-7 циклов...Ну да лан рока никто не подскажет,буду мучать Quote: Во первых вот так отступы правильно расставлены: А какая разница?Так красивее,проще читать?

Author:	Mirage [ 2010-12-01 20:54:03 ]
Post subject:	Re: Нид хелп в правке мининга
Grinder wrote: А какая разница?Так красивее,проще читать? Code: for i=1 to 10 kopat() uo.press(34) wait(500) uo.press(34) wait(500) uo.press(34) next так некрасиво и не ясно что next относится к for.

Author:	Grinder [ 2010-12-02 20:50:07 ]
Post subject:	Re: Нид хелп в правке мининга
Не,чёт не врубаюсь

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/