home *** CD-ROM | disk | FTP | other *** search
/ HAM Radio 3 / hamradioversion3.0examsandprograms1992.iso / control / net400-1 / nettype.pas < prev    next >
Pascal/Delphi Source File  |  1989-07-12  |  948b  |  33 lines
  1. type
  2.     DateStr = string[8];
  3.     TimeString = string[8];
  4.     regpack = Registers;
  5.  
  6.     msg_str  = string[80];
  7.     pre_str  = string[2];
  8.     post_str = string[3];
  9.     area_str = string[1];
  10.     name_str = string[15];
  11.     nbr_str  = string[4];
  12.  
  13.     file_type =  string[24];
  14.     log_type  =  record
  15.                    prefix : pre_str;
  16.                    area   : string[1];
  17.                    suffix : post_str;
  18.                    name : name_str;
  19.                    log_date : DateStr;
  20.                    log_time : TimeString;
  21.                    net_nbr : nbr_str;
  22.                    xref : integer;
  23.                    recnbr : integer;
  24.                  end;
  25.     net_array = array[1..max_calls] of ^log_type;
  26.     new_array = array[1..max_new] of ^log_type;
  27.  
  28.     check_rec = record
  29.                   list_nbr : byte;
  30.                   position : integer;
  31.                   hr_min   : string[5];
  32.                 end;
  33.