home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / ETRAP8.ZIP / KEYDEFS.INC < prev    next >
Encoding:
Text File  |  1988-03-11  |  2.7 KB  |  164 lines
  1. (*
  2.  * keydefs -- values for special keys on IBM PC and clones
  3.  *)
  4. const
  5.  
  6. (* capital letters *)
  7. YKey =  89;
  8. NKey =  78;
  9. Skey =  83;
  10. RKey =  82;
  11.  
  12. (* function keys *)
  13.  F1 =   315;
  14.  F2 =   316;
  15.  F3 =   317;
  16.  F4 =   318;
  17.  F5 =   319;
  18.  F6 =   320;
  19.  F7 =   321;
  20.  F8 =   322;
  21.  F9 =   323;
  22.  F10 =  324;
  23.  
  24. (* shifted function keys *)
  25.  SF1 =  340;
  26.  SF2 =  341;
  27.  SF3 =  342;
  28.  SF4 =  343;
  29.  SF5 =  344;
  30.  SF6 =  345;
  31.  SF7 =  346;
  32.  SF8 =  347;
  33.  SF9 =  348;
  34.  SF10 = 349;
  35.  
  36. (* control function keys *)
  37.  CF1 =  350;
  38.  CF2 =  351;
  39.  CF3 =  352;
  40.  CF4 =  353;
  41.  CF5 =  354;
  42.  CF6 =  355;
  43.  CF7 =  356;
  44.  CF8 =  357;
  45.  CF9 =  358;
  46.  CF10 = 359;
  47.  
  48. (* alternate function keys *)
  49.  AF1 =  360;
  50.  AF2 =  361;
  51.  AF3 =  362;
  52.  AF4 =  363;
  53.  AF5 =  364;
  54.  AF6 =  365;
  55.  AF7 =  366;
  56.  AF8 =  367;
  57.  AF9 =  368;
  58.  AF10 = 369;
  59.  
  60. (* curs+ keypadNumLock off; not shifted) *)
  61.  HOMEKEY =        327;
  62.  ENDKEY  =        335;
  63.  PGUPKEY =        329;
  64.  PGDNKEY =        337;
  65.  LEFTKEY =        331;
  66.  RIGHTKEY=        333;
  67.  UPKEY   =        328;
  68.  DOWNKEY =        336;
  69.  
  70. (* control curs+ keypad *)
  71.  CHOME =372;
  72.  CEND  =373;
  73.  CPGUP =388;
  74.  CPGDN =374;
  75.  CLEFT =371;
  76.  CRGHT =372;
  77.  
  78. (* standard control keys *)
  79.  CTRLA          =1;
  80.  CTRLB          =2;
  81.  CTRLC          =3;
  82.  CTRLD          =4;
  83.  CTRLE          =5;
  84.  CTRLF          =6;
  85.  CTRLG          =7;
  86.  CTRLH          =8;
  87.  CTRLI          =9;
  88.  CTRLJ          =10;
  89.  CTRLK          =11;
  90.  CTRLL          =12;
  91.  CTRLM          =13;
  92.  CTRLN          =14;
  93.  CTRLO          =15;
  94.  CTRLP          =16;
  95.  CTRLQ          =17;
  96.  CTRLR          =18;
  97.  CTRLS          =19;
  98.  CTRLT          =20;
  99.  CTRLU          =21;
  100.  CTRLV          =22;
  101.  CTRLW          =23;
  102.  CTRLX          =24;
  103.  CTRLY          =25;
  104.  CTRLZ          =26;
  105.  
  106. (* alternate keys *)
  107.  ALTA = 286;
  108.  ALTB = 304;
  109.  ALTC = 302;
  110.  ALTD = 288;
  111.  ALTE = 274;
  112.  ALTF = 289;
  113.  ALTG = 290;
  114.  ALTH = 291;
  115.  ALTI = 279;
  116.  ALTJ = 292;
  117.  ALTK = 293;
  118.  ALTL = 294;
  119.  ALTM = 306;
  120.  ALTN = 305;
  121.  ALTO = 280;
  122.  ALTP = 281;
  123.  ALTQ = 272;
  124.  ALTR = 275;
  125.  ALTS = 287;
  126.  ALTT = 276;
  127.  ALTU = 278;
  128.  ALTV = 303;
  129.  ALTW = 273;
  130.  ALTX = 301;
  131.  ALTY = 277;
  132.  ALTZ = 300;
  133.  
  134. (* additional alternate key combinations *)
  135.  ALT1 = 376;
  136.  ALT2 = 377;
  137.  ALT3 = 378;
  138.  ALT4 = 379;
  139.  ALT5 = 380;
  140.  ALT6 = 381;
  141.  ALT7 = 382;
  142.  ALT8 = 383;
  143.  ALT9 = 384;
  144.  ALT0 = 385;
  145.  ALTDASH:integer=386;
  146.  ALTEQU :integer=387;
  147.  
  148. (* miscellaneous special keys *)
  149.  ESCKEY    =       27;
  150.  SPACEKEY  =       32;
  151.  INSKEY    =       338;
  152.  DELKEY    =       339;
  153.  TABKEY    =       9;
  154.  BACKSPKEY =       8;
  155.  STABKEY   =       15;
  156.  BTABKEY   =       271;
  157. (* printer echoing toggle *)
  158.  CTRL_PRTSC =     370;
  159.  
  160. (* return key variations *)
  161.  ENTERKEY =     13;
  162.  SRETURN  =     13;
  163.  CRETURN  =     10;
  164.