home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / turbopas / window11.lbr / WINDOW.LZB / WINDOW.LIB
Text File  |  1988-07-12  |  640b  |  20 lines
  1. {****************************************************}
  2. {* WINDOW.LIB - Library of variables for WINDOW.INC *}
  3. {* Change dta to change the maximum text width of a *}
  4. {* window.  WARNING!!!  This increases the memory   *}
  5. {* that all windows take up.                        *}
  6. {*  Ver 1.1 - Orion Poplawski                       *}
  7. {****************************************************}
  8.  
  9. type screen_pointer = ^screen;
  10.      screen = record
  11.       title:string[36];
  12.       num,xl,xs,yl,ys:byte;
  13.       dta:array[1..22] of string[38];
  14.       next:sptr;
  15.      end;
  16.  
  17. var ss,sl,s1,s2:screen_pointer;
  18.     wind_num:integer;
  19.  
  20.