Ввод символов с клавиатуры - Assembler

org 100h 
jmp start 
 
array db '2 61 25 34 45 11 15 1','$' 
len = ($ - array)-1 ; 
fName db 'data.txt',0 ; имя файла 
 
start: ; 
mov ah,9 ; покажем массив на экране 
mov dx,array ; 
int 21h ; 
 
mov ah,3Ch ; создать файл! 
mov dx,fName ; 
mov cx,20h ; 
int 21h ; 
xchg ax,bx ; 
mov ah,40h ; запись в файл! 
mov cx,len ; 
mov dx,array ; 
int 21h ; 
mov ah,3Eh ; закрыть файл! 
int 21h ; 
;---------------------------------------------------------------------— 
mov cx,len ; сортировка массива —-----------------// 
dec cx ; 
mov si,array ; 
mov di,si ; 
sort: push cx di si ; 
xor bx,bx ; флаг перестановок 
fuck: lodsw ; 
cmp ah,al ; 
jae @@1 ; 
inc bx ; 
xchg ah,al ; 
@@1: stosw ; 
dec si ; 
dec di ; 
loop fuck ; 
pop si di cx ; 
or bx,bx ; перестановки были? 
jnz sort ; 
;---------------------------------------------------------------------— 
mov al,10 ; выводим отсортированный массив на экран 
int 29h ; 
mov ah,9 ; 
mov dx,array ; 
int 21h ; 
 
exit: 
xor ax,ax ; 
int 16h ; 
int 20h ;