home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / PCE9972.ZIP / STRUCT.997 < prev    next >
Encoding:
Text File  |  1992-12-14  |  6.1 KB  |  321 lines
  1. { Structures of PcExpress V0.9971 }
  2.  
  3.  
  4.  
  5. Type
  6.  Strings = Array [1..9] Of String[80];
  7.  Msgtype = Array [0..205] of String[80];
  8.  
  9.  TextRec = Record
  10.  Data : string[80];
  11.  End;
  12.  
  13.  MsgRecord = record
  14.  MsgTo     : String[30];
  15.  MsgFrom   : String[30];
  16.  Subject   : String[30];
  17.  Date      : String[24];
  18.  ReadDate  : String[24];
  19.  Private   : Boolean;
  20.  Read      : Boolean;
  21.  Deleted   : Boolean;
  22.  Start     : Longint;
  23.  Stop      : Longint;
  24.  End;
  25.  
  26.  LastCallersRecord = record
  27.  Node      : Byte;
  28.  Name      : String[30];
  29.  Location  : String[30];
  30.  Date      : String[8];
  31.  Logontime : String[8];
  32.  Logofftime: String[8];
  33.  BaudRate  : string[6];
  34.  Times     : word;
  35.  Download  : Boolean;
  36.  Upload    : Boolean;
  37.  Posted    : Boolean;
  38.  Read       : Boolean;
  39.  WantedChat : Boolean;
  40.  Chated     : Boolean;
  41.  NodeChat   : Boolean;
  42.  Hidden     : Boolean;
  43.  Attribute  : byte;
  44.  End;
  45.  
  46.  
  47.  
  48.  BBSrecord = Record
  49.  TotalCalls  : Longint;
  50.  LastUpdated : string[12];
  51.  TCalls : Word;     (* Today *)
  52.  TMsgALL : Word;
  53.  TMsgTO  : Word;
  54.  TDL     : Word;
  55.  TUL     : Word;
  56.  TDLBytes     : Longint;
  57.  TULBytes     : Longint;
  58.  TPrivateUL : Word;
  59.  TNewUsers  : Word;
  60.  TPageRequests : Word;
  61.  
  62.  SCalls : Word;     (* Since SYSOP loged on *)
  63.  SMsgALL : Word;
  64.  SMsgTO  : Word;
  65.  SDL     : Word;
  66.  SUL     : Word;
  67.  SDLBytes     : Longint;
  68.  SULBytes     : Longint;
  69.  SPrivateUL : Word;
  70.  SNewUsers  : Word;
  71.  SPageRequests : Word;
  72.  End;
  73.  
  74.  MultiNodeRecord = Record
  75.  Name         : string[30];
  76.  Location     : string[30];
  77.  BaudRate     : word;
  78.  FileLock     : string[255];
  79.  DoNotDisturb : Boolean;
  80.  Status       : Byte;
  81.  Line         : Byte;
  82.  End;
  83.  
  84.  ChatRecord = Record
  85.  ChatOnOFF   : Boolean;
  86.  TimeOnOff   : Boolean;
  87.  StartChat   : Array [1..7] of string[5];
  88.  StoppChat   : Array [1..7] of string[5];
  89.  End;
  90.  
  91.  UserRecord = Record
  92.  Name,
  93.  Location : String[30];
  94.  Pwd,
  95.  Phone    : string[15];
  96.  Lasttime,
  97.  Lastdate,
  98.  Firstdate,
  99.  Birthdate,
  100.  Subdate  : string[8];
  101.  
  102.  HighMsgRead : Array [1..9] of integer;
  103.  HighMsgAuto : Array [1..9] of integer;
  104.  
  105.  TimesPosted,
  106.  TimesRecived,
  107.  SecLvl,
  108.  ConfAccess,
  109.  LastConf,
  110.  Times,
  111.  Ups,
  112.  Downs,
  113.  Ratio,
  114.  RatioType,
  115.  lines,
  116.  Computertype,
  117.  TimeDay,
  118.  Time      : word;
  119.  
  120.  DownBDay,
  121.  TodayDown,
  122.  Upk,
  123.  Downk     : longint;
  124.  
  125.  Extra,
  126.  Cleared,
  127.  Hidden,
  128.  Deleted,
  129.  Elite,
  130.  Pause,
  131.  SendClearScreen,
  132.  Nokill,
  133.  FullScreen,
  134.  FileListColors,
  135.  SubEnabled,
  136.  TransferLimitsOverRide,
  137.  Vip : boolean;
  138.  
  139.  DateFormat : Byte;
  140.  Groups : Array[1..10] of byte;
  141.  Comment : String  [60];
  142.  END;
  143.  
  144.  ConfigRec = Record
  145.  
  146.  VersionID : Byte;
  147.  
  148.  Comport,
  149.  BaudRate,
  150.  Parity,
  151.  StopBits,
  152.  CharLength,
  153.  Inittries,
  154.  Screenblanktime : word;
  155.  
  156.  InitString,
  157.  OKstring,
  158.  HangUpString,
  159.  BusyString,
  160.  AnswerString,
  161.  RingString : String[80];
  162.  
  163.  BBSName    : String[30];
  164.  BBSSysOp   : String[30];
  165.  
  166.  MonoMode : Boolean;
  167.  
  168.  Connect300,Connect1200,Connect2400,
  169.  Connect4800,Connect9600,Connect19200,
  170.  Connect38400,Mnpstring : String[20];
  171.  
  172.  CallingTimestart,
  173.  CallingTimestop : array [1..7] of string[5];  (* Calling times Limit *)
  174.  
  175.  DownloadTimestart,
  176.  DownloadTimestop : array [1..7] of string[5]; (* Downloading timelimit *)
  177.  
  178.  CallingTimestopONOFF : array [1..7] of Boolean; (* Downloading timelimit *)
  179.  DownloadTimestopONOFF : array [1..7] of Boolean; (* Downloading timelimit *)
  180.  
  181.  NewUserfilter : array [1..7] of byte; (* 0 = YES  1 = No 2 = No New  3 = Password *)
  182.  
  183.  NewUserPassWord : array [1..7] of string[15]; (* New UserPassWord *)
  184.  
  185.  SystemEventsTime : array [1..20] of string[5];
  186.  SystemEventsDay  : array [1..20] of string[8];
  187.  SystemEventsErrorLevel : array[1..20] of byte;
  188.  SystemEventsONOFF : array[1..20] of boolean;
  189.  
  190.  
  191.  Computertypes : Array [0..19] of String[15];
  192.  
  193.  NewPrivlevel,
  194.  NewConflevel,NewRatio,
  195.  NewRatioType,NewTimeLevel : integer;
  196.  NewDownBday : longint;
  197.  
  198.  SystemPass,
  199.  ShellPass: String[15];
  200.  
  201.  Pwdtries : byte;
  202.  MinPwdLength : byte;
  203.  
  204.  Text,Path : String[60];
  205.  
  206.  ad1,ad2,ad3,ad4 : String[10];
  207.  
  208.  ConfName    : Array [1..9] of String[16];
  209.  ConfPath    : Array [1..9] of String[66];
  210.  ConfFiles   : Array [1..9,1..9] of String[66];
  211.  ConfFHigh   : Array [1..9] of integer;
  212.  ConfFreeDown  : Array [1..9] of boolean;
  213.  ConfFileArea  : Array [1..9] of boolean;
  214.  ConfMsgArea   : Array [1..9] of boolean;
  215.  
  216.  SentBY : byte;
  217.  Sentbystring : string[60];
  218.  
  219.  SecL : Array [1..150] of byte;
  220.  
  221.  Options : Array [1..150] of boolean;
  222.  
  223.  MainColors : Array [1..20] of byte;
  224.  
  225.  Minspace     : Longint;
  226.  
  227.  SystemEventsLast : array[1..20] of string[6];
  228.  
  229.  ValueOption      : array[1..40] of word;
  230.  
  231.  NewUserStartConf : integer;
  232.  
  233.  ReserveBBSname  : string[30];
  234.  
  235.  ReserveTime : string[6];
  236.  
  237.  ReserveHold : word;
  238.  
  239.  PresetPrivlevel : Array[1..5] of byte;
  240.  PresetConflevel : Array[1..5] of integer;
  241.  presetRatio : Array[1..5] of integer;
  242.  PresetRatioType : Array [1..5] of byte;
  243.  PresetTimeLevel : Array [1..5] of integer;
  244.  PresetDownBday : Array [1..5] of longint;
  245.  
  246.  chatsysop,chatuser : String[10];
  247.  
  248.  DeletedString : String[16];
  249.  SentByCustom : String[50];
  250.  SentByLRC : byte;
  251.  
  252.   Connect12000,Connect14400,Connect16800,
  253.  Connect28800 : String[20];
  254.  
  255.  
  256.   FutureExpand : Array [1..2000-140-2-80-38-2-(12*5)-22-17-51-85] of byte;
  257.  
  258.  END;
  259.  doorinfo=record
  260.  Name,
  261.  Location : String[30];
  262.  Pwd,
  263.  Phone    : string[15];
  264.  Lasttime,
  265.  Lastdate,
  266.  Firstdate,
  267.  Birthdate,
  268.  Subdate  : string[8];
  269.  
  270.  HighMsgRead : Array [1..9] of integer;
  271.  HighMsgAuto : Array [1..9] of integer;
  272.  
  273.  TimesPosted,
  274.  TimesRecived,
  275.  SecLvl,
  276.  ConfAccess,
  277.  LastConf,
  278.  Times,
  279.  Ups,
  280.  Downs,
  281.  Ratio,
  282.  RatioType,
  283.  lines,
  284.  Computertype,
  285.  TimeDay,
  286.  Time      : word;
  287.  
  288.  DownBDay,
  289.  TodayDown,
  290.  Upk,
  291.  Downk     : longint;
  292.  
  293.  Extra,
  294.  Cleared,
  295.  Hidden,
  296.  Deleted,
  297.  Elite,
  298.  Pause,
  299.  SendClearScreen,
  300.  Nokill,
  301.  FullScreen,
  302.  FileListColors,
  303.  SubEnabled,
  304.  TransferLimitsOverRide,
  305.  Vip : boolean;
  306.  
  307.  DateFormat : Byte;
  308.  Groups : Array[1..10] of byte;
  309.  Comment : String  [60];
  310.  Port : byte;
  311.  buadrate : longint;
  312.  lockedrate : longint;
  313.  currentconf : byte;
  314.  nodenum : byte;
  315.  timeleft : integer;
  316.  ansi : boolean;
  317.  usernum : word;
  318.  futureexp : array[1..126] of byte;
  319.  END;
  320.  
  321.