میشه مشکل این برنامه را حل کنید؟
در حالت com ساعتش کار نمیکنه!
page 110,100
title 'time.asm' a tsr program with time
codesg segment 'code'
assume cs:codesg,ss:codesg,ds:codesg,es:codesg
org 100h
main: jmp load1
oldint8 dd ?
newisr proc near
push ax
push bx
push cx
push dx
call clear
back1: call cursor
call time
mov al,ch
call disp1
call colon
mov al,cl
call disp1
call colon
mov al,dh
call disp1
call colon
mov al,dl
call disp1
jmp back1
pop dx
pop cx
pop bx
pop ax
jmp cs:oldint8
newisr endp
clear proc near
push bx
mov ax,0600h
mov cx,0000h
mov dx,184fh
mov bh,0fh
int 10h
pop bx
ret
clear endp
cursor proc near
push dx
mov ah,02h
mov bh,00h
mov dh,24
mov dl,65
int 10h
pop dx
ret
cursor endp
time proc near
mov ah,2ch
int 21h
ret
time endp
colon proc near
push dx
mov dl,':'
mov ah,02h
int 21h
pop dx
ret
colon endp
disp1 proc near
push dx
mov bl,10
mov ah,00h
div bl
mov bx,ax
add bl,30h
add bh,30h
mov ah,02h
mov dl,bl
int 21h
mov dl,bh
int 21h
pop dx
ret
disp1 endp
load1 proc near
mov ah,35h
mov al,08h
int 21h
mov word ptr oldint8,bx
mov word ptr oldint8+2,es
mov ah,25h
mov al,08h
mov dx,offset newisr
int 21h
mov dx,(offset load1-offset codesg)
add dx,15
mov cl,4
shr dx,cl
mov ah,31h
int 21h
load1 endp
codesg ends
end main
پاسخ با نقل قول
