home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / byte0387.arc / EDGINTON.ARC / LIST1.TXT next >
Encoding:
Text File  |  1986-07-16  |  305 b   |  13 lines
  1.  
  2. #include <dos.h>
  3. main()
  4. {
  5. extern int _TSIZE;    /* size of program in paragraphs */
  6.    union REGSS input,output;
  7.         
  8.        input.x.ax = 0x3112;    /* 31 -> AH and Return Code */
  9.        input.x.dx = _TSIZE;    /* program size (Lattice)   */
  10.        intdoss(&input,&output); /* function call 31  */
  11.     }
  12.  
  13.