/* Displays the plotter symbols for FXPOIN function. */
/* Copyright (©) 1995, The Xperts Group Inc. All Rights Reserved. */
/* Author: Manolis S Pappas. */

#include <stdio.h>

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

/* Full sized page for display */

      fxstar(1,1);
      fxadv(0);

/* Set up viewport and window */

      fxvpor(0.1,1.0,0.1,0.9);
      fxwind(0.0,1.0,0.0,1.3);

/* Draw the grid using plbox */

      fxbox("bcgt",0.1,0,"bcgt",0.1,0);

/* Write the digits below the frame */

      for (i=0; i<=9; i++) {
        sprintf(text,"%d",i);
        fxmtex("b",1.5,0.1*i+0.05,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);
        fxmtex("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 (fxpoin expects that x and y are arrays so */
/* pass pointers) */

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

      fxmtex("t",1.5,0.5,0.5,"FXPOIN symbol library.");
      fxend();
}