;baitap1: viet chuong trinh cho vxl hien thi thong bao
; CHAO MUNG CAC BAN DEN VOI ......
;HO VA TEN
; AN PHIM ENTER DE THOAT HOAC NHAP LAN LUOT CA CHU CAI DAU TIEN CUA TEN MINH DE THOAT
;----------------------------------------------
.model small
.STACK 100
.data
ten: db "CHAO MUNG CAC BAN DEN VOI MON HOC THUC HANH VXL$"
hoten: DB 10,13,"PHAM VAN VINH$",10,13
.code
    main proc
        mov ax,@data
        mov ds,ax
        lea dx,ten
        mov ah,9
        int 21h
        lea dx,hoten
        mov ah,9
        int 21h
    ;----------------------------------
    ;nhan phim
    nhanphim:
        mov ah,1
        int 21h
        cmp al,13
        je thoat
        cmp al,"P"
        je nhapso
        jmp nhanphim
    nhapso:
        mov ah,1
        int 21h
        cmp al,"V"
        je nhapso1
        jmp nhanphim
    nhapso1:
        mov ah,1
        int 21h
        cmp al,"V"
        je thoat
        jmp nhanphim
    main endp   
    thoat:
        mov ah,4ch
        int 21h
        ret
    end main