;這個程序運行后會立即退出,但在DOS窗口的右下角會顯示一個彩色的小標簽.里面顯示著系統時間;，每過一秒就會更新一次。 
;更有趣的是,無論你用cls,或者dir,或者echo...等DOS命令,它都不會消失,一直停留在右下角.但不;會影響你的任何操作，因為它不使用cpu時間，完全靠的是8259定時電路運行。 
;===========================
;駐留內存的系統時鐘 
;本程序必需編譯成.COM文件才能正確運行 
;編譯方法:  
;tasm time 
;tlink time /x /t 

code segment 
assume cs:code, ds:code 
ORG 100h 
begin: Jmp install 
point dw 0 
tis db 'T^i^m^e^=^' 
conter db 18 

Inter1: push ax 
	push es 
	push di  
dec byte ptr cs:[conter] 
Jnz retu 

mov ax, 0b800h 
mov es, ax 
mov di, 160*12+120 
push si 
push ds 
push cx 
push cs 
pop   ds 
mov si, offset cs:tis 
mov cx, 5 
repz movsw 
add di, 10 
mov byte ptr es:[di+1], 3eh 
mov byte ptr es:[di+3], 0aeh 
pop cx 
pop ds 
pop si 
push ds 
push bx 
push dx  
mov ax, 0040h 
mov ds, ax 
mov ax, word ptr ds:[006ch] 
mov bx, 10 
demaci: xor dx, dx 
div bx 
add dl, 30h 
mov byte ptr es:[di], dl 
dec di 
mov byte ptr es:[di],    3eh 
dec di 
or ax, ax 
Jnz demaci 
pop  dx
pop bx
pop ds 

mov byte ptr cs:[conter], 18 
retu:  
pop di
pop es
pop ax 
IRET 

Install:  xor ax, ax 
mov ds, ax 
mov bx, 1ch*4 
mov dx, offset Inter1 
mov word ptr ds:[bx+0], dx 
mov word ptr ds:[bx+2], cs 

mov dx, Offset Install 
int 27h 
code ends 
end begin