Крис Тинка Доработал твой скрипт для автопосадки деревьев. Теперь сажает по кругу туда-сюда
// Посадка деревьев
// Яблоня, вишня, мандарин, лимон
//
$re=19 // число деревьев в ряду.
$x1=$_xmouse
$y1=$_ymouse
WAITMS(500)
start:
FOR($a,$a<$re)
LDOWN($x1-32,$y1+16)
WAITMS(50)
MOVE($x1,$y1)
WAITMS(50)
LUP($x1,$y1)
WAITMS(50)
END_CYC
LDOWN($x1+32,$y1+16)
WAITMS(50)
MOVE($x1,$y1)
WAITMS(50)
LUP($x1,$y1)
WAITMS(50)
FOR($a,$a<$re)
LDOWN($x1+32,$y1-16)
WAITMS(50)
MOVE($x1,$y1)
WAITMS(50)
LUP($x1,$y1)
WAITMS(50)
END_CYC
LDOWN($x1+32,$y1+16)
WAITMS(50)
MOVE($x1,$y1)
WAITMS(50)
LUP($x1,$y1)
WAITMS(50)
GOTO(start)