zadanie 1 asm lab3

zadanie 1

.386
.MODEL flat, STDCALL
GetStdHandle PROTO: DWORD
WriteConsoleA PROTO: DWORD,:DWORD,:DWORD,:DWORD,:DWORD
ReadConsoleA PROTO :DWORD,:DWORD,:DWORD,:DWORD,:DWORD
ExitProcess PROTO:DWORD
.data
source BYTE 10 dup(0)
destination BYTE 10 dup(0)
licznik DWORD 10
odczyt DWORD 0
wpis DWORD 0
odczytane_znaki DWORD 0
zacheta byte "podaj 10 znakow: ",0
.code
main proc
push -11;odczyt
call GetStdHandle
mov wpis,eax

push -10
call GetStdHandle
mov odczyt,eax

push 0
push offset odczytane_znaki
push lengthof zacheta
push offset zacheta
push wpis
call WriteConsoleA

push 0
push offset odczytane_znaki
push 13
push offset  source
push odczyt
call ReadConsoleA

mov ebx,0
mov ECX, licznik
petla:
push ecx
mov al,0
add al,source[ebx]
mov destination[ebx],al
add ebx,1
pop ecx
LOOP petla

push 0
push offset odczytane_znaki
push 13
push offset destination
push wpis
call WriteConsoleA



push 0
call ExitProcess
main endp
END