Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- .model tiny
- .386
- .data
- wiersz db 127 dup (?) ;zarezerwowanie w pami?ci 255 bajt?w bez nadawania warto?ci
- wiersz2 db 127 dup (?) ;zarezerwowanie w pami?ci 255 bajt?w bez nadawania warto?ci
- liczba1 db 0
- liczba2 db 0
- tab db 10,13,"$"
- .stack 100h
- .code
- start:
- mov ax, @data
- mov ds, ax
- xor ax, ax
- ; wczytanie wiersza z klawiatury (wykorzystanie funkcji 0Ah z przerwania 21h)
- mov dx, offset wiersz
- mov (wiersz), 255 ; wpisanie do adresu wskazywanego przez 'wiersz' liczby 255...
- mov ah, 0Ah ; ...oznaczaj?cej maksymaln? ilo?? wprowadzanych znak?w
- int 21h
- xor ah,ah
- mov si, 2
- xor cl,cl
- cmp (wiersz+1),3
- jne dwa
- mov al,(wiersz+si)
- sub al,'0'
- mov bl,100
- mul bl
- inc si
- mov cl,al
- dwa:
- mov al,(wiersz+si)
- sub al,'0'
- mov bl,10
- mul bl
- inc si
- add cl,al
- jeden:
- mov al,(wiersz+si)
- sub al,'0'
- add cl,al
- mov ch,cl
- mov liczba1, cl
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;
- ; wczytanie wiersza z klawiatury (wykorzystanie funkcji 0Ah z przerwania 21h)
- mov dx, offset wiersz2
- mov (wiersz2), 255 ; wpisanie do adresu wskazywanego przez 'wiersz' liczby 255...
- mov ah, 0Ah ; ...oznaczaj?cej maksymaln? ilo?? wprowadzanych znak?w
- int 21h
- xor cl,cl
- xor ah,ah
- mov si, 2
- cmp (wiersz2+1),3
- jne dwa2
- mov al,(wiersz2+si)
- sub al,'0'
- mov bl,100
- mul bl
- inc si
- mov cl,al
- dwa2:
- mov al,(wiersz2+si)
- sub al,'0'
- mov bl,10
- mul bl
- inc si
- add cl,al
- jeden2:
- mov al,(wiersz2+si)
- sub al,'0'
- add cl,al
- mov liczba2, cl
- add ch,cl
- ;;;;;;;;;;;;;;;;wyswietlanko
- xor ah,ah
- mov al, ch
- mov bl,100
- div bl
- mov cl,ah
- add al,'0'
- mov dl, al
- mov ah,02h
- int 21h
- dwar:
- xor ah,ah
- mov bl,10
- mov al,cl
- div bl
- mov cl,ah
- add al,'0'
- mov dl, al
- mov ah,02h
- int 21h
- mov al,cl
- add al,'0'
- mov dl, al
- mov ah,02h
- int 21h
- ;;;;;;;;;;;;;;;;wyswietlanko
- mov dx, offset tab
- mov ah,9
- int 33
- mov ch,liczba1
- mov cl,liczba2
- sub ch,cl
- xor ah,ah
- mov al, ch
- mov bl,100
- div bl
- mov cl,ah
- add al,'0'
- mov dl, al
- mov ah,02h
- int 21h
- xor ah,ah
- mov bl,10
- mov al,cl
- div bl
- mov cl,ah
- add al,'0'
- mov dl, al
- mov ah,02h
- int 21h
- mov al,cl
- add al,'0'
- mov dl, al
- mov ah,02h
- int 21h
- mov ah, 4Ch
- int 21h
- end start
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement