.model tiny
.386
.data
    tekst                   db  "Podaj znak: $"
    tekstCyfra      db  10, 13, "Jest to cyfra$"
    tekstSpecjalny db 10, 13, "Jest to znak specjalny$"
    tekstLiteraMala db 10, 13, "Jest to litera mala$"
    tekstLiteraDuza db 10, 13, "Jest to litera duża$"
.stack 256
.code
start:
    mov ax, @data
    mov ds, ax

    ; wyświetlenie tekstu „Podaj haslo: ” na ekranie
    mov dx, offset tekst
    mov ah, 9
    int 33

    ; wczytanie znaku
    mov ah, 1
    int 33

    cmp al, 47
    jnb znakSpecjalny

    cmp al, 57
    jna cyfra

    cmp al, 64
    jna znakSpecjalny

    cmp al, 90
    jna literaDuza

    cmp al, 96
    jna znakSpecjalny

    cmp al, 122
    jna literaMala

    mov dx, offset znakSpecjalny
    mov ah, 9
    int 33
    jmp koniec      ; skocz do etykiety „koniec”


    znakSpecjalny:
        mov dx, offset tekstSpecjalny
        mov ah, 9
        int 33
    literaDuza:
        mov dx, offset tekstLiteraDuza
        mov ah, 9
        int 33
    literaMala:
        mov dx, offset tekstLiteraMala
        mov ah, 9
        int 33
    cyfra:
        mov dx, offset tekstCyfra
        mov ah, 9
        int 33
    koniec:
        ; zakończenie programu
        mov ah, 76
        int 33
end start