Ввод и вывод элементов массива с преобразованием во внутреннее представление - Assembler

.586
.model flat, stdcall
option casemap: none
 
include kernel32.inc
include masm32.inc
includelib kernel32.lib
includelib masm32.lib
 
.data
Msg DB 13,10,"enter to exit",0AH,0DH,0
InputMsg DB "Input integer value",0AH,0DH,0
OutputMsg DB "Input integer value",0AH,0DH,0
pusto DB " ",0
nl DB 0AH,0DH,0
 
.data?
inbuf db 100 DUP (?)
a sword 10 DUP (?)
string DB 16 DUP (?)
 
.stack 4096
 
.code
start:   mov ECX,10
         mov EBX,0
cycle:   push ECX
         invoke StdOut,ADDR InputMsg
         invoke StdIn,ADDR inbuf,LengthOf inbuf
         invoke StripLF,ADDR inbuf
         invoke atol,ADDR inbuf
         mov EBX,EAX
         inc EBX
         pop ECX
         loop cycle
         invoke StdOut,ADDR OutputMsg
         mov ECX,10
         mov EBX,0
cycle2:  push ECX
         invoke dwtoa,a[EBX*4],ADDR string
         invoke StdOut,ADDR string
         invoke StdOut,ADDR pusto
         inc EBX
         pop ECX
         loop cycle2
         invoke StdOut,ADDR nl
         invoke StdOut,ADDR Msg
         invoke StdIn,ADDR inbuf,LengthOf inbuf
         invoke ExitProcess,0
end start