喔喔   很久没有吧作业交上来了  现在补一份先。
assume cs:codesg
codesg segment
        char db'// :: '
        time db 9,8,7,4,2,0
start:mov cx,6
        mov si,0
        mov di,0
        mov bx,0b800h
        mov es,bx
  s:push cx  ;保护CX
    mov al,time[si]
    out 70h,al
    in al,71h
    mov ah,al
    mov cl,4
    shr ah,cl
    and al,00001111b
    add ah,30h  
    add al,30h  ;将数字转化成字符
    mov byte ptr es:[160*2+40*2+di],ah
    mov byte ptr es:[160*2+40*2+di+2],al  ;存入显存中
    mov bh,char[si]
    mov byte ptr es:[160*2+40*2+di+4],bh
    inc si
    add di,6
    pop cx
    loop s
    mov ax,4c00h
    int 21h
codesg ends
end start