精品一区二区三区自拍图片区,天天久久综合

標(biāo)題: 單片機(jī)工業(yè)控制程序 [打印本頁]

作者: chanong 時(shí)間: 2014-10-13 11:49
標(biāo)題: 單片機(jī)工業(yè)控制程序
;工業(yè)控制程序
;實(shí)驗(yàn)?zāi)康?
;1.掌握單片機(jī)開發(fā)系統(tǒng)的使用
;2.掌握一次性在線仿真調(diào)試的全過程
;3.掌單片機(jī)如何編程及中斷的應(yīng)用
;實(shí)驗(yàn)原理:
;在工業(yè)控制中,象沖壓、注塑、輕紡、制瓶等生產(chǎn)過程,都是一些斷續(xù)生產(chǎn)過程,
;這些斷續(xù)生產(chǎn)過程又都是按某種順序有規(guī)律地完成預(yù)定的動作。對這類斷續(xù)生
;產(chǎn)過程的控制稱順序控制。
;例如注塑機(jī)要生產(chǎn)一個(gè)工件,其工藝過程大致按"合�！⑸洹訒r(shí)→開模
; →產(chǎn)伸→產(chǎn)退"這么個(gè)時(shí)間順序動作。這種順序控制采用單片機(jī)是很容易實(shí)現(xiàn)的。
;本實(shí)驗(yàn)是以控制注塑機(jī)為例而設(shè)計(jì)的典型時(shí)間順序控制實(shí)驗(yàn)。
; 我們把89XX P0口的0-6位依次用發(fā)光二極管作為模擬輸出指示,
;共分7道工序,P1.7為聲光報(bào)警,P3.4為開工啟動開關(guān),P3.2,P3.3為外部故障輸入模擬開關(guān),
;低電平告警。
;為了問題簡單化,我們設(shè)定每道工序只有一位有輸出(高電平燈亮),工作流程表如下:
;P0.7  P0.6  P0.5  P0.4  P0.3  P0.2  P0.1  P0.0  工序  控制字
;0    0    0    0    0    0    0    1    1    01H
;0    0    0    0    0    0    1    0    2    02H
;0    0    0    0    0    1    0    0    3    04H
;0    0    0    0    1    0    0    0    4    08H
;0    0    0    1    0    0    0    0    5    10H
;0    0    1    0    0    0    0    0    6    20H
;0    1    0    0    0    0    0    0    0    40H
;1    0    0    0    0    0    0    0    0    80H
;以上設(shè)硬件接線為高電平有效,如果設(shè)硬件接線為低電平有效(灌電流,減小CPU功耗),
;LED燈亮,你又如何寫出控制字!請你畫出程序流程圖!
      ORG    0000H  ;工業(yè)順序控制程序
      AJMP MIN  ;轉(zhuǎn)主程序
      ORG    0003H  ;INT0中斷入口地址
      AJMP INTA  ;轉(zhuǎn)中斷服務(wù)程序
      ORG    0013H  ; INT1中斷入口地址
      AJMP INTB  ;轉(zhuǎn)中斷服務(wù)程序
      ORG    0050H  ;主程序
MIN:  MOV SP,#50H
MOV    P0,#0FFH ;關(guān)P0口(設(shè)高電平LED燈亮)
      MOV    P3,#0FFH ;關(guān)P3口(設(shè)低電平工作
L0056:  JNB    T0,$  ;等開工(P3.4)
      ORL    IE,#85H  ;允許INT0,INT1中斷
      ORL    IP,#04H  ;設(shè)為INT1為優(yōu)先中斷
L005F:  MOV    P0,#0FEH ;執(zhí)行工序1
      ACALL S00E0  ;延時(shí)
      MOV    P0,#0FDH ; 執(zhí)行工序2
      ACALL S00E0  ;
      MOV    P0,#0FBH ; 執(zhí)行工序3
      ACALL S00E0  ;
      MOV    P0,#0F7H ; 執(zhí)行工序4
      ACALL S00E0  ;
      MOV    P0,#0EFH ; 執(zhí)行工序5
      ACALL S00E0  ;
      MOV    P0,#0DFH ; 執(zhí)行工序6
      ACALL S00E0  ;
      MOV    P0,#0BFH ; 執(zhí)行工序7
      ACALL S00E0  ;
MOV P0,#7FH  ;執(zhí)行工序8
      ACALL S00E0  ;
      SJMP L005F  ;循環(huán)
      ORG    0090H  ;INT0中斷服務(wù)程序
INTA: MOV    B,R2  ;保護(hù)現(xiàn)場
      MOV    P0,#0FFH ;關(guān)輸出
      MOV    20H,#0F0H ;報(bào)警聲參數(shù)
L0098:  SETB P1.7  ;P1.7輸出報(bào)警聲
      ACALL S00D0  ;延時(shí)時(shí)間比INT1長
      CLR    P1.7 ;
      ACALL S00D0  ;
      DJNZ 20H,L0098 ;不為零轉(zhuǎn)
      CLR    P1.7 ;
      ACALL S00E0  ;
      JNB    INT0,L0098 ;INT0為零繼續(xù)報(bào)警
      MOV    R2,B  ; INT0為1不報(bào)警,恢復(fù)現(xiàn)場
      SETB P1.7
RETI    ;中斷返回
ORG 00B0H ; INT1中斷服務(wù)程序
INTB: MOV    B,R2  ; 保護(hù)現(xiàn)場
      MOV    P1,#0FFH ; 關(guān)輸出
      MOV    B,#20H  ; 報(bào)警聲參數(shù)
L00B8:  SETB P1.7  ; P1.7輸出報(bào)警聲
      ACALL S00D6  ; 延時(shí)時(shí)間比INT0短
      CLR    P1.7 ;
      ACALL S00D6  ;
      DJNZ 20H,L00B8 ; 不為零轉(zhuǎn)
      CLR    P1.7 ;
      ACALL S00E0  ;
      JNB    INT1,L00B8 ; INT1為零繼續(xù)報(bào)警
      MOV    R2,B  ; INT1為1不報(bào)警,恢復(fù)現(xiàn)? SETB P1.7
      RETI    ; 中斷返回
  ORG  00D0H
S00D0:  MOV    R2,#07H  ;
      ACALL S00EB  ;
      RET       ;
  ORG  00D6H
S00D6:  MOV    R2,#05H  ;
      ACALL S00EB
      RET
      ORG    00E0H  ;
S00E0:  MOV    R2,#25H
      ACALL S00EB
RET
      ORG    00EBH  ;通用延時(shí)子程序
S00EB:  PUSH 02H  ;R2(復(fù)位后R2即為02H)存放時(shí)間常數(shù),進(jìn)棧保護(hù)
L00ED:  PUSH 02H  ; R2進(jìn)棧保護(hù)
L00EF:  PUSH 02H  ; 進(jìn)棧
L00F1:  DJNZ R2,$  ;R2不為零等待
      POP    02H  ;出棧
      DJNZ R2,L00EF ; R2不為零轉(zhuǎn)
      POP    02H  ; 出棧
      DJNZ R2,L00ED ; R2不為零轉(zhuǎn)
      POP    02H  ; 出棧
      DJNZ R2,S00EB ; R2不為零轉(zhuǎn)
      RET    ;子程序返回
      END

作者: 成森林 時(shí)間: 2018-1-31 16:54
好東西，收藏了。謝謝。

作者: 舞風(fēng) 時(shí)間: 2018-5-28 19:06
喜歡實(shí)用的，贊

歡迎光臨 (http://www.torrancerestoration.com/bbs/)