#usage "Tahle hracka okotuje desku podle hrajnich bodu car ve vrstve dimension
"
"Autor: Jakub Lanik kubanecxxx'z@vinac'seznam.cz"
void main (void){
real souradnice_x[];
real souradnice_y[];
char i=0;
char j=0;
real x_rozmer=0;
real y_rozmer=0;
string script_rozmery=filesetext(path_scr[0]+'/'+"koty",".scr");
output(script_rozmery,"wt")
if (board){
board(deska){
deska.wires(cary){
if(cary.layer==20){
// printf("wires: (%d %d) (%d %d) \n",cary.x1, cary.y1, cary.x2, cary.y2);
souradnice_x[i]=u2mm(cary.x1);
souradnice_y[i]=u2mm(cary.y1);
i++;
}
}
for (j=0;souradnice_x[0]==souradnice_x[j];j++);
x_rozmer=abs(souradnice_x[0]-souradnice_x[j]);
for (j=0;souradnice_y[0]==souradnice_y[j];j++);
y_rozmer=abs(souradnice_y[0]-souradnice_y[j]);
// printf("rozmery: %f , %f \n",x_rozmer,y_rozmer);
sort(i,souradnice_x);
sort(i,souradnice_y);
// printf("%f , %f \n",souradnice_x[i-1], souradnice_y[0]);
//x rozměr pod nejmenši y
printf("#deska %s \n",deska.name);
printf("layer 110 koty; \n");
printf("layer koty; \n");
printf("grid mm; \n");
printf("set color_layer koty LRed; \n");
printf("set size 2.5; \n");
//kota
printf("text %.1fmm \n",x_rozmer);
//umistěni
printf("(%f %f); \n",souradnice_x[0]+x_rozmer/2-5,souradnice_y[0]-5);
printf("text %.1fmm \n",y_rozmer);
printf("(%f %f); \n",souradnice_x[i-1]+5,souradnice_y[0]+y_rozmer/2);
printf("grid last \n");
exit("scr '" + script_rozmery + "';\n");
// printf ("area: (%d %d) (%d %d) \n",deska.area.x1, deska.area.y1, deska.area.x2, deska.area.y2);
}
} else {
dlgMessageBox(":Zkus to v desce") ;
}
}