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

Как сделать ?
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8723		 Page 1 of 1
Author:  JaguarBlack [ 2006-09-07 00:19:02 ]
Post subject:  Как сделать ?
Как сделать, чтоб он выкладывал вместо креста, квадрат !! То есть вместо 4 ящиков клал 8 ! И образовалась как бы коробочка, а не крест ! Спасибо !


Code:
sub POPA() 
var x 
if uo.getglobal('vetki')=='1' then 
uo.print('Kto to shas obosretsa :-)') 
goto exit2 
end if 
uo.setglobal('vetki','1') 
UO.Set('lasttarget','laststatus') 
x=uo.getserial('lasttarget') 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)-1),str(uo.gety(x)),0,"finditem") 
end if 
wait(400) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)),str(uo.gety(x)+1),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)+1),str(uo.gety(x)),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)),str(uo.gety(x)-1),0,"finditem") 
end if 
uo.setglobal('vetki','0') 
exit2: 
uo.print('Mudilo v pope :-)') 
end sub
Author:  Nmy [ 2006-09-07 12:32:02 ]
Post subject: 
Code:
sub POPA() 
var x 
if uo.getglobal('vetki')=='1' then 
uo.print('Kto to shas obosretsa :-)') 
goto exit2 
end if 
uo.setglobal('vetki','1') 
UO.Set('lasttarget','laststatus') 
x=uo.getserial('lasttarget') 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)-1),str(uo.gety(x)),0,"finditem") 
end if 
wait(400) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)),str(uo.gety(x)+1),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)+1),str(uo.gety(x)),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)),str(uo.gety(x)-1),0,"finditem") 
end if
wait(500)
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)-1),str(uo.gety(x)+1),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)+1),str(uo.gety(x)+1),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)-1),str(uo.gety(x)-1),0,"finditem") 
end if 
wait(500) 
uo.findtype("0x09AA") 
if uo.findcount() then 
uo.drop("1",str(uo.getx(x)+1),str(uo.gety(x)-1),0,"finditem") 
end if 
wait(500) 
uo.setglobal('vetki','0') 
exit2: 
uo.print('Mudilo v pope :-)') 
end sub


пробуй- нетестил...
Author:  JaguarBlack [ 2006-09-07 13:37:57 ]
Post subject: 
Красавец :)) Все работает, Огромное Спасибо :)) :D
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/