蓄电池充放电过程数据自动记录系统

陈燕昌　孙向阳　叶春辉

　　从每一个测试盒引出一根端电压测试线，线的前端都有两个夹子：一个是红色的，用于夹
电池的正极；一个是绿色的，用于夹电池的负极。在夹子的尾部标有从1到6的编号，使用时
要根据电池的放置位置将夹子按编号顺序夹在电池的正负极上。电流测试线只有一根，前端
要插入电流探头的插孔中。实际测试时，有几组电池，就用几个测试盒。操作时要注意先将
电池的充放电导线从电流探头的孔中穿过，然后夹好夹子。

　　一、 系统的软件设计

　　为了使系统工作自动化，以Genie为工作重点，对数据采集和处理部分的软件进行了全面
开发。开发的核心是Genie中的Visual Basic Script模块。系统要实现的主要功能(如数据
采集、控制、判断、显示和记录等)都在这个模块中实现。

　　Visual Basic Script是Visual Basic语言的一个子集。它的语法和VB以及VBA全面兼容，
所以对于用VB和VBA编写的程序，大多数都可以不经过任何修改而直接在Visual
Basic Scri pt环境中运行。作为Genie的一个有机组成部分，它具有诸如计算、判断、循环、比较、输
出等基本功能，为Genie提供了相当大的灵活性。然而这种灵活性是以牺牲速度为代价的，
因为在Genie环境中运行，它的代码不是可执行代码，而是解释型的P代码。这就要求开发的
软件不能太长、太复杂，而要在兼顾速度的同时，用最少的代码实现尽可能多的功能。笔者
本着这个基本出发点编写了数据采集和处理程序.

　　数据记录环节的程序代码如下：

　　if etval<>0 then

　　Output 0，0