EI ; разрешить прерывания
CALL L4 ; Прерывание с очисткой клавы и дисплея

M: 
  NOP
  JMP M

L: 
    IN 0
    WR R1
    SUB #48
    JS L2
    RD R1
    SUB #58
    JS L3

    RD R1
    SUB #168 ; если Ё
    JZ L4

    RD R1
    SUB #184 ; если ё
    JZ L4

    JMP L2 ; если не цифра и не ё и Ё
    HLT

L2: ;вывод символа не цифра и не ё
    RD R1
    OUT 10
    JMP L

L3: ;тройной вывод цифры и пищание
    RD R1
    OUT 10
    OUT 10
    OUT 10
    RD #50
    OUT 30
    RD #900
    OUT 31
    RD #250
    OUT 30
    RD #900
    OUT 31
    RD #999
    OUT 30
    RD #900
    OUT 31
    JMP L

L4: ; обработка
    ;Установка флага S в 1
    ;Посимвольный ввод
    RD #103
    OUT 1

    RD #102
    OUT 1

    RD #101
    OUT 11

    ;Установка флага E в 1
    ;Включение клавиатуры
    RD #10
    OUT 1

    ;Установка флага I в 1
    ;Включение клавиатуры
    RD #11
    OUT 1

    IRET