function EExecAN(OOO,X,Y,Att,Sg1,Sg2) { var Prizn; var XX,YY; var ZZ; var S={Re:undefined, Im:undefined} var S1; if ((X.OB==undefined) || (Y.OB==undefined)) return false; if ((X.OB=="!") || (Y.OB=="!")) { // OOO=(TOBreak.Create([nil],OW)); return true; } if ((X.OB=="C") && ((Y.OB=="C") || (Y.OB=="D"))) { if (Y.OB=="C") { S.Re=X.C.Re*Sg1+Y.C.Re*Sg2; S.Im=X.C.Im*Sg1+Y.C.Im*Sg2; TOChisl_Create(OOO,S,Att); } if (Y.OB=="D") { S.Re=X.C.Re*Sg1+Y.R.Re*Sg2; S.Im=0; TOChisl_Create(OOO,S,Att); } } else if ((X.OB=="D") && ((Y.OB="C") || (Y.OB="D"))) { if (Y.OB=="C") { S.Re=X.R.Re*Sg1+Y.C.Re*Sg2; S.Im=0; TOChisl_Create(OOO,S,Att); } if (Y.OB=="D") { S.Re=X.R.Re*Sg1+Y.R.Re*Sg2; S.Im=0; TOChisl_Create(OOO,S,Att); } } else if ((X.OB=="V") && (Y.OB=="V")) { // XX.Re=(TOVektor(X).X2.Re-TOVektor(X).X1.Re)*Sg1+(TOVektor(Y).X2.Re-TOVektor(Y).X1.Re)*Sg2; // XX.Im=0; // YY.Re=(TOVektor(X).Y2.Re-TOVektor(X).Y1.Re)*Sg1+(TOVektor(Y).Y2.Re-TOVektor(Y).Y1.Re)*Sg2; // YY.Im=0; // OOO=TOVektor.Create(MCompl(TOVektor(X).X1.Re,0),MCompl(TOVektor(X).Y1.Re,0),MCompl(TOVektor(X).X1.Re+XX.Re,0),MCompl(TOVektor(X).Y1.Re+YY.Re,0),Att,OW); } else if ((X.OB=="T") && (Y.OB=="T")) { // OOO=TOText.Create(0,0,FALSE,TOText(X).T+TOText(Y).T,OW,Att); } else if ((X.OB=="T") && (Y.OB=="C")) { // S1=FloatToStr(TOChisl(Y).C.Re); // if Length(S1)>1 if Pos('.',S1)>0 while S1[Length(S1)]='0' do Delete(S1,Length(S1),1); // if Pos('.',S1)=Length(S1) Delete(S1,Length(S1),1); // OOO=TOText.Create(0,0,FALSE,TOText(X).T+S1,OW,Att); } else { if (Att.Chk=1) OOO.OB="$"; } return true; } // EExecAN