Changeset 1846 in Sophya for trunk/SophyaPI/PI/pigraphx.cc

Timestamp:

Dec 31, 2001, 5:18:54 PM (24 years ago)

Author:

ansari

Message:

Correction/amelioration trace de string pour sortie postscript - Reza 31/12/2001

File:

• trunk/SophyaPI/PI/pigraphx.cc (modified) (2 diffs)

trunk/SophyaPI/PI/pigraphx.cc

@@ -300 +300 @@
     case  PI_FStarMarker :
       for(k=0; k<10; k++) {
-        x[k] = (int)(starcoordx[k]*(float)mMrkSz+(float)x0+0.5);
-        y[k] = (int)(starcoordy[k]*(float)mMrkSz+(float)y0+0.5);
+        x[k] = (int)(starcoordx[k]*hmsz+(float)x0+0.5);
+        y[k] = (int)(starcoordy[k]*hmsz+(float)y0+0.5);
         }
       x[10] = x[0];   y[10] = y[0];
@@ -719 +719 @@
 double pio52 = pio5/2.;
 double cpi2 = M_PI/2.-pio5;  
-double re = 1.2;  // Rayon externe
-double ri = 0.5; //  rayon interne pour rext=1.2
+// Pentagone inscrit dans un cercle de rayon R1 = 1
+// les pointes de l'etoile seront inscrites dans un cercle 
+// de rayon R2 = 2.61803 
+double re = 1.;  // Rayon externe
+double ri = 0.38; //  rayon interne pour rext=1.2
 for(int k=0; k<5; k++) {
   starcoordx[2*k] = cos(k*pio5+cpi2)*re;