數(shù)碼管顯示1234567
——
;*******************************************************************
;* Date : 2004.4.20 *
;* Support Mb: 0735-2197559 E-mail:c51cn@163.com *
;* Create by :鄧德武 http://www.c51.cn 更多例程請(qǐng)登陸網(wǎng)站 *
;* 網(wǎng)站單片機(jī)學(xué)習(xí)資料同步更新,敬請(qǐng)新老朋友隨時(shí)關(guān)注 *
;*******************************************************************
AJMP MAIN
ORG 0030H
MAIN:
SETB P2.7
CLR P2.0 ;選中第一個(gè)數(shù)碼管
MOV P0,#0C0H ;顯示0
LCALL DELAY ; 調(diào)用延時(shí)
MOV P0,#0FFH ;關(guān)顯示
SETB P2.0
CLR P2.1 ;選中第二個(gè)數(shù)碼管
MOV P0,#0F9H ;顯示1,
LCALL DELAY
MOV P0,#0FFH
SETB P2.1
CLR P2.2 ;選中第三個(gè)數(shù)碼管
MOV P0,#0A4H ;顯示2
LCALL DELAY
MOV P0,#0FFH
SETB P2.2
CLR P2.3 ;選中第四個(gè)數(shù)碼管
MOV P0,#0B0H ;顯示3
LCALL DELAY
MOV P0,#0FFH
SETB P2.3
CLR P2.4 ;選中第五個(gè)數(shù)碼管
MOV P0,#99H ;顯示4
LCALL DELAY
MOV P0,#0FFH
SETB P2.4
CLR P2.5 ;選中第六個(gè)數(shù)碼管
MOV P0,#92H ; 顯示5
LCALL DELAY
MOV P0,#0FFH
SETB P2.5
CLR P2.6 ;選中第七個(gè)數(shù)碼管
MOV P0,#82H ; 顯示6
LCALL DELAY
MOV P0,#0FFH
SETB P2.6
CLR P2.7 ;選中第八個(gè)數(shù)碼管
MOV P0,#0F8H ; 顯示7
LCALL DELAY
MOV P0,#0FFH
AJMP MAIN ;重新開(kāi)始
DELAY: ;延時(shí)子程序
MOV R7,#2
NOP
NOP
D1: MOV R6,#25
SETB P3.3 ;小喇叭同時(shí)響
D2: DJNZ R6,D2
CLR P3.3
DJNZ R7,D1
SETB P3.3
RET
END
評(píng)論