Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- zadanie 3
- .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
- pomoc byte 1
- odczyt DWORD ?
- wpis DWORD ?
- odczytane_znaki DWORD ?
- wielkosc_tab DWORD ?
- .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 13
- push offset source
- push odczyt
- call ReadConsoleA
- mov wielkosc_tab,LENGTHOF source
- mov ebx,wielkosc_tab
- mov edx,0
- mov ECX, licznik
- petla:
- push ecx
- mov al,0
- add al,source[edx]
- sub ebx,1
- mov destination[ebx],al
- add edx,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
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement