home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 15 / CDACTUAL15.iso / cdactual / program / pascal / POPTEXT.ZIP / POPTXT21.ARC / HELPDEF.DOC < prev    next >
Encoding:
Text File  |  1989-07-31  |  928 b   |  26 lines
  1. Unit HelpDef;
  2.  
  3. {***********************************************}
  4. {**** POPTEXT Version 2.1                   ****}
  5. {**** (C) 1989 Tone Zone Computing          ****}
  6. {****                                       ****}
  7. {**** Unit HelpDef - Definition of the      ****}
  8. {**** POPTEXT Card                          ****}
  9. {***********************************************}
  10.  
  11. Interface
  12.  
  13. type Line = String[40];
  14.      Page = Array[1..15] of Line;
  15.      TraceBack = Array[0..255] of byte;
  16.      PickitList = Array[1..15] of Word;
  17.      HelpNode   = Record
  18.                     HelpPage:Page;
  19.                     List    :PickitList;
  20.                     Valid   :word;      {Bitmap of Valid Choices}
  21.                     PGItUP  :word;      {Where to go if PageUp (0 for none)}
  22.                     PGItDN  :word;      {Where to go for PageDn (0 for none)}
  23.                   end; {Record}
  24.      HelpFile=File of HelpNode;
  25.  
  26.