/********************************************************************/
 /****                                                            ****/
 /****                                                            ****/
 /****    Program          : Print.c                              ****/
 /****                                                            ****/
 /****    Version          :    01.00                             ****/
 /****                                                            ****/
 /****    Erstversion      : 14.01.1989                           ****/
 /****                                                            ****/
 /****    Letzte Änderung  : 21.10.1989                           ****/
 /****                                                            ****/
 /****    Compiliert mit   : siehe Make                           ****/
 /****                                                            ****/
 /****    Gelinkt mit      : für Tool.Library                     ****/
 /****                                                            ****/
 /********************************************************************/
 /****                                                            ****/
 /****                                                            ****/
 /****               Copyright by Rüdiger Dreier                  ****/
 /****                                                            ****/
 /****                                                            ****/
 /********************************************************************/
 
 #include <intuition/intuition.h>
 #include <intuition/intuitionbase.h>
 #include <libraries/dos.h>
 #include <graphics/gfxmacros.h>
 #include <exec/memory.h>
 #include <proto/intuition.h>
 #include <proto/graphics.h>
 #include <proto/exec.h>
 #include <proto/dos.h>
 #include <string.h>
 
 extern struct Library *OpenLibrary();
 extern struct Window  *OpenWindow();
 extern VOID		CloseLibrary();
 extern struct Screen *OpenScreen();
 extern struct IntuitionBase *IntuitionBase;
 extern struct GfxBase *GfxBase;
 
 VOID Print(RP,text,col,xpos,ypos)
 struct RastPort *RP;
 STRPTR text;
 LONG  col,xpos,ypos;
  {
   SetDrMd(RP,JAM1);
   SetAPen(RP,col);
   Move(RP,xpos,ypos);
   Text(RP,text,strlen(text));
  }