Các bạn giúp nó sai cái gì mà chạy không được mình mới típ cận ngôn ngũ này

MrVan_Nguy_n · November 1, 2015, 6:35am

.model small
.stack 100h
s1 db,'doc so he 2(16b) :$'
msg db 10,13,'day so nhi phan vua la: $'
.code
main proc
    mov ax,@data
    mov ds,ax
    xor bx,bx
    mov ah 1
    tiep:
    inr 21h
    cmp al,13
    je thoidoc 
    and al, 0fh; doimaraso
    shl bx.1;dich trai bx de luu bit nhap
    or bl,al
    thoidoc:
    mov cx,16
    ;xuongdong
    mov  ah,9
    lea dx,msg
    int 21h
    mov ah,2
    print:
    xor dl.dl
    rol bx.1
    adc dl,30
    int 21h
    loop print
    mov ah,4ch
    int 21h
    main endp
    end

Kiet_Ha_Tuan · November 1, 2015, 9:06am

.model small
.stack 100h
.data              ;Chỗ này.
s1 db 'doc so he 2(16b) :$'   ;Chỗ này.
msg db 10,13,'day so nhi phan vua la: $'
.code
main proc
    mov ax,@data
    mov ds,ax
    xor bx,bx
    mov ah, 1   ;Chỗ này.
    tiep:
    int 21h     ;Chỗ này.
    cmp al,13
    je thoidoc 
    and al, 0fh; doimaraso
    shl bx,1;dich trai bx de luu bit nhap ;Chỗ này.
    or bl,al
    thoidoc:
    mov cx,16
    ;xuongdong
    mov  ah,9
    lea dx,msg
    int 21h
    mov ah,2
    print:
    xor dl,dl   ;Chỗ này.
    rol bx,1   ;Chỗ này.
    adc dl,30
    int 21h
    loop print
    mov ah,4ch
    int 21h
    main endp
    end