/* Displays the plotter symbols for PLPOIN */

#include "plplot.h"
#include <stdio.h>

main()
{
   char text[3];
   PLINT i, j, k;
   PLFLT x, y;

   /* Full sized page for display */

   plstar(1,1);
   pladv(0);

   /* Set up viewport and window */

   plvpor((PLFLT)0.1,(PLFLT)1.0,(PLFLT)0.1,(PLFLT)0.9);
   plwind((PLFLT)0.0,(PLFLT)1.0,(PLFLT)0.0,(PLFLT)1.3);

   /* Draw the grid using plbox */

   plbox("bcgt",(PLFLT)0.1,0,"bcgt",(PLFLT)0.1,0);

   /* Write the digits below the frame */

   for (i=0; i<=9; i++) {
     sprintf(text,"%d",i);
     plmtex("b",(PLFLT)1.5,(PLFLT)(0.1*i+0.05),(PLFLT)0.5,text);
   }

   k=0;
   for (i=0; i<=12; i++)  {

      /* Write the digits to the left of the frame */

      sprintf(text,"%d",10*i);
      plmtex("lv",1.0,1.0-(2*i+1)/26.0,1.0,text);
      for (j=0; j<=9; j++) {
        x=0.1*j+0.05;
        y=1.25-0.1*i;

        /* Display the symbols (plpoin expects that x and y are arrays so */
        /* pass pointers) */

        if (k < 128) plpoin(1,&x,&y,k);
        k=k+1;
      }
   }

   plmtex("t",1.5,0.5,0.5,"PLPLOT Example 6 - PLPOIN symbols");
   plend();
}