Changeset 3519 in Sophya for trunk/SophyaPI/PI/psfile.cc

Timestamp:

Sep 11, 2008, 2:43:55 PM (17 years ago)

Author:

ansari

Message:

1/ Introduction des classes auxiliaires PIPixColIdx , PIPixRGB , PIPixRGBArray
(nouveau fichier pipixutils.cc .h) pour support de tables de couleurs avec > 256 couleurs.
2/ Ajout de tables de couleurs RGB (216/512/4096) pour representation d'image RGB
3/ Extension et modification de la classe P2DArrayAdapter, introduction de la methode P2DArrayAdapter::MeanVal()
4/ Modif de la classe LUT pour introduction typeRGB
5/ Modification et propagation ds PIImage , PIPIxmap ...

Reza , 11/09/2008

File:

• trunk/SophyaPI/PI/psfile.cc (modified) (1 diff)

trunk/SophyaPI/PI/psfile.cc

@@ -1367 +1367 @@
     for(i = 0; i < Ny; i++) {
         for(j = 0; j<Nx-1; j++ )
-            fprintf(mPSFile, "%02X", Pict[i*Nx+j]);
-    fprintf(mPSFile, "%02X\n", Pict[i*Nx+j]);
+            fprintf(mPSFile, "%02X", (int)Pict[i*Nx+j]);
+    fprintf(mPSFile, "%02X\n", (int)Pict[i*Nx+j]);
+    }
+    /* Un petit grestore ...*/
+    fprintf(mPSFile, "gr\n");
+}
+
+void PSFile::Image(double x0, double y0, double Tx, double Ty,
+                   int Nx, int Ny,
+                   unsigned short *Pict, 
+                   PIColorMap *mMap) {
+
+    int i, j;
+
+    /* Buffers PostScript */
+    fprintf(mPSFile, "/Taille %d def\n", Nx);
+    fprintf(mPSFile, "/ImStr Taille string def\n");
+    fprintf(mPSFile, "/RGBStr Taille 3  mul string def\n");
+
+    /* Ecriture ColorMap */
+    fprintf(mPSFile, "/ColorMap %05d array def\n", mMap->NCol() );
+    for(i = 0; i < mMap->NCol(); i++) {
+        fprintf(mPSFile, "ColorMap %d [16#%02X 16#%02X 16#%02X] put\n",
+                i,
+                (int)(mMap->GetColor(i).red/256),
+                (int)(mMap->GetColor(i).green/256),
+                (int)(mMap->GetColor(i).blue/256));
+    }
+    /* Emplacement de l'image */
+    fprintf(mPSFile, "gs %.2f Ux %.2f Uy tr %.2f Ux %.2f Uy sc\n", x0, y0, Tx, Ty);
+    /* Nbr pix-X, Nbr pix-Y bits/pixels */
+    fprintf(mPSFile, "%d %d 16\n", Nx, Ny);
+    /* Matrice de passage */
+    fprintf(mPSFile, "[%d 0 0 %d 0 0]", Nx, Ny);
+    /* Fonction colorimage */
+    fprintf(mPSFile, "{currentfile ImStr readhexstring pop GetRGB}\
+false 3 colorimage\n\n");
+    /* Data */
+    for(i = 0; i < Ny; i++) {
+        for(j = 0; j<Nx-1; j++ )
+            fprintf(mPSFile, "%04X", (int)Pict[i*Nx+j]);
+    fprintf(mPSFile, "%04X\n", (int)Pict[i*Nx+j]);
     }
     /* Un petit grestore ...*/