标题: 单片机电压检测系统仿真 带vb上位机源码等完整资料 [打印本页]
作者: 51黑ff    时间: 2016-9-4 20:00
标题: 单片机电压检测系统仿真 带vb上位机源码等完整资料


题目：电压检测系统

概述：1、用一个单片机和DA转换组成一个随机电压发生单元（0~5V）；
         2、另一个单片机和AD转换组成数据采集单元；
         3、通过串行接口将采集的数据传到上位机中，需要编写上位计算机程序，对采集的数据进行处理，如显示当前值、画出一定时间内的记录曲线等。

说明：1、这里是一个仿真系统，需要安装虚拟串口工具。proteus的串行接口对应虚拟串口com3，VB程序对应虚拟串口com4。
              1200BSP，无校验位，8个数据位，1个停止位；单片机系统采用的是6M晶振。
         2、上位机程序用VB编写，数据采集程序用汇编语言编写，随机电压发生程序用C语言编写。
         3、上位机程序可直接运行“工程1.exe”，如果在VB6.0的机器上可以看见原代码。
         4、如果提示缺少MSCOMM32.OCX，可将文件夹中所带的MSCOMM32.OCX复制粘帖到c:\windows\system32\下即可（不会对您的系统造成任何危害）。
下面是下位机的汇编程序：

  2. ;ADCS BIT P3.5 ;使能接口
  3. ;ADCLK BIT P3.6 ;时钟接口
  4. ;ADDO BIT P3.7 ;数据输出接口（复用）
  5. ;ADDI BIT P3.7 ;数据输入接口
  6. ORG     0000H
  7. LJMP INITOUT
  8. ORG 0023H
  9. LJMP SERVE
  10. ORG 30H
  11. INITOUT:
  12. MOV SP,#60H   ;栈顶地址
  13. MOV TMOD,#20H  ;定时器1初始化
  14. MOV TH1,#0F3H  ;设置波特率为1200MHz，6MHz的晶振
  15. MOV TL1,#0F3H  ;
  16. MOV SCON,#50H  ;串口初始化为可以接收
  17. MOV PCON,#00H  ;波特率不倍增
  18. SETB TR1   ;启动定时器
  19. SETB EA   ;开中断
  20. SETB ES   ;允许串口中断
  21. MainProgram:   
  22. NOP    ;主程序主要是等中断
  23. NOP
  24. LCALL CONV
  25. SJMP Mainprogram
  26. ;=======================================================
  27. SERVE:
  28. PUSH PSW        ;将程序状态字压入堆栈
  29. PUSH ACC        ;将累加器压入堆栈
  30. CLR EA        ;关闭系统中断         
  31. CLR RI          ;清除中断标志位
  32. MOV A,SBUF
  33. CJNE A,#01,NEXTI;判断，01号单片机

  35. MOV SBUF,31H


  38. wait:jnb ti,wait
  39.      clr ti

  41. CLR RI          ;清除中断标志位
  42. SETB EA         ;打开系统中断
  43. POP ACC         ;累加器出栈
  44. POP PSW         ;程序状态字出栈
  45. NEXTI:RETI            ;中断程序返回



  49. ;==============================================
  50.      
  51. CONV:MOV 30H,#02H;方式字选择
  52.      MOV R0,#31H;数据存储首地址
  53.      LCALL ADC0832;调用A/D转换子程序

  55.      RET
  56. ;========================================
  57. ADC0832:SETB P3.7 ;初始化通道选择
  58.         NOP
  59.         NOP
  60.         CLR P3.5 ;拉低/CS端
  61.         NOP
  62.         NOP
  63.         SETB P3.6 ;拉高CLK端
  64.         NOP
  65.         NOP
  66.         CLR P3.6 ;拉低CLK端,形成下降沿
  67.         MOV A,30H
  68.         MOV C,ACC.1 ;确定取值通道选择
  69.         MOV P3.7,C
  70.         NOP
  71.         NOP
  72.         SETB P3.6 ;拉高CLK端
  73.         NOP
  74.         NOP
  75.         CLR P3.6 ;拉低CLK端,形成下降沿2
  76.         MOV A,30H
  77.         MOV C,ACC.0 ;确定取值通道选择
  78.         MOV P3.7,C
  79.         NOP
  80.         NOP
  81.         SETB P3.6 ;拉高CLK端
  82.         NOP
  83.         NOP
  84.         CLR P3.6 ;拉低CLK端,形成下降沿3
  85.         SETB P3.7
  86.         NOP
  87.         NOP
  88.     MOV R7,#8 ;准备送下后8个时钟脉冲
  89. ADH:MOV C,P3.7 ;接收数据
  90.     MOV ACC.0,C
  91.     RL A ;左移一次
  92.     SETB P3.6
  93.     NOP
  94.     NOP
  95.     CLR P3.6 ;形成一次时钟脉冲
  96.     NOP
  97.     NOP
  98.     DJNZ R7,ADH ;循环8次
  99.     MOV C,P3.7 ;接收数据
  100.     MOV ACC.0,C
  101.     MOV @R0,A
  102.     MOV R7,#8
  103. ADL:MOV C,P3.7 ;接收数据
  104.     MOV ACC.0,C
  105.     RR A ;左移一次
  106.     SETB P3.6
  107.     NOP
  108.     NOP
  109.     CLR P3.6 ;形成一次时钟脉冲
  110.     NOP
  111.     NOP
  112.     DJNZ R7,ADL ;循环8次
  113.     MOV B,@R0
  114.     CJNE A,B,ADC0832 ;数据校验
  115.     SETB P3.5 ;拉高/CS端
  116.     CLR P3.6 ;拉低CLK端
  117.     SETB P3.7 ;拉高数据端,回到初始状态
  118.     RET
  119. ;=======================================
复制代码





电压检测系统(含VB上位机)proteus仿真 程序资料.rar

135.49 KB, 下载次数: 67, 下载积分: 黑币 -5

作者: zxq9781    时间: 2017-5-6 09:04
上位机运行错误”8002“，不知道什么原因



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