今天是第8天,突破14章.附上实验14代码
assume cs:code,ds:data
data segment
db '00/00/00 00:00:00','$'
data ends
code segment
start:mov ax,data
mov ds,ax
mov si,0
mov bl,9
mov cx,3
s1:mov al,bl
call time
mov [si],ah
mov [si+1],al
dec bl
add si,3
loop s1
mov bl,4
mov cx,3
s2:mov al,bl
call time
mov [si],ah
mov [si+1],al
sub bl,2
add si,3
loop s2
mov dx,0
mov ah,9
int 21h
mov ax,4c00h
int 21h
time:push cx
out 70h,al
in al,71h
mov ah,al
mov cl,4
shr ah,cl
and al,00001111b
add ah,30h
add al,30h
pop cx
ret
code ends
end start |
