home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / CPROG / FORMGE.ZIP / TEST.C < prev    next >
Text File  |  1989-04-20  |  4KB  |  112 lines
  1. /*----------------------------------------------------------------------*/
  2. /* 
  3.   Variables used: 
  4.     int      myint;
  5.     char     mychar;
  6.     float     myfloat;
  7.     char     mystring[25+1];
  8.     char     myed[(25+1)*5];
  9. */
  10. /*----------------------------------------------------------------------*/
  11.  
  12. void displayme(void)
  13. /* screen code generated by formgen using: test */
  14. {
  15.     bfore = YELLOW; textcolor(YELLOW);
  16.     bback = BLACK; textbackground(BLACK);
  17.     /* change next line from bclear() to savescreen() if you */
  18.     /* want the form to pop up over existing background      */
  19.     bclear(0);
  20.     bfore = WHITE; textcolor(WHITE);
  21.     bback = BLUE; textbackground(BLUE);
  22.     bwrite(0,20,4,"╔═══════════════════════════════════════╗");
  23.     bwrite(0,20,5,"║ Integer:                              ║");
  24.     bwrite(0,20,6,"║ Char:                                 ║");
  25.     bwrite(0,20,7,"║ Float:                                ║");
  26.     bwrite(0,20,8,"║ String:                               ║");
  27.     bwrite(0,20,9,"║ Editor:                               ║");
  28.     bwrite(0,20,10,"║                                       ║");
  29.     bwrite(0,20,11,"║                                       ║");
  30.     bwrite(0,20,12,"║                                       ║");
  31.     bwrite(0,20,13,"║                                       ║");
  32.     bwrite(0,20,14,"╚═══════════════════════════════════════╝");
  33.     bfore = YELLOW; textcolor(YELLOW);
  34.     bback = BLACK; textbackground(BLACK);
  35.     restorescreen(0);
  36. }
  37.  
  38. /*----------------------------------------------------------------------*/
  39.  
  40. void fillme()
  41. {
  42.     bfore = BLUE; textcolor(BLUE);
  43.     bback = LIGHTGRAY; textbackground(LIGHTGRAY);
  44.     gotoxy(32,5); cprintf("%6d",myint);
  45.     gotoxy(32,6); cprintf("%c",mychar);
  46.     gotoxy(32,7); cprintf("%6.2d",myfloat);
  47.     gotoxy(32,8); cprintf("%-25s",mystring);
  48.     redraw((char*)myed,32,9,25,5);
  49.  
  50.     bfore = YELLOW; textcolor(YELLOW);
  51.     bback = BLACK; textbackground(BLACK);
  52. }
  53.  
  54. /*----------------------------------------------------------------------*/
  55.  
  56. void editme()
  57. {
  58.     int    rcode,fieldnumber,col,xp,yp;
  59.  
  60.     bfore = BLUE; textcolor(BLUE);
  61.     bback = LIGHTGRAY; textbackground(LIGHTGRAY);
  62.     fieldnumber = 0;
  63.     do {
  64.         col = xp = yp = rcode = 0;
  65.         switch (fieldnumber) {
  66.           case 0:
  67.             rcode = getint(32,5,&myint,6);
  68.             break;
  69.           case 1:
  70.             rcode = getachar(32,6,&mychar);
  71.             break;
  72.           case 2:
  73.             rcode = getfloat(32,7,&myfloat,6,2);
  74.             break;
  75.           case 3:
  76.             rcode = getstring(32,8,&col,mystring,25);
  77.             break;
  78.           case 4:
  79.             rcode = edit((char*)myed,32,9,&xp,&yp,25,5);
  80.             break;
  81.         }  /* switch fieldnumber */
  82.  
  83.         switch (rcode) {
  84.             case 0:
  85.             case 1:
  86.             case 5:
  87.             case 6:
  88.             case 10:
  89.                 fieldnumber++;
  90.                 break;
  91.             case 3:
  92.             case 4:
  93.             case 9:
  94.                 fieldnumber--;
  95.                 break;
  96.             case 2:
  97.             case 7:
  98.             case 8:
  99.                 rcode = 8; /* exit loop */
  100.                 break;
  101.         }  /* switch rcode */
  102.  
  103.         if (fieldnumber<0) fieldnumber = 4;
  104.         if (fieldnumber>4) fieldnumber = 0;
  105.     } while (rcode != 8);
  106.     bfore = YELLOW; textcolor(YELLOW);
  107.     bback = BLACK; textbackground(BLACK);
  108.     /* insert any special instructions here */
  109.  
  110. }
  111.  
  112.