欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 上下限溫度控制器 匯編源碼 [打印本頁]
作者: 趙建春    時間: 2015-5-24 10:55
標題: 上下限溫度控制器 匯編源碼
完整代碼下載：
程序.rar (15.65 KB, 下載次數: 81)

單片機匯編源程序：
  1. ;溫度上下限自由設定，P3.5設置溫度上限，P3.6設置溫度下限，P3.7為溫度增加鍵，每按一次溫度加一度。
  2. ;當按P3.5時，數碼管顯示H00；當按P3.6時，數碼管顯示L00，設置溫度范圍為整數，不含小數。
  3. ORG 0000H
  4. TEMPER_L EQU 29H
  5. TEMPER_H EQU 28H
  6. FLAG1 EQU 38H;是否檢測到DS18B20標志位
  7. bwei  equ 22h
  8. A_BIT EQU 20H ;數碼管個位數存放內存位置
  9. B_BIT EQU 21H ;數碼管十位數存放內存位置
  10. XS    EQU 30H
  11. MOV A,#00H
  12. MOV P2,A
  13. MOV R5,#01H
  14. MAIN:LCALL GET_TEMPER;調用讀溫度子程序
  15. MOV A,29H
  16. MOV B,A
  17. CLR C
  18. RLC A
  19. CLR C
  20. RLC A
  21. CLR C
  22. RLC A
  23. CLR C
  24. RLC A
  25. SWAP A
  26. MOV 31H,A
  27. MOV A,B
  28. MOV C,40H;將28H中的最低位移入C
  29. RRC A
  30. MOV C,41H
  31. RRC A
  32. MOV C,42H
  33. RRC A
  34. MOV C,43H
  35. RRC A
  36. MOV 29H,A
  37. LCALL DISPLAY;調用數碼管顯示子程序
  38. AJMP MAIN; 這是DS18B20復位初始化子程序
  39. INIT_1820:SETB P1.0
  40. NOP
  41. CLR P1.0;主機發出延時537微秒的復位低脈沖
  42. MOV R1,#3
  43. TSR1:MOV R0,#107
  44. DJNZ R0,$
  45. DJNZ R1,TSR1
  46. SETB P1.0;然后拉高數據線
  47. NOP
  48. NOP
  49. NOP
  50. MOV R0,#25H
  51. TSR2:JNB P1.0,TSR3;等待DS18B20回應
  52. DJNZ R0,TSR2
  53. LJMP TSR4 ; 延時
  54. TSR3:SETB FLAG1 ; 置標志位,表示DS1820存在
  55. LJMP TSR5
  56. TSR4:CLR FLAG1 ; 清標志位,表示DS1820不存在
  57. LJMP TSR7
  58. TSR5:MOV R0,#117
  59. TSR6:DJNZ R0,TSR6 ; 時序要求延時一段時間
  60. TSR7:SETB P1.0
  61. RET; 讀出轉換后的溫度值
  62. GET_TEMPER:SETB P1.0
  63. LCALL INIT_1820;先復位DS18B20
  64. JB FLAG1,TSS2
  65. RET ; 判斷DS1820是否存在?若DS18B20不存在則返回
  66. TSS2:MOV A,#0CCH ; 跳過ROM匹配
  67. LCALL WRITE_1820
  68. MOV A,#44H ; 發出溫度轉換命令
  69. LCALL WRITE_1820;這里通過調用顯示子程序實現延時一段時間,等待AD轉換結束,12位的話750微秒
  70. LCALL DISPLAY
  71. LCALL INIT_1820;準備讀溫度前先復位
  72. MOV A,#0CCH ; 跳過ROM匹配
  73. LCALL WRITE_1820
  74. MOV A,#0BEH ; 發出讀溫度命令
  75. LCALL WRITE_1820
  76. LCALL READ_18200; 將讀出的溫度數據保存到35H/36H
  77. RET;寫DS18B20的子程序(有具體的時序要求)
  78. WRITE_1820:MOV R2,#8;一共8位數據
  79. CLR C
  80. WR1:CLR P1.0
  81. MOV R3,#6
  82. DJNZ R3,$
  83. RRC A
  84. MOV P1.0,C
  85. MOV R3,#23
  86. DJNZ R3,$
  87. SETB P1.0
  88. NOP
  89. DJNZ R2,WR1
  90. RET; 讀DS18B20的程序,從DS18B20中讀出兩個字節的溫度數據
  91. READ_18200:MOV R4,#2 ; 將溫度高位和低位從DS18B20中讀出
  92. MOV R1,#29H ; 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H)
  93. RE00:MOV R2,#8;數據一共有8位
  94. RE01:CLR C
  95. SETB P1.0
  96. NOP
  97. NOP
  98. CLR P1.0
  99. NOP
  100. NOP
  101. NOP
  102. SETB P1.0
  103. MOV R3,#9
  104. RE10: DJNZ R3,RE10
  105. MOV C,P1.0
  106. MOV R3,#23
  107. RE20: DJNZ R3,RE20
  108. RRC A
  109. DJNZ R2,RE01
  110. MOV @R1,A
  111. DEC R1
  112. DJNZ R4,RE00
  113. RET
  114. DISPLAY:
  115. MOV A,29H;將29H中的十六進制數轉換成10進制
  116. MOV R3,A
  117. CLR  C
  118. SUBB  A,50H;溫度上限
  119. JNB   CY, T3
  120. SETB P1.2;風扇繼電器關
  121. SETB P2.5;報警關
  122. MOV   A,R3
  123. CLR   C
  124. SUBB  A,60H;溫度下限
  125. JB   CY, T2
  126. SETB P1.1;加熱繼電器關
  127. SETB P2.5;報警關
  128. SJMP XIANSHI
  129. T2:
  130. CLR   P1.1;加熱繼電器開
  131. CLR P2.5;報警開
  132. LJMP  XIANSHI
  133. T3:
  134. CLR P1.2;風扇繼電器開
  135. CLR P2.5;報警開
  136. XIANSHI:
  137. LCALL SETT
  138. DISP:
  139. MOV A,R3
  140. MOV B,#100 ;10進制/10=10進制
  141. DIV AB
  142. mov bwei,a
  143. mov a,b
  144. mov b,#10
  145. div ab
  146. MOV B_BIT,A ;十位在A
  147. MOV A_BIT,B ;個位在B
  148. MOV R0,#4
  149. CLR C;多加的
  150. DPL1: MOV R1,#250 ;顯示1000次
  151. DPLOP:
  152.         MOV DPTR,#NUMTAB
  153.         MOV A,bwei
  154.         MOVC A,@A+DPTR ;查通道的7段代碼
  155.         MOV P0,A ;送出十位的7段代碼
  156.         CLR P2.3 ;開通道顯示        
  157.         ACALL D1MS ;顯示1MS
  158.         SETB P2.3




  163. MOV DPTR,#NUMTAB1
  164. MOV A,A_BIT ;取個位數
  165. MOVC A,@A+DPTR ;查個位數的7段代碼
  166. MOV P0,A ;送出個位的7段代碼
  167. CLR P2.1 ;開個位顯示
  168. ACALL D1MS ;顯示1MS
  169. SETB P2.1
  170. MOV DPTR,#NUMTAB
  171. MOV A,B_BIT ;取十位數
  172. MOVC A,@A+DPTR ;查十位數的7段代碼
  173. MOV P0,A ;送出十位的7段代碼
  174. CLR P2.2 ;開十位顯示        
  175. ACALL D1MS ;顯示1MS
  176. SETB P2.2
  177. JC XSW;多加的
  178. MOV A,31H
  179. MOV B,#160
  180. DIV AB
  181. MOV XS,B
  182. XSW:MOV A,XS
  183. MOVC A,@A+DPTR
  184. MOV P0,A
  185. CLR P2.0
  186. ACALL D1MS
  187. SETB P2.0
  188. SETB C;多加的
  189. DJNZ R1,DPLOP ;250次沒完循環
  190. DJNZ R0,DPL1 ;4個250次沒完循環
  191. RET;1MS延時(按12MHZ算)
  192. D1MS: MOV R7,#80
  193. DJNZ R7,$
  194. RET
  195. D10MS:        MOV R6,#20
  196. LOOP:        MOV R7,#250
  197.         DJNZ R7,$
  198.         DJNZ R6,LOOP
  199.         RET
  200. D5MS:        MOV R6,#10
  201. LOOP1:        MOV R7,#250
  202.         DJNZ R7,$
  203.         DJNZ R6,LOOP1
  204.         RET
  205. NUMTAB:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,7FH,7FH,7FH,7FH,7FH,7FH
  206. NUMTAB1: DB 0BFH,86H,0DBH,0CFH,0E6H,0EDH,0FDH,87H,0FFH,0EFH

  208. SETT:        
  209. TH:        JNB P3.6,GS
  210.         JNB P3.5,GSU
  211.         LJMP DISP
  212. GS:        LCALL D10MS
  213.         JB P3.6,TH
  214.         SJMP BIAN3
  215. GSU:        LCALL D10MS
  216.         JB P3.5,TH
  217.         SJMP BIAN

  219. BIAN3:        MOV R1,#00
  220. BIAN1:        MOV P0,#38H
  221.         CLR P2.2
  222.         SETB P2.0
  223.         SETB P2.1
  224.         LCALL D5MS
  225.         MOV A,R1
  226.         MOV B,#10
  227.         DIV AB
  228.         MOV DPTR,#NUMTAB
  229.         MOVC A,@A+DPTR
  230.         MOV P0,A
  231.         CLR P2.1
  232.         SETB P2.0
  233.         SETB P2.2
  234.         LCALL D5MS
  235.         MOV A,B
  236.         MOV DPTR,#NUMTAB
  237.         MOVC A,@A+DPTR
  238.         MOV P0,A
  239.         CLR P2.0
  240.         SETB P2.1
  241.         SETB P2.2
  242.         LCALL D5MS
  243.         MOV 60H,R1
  244.         
  245.         JB P3.7,BIAN1
  246.         JNB P3.7,$
  247.         INC R1
  248.         SJMP BIAN1

  250. BIAN:        MOV R0,#00
  251. BIAN2:        MOV P0,#76H
  252.         CLR P2.2
  253.         SETB P2.0
  254.         SETB P2.1
  255.         LCALL D5MS
  256.         MOV A,R0
  257.         MOV B,#10
  258.         DIV AB
  259.         MOV DPTR,#NUMTAB
  260.         MOVC A,@A+DPTR
  261.         MOV P0,A
  262.         CLR P2.1
  263.         SETB P2.0
  264.         SETB P2.2
  265.         LCALL D5MS
  266.         MOV A,B
  267.         MOV DPTR,#NUMTAB
  268.         MOVC A,@A+DPTR
  269.         MOV P0,A
  270.         CLR P2.0
  271.         SETB P2.1
  272.         SETB P2.2
  273.         LCALL D5MS
  274.         MOV 50H,R0
  275.         
  276.         JB P3.7,BIAN2
  277.         JNB P3.7,$
  278.         INC R0
  279.         SJMP BIAN2
  280.         RET
  281. END

復制代碼


作者: 南天白云    時間: 2015-5-24 19:11
咋有是匯編，也不錯學習一下
作者: 胡小艷    時間: 2017-1-11 11:02
謝謝啦，好資料，51黑有你更精彩！！！
作者: nongqsong    時間: 2017-1-12 09:29
請問版主，昨天在這個帖子里無意中點了“程序下載”窗口，沒有下載程序。我的黒幣怎么被扣了？既然被扣了之后想補下也下不了，或者還是被扣黒幣。我覺得這樣不合理。
作者: nongqsong    時間: 2017-1-15 16:47
nongqsong 發表于 2017-1-12 09:29
請問版主，昨天在這個帖子里無意中點了“程序下載”窗口，沒有下載程序。我的黒幣怎么被扣了？既然被扣了之 ...

謝謝版主！
作者: ztrdiy    時間: 2017-1-17 14:35
匯編有的玩了，謝謝分享！
作者: 17857021287    時間: 2018-6-4 10:27
為什么我在里面找不到程序呢?



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