function AxeSimmet(Out_Prm,Y,XX,Sg,Att) { var C={Re:undefined, Im:undefined} var D={Re:undefined, Im:undefined} var E={Re:undefined, Im:undefined} var F={Re:undefined, Im:undefined} var G={Re:undefined, Im:undefined} var H={Re:undefined, Im:undefined} var A={Re:undefined, Im:undefined} var B={Re:undefined, Im:undefined} var AX1={Re:undefined, Im:undefined} var AX2={Re:undefined, Im:undefined} var AY1={Re:undefined, Im:undefined} var AY2={Re:undefined, Im:undefined} var AXc={Re:undefined, Im:undefined} var AYc={Re:undefined, Im:undefined} if (Y.OB=="P") { if (IsSobstv(Y)) { //if IsReal then { C=Y.X; D=Y.Y; U=CalcPF(C,D,XX); A=U.A; B=U.B; C=CompSum(C,CompMul(MCompl(2,0),CompSub(A,C))); D=CompSum(D,CompMul(MCompl(2,0),CompSub(B,D))); TOPoint_Create(Out_Prm,C,D,Y.W,Att); } } else TOPoint_Create(Out_Prm,Y.X,Y.Y,Y.W,Att); } if (Y.OB=="O") { if (IsSobstv(Y)) { if (IsReal(Y)) { U=CalcPF(Y.X1,Y.Y1,XX); C=U.A; D=U.B; U=CalcPF(Y.X2,Y.Y2,XX); E=U.A; F=U.B; C=CompSum(Y.X1,CompMul(MCompl(2,0),CompSub(C,Y.X1))); D=CompSum(Y.Y1,CompMul(MCompl(2,0),CompSub(D,Y.Y1))); E=CompSum(Y.X2,CompMul(MCompl(2,0),CompSub(E,Y.X2))); F=CompSum(Y.Y2,CompMul(MCompl(2,0),CompSub(F,Y.Y2))); if (Sg>0) {TOLine_Create(Out_Prm,C,D,1,E,F,1,Y.draw_AsBorned,"sobstv",Att)} else {TOLine_Create(Out_Prm,E,F,1,C,D,1,Y.draw_AsBorned,"sobstv",Att)} } } else TOLine_Create(Out_Prm,MCompl(0,0),MCompl(1,0),1,MCompl(1,0),MCompl(0,0),1,brn_Limited,"nesobstv",Att5); } if (Y.OB=="D") { AXc=Y.Xc; AYc=Y.Yc; AX1=MCompl(Y.X1,0); AY1=MCompl(Y.Y1,0); AX2=MCompl(Y.X2,0); AY2=MCompl(Y.Y2,0); U=CalcPF(AXc,AYc,XX); C=U.A; D=U.B; U=CalcPF(AX1,AY1,XX); E=U.A; F=U.B; U=CalcPF(AX2,AY2,XX); G=U.A; H=U.B; C=CompSum(AXc,CompMul(MCompl(2,0),CompSub(C,AXc))); D=CompSum(AYc,CompMul(MCompl(2,0),CompSub(D,AYc))); E=CompSum(AX1,CompMul(MCompl(2,0),CompSub(E,AX1))); F=CompSum(AY1,CompMul(MCompl(2,0),CompSub(F,AY1))); G=CompSum(AX2,CompMul(MCompl(2,0),CompSub(G,AX2))); H=CompSum(AY2,CompMul(MCompl(2,0),CompSub(H,AY2))); TODuga_Create(Out_Prm,C,D,MCompl(-Y.R.Re*Sg,0),E.Re,F.Re,G.Re,H.Re,Y.FAtt); } // TOEmpty_Create(Out_Prm,Att); } // AxeSimmet function EExecUU(Out_Prm,X,Y,Att,Sg1,Sg2) { if ((X.OB==undefined) || (Y.OB==undefined)) return false; if (Att.Pt==8) Att.Pt=Y.FAtt.Pt; if (Att.Lv==8) Att.Lv=Y.FAtt.Lv; if (Att.Lt==6) Att.Lt=Y.FAtt.Lt; if (X.OB=="O") { if (IsSobstv(X)) { AxeSimmet(Out_Prm,Y,X,Sg2,Att); Result=true; if (Result=false) { if (Att.Chk==1) TOEmpty_Create(Out_Prm,Att); Result=true; return Result; } } else { if (Att.Chk==1) TOEmpty_Create(Out_Prm,Att); Result=true; return Result; } } return true; } // EExecUU