當(dāng)前位置:首頁 > 單片機 > 單片機
[導(dǎo)讀]//HJSMSY-V1.0單片機開發(fā)板測試程序 //--------------------------------------------- // <<電腦鐘>> //---------------------------------------------//=======主函數(shù)==============================

//HJSMSY-V1.0單片機開發(fā)板測試程序
//---------------------------------------------
//          <<電腦鐘>>
//---------------------------------------------

//=======主函數(shù)==================================
ORG   0000H
    LJMP   MAIN
    ORG    000BH
    LJMP   T00
//    ORG    001BH
//    LJMP   T11
    ORG  0030H
//=======程序初始化=============================
MAIN:
    MOV  TMOD,#11H
    MOV   TH0,#3CH
 MOV   TL0,#0B0H
 MOV   TH1,#0F0H
 MOV   TL1,#0B0H
 SETB   EA
 SETB   ET0
// SETB   ET1
 SETB   TR0
// SETB   TR1
    CLR P3.4 
 MOV R7,#00H   ;秒值
 MOV 30H,#00H   ;秒個位值
 MOV 31H,#00H   ;秒十位值
 MOV 32H,#00H   ;分個位
 MOV 33H,#00H           ;分十位
 MOV 34H,#00H   ;時個位
 MOV 35H,#00H   ;時十位
 MOV 44H,#00H   ;秒表毫秒十位
 MOV 45H,#00H   ;秒表秒毫秒百位
 MOV 46H,#00H   ;秒表秒個位
 MOV 47H,#00H   ;秒表秒十位
 MOV 48H,#00H   ;秒表分個位
 MOV 49H,#00H   ;秒表分十位
 MOV P2,#0F0H   ;P2口按鍵初始化
 MOV 40H,#01H   ;數(shù)碼管休眠值 /流水燈/秒表開關(guān)數(shù)
 MOV 41H,#08H   ;流水燈循環(huán)值
 MOV 42H,#00H         ;秒表暫停
//  ACALL T11

//-----------------------------------------------
MAIN1: 
    MOV P0,#0FFH
 MOV P1,#0FFH
 MOV R0,40H
 CJNE R0,#01H,ACL1
 ACALL MAIN2        ;時鐘顯示
ACL1:CJNE R0,#02H,ACL2
     ACALL MAIN3    ;秒表
ACL2:CJNE R0,#03H,ACL3
    ACALL LED    ;流水燈
ACL3:ACALL KEY         ;按鍵掃描
// ACALL BAO        ;定時報警
    LJMP MAIN1


//=======報警子程序============================
BAO:MOV R4,33H     
 CJNE R4,#03H,YY1
 CLR P3.2
 ACALL KEY
 LJMP YY2
YY1:CJNE R4,#05H,YY2
    SETB P3.2 
 ACALL KEY
YY2:RET


//======時鐘掃描子程序=======================
MAIN2:
    MOV   A,30H     
 MOV  DPTR,#TAB
 MOVC  A,@A+DPTR
 MOV P0,A
    CLR P1.0
 ACALL DELAY
 MOV  A,31H
 MOV  DPTR,#TAB
 MOVC  A,@A+ DPTR
 MOV  P0,A
    CLR P1.1
 SETB P1.0
    ACALL DELAY
    MOV A,32H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.2
 SETB P1.1
 ACALL DELAY
 MOV A,33H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.3
 SETB P1.2
 ACALL DELAY
 MOV A,34H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.4
 SETB P1.3
 ACALL DELAY
 MOV A,35H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.5
 SETB P1.4
 ACALL DELAY 
    MOV P0,#7FH 
 MOV P1,#0EBH
 ACALL DELAY
    MOV P1,#0FFH
 RET

//========秒表掃描子程序=========================
MAIN3:
    MOV   A,44H     
 MOV  DPTR,#TAB
 MOVC  A,@A+DPTR
 MOV P0,A
    CLR P1.0
 ACALL DELAY
 MOV  A,45H
 MOV  DPTR,#TAB
 MOVC  A,@A+ DPTR
 MOV  P0,A
    CLR P1.1
 SETB P1.0
    ACALL DELAY
    MOV A,46H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.2
 SETB P1.1
 ACALL DELAY
 MOV A,47H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.3
 SETB P1.2
 ACALL DELAY
 MOV A,48H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.4
 SETB P1.3
 ACALL DELAY
 MOV A,49H
 MOV DPTR,#TAB
 MOVC A,@A+DPTR
 MOV P0,A
 CLR P1.5
 SETB P1.4
 ACALL DELAY 
    MOV P0,#7FH 
 MOV P1,#0EBH
 ACALL DELAY
    MOV P1,#0FFH
 RET

//=======定時器T0中斷服務(wù)========================
T00:MOV  TH0,#0D8H
    MOV   TL0,#0F0H
 INC   R7
 CJNE  R7,#64H,AA
 MOV   R7,#00H
//-------時鐘跑值--------------------------------
 TK1:INC  30H   ;每秒鐘秒個位增一
  MOV R6,30H
 CJNE  R6,#0AH,AA
 MOV   30H,#00H
TK2:INC   31H
 MOV   R6,31H
  CJNE  R6,#06H,AA
 MOV   31H,#00H 
TK3:INC   32H
 MOV    R6,32H
 CJNE   R6,#0AH,AA
 MOV    32H,#00H
TK4:INC    33H
 MOV    R6,33H
 CJNE   R6,#06H,AA
 MOV    33H,#00H
TK5:INC    34H
 MOV    R5,34H
 MOV    R6,35H
 CJNE   R5,#04H,TK6
 CJNE   R6,#02H,TK6
 MOV    34H,#00H
 MOV    35H,#00H
TK6:CJNE   R5,#0AH,AA
 MOV    34H,#00H
    INC    35H
//-------秒表跑值----------------------
 AA:
    MOV R5,42H
    CJNE R5,#01H,TK7
    INC 44H
TK7:MOV R5,44H
 CJNE R5,#0AH,AA1
 MOV 44H,#00H
 INC 45H
    MOV R5,45H
    CJNE R5,#0AH,AA1
 MOV 45H,#00H
 INC 46H
    MOV R5,46H
    CJNE R5,#0AH,AA1
    MOV 46H,#00H
 INC 47H
    MOV R5,47H
    CJNE R5,#06H,AA1
 MOV 47H,#00H
 INC 48H
    MOV R5,48H
     CJNE R5,#0AH,AA1
  MOV 48H,#00H
  INC 49H
     MOV R5,49H
     CJNE R5,#06H,AA1
  MOV 49H,#00H
 
AA1:RETI

//====定時器T1中斷服務(wù)子程序====================
//T11:MOV   TH1,#0F0H
 //   MOV   TL1,#0B0H

// RETI

//******定時時間調(diào)整子程序*************************//
TBAO:
     MOV 50H,#00H
     MOV 51H,#00H
  MOV 52H,#00H
  MOV 53H,#00H
  MOV 54H,#00H
  MOV 55H,#00H

  MOV R3,50H

  DJNZ 30H,RET1

RET1: RET

//======鍵盤掃描子程序==========================  
KEY:MOV P2,#0F0H
    MOV R3,P2
 CJNE R3,#0F0H,KE0
 LJMP KK13
KE0:CJNE R3,#0E0H,KE1         ;P2.4行
 MOV P2,#0EFH
 JB P2.3,KK1      //用作調(diào)定時時間     ;K13 秒個位增一
 ACALL DELAY1
 ACALL TK1
KK1:JB P2.2,KK2   ;K14   秒十增一
    ACALL DELAY1
 ACALL TK2
KK2:JB P2.1,KK3   ;K15 分個位增一
    ACALL DELAY1
 ACALL TK3
KK3:JB P2.0,KE1   ;K16 分十位增一
    ACALL DELAY1
 ACALL TK4
KE1:MOV P2,#0DFH         ;P2.5行
 JB P2.3,KK4  ;K9  時個位增一
 ACALL DELAY1
 ACALL TK5
KK4:JB P2.2,KK5   ;K10  時十位增一
    ACALL DELAY1
 INC 35H 
 MOV R3,35H
 CJNE R3,#03H,HH0
 MOV 35H,#00H
 LJMP KK5
HH0:CJNE R3,#02H,HH1
    LJMP   KK5
HH1:CJNE R3,#01H,HH2
    LJMP   KK5
HH2:MOV 35H,#00H
KK5:JB P2.1,KK6 
    ACALL DELAY1   ;K11    開/關(guān)蜂鳴器
 CPL P3.2
KK6:JB P2.0,KE2     ;K12   秒表暫停
    MOV 42H,#00H  
     
KE2:MOV P2,#0BFH   ;P.6行
    JB P2.3,KK7    ;K5 時鐘暫停/取消暫停
 ACALL DELAY1
 CPL ET0 
KK7:JB P2.2,KK8     ;K6  顯示/休眠/流水燈
    ACALL DELAY2
    INC 40H
 MOV R3,40H
 CJNE R3,#04H,KK8
 MOV 40H,#01H
KK8:JB P2.1,KK9 
   // ACALL DELAY3   ;K7 秒表清0   
    MOV 44H,#00H
 MOV 45H,#00H
 MOV 46H,#00H
 MOV 47H,#00H
 MOV 48H,#00H
 MOV 49H,#00H
KK9:JB P2.0,KE3       ;K8 秒表開始跑
    MOV 42H,#01H      
  
KE3:MOV P2,#7FH     ;P2.7行
    JB P2.3,KK10     ;K1     秒十位減一
 ACALL DELAY1
 MOV R3,31H
 CJNE R3,#00H,JA1
 LJMP  KK10
JA1:DEC 31H
KK10:JB P2.2,KK11    ;K2    分個位減一
     ACALL DELAY1
  MOV R3,32H
  CJNE R3,#00H,JA2
  LJMP KK11
JA2: DEC 32H
KK11:JB P2.1,KK12   ;K3 分十位減一
     ACALL DELAY1
  MOV R3,33H
  CJNE R3,#00H,JA3
  LJMP KK12
JA3:DEC 33H
KK12:JB P2.0,KK13     ;K4  時個位減一
     ACALL DELAY1
  MOV R3,34H
  CJNE R3,#00H,JA4
  LJMP KK13
JA4:DEC 34H

KK13:RET

//=====流水燈子程序===========================
LED: MOV A,#0feH
  MOV 41H,#08H
  MOV P0,#0FFH 
LED1:
 MOV P1,A
 MOV R3,#100
D0: ACALL DELAY
    DJNZ R3,D0
    MOV R3,41H
 DJNZ R3,AAA
    LJMP BB
AAA:RL A
   MOV 41H,R3
 ACALL KEY
    LJMP LED1
BB: 
    MOV 41H,#07H
CC: MOV P1,A
    MOV R3,#30
D1: ACALL DELAY
    DJNZ R3,D1
 MOV R3,41H
 DJNZ R3,DD
 LJMP LED0
DD:RR A
    MOV 41H,R3
 ACALL KEY
 LJMP CC

LED0:RET   

//=====延時子程序============================== 
DELAY:MOV R1,#250
DEL1:NOP
     NOP
  NOP
  NOP
     DJNZ R1,DEL1
  RET
//====調(diào)用時鐘顯示作延時========================
DELAY1:MOV R2,#20  
DELA3: ACALL MAIN2
       DJNZ R2,DELA3 
   RET
//====調(diào)用秒表顯示作延時========================
DELAY3:MOV R2,#20
DELA5:ACALL MAIN3
      DJNZ R2,DELA5
   RET
//====調(diào)用延時子程序作延時======================
DELAY2:MOV R2,#100 
DELA4:ACALL DELAY
      DJNZ R2,DELA4
   RET
 //======共陽數(shù)碼管段碼表================================= 
 TAB:DB  0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,87H
 END   
 

本站聲明: 本文章由作者或相關(guān)機構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內(nèi)容真實性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉(zhuǎn)型技術(shù)解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關(guān)鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術(shù)公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關(guān)鍵字: 汽車 人工智能 智能驅(qū)動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務(wù)能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務(wù)中斷的風(fēng)險,如企業(yè)系統(tǒng)復(fù)雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務(wù)連續(xù)性,提升韌性,成...

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關(guān)鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會開幕式在貴陽舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關(guān)鍵字: 華為 12nm EDA 半導(dǎo)體

8月28日消息,在2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會上,華為常務(wù)董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權(quán)最終是由生態(tài)的繁榮決定的。

關(guān)鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應(yīng)對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實提質(zhì)增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務(wù)引領(lǐng)增長 以科技創(chuàng)新為引領(lǐng),提升企業(yè)核心競爭力 堅持高質(zhì)量發(fā)展策略,塑強核心競爭優(yōu)勢...

關(guān)鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術(shù)學(xué)會聯(lián)合牽頭組建的NVI技術(shù)創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術(shù)創(chuàng)新聯(lián)...

關(guān)鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(shù)(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉