home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / VGALIB.ZIP / VIO.C < prev    next >
C/C++ Source or Header  |  1992-08-19  |  5KB  |  301 lines
  1. /* test of VioGetPhysBuf()  */
  2. /* By John E. Stone  08/15/92   */
  3. /* E-mail Johns@cs.umr.edu      */
  4. /* Make sure that program type is set to NOTWINDOWCOMPAT before */
  5. /*  use... Otherwise VioSetMode will fail... */
  6.  
  7.  
  8.  
  9.  
  10. #define INCL_BASE
  11. #include <os2.h>
  12. #include <math.h>
  13. #include <string.h>
  14. #include <stdlib.h>
  15.  
  16. #define HANDLE 0
  17. #define WAIT 1
  18. #define BUFSIZE 12
  19.  
  20.  
  21. /******** CLS *******/
  22. void cls(ptr0,color)
  23. PCH ptr0;
  24. char color;
  25. {
  26. memset((PCH) ptr0,(color*256 + color),64000);
  27. }
  28.  
  29. /********* Putpixel ********/
  30. void putpixel(ptr0,x,y,color)
  31. PCH ptr0;
  32. unsigned int x;
  33. unsigned int y;
  34. char color;
  35. {
  36. *(PCH) (ptr0+(320*y)+x)=color;
  37. }
  38.  
  39. unsigned char getpixel(ptr0,x,y)
  40. PCH ptr0;
  41. unsigned int x,y;
  42. {
  43. return(*(PCH) (ptr0+x+(320*y))); 
  44. }
  45.  
  46.  
  47.  
  48. /******* midline ****************/
  49. void midline(ptr0,x1,y1,x2,y2,color)
  50. PCH ptr0;
  51. unsigned int x1,y1,x2,y2;
  52. char color;
  53. {
  54. unsigned int x,y;
  55.          int d,dx,dy,incrE,incrNE;
  56.  
  57. x=x1;
  58. y=y1;
  59. dx=x2-x1;
  60. dy=y2-y1;
  61. *(PCH) (ptr0+(320*y)+x)=color;
  62.  
  63. if (dy>=0) {
  64.     d=(2*dy) - dx;
  65.     incrE=2*dy;
  66.     incrNE=2*(dy-dx);
  67.  
  68. while (x<x2)
  69. {
  70.     if (d<=0)
  71.         {  d+=incrE;
  72.        x++; }
  73.     else
  74.     {
  75.        d+=incrNE;
  76.        x++;
  77.        y++;
  78.     }
  79.     *(PCH) (ptr0+(320*y)+x)=color;
  80. }
  81. }
  82. else {
  83.     d=(2*dy)+dx;
  84.     incrE=2*dy;
  85.     incrNE=2*(dy+dx);
  86. while (x<x2)
  87. {
  88.     if (d>=0)
  89.     { d+=incrE;
  90.       x++; }
  91.     else
  92.     { d+=incrNE;
  93.       x++;  y--; 
  94.         }
  95.     *(PCH) (ptr0+(320*y)+x)=color;
  96. } 
  97. }
  98.  
  99. } /* end of midline */
  100.  
  101. /****** line ******/
  102.  
  103. void line(ptr0,x1,y1,x2,y2,color)
  104. PCH ptr0;
  105. unsigned int x1,y1,x2,y2;
  106. char color;
  107. {
  108.  
  109. if (x1<=x2)
  110.    {
  111.    midline(ptr0,x1,y1,x2,y2,color);
  112.    }
  113. else
  114.    {
  115.    midline(ptr0,x2,y2,x1,y1,color); 
  116.    }
  117. } /* end of line */
  118.  
  119.  
  120. /******** Box **********/
  121. box(ptr0,x1,y1,x2,y2,color)
  122. PCH ptr0;
  123. unsigned int x1,y1,x2,y2;
  124. char color;
  125. {
  126. unsigned int y,lx,ly,ux,uy;
  127. register unsigned int x;
  128.  
  129.   lx=min(x1,x2);
  130.   ux=max(x1,x2);
  131.   ly=min(y1,y2);
  132.   uy=max(y1,y2);
  133.  
  134.   for (y=ly*320; y<=uy*320; y+=320) {
  135.     for (x=lx;x<=ux;x++) {
  136.       *(PCH) (ptr0+y+x)=color;
  137.     }
  138.   }
  139. }
  140.  
  141. circlepoints(ptr0,x,y,xc,yc,color)
  142. PCH ptr0;
  143. int x,y;
  144. unsigned int xc,yc;
  145. char color;
  146. {
  147. *(PCH) (ptr0+x+xc+(y+yc)*320)=color;
  148. *(PCH) (ptr0+y+xc+(x+yc)*320)=color;
  149. *(PCH) (ptr0+y+xc+(-x+yc)*320)=color;
  150. *(PCH) (ptr0+x+xc+(-y+yc)*320)=color;
  151. *(PCH) (ptr0-x+xc+(-y+yc)*320)=color;
  152. *(PCH) (ptr0-y+xc+(-x+yc)*320)=color;
  153. *(PCH) (ptr0-y+xc+(x+yc)*320)=color;
  154. *(PCH) (ptr0-x+xc+(y+yc)*320)=color;
  155. }
  156.  
  157. /***** Circle ******/
  158. void circle(ptr0,xc,yc,radius,color)
  159. PCH ptr0;
  160. unsigned int xc,yc,radius;
  161. char color;
  162. {
  163. int x,y,d;
  164.  
  165. x=0;
  166. y=radius;
  167. d=1-radius;
  168. circlepoints(ptr0,x,y,xc,yc,color);
  169.  
  170. while (y>x) {
  171.     if (d<0) {
  172.         d+=2*x+3;
  173.         x++;
  174.     }
  175.     else {
  176.         d+=2*(x-y)+5;
  177.         x++;
  178.         y--;
  179.     }
  180.      circlepoints(ptr0,x,y,xc,yc,color);
  181. }
  182. }
  183.  
  184.  
  185.  
  186.  
  187. main()
  188. {
  189.     struct _VIOPHYSBUF phys;
  190.     struct _VIOMODEINFO orig,moda;
  191.     char status;
  192.     unsigned int index;
  193.     unsigned rc;
  194.     unsigned short color;
  195.     PCH ptr0;
  196.     unsigned int x,y;
  197.     char * pal[1000];
  198.     char testcolor;
  199.  
  200. phys.pBuf=(unsigned char *) 0xA0000;
  201. phys.cb=65536;
  202.  
  203. moda.cb=BUFSIZE;
  204. moda.fbType=3;
  205. moda.color=8;
  206. moda.col=40;
  207. moda.row=25;
  208. moda.hres=320;
  209. moda.vres=200;
  210.  
  211. VioGetMode(&orig, HANDLE);
  212.  
  213. if (rc=VioSetMode(&moda, HANDLE) )
  214.    { printf("VioSetMode error=%u",rc);  exit(1); }
  215.  
  216. if (rc=VioGetPhysBuf(&phys, 0) )
  217.    { printf("VioGetPhysBuf error=%u",rc); exit(1); }
  218.  
  219. ptr0=MAKEP(phys.asel[0],0);
  220.  
  221. VioScrLock(WAIT, &status, HANDLE);
  222.  
  223. for (color=0; color<256; color++) {
  224. cls(ptr0,color);
  225. }
  226.  
  227. cls(ptr0,0);
  228.  
  229. for (x=0; x<320; x++) {
  230.   for (y=0; y<200; y++) {
  231.     putpixel(ptr0,x,y,(char) y);
  232.   }
  233. }
  234.  
  235. cls(ptr0,0);
  236.  
  237. VioScrUnLock(HANDLE);
  238. VioScrLock(WAIT,&status,HANDLE);
  239. for( x=0; x<750000; x++)
  240. {
  241.    *(PCH) (ptr0+ (unsigned int) (rand() % 32000) + (unsigned int) rand() % 32000)=(char) rand() % 256; 
  242. }
  243. cls(ptr0,0);
  244.  
  245. VioScrUnLock(HANDLE);
  246. VioScrLock(WAIT,&status,HANDLE);
  247.  
  248. for (x=0; x<100000; x++)
  249. { 
  250.  line(ptr0,(unsigned int) rand() % 320, (unsigned int) rand() % 200,
  251.            (unsigned int) rand() % 320, (unsigned int) rand() % 200, 
  252.        (char) rand() % 256);
  253. }
  254.  
  255. cls(ptr0,0);
  256.  
  257. for (x=0; x<1000; x++) {
  258. box(ptr0,(unsigned int) rand() % 320, (unsigned int) rand() % 200,
  259.       (unsigned int) rand() % 320, (unsigned int) rand() % 200,
  260.       (char) rand() % 256);
  261. }
  262.  
  263.  
  264. cls(ptr0,0);
  265.  
  266. for (x=0; x<50000; x++) {
  267. circle(ptr0,(unsigned int) (20 + rand() % 280),
  268.         (unsigned int) (20 + rand() % 160),
  269.         15,(char) rand() % 256 );
  270. }
  271.  
  272. cls(ptr0,0);
  273. VioScrUnLock(HANDLE);
  274. VioScrLock(WAIT,&status,HANDLE);
  275. for (x=0; x<256; x++) {
  276.   for (y=0; y<200; y++) {
  277.       putpixel(ptr0,x,y,(char) x);
  278.   }
  279. }
  280.  
  281.  
  282.  
  283.  
  284. for (x=0; x<100; x++) {
  285. testcolor=rand() % 256;
  286. putpixel(ptr0,x,x,testcolor);
  287. if (getpixel(ptr0,x,x)!=testcolor) { DosBeep(5000,500); }
  288. }
  289.  
  290. DosSleep(5000L);
  291.  
  292.  
  293. VioSetMode(&orig,HANDLE);
  294.  
  295. cls(ptr0,0);
  296.  
  297. VioScrUnLock(HANDLE);
  298. exit(0);
  299. }
  300.  
  301.