Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- TITLE MASM Template (main.asm)
- INCLUDE Irvine32.inc
- .data
- R DB 15 DUP(?),0dh,0ah,0
- S DB 15 DUP(?),0dh,0ah,0
- HV DB "***",0
- .code
- main PROC
- call Clrscr
- mov edx, offset R
- mov ecx, sizeof R
- call ReadString
- mov ebx, eax
- mov edx, offset S
- mov ecx, sizeof S
- call ReadString
- mov esi, eax
- mov ecx, ebx
- mov ebx,0
- mov edx,0
- mov edi,0
- Nacitanie1:
- cmp edi, ecx
- je DruhaPolka
- mov al, [R+edi]
- mov bl, [S+edi]
- cmp al, bl
- je Vypis1
- jmp Hviezdicky1
- Vypis1:
- mov al, [R+edi]
- call WriteChar
- inc edi
- jmp Nacitanie1
- Hviezdicky1:
- mov edx, offset HV
- call WriteString
- inc edi
- jmp Dokoncenie1
- Dokoncenie1:
- cmp edi, ecx
- je DruhaPolka
- mov al, [R+edi]
- call WriteChar
- inc edi
- jmp Dokoncenie1
- DruhaPolka:
- mov al, 0ah
- call WriteChar
- mov al, 0dh
- call WriteChar
- mov edi,0
- mov esi, ecx
- Nacitanie2:
- cmp edi, ecx
- je Koniec
- mov al, [S+edi]
- mov bl, [R+edi]
- cmp al, bl
- je Vypis2
- jmp Hviezdicky2
- Vypis2:
- mov al, [S+edi]
- call WriteChar
- inc edi
- jmp Nacitanie2
- Hviezdicky2:
- mov edx, offset HV
- call WriteString
- inc edi
- jmp Dokoncenie2
- Dokoncenie2:
- cmp edi, ecx
- je Koniec
- mov al, [S+edi]
- call WriteChar
- inc edi
- jmp Dokoncenie2
- Koniec:
- exit
- main ENDP
- END main
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement