|
|
;-------------------------------------------------------------兩鍵控制豆漿機程序(芯片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!
|
評分
-
查看全部評分
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
