home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / CONCUR.ZIP / LIBDEC.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1986-12-16  |  1.0 KB  |  21 lines
  1. (******************* COMPILER VERSION DEPENDENT DECLARATIONS **************)
  2.  
  3.  
  4. {Locations in library code segment : }
  5. var       nrofcols         : byte absolute cseg:$16a;
  6.           nrofrows         : byte absolute cseg:$16b;
  7. const     ctrlcjump        = $1016;               {^C abort address}
  8.  
  9. {Locations in library data segment : }
  10.  
  11. const     normattr         = 0;             {Address normal video attribute}
  12.           lowattr          = 1;             {Address low video attribute}
  13.           initialstack     = $174;          {Address initial SP-value}
  14.           liberror         = $180;          {Address library error number}
  15.           retaddr          = $186;          {Address return address save loc}
  16.           secondchar       = $192;          {Address 2nd char in escape seq}
  17.           ctrlcflag        = $194;          {Address ^C check flag}
  18.           fileptr          = $232;          {Address default file pointer}
  19.           filescratch      = $238;          {Address scratch location file i/o}
  20.  
  21.