Description

Cette fonction permet la lecture d'un caractère au clavier et de connaître également le code de la touche (appelé «Scan Code» en anglais).

Entrée

Sortie

Remarques

• Vous devriez utiliser cette fonction pour le clavier étendue au lieu de l'interruption 16h, fonction 00h. Il permet aux applications d'obtenir les codes de balayage pour les touches de contrôle F11, F12 et des touches de déplacement du curseur supplémentaires.
• L'apparence de l'interruption 16h, Fonction 00h ressemblerait à ceci en langage évolué comme le Turbo Pascal 6 ou postérieur :
1. Function ReadKey:Word;
2. Var
3.  K:Word;
4.  KByte:Byte Absolute K;
5. Begin
6.  Repeat Until Keypressed;
7.  ASM CLI; END;
8.  K := MemW[$0040:MemW[$0040:$1A]];
9.  Inc(MemW[$0040:$1A],SizeOf(Word));
10.  If(MemW[$0040:$1A]=MemW[$0040:$82])Then MemW[$0040:$1A]:=MemW[$0040:$80];
11.  ASM STI; END;
12.  If(KByte in [$D0,$E0])Then KByte := 0;
13.  ReadKey := K;
14. End;


• L'apparence de l'interruption 16h, Fonction 00h ressemblerait à ceci en langage évolué comme le langage C du «Turbo C»:
1. #include <mem.h>
2. #include <dos.h>
3.  
4. unsigned int ReadKey(void) {
5.  unsigned int K;
6.  do{}while(Keypressed); 
7.  CLI;
8.  K=peek(0x0040,peek(0x0040,0x1A));
9.  poke(0x0040,0x1A,peek(0x0040,0x1A)+2);
10.  if(peek(0x0040,0x1A)==peek(0x0040,0x82)) poke(0x0040,0x1A,peek(0x0040,0x80));
11.  STI; 
12.  if((K & 0xFF)==0xD0)||((K & 0xFF)==0xE0) K&=0xFF00;
13.  return K;
14. }