利用定時器1延時1秒的程序

;利用定時器精確延時1秒
;循環(huán)點亮P1口接的八只發(fā)光二極管。
ORG 0000H
AJMP START
ORG001BH;T1中斷入口地址
AJMP INT_T1
ORG0030H
START:
MOVSP,#60H
MOVTMOD,#10H;置T1為方式1
MOVTL1,#00H;延時50mS的時間常數(shù)
MOVTH1,#4CH
MOVR0,#00H
MOVR1,#20
SETB TR1;啟動定時器1，開始定時
SETB ET1
SETB EA;開中斷
SJMP $
INT_T1:;T1中斷服務(wù)子程序
PUSH ACC;保護現(xiàn)場
PUSH PSW
PUSH DPL
PUSH DPH
CLRTR1;關(guān)閉定時器1，停止定時
MOVTL1,#00H;延時50mS常數(shù)
MOVTH1,#4CH
DJNZ R1,EXIT
MOVR1,#20;延時一秒的常數(shù)
MOVDPTR,#DATAb ;置常數(shù)表基址
MOVA,R0;置常數(shù)表偏移量
MOVC A,@A+DPTR;讀常數(shù)表
MOVP1,A;送P1口顯示
INCR0
ANLR0,#07H
EXIT:
SETB TR1;啟動定時器1，開始定時
POPDPH;恢復(fù)現(xiàn)場
POPDPL
POPPSW
POPACC
RETI
;發(fā)光二極管顯示常數(shù)表
DATAb:DB 55H,0AAH,05H,0AH,50H,0A0H,0FFH,0H
END