Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- format PE Console 4.0
- entry start
- include 'win32a.inc'
- include 'win_macros.inc'
- section '.text' code readable executable
- start:
- clrscr ;1.
- ustaw_kursor 10, 2 ;2.
- wyswietl txt ;3.
- ustaw_kursor 14, 10 ;4.
- mov bx, 0
- mov esi, 0
- petla:
- mov bl, byte [txt+esi] ;5.
- cmp bl, NULL ;6.
- je skokdo10 ;6.
- cmp bl, 48 ;sprawdzenie czy jest kodem ASCII cyfry
- jb niecyfra
- cmp bl, 57 ;sprawdzenie czy jest kodem ASCII cyfry
- ja niecyfra
- ;8. Znak pominiety. Inkrementacja licznika cyfr
- inc [licznik_cyfr]
- jmp ety
- ;7. Znak nie cyfra. wyswietlenie na ekranie
- niecyfra:
- wysw_znak bl
- ;9.
- ety:
- inc esi
- jmp petla
- ;10.
- skokdo10:
- wyswietl txt2
- mov ax, word [licznik_cyfr]
- add al, 48
- wysw_znak al
- koniec:
- pob_znak
- CMP al, 27
- JNE koniec
- end_prog
- section '.data' data readable writeable
- licznik_cyfr db 0
- txt db 'SAD KNADNAJ BDKA 8231 lala',NULL
- txt2 db 10,13,'Liczba pominietych znakow: ',NULL
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement