標(biāo)題: PIC12F675兩通道的AD轉(zhuǎn)換的匯編程序 [打印本頁(yè)]
作者: 51黑ff    時(shí)間: 2016-9-12 00:17
標(biāo)題: PIC12F675兩通道的AD轉(zhuǎn)換的匯編程序
完整程序下載： PIC12F675兩通道的AD轉(zhuǎn)換的匯編程序.zip (1.81 KB, 下載次數(shù): 51)

  1. ;程序功能:上電開機(jī):PIN5為高電平,綠燈亮;PIN2,PIN3為低電平,紅燈滅;
  2. ;        輪流檢測(cè)PIN6,PIN7腳電平,欠壓3.9V,10V,紅燈亮,綠燈滅,過(guò)壓5.9V,15.9V
  3. ;        紅燈亮,綠燈滅,alram為TTL高電平,過(guò)壓鎖死
  4.   LIST P=12F675
  5. INCLUDE <P12F675.INC>
  6. __CONFIG(B'11000101110100')
  7. ;Highest band gap voltage,0,0,Data memory is not protected
  8. ;Program memory is code-protected,BOD enabled,MCLR pin is MCLR function
  9. ;PWRT enabled,WDT disabled,INTOSC oscillator
  10. ;**************************************
  11.   
  12. READH     EQU 2Ah            ;讀到的高2位數(shù)據(jù)
  13. READL     EQU 2Bh            ;讀到的低8位數(shù)據(jù)
  14. SOUH      EQU 40h            ;欠壓設(shè)置,高2位存儲(chǔ)地址
  15. SOU       EQU 41h            ;欠壓設(shè)置,低8位存儲(chǔ)地址
  16. RLTH      EQU 42h            ;過(guò)壓設(shè)置,高2位存儲(chǔ)地址
  17. RLT       EQU 43h            ;過(guò)壓設(shè)置,低8位存儲(chǔ)地址

  19. ORG      0000H  
  20. GOTO     MAIN
  21. ORG      0004H
  22. GOTO     ADBEGIN
  23. ORG      0030H

  25. MAIN
  26. BCF      STATUS,RP0 ;BANK 0
  27. CLRF     GPIO
  28. MOVLW    07H
  29. MOVWF    CMCON      ;關(guān)閉比較器

  31. BSF      STATUS,RP0 ;BANK 1
  32. CALL     3FFH       ; 讀內(nèi)部振蕩出廠校準(zhǔn)字，返回值在W寄存器內(nèi)
  33. MOVWF    OSCCAL     ;校準(zhǔn)晶振
  34.   
  35. MOVLW    B'00001011';TRISIO 三態(tài)控制器
  36. MOVWF    TRISIO     ;設(shè)置TRISIO方向控制器,GP0,GP1,GP3為輸入口

  38. MOVLW    B'00010011'
  39. MOVWF    ANSEL      ;8分頻晶振,AN0AN1為模擬口,AN2AN3為數(shù)字口
  40.                   
  41. BANKSEL  OPTION_REG
  42. MOVLW    B'00000000';將預(yù)分頻器分配給TIMER0 模塊,2分頻
  43. MOVWF    OPTION_REG ;

  45. BANKSEL  INTCON
  46. MOVLW    B'10100000'  ;允許全局中斷,禁止外圍中斷,允許TRMO中斷,禁止GP2/INT外部中斷
  47. MOVWF    INTCON        ;禁止GPIO端口電平變化中斷,TMR0寄存器沒(méi)有溢出,未發(fā)生GP2/INT中斷
  48.                         ;GP5:GP0 引腳電平均未發(fā)生變化
  49. MOVLW    02H
  50. MOVWF    24H      ;AD通道設(shè)置選擇
  51. MOVLW    D'10'
  52. MOVWF    25H       ;過(guò)壓后延時(shí)采樣,10*90uS=900uS
  53. ;********************************************
  54. ;欠壓設(shè)置2.5V,5V路對(duì)應(yīng)值3.8V,15V路對(duì)應(yīng)值10V
  55. MOVLW    0002H
  56. MOVWF    SOUH
  57. MOVLW    0000H
  58. MOVWF    SOU
  59. ;*********************************************
  60. ;過(guò)壓設(shè)置值3.9V,5V路對(duì)應(yīng)值5.9V,15V路對(duì)應(yīng)15.9V
  61. MOVLW    0003H
  62. MOVWF    RLTH
  63. MOVLW    0020H
  64. MOVWF    RLT

  66. MOVLW    B'10000001'
  67. MOVWF    ADCON0     ;右對(duì)齊,參考電壓Vdd,模擬通道0
  68. BANKSEL  TMR0
  69. MOVLW    D'242'
  70. MOVWF    TMR0

  72. GOTO     $
  73. ;*********************************************
  74. ;定時(shí)中斷后開始AD轉(zhuǎn)換
  75. ADBEGIN
  76. BTFSC    INTCON,T0IF  ;是否是定時(shí)器TMR0中斷
  77. BANKSEL  ADCON0
  78. BSF      ADCON0,GO  ;開始轉(zhuǎn)換
  79. ADWAIT
  80. BTFSC    ADCON0,GO
  81. GOTO     ADWAIT        ;等待轉(zhuǎn)換完成
  82. ;**********************************************
  83. ;AD轉(zhuǎn)換后數(shù)據(jù)判斷處理
  84. READ
  85. BANKSEL  ADRESH        ;自動(dòng)設(shè)置存儲(chǔ)地址bank
  86. MOVF     ADRESH,W     ;讀電壓值高2位，
  87. CLRF     STATUS
  88. MOVWF    READH        ;讀到的高2位數(shù)據(jù)放到vrevh寄存器

  90. BANKSEL  ADRESL        ;自動(dòng)設(shè)置存儲(chǔ)地址bank
  91. MOVF     ADRESL,w      ;讀電壓低8位
  92. CLRF     STATUS
  93. MOVWF    READL
  94. ;*****************************************************
  95. LOWPOWER
  96. MOVF     SOU,W
  97. SUBWF    READL,W
  98. BTFSS    STATUS,C;沒(méi)有借位,跳過(guò)
  99. GOTO     JUMP1
  100. MOVF     SOUH,W
  101. CONTIUE1
  102. SUBWF    READH,W
  103. BTFSS    STATUS,C ;沒(méi)有借位,跳過(guò)
  104. GOTO     ALARM0

  106. OVERPOWER
  107. MOVF     RLT,W
  108. SUBWF    READL,W
  109. BTFSS    STATUS,C   ;沒(méi)有借位,跳過(guò)
  110. GOTO     JUMP2
  111. MOVF     RLTH,W
  112. CONTIUE2
  113. SUBWF    READH,W
  114. BTFSS    STATUS,C  ;;沒(méi)有借位,跳過(guò)
  115. GOTO     NORMAL
  116. GOTO     ALARM1
  117. ;*****************************************
  118. ;時(shí)間到,準(zhǔn)備選擇通道和賦值
  119. LOOP
  120. DECFSZ   24H,F
  121. GOTO     SKIP
  122. BANKSEL  ADCON0
  123. MOVLW    B'10000001'
  124. MOVWF    ADCON0     ;右對(duì)齊,參考電壓Vdd,模擬通道0
  125. MOVLW    D'2'
  126. MOVWF    24H
  127. GOON
  128. BCF      INTCON,T0IF;恢復(fù)定時(shí)器繼續(xù)判斷
  129. BANKSEL  INTCON
  130. BSF      INTCON,7
  131. BANKSEL  TMR0
  132. MOVLW    D'242'
  133. ADDWF    TMR0,F
  134. GOTO     $
  135. ;***************************************************
  136. ;子程序
  137. SKIP
  138. BANKSEL  ADCON0
  139. MOVLW    B'10000101'
  140. MOVWF    ADCON0     ;右對(duì)齊,參考電壓Vdd,模擬通道0
  141. GOTO     GOON
  142. JUMP1
  143. INCFSZ   SOUH,W
  144. GOTO     CONTIUE1
  145. JUMP2
  146. INCFSZ   RLTH,W
  147. GOTO     CONTIUE2

  149. NORMAL
  150. BANKSEL  GPIO
  151. BTFSC    22H,0    ;為0跳過(guò)
  152. GOTO     BACK
  153. BSF      GPIO,2   ;綠燈亮
  154. BCF      GPIO,4   ;紅燈滅
  155. BACK
  156. BCF      22H,0
  157. GOTO     LOOP
  158. ALARM0
  159. BSF      22H,0
  160. BANKSEL  GPIO
  161. BCF      GPIO,2   ;綠燈滅
  162. BSF      GPIO,4   ;紅燈亮
  163. GOTO     LOOP
  164. ALARM1
  165. DECFSZ   25H,F    ;為0則跳
  166. GOTO     LOOP
  167. BANKSEL  GPIO
  168. BSF      GPIO,5   ;關(guān)機(jī)
  169. BCF      GPIO,2   ;紅燈亮
  170. BSF      GPIO,4   ;綠燈滅
  171. GOTO     $

  173. END
復(fù)制代碼



作者: mickeyeva2    時(shí)間: 2017-5-5 15:03
感謝分享，
作者: lxz335    時(shí)間: 2017-12-1 13:32
樓主有沒(méi)有用c語(yǔ)言寫的啊
作者: mahn168    時(shí)間: 2017-12-24 15:45
好東西。收藏



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1