16/tweak16/EXAMPLE1.C

   1 /*\r
   2         Example1.C version 1.5\r
   3         by Robert Schmidt of Ztiff Zox Softwear 1993\r
   4 \r
   5         Example of making use of a TWEAK file by loading it directly at\r
   6                 run-time.  This program needs the file(s) created by TWEAK\r
   7                 available at run-time.\r
   8 */\r
   9 \r
  10 #include <dos.h>\r
  11 #include <mem.h>\r
  12 #include <alloc.h>\r
  13 #include <conio.h>\r
  14 #include "TwkUser.h"    /* declares the neccessary functions and types */\r
  15 \r
  16 main()\r
  17         {\r
  18         /* Define the pointer that should point to the loaded array of\r
  19            Registers, and the int to hold its size */\r
  20 \r
  21     RegisterPtr rarray;\r
  22         int rsize;\r
  23 \r
  24         int y, lastMode;\r
  25 \r
  26         cprintf("This example program loads a TWEAK register file at run-time\n\r");\r
  27         cprintf("and uses this to set Mode X (320x240x256).\n\rPress any key.");\r
  28         getch();\r
  29 \r
  30         /* Now use the loadRegArray function declared in TwkUser.h to load the\r
  31            TWEAK file.  Memory is automatically allocated.  Note that the\r
  32            second argument is the address of the pointer defined above!\r
  33            The returned value is the number of Register elements loaded. */\r
  34 \r
  35     rsize = loadRegArray("320x240.256", &rarray);\r
  36 \r
  37         /* Save the number of the current BIOS mode, so we can restore it\r
  38            later. */\r
  39 \r
  40         _AH = 0x0f;\r
  41         geninterrupt(0x10);\r
  42         lastMode = _AL;\r
  43 \r
  44         /* Set mode 13h, to make sure the EGA palette set is correct for a 256\r
  45            color mode */\r
  46 \r
  47         _AX = 0x13;\r
  48         geninterrupt(0x10);\r
  49 \r
  50         /* rarray now points to the loaded array.  The second argument to\r
  51            outRegArray is the number if Register elements in the array. */\r
  52 \r
  53     outRegArray(rarray, rsize);\r
  54 \r
  55         outpw(0x3c4, 0x0f02);                   /* Enable all 4 planes */\r
  56 \r
  57         /* Fill the screen with a blend of pink and green lines, defining the\r
  58            palette on the fly. */\r
  59 \r
  60         outp(0x3c8, 0);                                 /* start with color 0 */\r
  61         for (y = 0; y<240; y++)\r
  62                 {\r
  63                 outp(0x3c9, y>>2);                      /* red component */\r
  64                 outp(0x3c9, (256-y) >> 2);      /* green component */\r
  65                 outp(0x3c9, y>>2);                      /* blue component */\r
  66                 memset((char*)MK_FP(0xa000,0) + y*80, y, 80);\r
  67                 }\r
  68 \r
  69         /* The mode is now set, so wait for the user to press a key...\r
  70            Nothing much interesting to look at, I'm afraid. */\r
  71 \r
  72     getch();\r
  73 \r
  74         /* Restore the saved mode number.  Borland's textmode() won't work, as the\r
  75            C library still thinks we're in the mode it detected at startup.\r
  76            The palette will be set to the BIOS mode's default. */\r
  77 \r
  78         _AX = lastMode;\r
  79         geninterrupt(0x10);\r
  80 \r
  81         /* Free the Register array allocated in loadRegArray.  *You* are\r
  82            responsible for doing this! */\r
  83 \r
  84     free(rarray);\r
  85 \r
  86         return 0;\r
  87         }\r