section .text

org 100h

start:

call procedura_wprowadzznak

cmp al, 13
je pre_wypisz

cmp al, 64
jbe skok_blad

cmp al, 122
ja skok_blad

cmp al, 97
jae wszystko_okej

cmp al, 90
jbe wszystko_okej
ja skok_blad

wszystko_okej:
push ax
jmp start

pre_wypisz: ;zostawilem to poki co

wypisz:
cmp cx, 0
je koniec

sub cx, 2
mov dx, [esp + ecx]



cmp dx, 96
ja z_duzej_na_mala
cmp dx, 64
ja z_malej_na_duza

jmp wypisz


z_duzej_na_mala:
add dx, 32
mov ah, 02h
int 21h
jmp wypisz

z_malej_na_duza:
sub dx, 32
mov ah, 02h
int 21h
jmp wypisz

procedura_wprowadzznak:
mov ah, 01h
int 21h
inc cx

ret

skok_blad:
mov dx, v_blad
mov ah, 02h
int 21h

wyczysc_stos:
pop ax
cmp ax, 0
jne wyczysc_stos

xor ax, ax
jmp start

koniec:

mov ax, 4c00h
int 21h

section .data
v_blad db 10, "niestety to jest blad $", 10