USE16
ORG 100h
JMP start

text DB ' Input password: $'
ок   DB 13,10,' ----------------------'
       DB 13,10,' Password OK!$'

start:
     MOV   AH,9      ; запрос юзеру
     MOV   DX,text
     INT   21h

pass:         ; ждём пароль
     XOR   DX,DX      ; контрольная сумма ввода
pInput:
     XOR   AX,AX      ; читаем символ с клавы
     INT   16h
     CMP   AL,0Dh      ; это Enter?
     JZ   pass      ; если да - ввод сначала

     XOR   AH,AH      ; очистить скан-код
     ADD   DX,AX      ; считаем CRC
     CMP   DX, 'Т' + 'и' + 'м' + 'у' + 'р'
     JNZ   pInput      ; если не Тимур, продолжаем ввод

     MOV   AH,9      ; приветствуем, или ещё чё-нибудь..
     MOV   DX,ок
     INT   21h

     XOR   AX,AX
     INT   16h
retf