xref: /petsc/src/sys/classes/draw/tests/ex1.c (revision b122ec5aa1bd4469eb4e0673542fb7de3f411254)
1c4762a1bSJed Brown 
2c4762a1bSJed Brown static char help[] = "Demonstrates opening and drawing in a window\n";
3c4762a1bSJed Brown 
4c4762a1bSJed Brown #include <petscsys.h>
5c4762a1bSJed Brown #include <petscdraw.h>
6c4762a1bSJed Brown 
7c4762a1bSJed Brown int main(int argc,char **argv)
8c4762a1bSJed Brown {
9c4762a1bSJed Brown   PetscDraw draw;
10c4762a1bSJed Brown   int       x = 0,y = 0,width = 300,height = 300;
11c4762a1bSJed Brown 
12*b122ec5aSJacob Faibussowitsch   CHKERRQ(PetscInitialize(&argc,&argv,NULL,help));
13c4762a1bSJed Brown 
145f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawCreate(PETSC_COMM_WORLD,0,"Title",x,y,width,height,&draw));
155f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSetPause(draw,2.0));
165f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSetFromOptions(draw));
175f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSetViewPort(draw,.25,.25,.75,.75));
18c4762a1bSJed Brown 
195f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawLine(draw,0.0,0.0,1.0,1.0,PETSC_DRAW_BLACK));
205f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.2,.2,PETSC_DRAW_RED,"Some Text"));
215f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.5,.5,PETSC_DRAW_GREEN,"Some Text"));
225f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.2,.8,PETSC_DRAW_BLUE,"Some Text"));
235f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawFlush(draw));
245f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawPause(draw));
255f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSave(draw));
26c4762a1bSJed Brown 
275f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawClear(draw));
285f80ce2aSJacob Faibussowitsch   /*CHKERRQ(PetscDrawStringSetSize(draw,.5,.5));*/
295f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.2,.2,PETSC_DRAW_RED,"Some Text"));
305f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.5,.5,PETSC_DRAW_GREEN,"Some Text"));
315f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.2,.8,PETSC_DRAW_BLUE,"Some Text"));
325f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawFlush(draw));
335f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawPause(draw));
345f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSave(draw));
35c4762a1bSJed Brown 
365f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawResizeWindow(draw,600,600));
375f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawGetWindowSize(draw,&width,&height));
385f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSetViewPort(draw,0,0,1,1));
395f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawClear(draw));
405f80ce2aSJacob Faibussowitsch   /*CHKERRQ(PetscDrawLine(draw,0.0,0.0,1.0,1.0,PETSC_DRAW_RED));*/
415f80ce2aSJacob Faibussowitsch   /*CHKERRQ(PetscDrawLine(draw,0.0,1.0,1.0,0.0,PETSC_DRAW_BLUE));*/
425f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.2,.2,PETSC_DRAW_RED,"Some Text\n  Some Other Text"));
435f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,.5,.5,PETSC_DRAW_RED,"ABCygj\n()[]F$"));
445f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawString(draw,0,0,PETSC_DRAW_RED,"Horizontal Text (ABCygj)"));
455f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawStringVertical(draw,0,1,PETSC_DRAW_RED,"Vertical Text"));
465f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawFlush(draw));
475f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawPause(draw));
485f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSave(draw));
49c4762a1bSJed Brown 
505f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawDestroy(&draw));
51*b122ec5aSJacob Faibussowitsch   CHKERRQ(PetscFinalize());
52*b122ec5aSJacob Faibussowitsch   return 0;
53c4762a1bSJed Brown }
54c4762a1bSJed Brown 
55c4762a1bSJed Brown /*TEST
56c4762a1bSJed Brown 
57c4762a1bSJed Brown    build:
58c4762a1bSJed Brown      requires: x
59c4762a1bSJed Brown 
60c4762a1bSJed Brown    test:
61c4762a1bSJed Brown      output_file: output/ex1_1.out
62c4762a1bSJed Brown 
63c4762a1bSJed Brown TEST*/
64