久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: 單片機兩鍵控制豆漿機匯編程序(芯片AT89C2051) [打印本頁]

作者: das 時間: 2015-4-5 01:30
標題: 單片機兩鍵控制豆漿機匯編程序(芯片AT89C2051)
;-------------------------------------------------------------兩鍵控制豆漿機程序(芯片AT89C2051)------------------------------------------------------------
;P3.2中斷口作為水位檢測端
;=========================================聚寶工業設計室(2011-12)==============================================
LEDPOWER BIT P1.7 ;電源開關顯示
LEDGD BIT P1.6 ;干豆顯示
LEDSD  BIT P1.5 ;濕豆顯示
LEDMH BIT P1.4 ;米糊顯示
;----------------------------------------------------------------------------
DM  BIT P1.3 ;電機控制端
DH  BIT P1.2 ;發熱管控制
;----------------------------------------------------------------------------
KG  BIT P1.1 ;開關鍵
GN  BIT P1.0 ;功能鍵
;=========================================================================================
ORG 0000H
JMP START
ORG 00BH
JMP STOP_1  ;水位檢測中斷服務程序
ORG 0030H
START:
SETB EA
SETB EX0
MOV P1,#00H
ACALL YSH1
ACALL YSH1
ACALL YSH1  ;端口初始化調延時等待
MOV P1,#0FFH
ACALL YSH1
ACALL YSH1
ACALL YSH1
;----------------------------------------------------------------------------
LOOP0:
JB KG,LOOP1 ;開/關功能鍵檢測
ACALL YSH2  ;去抖動延時
JB KG,LOOP1
POWER:
JNB KG,$ ;如果還沒有松開按鍵則等待松開
CPL LEDPOWER  ;電源控制 P1.7
JMP LOOP0
;------------------------------------------------------------------------------------------------------------------------
LOOP1:
CJNE A,#03,GOOD  ;判斷功能鍵是否按了3次
MOV A,#00H
GOOD:
JB GN,LOOP0  ;功能選擇鍵檢測
ACALL YSH2 ;去抖動延時
JB GN,LOOP0
JNB GN,$ ;等待功能鍵松開
;----------------------------------------------------------------------------------
JMP THERRSUN  ;轉向三功能豆漿控制程序
THERRSUN:
CJNE A,#00H,SHI_DOU
INC A
JMP GANG_DOUSTART ;轉向干豆程序
SHI_DOU:
CJNE A,#01H,MI_HU
INC A
JMP SHI_DOUSTART ;轉向濕豆程序
MI_HU:
CJNE A,#02H,LOOP0  ;循環檢測
INC A
JMP MI_HUSTART  ;轉向米糊程序
;-----------------------------------------------------------------------------------------------------------------------
GANG_DOUSTART:
CLR LEDGD ;煮干豆程序(P1.6口LED顯示)
CLR DH  ;讓發熱管加熱水
SETB DM  ;斷開電機
ACALL YS_1  ;調用加熱水5分鐘延時
CLR DM  ;接通過電機,斷開發熱管,開始打豆漿
SETB DH  ;斷開發熱管
ACALL YS_2  ;調用打豆漿延時5分鐘
CLR DH  ;接通發熱管
SETB DM  ;斷開電機
ACALL YS_1  ;煮豆漿5分鐘
CLR DM
SETB DH
ACALL YS_1  ;再打5分鐘豆漿
SETB DM
CLR DH
ACALL YS_1  ;煮豆漿5分鐘
JMP STOP  ;完成干豆的打磨和煮豆漿,轉到停機程序
;-----------------------------------------------------------------------------------------------------------------------
SHI_DOUSTART:
CLR LEDSD  ;煮濕豆程序(P1.5口LED顯示)
CLR DM  ;先打豆后才煮豆漿
SETB DH
ACALL YS_1  ;打豆5分鐘
CLR DH  ;煮豆漿
SETB DM
ACALL YS_1  ;煮5分鐘
CLR DM  ;再打豆
SETB DH
ACALL YS_1  ;打豆5分鐘
SETB DM  ;煮豆漿
CLR DH
ACALL YS_1  ;煮5分鐘
JMP STOP
;-----------------------------------------------------------------------------------------------------------------------
MI_HUSTART:
CLR LEDMH ;煮干豆程序(P1.4口LED顯示)
CLR DH  ;讓發熱管加熱水
SETB DM  ;斷開電機
ACALL YS_1  ;調用加熱水5分鐘延時
CLR DM  ;接通過電機,斷開發熱管,開始打豆漿
SETB DH  ;斷開發熱管
ACALL YS_2  ;調用打豆漿延時5分鐘
CLR DH  ;接通發熱管
SETB DM  ;斷開電機
ACALL YS_1  ;煮豆漿5分鐘
CLR DM
SETB DH
ACALL YS_1  ;再打5分鐘豆漿
SETB DM
CLR DH
ACALL YS_1  ;煮豆漿5分鐘
JMP STOP  ;完成干豆的打磨和煮豆漿,轉到停機程序
;==========================================================================
STOP:
JMP START
STOP_1:
MOV P1,#00H
JMP $
;========================================端口初始==============
YSH1:
MOV R3,#250
D0: MOV R4,#250
DJNZ R4,$
DJNZ R3,D0
RET
;----------------------------------------------------------------按鍵去抖----------------------
YSH2:
MOV R3,#10
D1:
MOV R4,#250
DJNZ R4,$
DJNZ R3,D1
RET
;----------------------------------------------------------------5分鐘----------------------------
YS_1:
MOV R3,#50
D2: MOV R4,#50
D3: MOV R2,#50
DJNZ R2,$
DJNZ R4,D3
DJNZ R3,D2
RET
;----------------------------------------------------------------2分鐘---------------------------
YS_2:
MOV R3,#50
D4: MOV R4,#50
D5: MOV R2,#50
DJNZ R2,$
DJNZ R4,D5
DJNZ R3,D4
RET
END

;以上程序經過試驗OK!

作者: dsbk123 時間: 2024-10-24 14:38
樓主辛苦了，雖然看不懂匯編，先贊一個！

作者: wl20020807 時間: 2024-10-26 21:57
樓主有原理圖嗎

歡迎光臨 (http://m.zg4o1577.cn/bbs/)