home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d571 / gwin.lha / Gwin / Examples / text.c < prev    next >
C/C++ Source or Header  |  1991-12-22  |  1KB  |  48 lines
  1. #include "gwin.user.h"
  2. /*******************************************************/
  3. /*                                                     */
  4. /* GRAPHICS  MAIN                                      */
  5. /*                                                     */
  6. /*******************************************************/
  7. main()
  8. {
  9. float x,y;
  10.  
  11.    USTART("low1",0.,320.,0.,200.);
  12.  
  13. /* This shows how you would retrieve a font from some other disk.     */
  14. /* This font set is on fish 202.   I have tested this and it works.   */
  15. /* It is commented out here since fish 202 is probably not in your    */
  16. /* df1: drive right now. -- Right?                                    */
  17. /* ufont("df1:SlavicFonts/cyrillic/moskva.font",11.0); */
  18.  
  19.    ufont(G,"garnet.font",16.0);
  20.    upset(G,"fsty",1.0);
  21.    uprint(G,10.,90.,"garnet.font underlined");
  22.  
  23.    ufont(G,"topaz.font",11.0);
  24.    upset(G,"fsty",0.0);
  25.    uprint(G,10.,80.,"topaz.font  ");
  26.  
  27.    upset(G,"fsty",1.0);
  28.    uprnt1(G,"text","line continuation...");
  29.  
  30.    upset(G,"fsty",0.0);
  31.    umove(G,10.,30.);
  32.    /* uprnt1(G,"inte",25.0); */
  33.    uprnt1(G,"text","25.0");
  34.    uprnt1(G,"text","   ");
  35.    /* uprnt1(G,"inte",25.0); */
  36.    uprnt1(G,"text","25");
  37.    uprnt1(G,"text"," ");
  38.  
  39.    upset(G,"fsty",3.0);
  40.    uprnt1(G,"text","BOLD & underlined.");
  41.  
  42.    if(ugrin(G,&x,&y)){UEND();exit(0);};
  43.  
  44.    UEND();
  45.  
  46. }
  47.  
  48.