home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Guide / c-cplusplus-interactive-guide.iso / c_ref / csource4 / 273_01 / sreada.ca < prev    next >
Encoding:
Text File  |  1988-02-11  |  912 b   |  40 lines
  1. #include <dos.h>
  2. sread_a(int row, int col, int *attr)
  3. /* This will read the attr at row,col and place the attr into
  4.    the area pointed to by attr.
  5. */
  6. {
  7.   extern int color, mono, cga, ega, scrseg, bios;
  8.   union REGS inregs;
  9.   int   scrofs, orow, ocol;
  10.   char pchar;
  11.   char far *base;
  12.   char far *work;
  13.     if(mono) base=(char far *)0xb0000000;
  14.     else base=(char far *)0xb8000000;
  15.   if(bios) {
  16.         locate(row,col) ;
  17.         inregs.h.ah=0x08;
  18.         inregs.h.bh=0x00;
  19.         int86(0x10,&inregs,&inregs);
  20.         *attr=inregs.h.ah;
  21.         return(0);
  22.   }
  23.     scrofs = ((((row+1) * 160) - 160) + ((col+1) * 2)) - 2;
  24.     work = base + scrofs + 1;
  25.     asm les bx,work
  26.     if(cga) {
  27.             asm     mov    dx,03dah
  28.             asm        in    al,dx
  29.             asm        test al,1
  30.             asm        jnz $-3
  31.             asm        in    al,dx
  32.             asm        test al,1
  33.             asm        jz $-3
  34.         }
  35.     asm mov cl,byte ptr es:[bx]
  36.     asm mov pchar,cl
  37.     *attr = pchar;
  38.     return(0);
  39. }
  40.