home *** CD-ROM | disk | FTP | other *** search
/ Frostbyte's 1980s DOS Shareware Collection / floppyshareware.zip / floppyshareware / DPSX / TOOL-PAS.ZIP / TEST.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-04-18  |  956 b   |  54 lines
  1.  
  2. {$i options.inc}
  3.  
  4. unit HARDWARE;
  5.  
  6. interface
  7.    uses common;
  8.  
  9.    {$i \mlts\hardware\HARDWARE.DCL}
  10.  
  11.    {$i \mlts\hardware\COUNTERS.DCL}
  12.    {$i \mlts\hardware\COUNTERS.INT}
  13.  
  14.    {$i \mlts\hardware\VALVES.DCL}
  15.    {$i \mlts\hardware\VALVES.INT}
  16.  
  17.    {$i \mlts\hardware\MOTION.DCL}
  18.    {$i \mlts\hardware\MOTION.INT}
  19.  
  20.    {$i \mlts\hardware\ANALOG.DCL}
  21.    {$i \mlts\hardware\TRNSDUCR.DCL}
  22.    {$i \mlts\hardware\ANALOGV3.INT}
  23.    {$i \mlts\hardware\ANLGSTUP.INT}
  24.  
  25.  
  26. implementation
  27.    uses crt,misc;
  28.  
  29. { I \PCC\SYSTEM\FILEIDS.DCL}
  30. { I \PCC\SYSTEM\RECORDMN.DCL}
  31. {stubbed}
  32.  
  33.    {$i \mlts\hardware\COUNTERS.INC}
  34.  
  35. {$ifdef NO_VALVE_SYSTEM}
  36.    {$i \mlts\hardware\NOVALVES.INC}
  37. {$else}
  38.    {$i \mlts\hardware\NOVALVES.INC}
  39. {$endif}
  40.  
  41. {$ifdef NO_MOTION}
  42.    {$i \mlts\hardware\NOMOTION.INC}
  43. {$else}
  44.    {$i \mlts\hardware\MOTION.INC}
  45. {$endif}
  46.  
  47.    {$i \mlts\hardware\ANALOGV3.INC}
  48.  
  49.    {$i \mlts\hardware\ANLGSTUP.INC}
  50.  
  51. begin
  52. end.
  53.  
  54.