Home| base |src.lib|graphic|ps| PostScriptMakeDocument Index

PostScriptMakeDocument

Syntax
int PostScriptMakePlot(struct PostScript *ptr, float x,float y,float wdt,float hgt, int land);
Header
base/rps.h
Library
rps
Description

The PostScriptMakeDocument function creates a PostScript document.

The offset from the edge of the page is given by the arguments x and y. The size of the plot is given by the arguments wdt and hgt.

If the argument land has a non-zero value then the PostScript plot is rotated ninety degrees to form a landscape plot.

Returns
Returns zero on success. On error, (-1) is returned.
Errors
On error, (-1) is returned.
Example
PostScriptMakeDocument
Source Code: PostScriptMakeDocument.c

/* PostScriptMakeDocument
   ======================
   Author: R.J.Barnes
 Copyright (c) 2012 The Johns Hopkins University/Applied Physics Laboratory

This file is part of the Radar Software Toolkit (RST).

RST is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program. If not, see <https://www.gnu.org/licenses/>.

Modifications:




#include <stdio.h>
#include <stdlib.h>
#include "rfbuffer.h"
#include "rps.h"

int stream(char *buf,int sze,void *data) {
  FILE *fp;
  fp=(FILE *) data;
  fwrite(buf,sze,1,stdout);
  return 0;
} 


int main(int argc,char *argv[]) {

  struct PostScript *ps=NULL;

  float wdt=400,hgt=400;
  float xoff=50,yoff=50;

  unsigned int fgcol=0xffff0000;

  int x;

  ps=PostScriptMake();
  PostScriptSetText(ps,stream,stdout);   
  PostScriptMakeDocument(ps,xoff,yoff,wdt,hgt,0);
  PostScriptMakePlot(ps);

  for (x=10;x<200;x+=5) {
    PostScriptRectangle(ps,NULL,x,x,wdt-2*x,hgt-2*x,
                   0,fgcol,0,NULL,NULL);
  }
 

 
  PostScriptEndPlot(ps);
  PostScriptEndDocument(ps);
  return 0;
}