标题: 8通道车灯检测程序（汇编） [打印本页]
作者: daniu    时间: 2014-12-26 22:33
标题: 8通道车灯检测程序（汇编）
  1. ;时钟 11.0592MHz,波特率=9600.

  3.          CONTR EQU 0C5H         ;A/D转换寄存器
  4.          DAT   EQU 0C6H         ;A/D转换结果寄存器

  6.          OUT   EQU  30H         ;测量后数值的8个地址的起始地址(30～37H)
  7.          BIAOS EQU  20H         ;20H.0为发送串口数据标识位，为1时发送数据，为0时不发送数据
  8.          ZHIL  EOU  10H         ;识别主机发来的指令代码的，10H表示要显示车灯状态

  10.          P1M0  EQU  91H         ;P1口模式选择寄存器0
  11.          P1M1  EQU  92H         ;P1口模式选择寄存器1

  13. ;=================================================================================
  14. ;主程序
  15. ;=================================================================================
  16.          ORG 0000H
  17.          LJMP KS
  18.          ORG 0003H
  19.          LJMP INTO              ;串口中断
  20.          ORG 0100H

  22. KS:      MOV SP,#60H            ;设置堆栈
  23.          MOV CHKOU,#00H         ;清标识
  24.          ACALL POWER            ;初始化AD转换程序
  25.          ********************** ;初始化串口中断
  26.          ACALL RS232            ;初始化串口

  28. KS1:     ACALL ADZH             ;调用AD转换程序
  29.          ACALL ZTCB             ;调用车灯状态识别程序
  30.          JB BIAOS.0,KS2         ;检测主机是否发来要求显示数据代码指令
  31.          ACALL FSDM             ;收到指令，则发送车灯状态标识代码到主机
  32.          CLR BIAOS.0            ;发送数据完毕清标识

  34. KS2:     MOV R5,#100            ;100--延时1S
  35. LP1:     MOV R6,#200
  36.          ACALL DELAY
  37.          DJNZ R5,LP1
  38.          SJMP KS1               ;重新检测


  41. INTO:                    ;串口接收程序
  42.          CJNE A,#ZHIL,L1        ;收到主机发来10H指令代码的表示要显示车灯状态，其他代码视为无效
  43.          SETB BIAOS.0           ;设显示标识
  44. L1:      RET





  50. ;=================================================================================
  51. ;AD初始化程序
  52. ;=================================================================================
  53. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  54. ;开ADC电源,第一次使用时要打开内部模拟电源
  55. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  56. POWER:   ORL CONTR,#10000000H   ;开A/D转换电源
  57.          MOV R6,#2
  58.          ACALL DELAY            ;开A/D转换电源后要加延时,1mS以内就足够了
  59. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  60. ;设置P1.*,设置A/D通道所在的I/O为开漏模式
  61. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  62. OPEN:    MOV P1M0,#11111111B    ;把P1口设为高阻输入
  63.          MOV P1M1,#00000000B
  64.          RET

  66. ;=================================================================================
  67. ;AD初始化结束
  68. ;=================================================================================






  75. ;=================================================================================
  76. ;串口初始化
  77. ;=================================================================================
  78. RS232:   CLR ES                 ;禁止串口中断
  79.          MOV TMOD,#20H          ;设置T1为波特率发生器
  80.          MOV SCON,#50H          ;0101,0000 8位数据位,无奇偶校验
  81.          MOV TH1,#0FDH          ;11.0592MHz 晶振,波特率=9600，时长0.6695
  82.          MOV TL1,#96H  
  83.          SETB TR1               ;启动T1
  84.          RET

  86. ;=================================================================================
  87. ;串口初始化结束
  88. ;=================================================================================







  96. ;=================================================================================
  97. ;AD转换程序
  98. ;=================================================================================

  100. ADZH:    MOV R0,#11100000B      ;从P1.0通道开始测量，直到P1.7后返回再检测
  101.          MOV R1,#OUT            ;测量后的数值（16进制）分别放到OUT(30H)起8个地址内
  102. LP2:     ACALL SET_CH           ;设置P1.*作为A/D转换通道
  103.          ACALL GET_AD           ;测量电压并且取A/D转换结果
  104.          INC R1                 ;地址加1
  105.          INC R0                 ;换另一端口
  106.          CJNE R0,#11101000B,LP3 ;直到P1.7
  107.          MOV R0,#11100000B      ;再从P1.0来
  108.          MOV R1,#OUT            ;重新设定存放AD转换后数值的地址
  109.          SJMP LP2

  111. LP3:     RET                    ;返回

  113. ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
  114. ;R0存通道地址代码：11100000B～11100111B，R1存通道地址：分别为30H～37H
  115. ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
  116. ;以下测量电压程序
  117. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  118. ;设置P1.*作为A/D转换通道
  119. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  120. SET_CH:  MOV CONTR,R0           ;选择P1.*作为A/D转换通道
  121.          MOV R6,#1              ;更换A/D转换通道后要适当延时,使输入电压稳定
  122.          ACALL DELAY         ;切换A/D转换通道,加延时20uS～200uS就可以了,
  123.          RET

  125. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  126. ;测量电压并且取A/D转换结果
  127. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  128. GET_AD:  MOV DAT,#0
  129.          ORL CONTR,#00001000B   ;启动 AD 转换

  131. WAIT:    MOV A,#00010000B       ;判断 AD 转换是否完成
  132.          ANL A,CONTR
  133.          JZ WAIT                ;AD 转换尚未完成,继续等待
  134.          ANL CONTR,#11100111B   ;清0 ADC_FLAG,ADC_START位,停止A/D转换         
  135.          MOV A,DAT
  136.          MOV @R1,A              ;保存 AD 转换结果
  137.          RET

  139. ;=================================================================================
  140. ;AD转换结束
  141. ;=================================================================================






  148. ;=================================================================================
  149. ;车灯状态识别程序
  150. ;=================================================================================
  151. ZTCB:    MOV A,30H
  152.          CJNE A,#00H,L11        ;读取车灯状态，如果为0，表示没有通电
  153.          CLR P2.0               ;给灯泡通电
  154.          ACALL ADZH2            ;AD转换读取数据
  155.          SETB P2.0              ;灯泡断电
  156.          MOV A,30H
  157.          CJNE A,#00H,L12        ;读取车灯状态，如果为0，表示短路
  158.          MOV 38H,#00010010B     ;作标记，表示1#车灯短路
  159.          SJMP FAHUI
  160. L12:     CJNE A,#10H,L13        ;读取车灯状态，如果为10H，表示正常
  161.          MOV 38H,#00010000B     ;作标记，表示1#车灯正常
  162.          SJMP FAHUI
  163. L13:     CJNE A,#20H,L14        ;读取车灯状态，如果为20H，表示缺灯
  164.          MOV 38H,#00010011B     ;作标记，表示1#车灯缺灯
  165.          SJMP FAHUI
  166. L14:     CJNE A,#0F0H,FAHUI     ;读取车灯状态，如果为F0H，表示开路
  167.          MOV 38H,#00010011B     ;作标记，表示1#车灯开路
  168.          SJMP FAHUI

  170. L11:     CJNE A,#0F0H,FAHUI     ;读取车灯状态，如果为F0H，表示正在通电
  171.          MOV 38H,#00011000B     ;作标记，表示1#车灯通电

  173. FAHUI；  RET


  176. ADZH2:   MOV R0,#11100000B      ;从P1.0通道开始测量，直到P1.7后返回再检测
  177.          MOV R1,#OUT            ;测量后的数值（16进制）分别放到OUT(30H)起8个地址内
  178.          ACALL SET_CH           ;设置P1.*作为A/D转换通道
  179.          ACALL GET_AD           ;测量电压并且取A/D转换结果
  180.          RET
  181. ;=================================================================================
  182. ;车灯状态识别结束
  183. ;=================================================================================







  191. ;=================================================================================
  192. ;向主机发送数据程序
  193. ;=================================================================================
  194. FADM:    CLR TI
  195.          MOV A,@R1
  196.          MOV SBUF,A
  197.          JNB TI,$
  198.          CLR TI
  199.          INC R1
  200.          CJNE R1,#38H,FADM
  201.          MOV R1,#30H
  202.          RET
  203. ;=================================================================================
  204. ;向主机发送数据结束
  205. ;=================================================================================





  211. ;=================================================================================
  212. ;延时子程序
  213. ;=================================================================================
  214. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  215. ;延时500微秒子程序   
  216. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  217. DELAY:   MOV  R7,#229          ;延时 500 微秒,此条2个机器周期
  218.          DJNZ  R7,$
  219.          DJNZ R6,DELAY
  220.          RET                   ;此条2个机器周期，总延时（229*2+2+2）*(12/11.0592)≈500uS
  221. ;┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈

  223.          END
复制代码






欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1