Page 178 -

附錄二 8051 組合語言程式範例(1)

<< 練習實作 1 >>

七段顯示器

(自動由 0 至 F 顯示)

間隔時間設定 1 秒

;---------------------

ORG 0H

SJMP BEGIN

;--------------------

ORG 30H

BEGIN: MOV SP,#07H

MOV P2,#00H
MOV R1,#10H ;16 次

MOV R4,#0H

AGAIN: MOV DPTR,#TABLE

MOV A,R4

MOVC A,@A+DPTR

MOV P1,A

MOV R5,#08H

ACALL DELAY

INC R4

DJNZ R1,AGAIN
MOV R5,#10H ;2 秒

ACALL DELAY

AJMP BEGIN

;------------------------

DELAY: MOV R6,#FAH

DE1: MOV R7,#FAH

DE2: DJNZ R7,DE2

DJNZ R6,DE1

DJNZ R5,DELAY

RET

;----------------------

ORG 300H