PS/2 Library

The mikroPascal PRO for 8051 provides a library for communication with the common PS/2 keyboard.

Notes:

The library does not utilize interrupts for data retrieval, and requires the oscillator clock to be at least 6MHz.
The pins to which a PS/2 keyboard is attached should be connected to the pull-up resistors.
Although PS/2 is a two-way communication bus, this library does not provide MCU-to-keyboard communication; e.g. pressing the Caps Lock key will not turn on the Caps Lock LED.

External dependencies of PS/2 Library

The following variables must be defined in all projects using PS/2 Library:	Description :	Example :
`var PS2_DATA: sbit; bdata; sfr; external;`	PS/2 Data line.	`var PS2_DATA: sbit at P0_0_bit;`
`var PS2_CLOCK: sbit; bdata; sfr; external;`	PS/2 Clock line.	`var PS2_CLOCK: sbit at P0_1_bit;`

Ps2_Config

Prototype	procedure Ps2_Config();
Returns	Nothing.
Description	Initializes the MCU for work with the PS/2 keyboard.
Requires	Global variables : `PS2_DATA :` Data signal pin `PS2_CLOCK :` Clock signal pin must be defined before using this function.
Example	// PS2 pinout definition var PS2_DATA : sbit at P0_0_bit; PS2_CLOCK : sbit at P0_1_bit; ... Ps2_Config(); // Init PS/2 Keyboard

Ps2_Key_Read

Prototype	function Ps2_Key_Read(var value: byte; var special: byte; var pressed: byte): byte;
Returns	`1` if reading of a key from the keyboard was successful `0` if no key was pressed
Description	The function retrieves information on key pressed. Parameters : `value:` holds the value of the key pressed. For characters, numerals, punctuation marks, and space `value` will store the appropriate ASCII code. Routine “recognizes” the function of `Shift` and `Caps Lock`, and behaves appropriately. For special function keys see Special Function Keys Table. `special:` is a flag for special function keys (`F1`, `Enter`, `Esc`, etc). If key pressed is one of these, `special` will be set to 1, otherwise 0. `pressed:` is set to 1 if the key is pressed, and 0 if it is released.
Requires	PS/2 keyboard needs to be initialized. See Ps2_Config routine.
Example	var value, special, pressed: byte; ... // Press Enter to continue: repeat if (Ps2_Key_Read(value, special, pressed)) then if ((value = 13) and (special = 1)) then break; until (0=1);

Special Function Keys

Key	Value returned
F1	1
F2	2
F3	3
F4	4
F5	5
F6	6
F7	7
F8	8
F9	9
F10	10
F11	11
F12	12
Enter	13
Page Up	14
Page Down	15
Backspace	16
Insert	17
Delete	18
Windows	19
Ctrl	20
Shift	21
Alt	22
Print Screen	23
Pause	24
Caps Lock	25
End	26
Home	27
Scroll Lock	28
Num Lock	29
Left Arrow	30
Right Arrow	31
Up Arrow	32
Down Arrow	33
Escape	34
Tab	35

Library Example

This simple example reads values of the pressed keys on the PS/2 keyboard and sends them via UART.

program PS2_Example;

var keydata, special, down : byte;
 
// PS2 module connections
var PS2_DATA  : sbit at P0_0_bit;
    PS2_CLOCK : sbit at P0_1_bit;
// End PS2 module connections

  begin
    UART1_Init(4800);                                    // Initialize UART module at 4800 bps
    Ps2_Config();                                       // Initialize PS/2 Keyboard
    Delay_ms(100);                                      // Wait for keyboard to finish
    keydata := 0; special := 0; down := 0;
    
    UART1_Write_Text('Ready');
    UART1_Write(10);          // Line Feed
    UART1_Write(13);          // Carriage return

    while TRUE do                                          // Endless loop
      begin
        if Ps2_Key_Read(keydata, special, down) then       // If data was read from PS/2
          begin
            if (down <> 0) and (keydata = 16) then         // Backspace read
              begin
                UART1_Write(0x08);                         // Send Backspace to usart terminal
              end
            else if (down <> 0) and (keydata = 13) then    // Enter read
              begin
                UART1_Write(10);                           // Send carriage return to usart terminal
                UART1_Write(13);                           // Uncomment this line if usart terminal also expects line feed
                                                           //   for new line transition
              end
            else if (down <> 0) and (special = 0) and (keydata <> 0) then   // Common key read
              begin
                  UART1_Write(keydata);                    // Send key to usart terminal
              end;
          end;
        Delay_ms(10);                                      // Debounce period
      end;
  end.

HW Connection

Example PS2 keyboard connection

Example of PS2 keyboard connection

Want more examples and libraries?
Find them on