Код: Выделить всё
automacro warp {
console /^Calculating lockMap route to:/
call {
$x = @eval($::char->{pos}{x})
$y = @eval($::char->{pos}{y})
$xwarp = @eval($x + @random ("-2", "-1", "1", "2"))
$ywarp = @eval($y + @random ("-2", "-1", "0", "1", "2"))
do sl 27 $xwarp $ywarp
pause 2
do warp место_куда_варпаемся
pause 2
do move $xwarp $ywarp
}
}
