Source position: keyboard.pp line 48
procedure AddSequence(
const St: string;
AChar: Byte;
AScan: Byte
);