home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #1 / monster.zip / monster / PROG_PAS / KEYCTRL.ZIP / CMKEY.PAS next >
Pascal/Delphi Source File  |  1994-01-07  |  308b  |  17 lines
  1. Unit CmKey;
  2. {$F+}
  3. Interface
  4.  
  5. const cmtoggle= 100;
  6.       cmdemo  = 200;
  7.       winact  : array[1..9] of boolean=(false,false,false,false,
  8.                                         false,false,false,false,false);
  9.       WinMax  = 9;
  10.  
  11. Var Wincount  : Word;
  12.  
  13. Implementation
  14.  
  15. begin
  16.   wincount:=0;
  17. end.