.386p
                        jumps
                        locals

seg_a                   segment byte public use16
                        assume  cs:seg_a, ds:seg_a

                        org 100h

start:                  mov al, 13h             ; 2
                        int 10h                 ; 2

                        mov ax, 1121h           ; 3
                        mov bp, offset data_1   ; 3
                        mov cl, 5               ; 2
                        int 10h                 ; 2

                        mov ax, 0e08h           ; 3
                        mov bl, 15              ; 2
@@1:                    dec al                  ; 1
                        int 10h                 ; 2
                        jnz @@1                 ; 2

                        mov ah, 0               ; 2
                        int 16h                 ; 2

                        mov ax, 3               ; 3
                        int 10h                 ; 2
                        ret                     ; 1

data_1          db 0C0h, 40h,0C0h, 80h, 40h, 5Dh, 51h
                db  59h, 91h, 9Dh,0C9h, 15h, 95h
                db  14h,0C8h, 25h,0A9h,0B1h,0A9h
                db 0A5h, 39h, 12h, 13h, 12h, 12h
                db 0EEh,0A2h,0E4h, 24h,0E4h, 8Ah
                db  52h, 20h, 50h, 88h

seg_a		ends
		end	start