;baitap: viet chuong trinh vxl thuc hien

;   DK LED 7 DOAN NOI VOI CONG LPT DEM LEN TU 0-9 SAU DO DEM XUONG TU 9-0

;-------------------------------

.MODEL SMALL

.stack 100

.data

ten: db 9,"DK LED 7 DOAN NOI VOI CONG LPT DEM LEN TU 0-9 SAU DO DEM XUONG TU 9-0$"

maled: db 0c0h,0f9h,0a0h,0b0h,99h,92h,82h,0f8h,80h,90h

.code

    main proc

        mov ax,@data

        mov ds,ax

        lea dx,ten

        mov ah,9

        int 21h

        ;--------------------

        mov dx,37ah

        mov al,000000101b

        out dx,al

        lea bx,maled

        mov dx,378h

    lap:

    mov ah,0

        mov cx,0   

    lap1:

        mov ax,cx

        mov si,cx

        xlatb

        out dx,ax

        call delay

        inc cx

        cmp cx,9

        jng lap1

    lap2:

        mov ax,cx

        mov si,cx

        xlatb

        out dx,ax

        call delay

        dec cx

        cmp cx,-1

        jg lap2

        jmp lap

        main endp

    delay:

    push cx

    mov cx,15

    loop $

    pop cx