home *** CD-ROM | disk | FTP | other *** search
/ Media Depot 5 / mediadepotvolume51993.iso / FILES / 03 / PSSA411.ZIP / SDOOR.INC < prev    next >
Encoding:
Text File  |  1996-07-10  |  3.5 KB  |  84 lines
  1. {
  2.   File format for door info file
  3. }
  4.  
  5. TYPE
  6.  
  7.   DataFileType =
  8.   RECORD
  9.  
  10.     {----- User information -----}
  11.  
  12.     RealName    : STRING[20];  { Real name }
  13.     Phone       : STRING[25];  { Voice phone number }
  14.     UserName    : STRING[20];  { Sign-on name }
  15.     Level       : BYTE;        { Membership level }
  16.     Dayt        : WORD;        { Today's day number (# of days since 01/01/88) }
  17.     Dayt_Last   : WORD;        { Day number of last visit }
  18.     Mint_Last   : WORD;        { Minute-of-the-day of last visit }
  19.     StartDayt   : WORD;        { Day number when this visit began }
  20.     StartMint   : WORD;        { Minute-of-the-day when this visit began }
  21.     StartDay    : WORD;        { Day of week (0-6, 0=Sunday) visit began }
  22.     StartHr     : WORD;        { Hour of day (0-23) visit began }
  23.     StartMn     : WORD;        { Minute of hour (0-59) visit began }
  24.     Width       : WORD;        { Terminal width }
  25.     Depth       : WORD;        { Screen depth }
  26.     DefGear     : BYTE;        { Default gear }
  27.     DefWrap     : BOOLEAN;     { Use word-wrap? }
  28.     Colour      : BOOLEAN;     { Use ANSI colour controls? }
  29.     NumVisits   : WORD;        { Number of visits to this BBS }
  30.     Protocol    : CHAR;        { Upload/Download protocol }
  31.  
  32.     {----- System information -----}
  33.  
  34.     ComPort     : INTEGER;     { Port address (see CONFIG program) }
  35.     TimeLeft    : INTEGER;     { Number of minutes left in call }
  36.     XBaudRateX  : INTEGER;     { Won't work above 32767 -- see BaudRateDCE }
  37.     ConsColour  : BOOLEAN;     { Can the console display colour? }
  38.     ConsLines   : WORD;        { Number of lines possible on console screen }
  39.     Floppies    : BOOLEAN;     { Is this a diskette-based system? }
  40.     Noisey      : BOOLEAN;     { Should sound effects be played at console? }
  41.     TalkToCom   : BOOLEAN;     { Is this session via the serial port? }
  42.     LastEvNum   : BYTE;        { Number of the last event }
  43.     FrontEnd    : BOOLEAN;     { Is Sapphire running under a front-end? }
  44.     LocalRun    : BOOLEAN;     { Was Sapphire started with LOCAL? }
  45.  
  46.     {----- Path information -----} { All paths end in \ }
  47.  
  48.     DFLocation  : STRING[40];  { Path to SRUN directory }
  49.     LFLocation  : STRING[40];  { Path to text library directory }
  50.     MFLocation  : STRING[40];  { Path to messages directory }
  51.     FFLocation  : STRING[40];  { Path to software library directory }
  52.     File_SysLog : STRING[12];  { Name of system log file }
  53.     File_Users  : STRING[12];  { Name of users file }
  54.  
  55.     {----- Integration data -----}
  56.  
  57.     { Not updated after exit from door }
  58.  
  59.     CmdParm     : STRING[80];  { Remnant from command line }
  60.  
  61.     { Updated after exit from door }
  62.  
  63.     NamesString : STRING[80];  { String entered into NAMES command }
  64.     TextString  : STRING[80];  { String entered into TEXT  command }
  65.     Warn2       : BOOLEAN;     { Has user received 2-minutes-left warning? }
  66.     Warn5       : BOOLEAN;     { Has user received 5-minutes-left warning? }
  67.  
  68.     {----- Expansion -----}
  69.  
  70.     BaudRateDCE : LONGINT;     { Baud rate: modem-to-remote-user }
  71.     BaudRateDTE : LONGINT;     { Baud rate: modem-to-computer }
  72.     LockedBaud  : BOOLEAN;     { Does the DTE operate at a fixed speed? }
  73.  
  74.     {
  75.  
  76.      Any file data following this point are as yet undefined.  However, your
  77.      program should allow the existance of additional data; it is not guaran-
  78.      teed that there will be an EOF here.  Extra fields may be added at a
  79.      later date, as assigned by Pinnacle Software.
  80.  
  81.     }
  82.  
  83.   END;
  84.