.MODEL tiny
        .data
        .CODE

        mov ax,@data
        mov ds,ax

        mov cx,90h
c1:     mov bx, 0ffffh
c2:     in al,60h
        test al,80h ; premuto         ;80h
        jnz c3
        in al,61h   ; altoparlante      ;61h
        and al,0feh
        xor al,02h     ;bit_speaker      ;02h
        out 61h,al   ; scrivi sul port dell'altoparlante
c3:     dec bx
        jnz c2
        loop c1


        mov ax, 4c00h
        int 21h

        END