ORG 0000H ;程式從0地址開始
START: CLR P1.0 ;點亮發光二極體
LCALL DELAY ;呼叫延時子程式(亮1秒鐘)
SETB P1.0 ;關掉髮光二極體
LCALL DELAY ;呼叫延時子程式(關1秒鐘)
LJMP START ;跳到START標號處執行
DELAY: ;1秒延時子程式(12MHz晶振)
MOV R5,#8 ;R5暫存器載入8次
D0: MOV R7,#250 ;R7暫存器載入250次數
D1: MOV R6,#250 ;R6暫存器載入250次數
D2: DJNZ R6,D2 ;D2迴圈執行R6次
DJNZ R7,D1 ;D1迴圈執行R7次
DJNZ R5,D0 ;D0迴圈執行R5次
RET ;返回主程式
END ;主程式結束
ORG 0000H ;程式從0地址開始
START: CLR P1.0 ;點亮發光二極體
LCALL DELAY ;呼叫延時子程式(亮1秒鐘)
SETB P1.0 ;關掉髮光二極體
LCALL DELAY ;呼叫延時子程式(關1秒鐘)
LJMP START ;跳到START標號處執行
DELAY: ;1秒延時子程式(12MHz晶振)
MOV R5,#8 ;R5暫存器載入8次
D0: MOV R7,#250 ;R7暫存器載入250次數
D1: MOV R6,#250 ;R6暫存器載入250次數
D2: DJNZ R6,D2 ;D2迴圈執行R6次
DJNZ R7,D1 ;D1迴圈執行R7次
DJNZ R5,D0 ;D0迴圈執行R5次
RET ;返回主程式
END ;主程式結束