home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / bbs / pics16.ark / PICS16.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1987-06-20  |  867 b   |  54 lines
  1.  
  2. program PICS;
  3. {$C-}
  4. const
  5.   version = 'PICS v1.6';
  6.   ver_date = '6/20/87';
  7. {$I PICSDEF.INC}
  8. {$I PICSTYPE.INC}
  9. {$I PICSVAR.INC}
  10. {$I ACCESS.BOX}
  11. var
  12.   DatF: DataFile;
  13.   IdxF: IndexFile;
  14. {$I PICS.MCH}
  15. {$I PICS.MDM}
  16. {$I PICS.CLK}
  17. {$I PICSKIO.INC}
  18. {$I PICSKMS.INC}
  19. {$I PICSKMS1.INC}
  20. {$I PICSKMS2.INC}
  21. {$I GETKEY.BOX}
  22. {$I PICS0A.INC}
  23. {$I PICS0B.INC}
  24. {$I PICS0C.INC}
  25. {$I PICS0D.INC}
  26. {$I PICS0E.INC}
  27. {$I PICS0F.INC}
  28. {$I PICS0G.INC}
  29. {$I ADDKEY.BOX}
  30. {$I DELKEY.BOX}
  31. {$I PICS0H.INC}
  32. {$I PICS0H1.INC}
  33. {$I PICS0I.INC}
  34. {$I PICS2A.INC}
  35. {$I PICS2B.INC}
  36. {$I PICS2B1.INC}
  37. {$I PICS2C.INC}
  38. {$I PICS2C1.INC}
  39. {$I PICS2D.INC}
  40. {$I PICS2E.INC}
  41. {$I PICS2F.INC}
  42. {$I PICS2F1.INC}
  43. {$I PICS2G.INC}
  44. {$I PICS2H.INC}
  45. {$I PICS2H1.INC}
  46. {$I PICS2I.INC}
  47. {$I PICS2J.INC}
  48. {$I PICS2K.INC}
  49. {$I PICS2L.INC}
  50. {$I PICS3A.INC}
  51. {$I PICSMAIN.INC}
  52.  
  53. {End PICS }
  54.