Ввод-вывод

В консольном приложении нужно ввести число, присвоить значение числа регистру ax и вывести на экран, при этом используя только 16-разрядные регистры.

моя версия ввода не работает:

Код (Text):

1.  cinc proc
2.        
3.         mov ah, 1
4.         int 21h
5.         call nl ; переводит указатель на новую строку(с ней всё в порядке)
6.         ret
7.  
8.      cinc endp
9.          
10.          cinnum proc
11.        
12.         push bx
13.         mov bx, 0
14.         mov cx, 4
15.     inp:
16.         call cinc
17.         mov ah, 0
18.         mov bl, al
19.         mul pten
20.         add ax, bx
21.         dec cx
22.         cmp cx, 0
23.         jne inp
24.        
25.         pop bx
26.        
27.         ret
28.  
29.     cinnum endp

Не говорю уже и про вывод... Тут у меня вообще беда.

 

Студент?

 

Практически... только как это относится к делу? Кстати, помощь уже не нужна