找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

帖子
查看: 8172|回復(fù): 3
打印 上一主題 下一主題
收起左側(cè)

PIC12F675兩通道的AD轉(zhuǎn)換的匯編程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:137190 發(fā)表于 2016-9-12 00:17 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
完整程序下載： PIC12F675兩通道的AD轉(zhuǎn)換的匯編程序.zip (1.81 KB, 下載次數(shù): 51)

  1. ;程序功能:上電開機:PIN5為高電平,綠燈亮;PIN2,PIN3為低電平,紅燈滅;
  2. ;        輪流檢測PIN6,PIN7腳電平,欠壓3.9V,10V,紅燈亮,綠燈滅,過壓5.9V,15.9V
  3. ;        紅燈亮,綠燈滅,alram為TTL高電平,過壓鎖死
  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位存儲地址
  15. SOU       EQU 41h            ;欠壓設(shè)置,低8位存儲地址
  16. RLTH      EQU 42h            ;過壓設(shè)置,高2位存儲地址
  17. RLT       EQU 43h            ;過壓設(shè)置,低8位存儲地址

  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寄存器沒有溢出,未發(fā)生GP2/INT中斷
  48.                         ;GP5:GP0 引腳電平均未發(fā)生變化
  49. MOVLW    02H
  50. MOVWF    24H      ;AD通道設(shè)置選擇
  51. MOVLW    D'10'
  52. MOVWF    25H       ;過壓后延時采樣,10*90uS=900uS
  53. ;********************************************
  54. ;欠壓設(shè)置2.5V,5V路對應(yīng)值3.8V,15V路對應(yīng)值10V
  55. MOVLW    0002H
  56. MOVWF    SOUH
  57. MOVLW    0000H
  58. MOVWF    SOU
  59. ;*********************************************
  60. ;過壓設(shè)置值3.9V,5V路對應(yīng)值5.9V,15V路對應(yīng)15.9V
  61. MOVLW    0003H
  62. MOVWF    RLTH
  63. MOVLW    0020H
  64. MOVWF    RLT

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

  72. GOTO     $
  73. ;*********************************************
  74. ;定時中斷后開始AD轉(zhuǎn)換
  75. ADBEGIN
  76. BTFSC    INTCON,T0IF  ;是否是定時器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        ;自動設(shè)置存儲地址bank
  86. MOVF     ADRESH,W     ;讀電壓值高2位，
  87. CLRF     STATUS
  88. MOVWF    READH        ;讀到的高2位數(shù)據(jù)放到vrevh寄存器

  90. BANKSEL  ADRESL        ;自動設(shè)置存儲地址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;沒有借位,跳過
  99. GOTO     JUMP1
  100. MOVF     SOUH,W
  101. CONTIUE1
  102. SUBWF    READH,W
  103. BTFSS    STATUS,C ;沒有借位,跳過
  104. GOTO     ALARM0

  106. OVERPOWER
  107. MOVF     RLT,W
  108. SUBWF    READL,W
  109. BTFSS    STATUS,C   ;沒有借位,跳過
  110. GOTO     JUMP2
  111. MOVF     RLTH,W
  112. CONTIUE2
  113. SUBWF    READH,W
  114. BTFSS    STATUS,C  ;;沒有借位,跳過
  115. GOTO     NORMAL
  116. GOTO     ALARM1
  117. ;*****************************************
  118. ;時間到,準(zhǔn)備選擇通道和賦值
  119. LOOP
  120. DECFSZ   24H,F
  121. GOTO     SKIP
  122. BANKSEL  ADCON0
  123. MOVLW    B'10000001'
  124. MOVWF    ADCON0     ;右對齊,參考電壓Vdd,模擬通道0
  125. MOVLW    D'2'
  126. MOVWF    24H
  127. GOON
  128. BCF      INTCON,T0IF;恢復(fù)定時器繼續(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     ;右對齊,參考電壓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跳過
  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)機
  169. BCF      GPIO,2   ;紅燈亮
  170. BSF      GPIO,4   ;綠燈滅
  171. GOTO     $

  173. END
復(fù)制代碼



分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:147640 發(fā)表于 2017-5-5 15:03 | 只看該作者
感謝分享，
回復(fù)

使用道具 舉報

板凳
ID:247984 發(fā)表于 2017-12-1 13:32 | 只看該作者
樓主有沒有用c語言寫的啊
回復(fù)

使用道具 舉報

地板
ID:266068 發(fā)表于 2017-12-24 15:45 | 只看該作者
好東西。收藏
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表