I dont have any idea how make GetCoordinCircle maybe someone have?
this is square example from 097
Code:
function GetCoordsInSquare(mid_x, mid_y, radius)
var x_row := CInt(mid_x)-CInt(radius);
var y_col := CInt(mid_y)-CInt(radius);
var stop_x := CInt(mid_x)+CInt(radius);
var stop_y := CInt(mid_y)+CInt(radius);
var point_list := array{};
var coord := struct{"x", "y"};
for ( x_row:=(mid_x-radius); x_row<=stop_x; x_row:=x_row+1 )
for ( y_col:=(mid_y-radius); y_col<=stop_y; y_col:=y_col+1 )
coord.x := x_row;
coord.y := y_col;
point_list.Append(coord);
SleepMS(2);
endfor
SleepMS(2);
endfor
return point_list;
endfunction