;数码 同时显示0——9循环;汇编
#INCLUDE xxxxxxxxx.INC ;请将xxxxxxxxx 改为所需要的芯片的型号
;========================================================================================
MY_DATA .SECTION 'DATA' ;== DATA SECTION ==
DEL1 DB ?
DEL2 DB ?
DEL3 DB ?
COUNT DB ?
;========================================================================================
SEG_PORT EQU PC
SEG_PORTC EQU PCC
MY_CODE .SECTION AT 0 'CODE'
ORG 00H
CLR SEG_PORTC
MOV A,10101000B
MOV WDTC,A
CLR PAC
CLR PCC
SET PA.4
SET PA.5
SET PA.6
SET PA.7
CLR SEG_PORT
MAIN:
MOV A,OFFSET TAB_7_SEG
MOV TBLP,A
MOV A,10
MOV COUNT,A
LOOP:
TABRDL SEG_PORT
MOV A,TBLH
CALL DELAY
INC TBLP
SDZ COUNT
JMP LOOP
JMP MAIN
;========================================================================================
DELAY PROC
MOV DEL1,A
DEL_1: MOV A,30
MOV DEL2,A
DEL_2: MOV A,110
MOV DEL3,A
DEL_3: SDZ DEL3
JMP DEL_3
SDZ DEL2
JMP DEL_2
SDZ DEL1
JMP DEL_1
RET
DELAY ENDP
ORG LASTPAGE
TAB_7_SEG:
DC 0c0h+200 SHL 8
DC 0f9h+4000 SHL 8
DC 0a4h+600 SHL 8
DC 0b0h+800 SHL 8
DC 099h+990 SHL 8
DC 092h+990 SHL 8
DC 082h+800 SHL 8
DC 0f8h+600 SHL 8
DC 080h+400 SHL 8
DC 098h+250 SHL 8
END
数码的学习
于 2022-07-16 18:01:19 首次发布