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

Ходилка по кругу
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8119		 Page 1 of 1
Author:  qwerty123 [ 2006-07-01 15:02:03 ]
Post subject:  Ходилка по кругу
Code:
st == 0 then
 posit=UO.GetX()
 posit=posit+5
 while UO.GetX() < posit
  UO.Press (39, 1, 500)
 wend 
 st=1
 goto start
endif

if st == 1 then
 posit=UO.GetY()
 posit=posit+5
 while UO.GetY() < posit
  UO.Press (40, 1, 500)
 wend 
 st=2
 goto start
endif

if st == 2 then
 posit=UO.GetX()
 posit=posit-5
 while UO.GetX() > posit
  UO.Press (37, 1, 500)
 wend 
 st=3
 goto start
endif

if st == 3 then
 posit=UO.GetY()
 posit=posit-5
 while UO.GetY() > posit
  UO.Press (38, 1, 500)
 wend 
 st=0
 goto start
endif

Как мне сделать чтоб он ходил по кругу? плиз помагите[/code]
Author:  ДРВ [ 2006-07-01 15:14:04 ]
Post subject:  Re: Ходилка по кругу
Harpoon wrote:
Code:
st == 0 then
 posit=UO.GetX()
 posit=posit+5
 while UO.GetX() < posit
  UO.Press (39, 1, 500)
 wend 
 st=1
 goto start
endif

if st == 1 then
 posit=UO.GetY()
 posit=posit+5
 while UO.GetY() < posit
  UO.Press (40, 1, 500)
 wend 
 st=2
 goto start
endif

if st == 2 then
 posit=UO.GetX()
 posit=posit-5
 while UO.GetX() > posit
  UO.Press (37, 1, 500)
 wend 
 st=3
 goto start
endif

if st == 3 then
 posit=UO.GetY()
 posit=posit-5
 while UO.GetY() > posit
  UO.Press (38, 1, 500)
 wend 
 st=0
 goto start
endif

Как мне сделать чтоб он ходил по кругу? плиз помагите[/code]
а смысл какой?
Author:  qwerty123 [ 2006-07-01 15:17:12 ]
Post subject: 
ну мне надо чтоб он ходил по квадрату, а то если по этим он у меня идет по премой и потом реска в низ и не останавливается :(
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/