include console.inc
.STACK 4096
.DATA
    S DB 256 DUP (?)
    JOPA DB "JOPA",0
.CODE
start:
    CLD
    ;inint AL
        MOV AL,6

        mov esi,offset S
    mov edi,esi
        STOSB
        LODSB
        MOVZX ECX,AL
        F:inchar AL
        STOSB
        LOOP F
        outstr offset S
        outch '.'
        newline

        mov esi,offset S
        mov edi,esi
        LODSB
    movzx ECX,AL
    MOV EDX,0
        L:
                LODSB
                CMP AL, ' '
                JE Z
                outch AL
                STOSB
                INC EDX
                Z:

        LOOP L
        outch '.'
        newline
        mov ECX,EDX
        mov esi,offset S
        AS:
             LODSB
             OUTCH AL
        LOOP AS
    outstr '.'
exit
END start