附录一 程序
新版GSP附录 (1)
附录1药品经营企业计算机系统第一条企业应当建立与经营范围和经营规模相适应的计算机系统（以下简称系统），能够实时控制并记录药品经营各环节和质量管理全过程，并符合电子监管的实施条件。
第二条企业应当按照《药品经营质量管理规范》（以下简称《规范》）相关规定，在系统中设置各经营流程及环节的质量控制功能，与采购、销售以及收货、验收、储存、运输等管理系统形成内嵌式结构，对各项经营活动进行判断，对不符合药品监督管理法律法规以及《规范》的行为进行自动识别及控制，确保各项质量控制功能的实时和有效。
第三条系统的硬件设施和网络环境应当符合以下要求：（一）有支持系统正常运行的服务器；（二）药品采购、收货、验收、储存、养护、出库复核、销售以及质量管理等岗位应当配备专用的终端设备；（三）有稳定、安全的网络环境，有固定接入互联网的方式和可靠的信息安全平台；（四）批发企业有实现相关部门之间、岗位之间信息传输和数据共享的局域网；（五）有符合《规范》及企业管理实际需要的应用软件和相关数据库。
第四条批发企业负责信息管理的部门或人员应当履行以下职责：（一）负责系统硬件和软件的安装、测试及网络维护；（二）负责系统数据库管理和数据备份；（三）负责培训、指导相关岗位人员使用系统；（四）负责系统程序的运行及维护管理；（五）负责系统网络以及数据的安全管理；（六）保证系统日志的完整性；（七）负责建立系统硬件和软件管理档案。
第五条企业质量管理部门或质量管理人员应当履行以下职责：（一）负责指导设定系统质量控制功能；（二）负责系统操作权限的审核，并定期跟踪检查；（三）监督各岗位人员严格按规定流程及要求操作系统；（四）负责质量管理基础数据的审核、确认生效及锁定；（五）负责经营业务数据修改申请的审核，符合规定要求的方可按程序修改；（六）负责处理系统中涉及药品质量的有关问题。
第六条企业应当严格按照管理制度和操作规程进行系统数据的录入、修改和保存，以保证各类记录的原始、真实、准确、安全和可追溯。
教材里面的附录 一维黎曼问题的求解编程代码 - 副本
E[2]=(U[2]+p)*u; } /*------------------------------------------------------一维 MacCormack 差分格式求解器 入口: U， 上一时刻的 U 矢量，Uf、Ef，临时变量， dx，网格宽度，dt, 时间步长； 出口: U， 计算得到的当前时刻 U 矢量。 ---------------------------------------------------------*/ void MacCormack_1DSolver(double U[J+2][3],double Uf[J+2][3],double Ef[J+2][3],double dx,double dt) { int i,k; double r,nu,q; r=dt/dx; nu=0.25; for(i=1;i<=J;i++) { q=fabs(fabs(U[i+1][0]-U[i][0])-fabs(U[i][0]-U[i-1][0])) /(fabs(U[i+1][0]-U[i][0])+fabs(U[i][0]-U[i-1][0])+1e-100); //开关函数 for(k=0;k<3;k++) Ef[i][k]=U[i][k]+0.5*nu*q*(U[i+1][k]-2*U[i][k]+U[i-1][k]);//人工黏性项 } for(k=0;k<3;k++) for(i=1;i<=J;i++)U[i][k]=Ef[i][k]; for(i=0;i<=J+1;i++)U2E(U[i],Ef[i]); for(i=0;i<=J;i++) for(k=0;k<3;k++) Uf[i][k]=U[i][k]-r*(Ef[i+1][k]-Ef[i][k]); //U(n+1/2)(i+1/2) for(i=0;i<=J;i++)U2E(Uf[i],Ef[i]); //E(n+1/2)(i+1/2) for(i=1;i<=J;i++) for(k=0;k<3;k++) U[i][k]=0.5*(U[i][k]+Uf[i][k])-0.5*r*(Ef[i][k]-Ef[i-1][k]); //U(n+1)(i) } /*------------------------------------------------------输出结果, 用 Origin 数据格式画图
附录一：指令系统
CPM1A指令系统一、概述1、指令的种类2、指令对标志位的影响3、指令的格式、操作数及标志4、指令的两种形式二、基本指令1、LD和LD NOT 指令2、OUT和OUT NOT指令3、AND和AND NOT指令4、OR和OR NOT指令5、AND LD和OR LD指令6、SET和RESET指令7、编程规则8、TIM指令9、计数器CNT指令三、应用指令1、保持指令、微分指令、空操作和结束指令1.1 KEEP指令1.2 DIFU(13)和DIFD(14)指令1.3 NOP(00)指令1.4 END(01)指令2、顺序控制和暂存指令2.1 IL和ILC指令2.2 TR指令2.3 JMP和JME3、定时器和计数器应用指令3.1 TIMH指令3.2 CNTR指令3.3定时器和计数器的扩展4、数据比较类应用指令4.1 CMP和CMPL指令4.2 BCMP指令4.3 TCMP指令4.4 ZCP和ZCPL指令5、数据转换类应用指令5.1 BIN和BCD指令5.2 MLPX和DMPX指令5.3 ASC和SDEC指令5.4 HEX指令5.5 SCL、SCL2和SCL3指令5.6 BINL和BCDL指令5.7 SEC和HMS指令5.8 NEG指令6、数据移位类应用指令6.1 SFT指令6.2 SFTR指令6.3 WSFT指令6.4 ASL和ASR指令6.5 ROL和ROR指令6.6 SLD和SRD指令6.7 ASFT指令7、数据传送类应用指令7.1 MOV和MVN指令7.2 XFER指令7.3 BSET指令7.4 XCHG指令7.5 DIST指令7.6 COLL指令7.7 MOVB和MOVD指令8、数据运算类应用指令8.1 STC和CLC指令8.2 ADD和SUB指令8.3 ADDL和SUBL指令8.4 MUL和DIV指令8.5 MULL和DIVL指令8.6 INC和DEC指令8.7 ADB、SBB、MLB和DVB指令8.8 COM、ANDW、ORW、XORW和XNRW指令9、子程序和中断控制类应用指令9.1 SBS、SBN和RET指令9.2 MCRO指令9.3 INT指令9.4 STIM指令10、高速计数a器应用指令1．CPM2A高速计数器的几种输入模式(CPM1A只有前两种)2. 高速计数器的几种复位方式3. 高速计数器的两种中断功能10.1 CTBL指令10.2 INI指令10.3 PRV指令11、其他特殊应用指令11.1 FAL和FALS指令11.2 MAG指令11.3 IORF指令11.4 BCNT指令11.5 PULS指令11.6 SPED指令11.7 STEP和SNXT指令11.8 PID指令11.9 SRCH指令11.10 SYNC指令11.11 PWM指令11.12 ACC指令11.13 FCS指令12、特殊运算指令12.1 MAX和MIN指令12.2 AVG指令12.3 SUM指令13、通信指令13.1 RXD和TXD指令13.2 STUP指令一、概述CPM1A共有：基本指令14条，应用指令79条（有功能号）。
2023年欧盟附录1：无菌药品生产之CCS启动计划和CCS差距分析
2
计划时间xxxx-xxxx
CCS报告
3 计划时间xxxx-xxxx
• 1、CCS流程及工作计划及工作安排
序号 1 2 3 4
要素
厂房 设备 公用系统 人员
5
生产和具体技术
章节
第4章 第5章 第6章 第7章
负责人
第8章
QA支持
条款
备注
6
洁净室环境和工艺 监测
第9章
7
质量控制要素
第10章
• 2、CCS差距分析范围
量标准相关的参数和属性，及相关的监控的方法及频次
热原:可以引起患者身体发热反应的物质。 内毒素:革兰氏阴性细菌细胞壁中存在的致热产物（即脂多糖）。内毒 素能导 致接受注射的患者发热至死亡的反应。
微生物:一切肉眼看看不到或看不清楚,需要借助显微镜观察到的微小生 物。 微生物影响两方面: (1)对产品质量影响:药物性状改变,产生有害物质,产品成分改变。 (2)对人体危害:中毒、过敏反应、药源性感染,由于污染产品引起的感染。
10.1-10.11
2、CCS差距分析
目录
1 CCS流程及工作计划介绍
2 CCS差距分析范围 ➢ 工艺流程
➢ 工艺信息收集
3 CCS差距分析考量点
4
CCS差距分析举例
5 CCS差距分析后处理
• 1、CCS流程及工作计划及工作安排
CCS要素识别
1 计划时间xxxx-xxxx
CCS要素差距分析
CCS
• 2 、CCS工作流程
CCS
CCS要素识别
1
参考的文件: ➢ 欧盟GMP附录一：无菌药品生产为指导; ➢ CCS管理规程、 CCS要素识别表
CCS要素差距分析
附录_潮流计算程序
附录牛顿-拉夫逊法潮流计算程序本附录所介绍的牛顿-拉夫逊法潮流计算程序采用极坐标形式，其中所涉及的计算公式与第四章中的式(4-42)-(4-59)完全相同，计算程序框图与图4-6基本一致。
程序采用C语言编制。
为了便于初学者阅读，节点导纳矩阵和雅可比矩阵都用满阵存储而未采用稀疏技巧；但为了适当照顾使用的方便性，在输入数据中对节点编号次序不作任何要求。
下面先介绍输入文件的格式和要求，然后列出程序，最后说明潮流结果的输出。
建议读者先从原始数据的输入中了解和熟悉它们在程序中对应的变量、结构体数组及其成员的名称，然后对照图4-6和式(4-42)-(4-59)仔细和耐心地阅读程序，最好能在计算机上亲自实现和进行调试。
在调试时，可以用下面给出的对应于[例4-3]系统的输入数据，以及程序运行中得出的中间结果，逐步与[例4-3]中所给出的中间结果进行对比，从而查找错误所在并进行改正。
一、原始数据的输入程序通过“输入数据.txt”文件输入以下5个数据段。
1.信息(共6个)(1)总节点数(变量num_node)(2)线路和并联电容器总数(变量num_line)(3)变压器支路总数(变量num_tran)(4)发电机节点总数(变量num_gene)(5)负荷节点总数(变量num_load)(6)节点功率不平衡量的容许误差(变量error)2.线路和并联电容器数据(结构体数组line)：每一线路或并联电容器包括5个数据I侧节点编号和J侧节点编号可以对换；线路和并联电容器之间的次序可以任意，而且允许多条线路或多个电容器并联。
3.变压器支路数据(结构体数组tran)：每一变压器支路包括5个数据变压器电阻、电抗和非标准变比与两侧节点编号之间的关系服从图2-29,即电阻和电抗在1侧而非标准变比在2侧；三绕组变压器需按图2-26化成3个变压器支路，其中3侧变压器支路的非标准变比为1。
变压器支路之间的次序可以任意。
4.发电机节点数据(结构体数组gene)：每一发电机节点包括5个数据对于PQ节点，节点种类为1，电压可给任意值；对于PV节点，节点种类为-1，发出无功功率可给任意值；对于平衡节点，节点种类为0，发出有功功率和发出无功功率都可给任意值。
毕业论文-虚拟单片机实验系统的开发-(附录-程序)【范本模板】
毕业设计学生姓名： XXXX 学号： 09XXXXXXXXX 专业：电子科学与技术题目：虚拟单片机实验系统的开发指导教师：王保柱（副教授) 张秀清（讲师）评阅教师：武瑞红（副教授）2013 年 6 月河北科技大学毕业设计成绩评定表毕业设计中文摘要毕业设计外文摘要目录1 绪论 (1)1。
1课题背景分析 (1)1.2课题概况及发展趋势 (2)1。
3课题的目的和意义 (2)2 系统设计 (3)2.1电路整体设计 (3)2.2课题解决的问题 (3)2。
3课题研究的方法 (4)2。
4电路仿真部分 (6)3 硬件电路设计 (7)3。
1整体框图设计 (7)3.2主芯片—AT89C52 (8)3.3LED显示模块 (14)3。
4LCD显示模块 (16)3。
5数码管显示 (17)3。
6键盘显示 (19)3.7A/D转换模块 (22)3.8D/A转换模块 (24)3。
9温度传感器模块 (25)3.10蜂鸣器模块 (26)4 软件联调配置 (28)4.1软件语言的选择 (28)4.2软件运行环境 (28)4。
3 PROTEUS和KEIL的配置 (28)5 电路的仿真与测试 (32)5。
1LED流水灯 (32)5.2LCD字符显示 (33)5。
3数码管动态扫描 (34)5。
4键盘测试 (35)5.5A/D转换实验 (36)5.6D/A转换实验 (37)5。
7计时器 (38)5.81602液晶显示时钟 (38)5。
9DS18B20温度按传感器 (39)5.10交通灯设计 (39)5。
11整体电路测试 (40)结论 (44)致谢 (45)参考文献 (46)附录 (48)1。
绪论1.1课题的背景分析针对传统的单片机，需采购大量的、比较贵的的硬件设备，而且设备维护和工作量也非常大，传统的单片机实验采用硬件仿真器，实验箱或实验板,由于单片机应用技术涉及的范围比较广,它涉及到到计算机、须硬件和软件结合才能实现，也就是将外围电路和单片机程序相结合，如果用真实的实验箱则费会用高，器材又不能地发挥充分利用,加上所用实验板开发周期比较长，可行性不好.现在使用Proteus仿真软件，实现了纯软件的虚拟单片机实验系统,既可调试单片机程序，也可以仿真单片机的外围器件的工作情况；既能充分利用计算机等硬件资源，减少硬件设备的维护工作量,还可提供丰富的实验内容。
附录1 清华山维数字测图软件简介
出版社
理工分社
连接点输入编辑框：可以在下一点测量之前用 鼠标左键在绘图区捕捉连接点，测量之后，此点自 动与捕捉的连接点连线。也可以在测点没回车之前 ，将鼠标左键移至要连接点，按“F3”键，右键确认 ；不需要连线时按“F6”键，清空连接。 编码输入编辑框：编码的获取有几种方法。在 其下拉列表框中记录了最近用过的10个编码可供选 择；如果周围有该编码的地物，鼠标移至该地物， 用T键拾取编码。还有一个获得编码的方法就是打开 工具条上的编码工具，在那里去点击也很方便；细 部点数据采集进来之后，画成什么符号，决定于输 入的编码。
20
大气监测控制原理
出版社
理工分社
在极坐标测量(或坐标输入)下连线的使用： ①如果测完几个点后需要连线时，在鼠标单击连 线编辑框后，就可以自由连线了； ②除了以上获取编码的方式外，此时还可以在附 近同类地物上用鼠标左键单击，也可以拾取与该地物 相同的地物编码。 7）坐标输入 菜单启动：选择菜单“测图\坐标输入”； 命令行启动：XYZ； 快捷键：0。 功能启动后，将出现如附图112所示对话框。 功能描述：已知坐标点的输入。界面的操作方法 与极坐标测量类似。输入一已知坐标及其编码，即可 画一个地物，如路灯。
大气监测控制原理
出版社
理工分社
附图1-10
“测站检核”对话框
附图1-11“极坐标测量”对话
18
框
大气监测控制原理
出版社
理工分社
6）极坐标测量 菜单启动：选择菜单“测图\极坐标测量”； 命令行启动：JZB； 快捷键：0。 功能启动后将出现如附图111所示对话框。 功能描述：主要完成碎部点的采集、连线等工作。
16
大气监测控制原理
出版社
理工分社
西门子高级编程全集14_附录1 使用文本编辑器创建程序
日期: 文件:
2012-1-10 PRO2_14E.5
SITRAIN
自动化与驱动培训教材
使用文本编辑器创建程序
SIMATIC S7
Siemens AG 2001。保留所有权利。
日期: 文件:
2012-1-10 PRO2_14E.6
SITRAIN
自动化与驱动培训教材
插入块模板、 插入块模板、块和源文件
Station_1
FB10
... stat stat stat stat ... Station_1 Station_2 Station_3 Transport FB1 FB1 FB1 FB2
Station_2 Station_3
DB10
Data for Station_1
OB1
CALL Station_1 CALL Station_2 CALL Station_3 . . CALL Transport
调用
调用 FB3 FB3的背景DB 调用 FC5 OB1
分配
SIMATIC S7
Siemens AG 2001。保留所有权利。
日期: 文件:
2012-1-10 PRO2_14E.8
SITRAIN
自动化与驱动培训教材
逻辑块语法
组态
块开头是块说明 (绝对或符号) 块标题 (可选) 块注释 (可选) 块的系统属性(可选) 块属性(可选)
自动化与驱动培训教材
习题解答A1.1：计数已完成的零件 ： 习题解答 (FB1, 第1部分 部分) 部分
SIMATIC S7
Siemens AG 2001。保留所有权利。
日期: 文件:
2012-1-10 PRO2_14E.15
附录 程序代码
附录程序代码#include <reg52.h> //调用单片机头文件#define uchar unsigned char //无符号字符型宏定义变量范围0~255#define uint unsigned int //无符号整型宏定义变量范围0~65535#include "eeprom52.h"//数码管段选定义 0 1 2 3 4 5 6 7 8 9uchar code smg_du[]={0x28,0xee,0x32,0xa2,0xe4,0xa1,0x21,0xea,0x20,0xa0,0x60,0x25,0x39,0x26,0x31,0x71,0xff}; //断码//数码管位选定义uchar code smg_we[]={0xef,0xdf,0xbf,0x7f};uchar dis_smg[8] = {0x28,0xee,0x32,0xa2,0xe4,0x92,0x82,0xf8};uchar smg_i = 3; //显示数码管的个位数sbit dq = P2^4; //18b20 IO口的定义bit flag_lj_en; //按键连加使能bit flag_lj_3_en; //按键连3次连加后使能加的数就越大了uchar key_time,key_value; //用做连加的中间变量bit key_500ms ;sbit beep = P2^3; //声光报警接口uchar f_pwm_l ; //越小越慢uint temperature ; //bit flag_300ms ;uchar menu_1; //菜单设计的变量uint t_high = 300,t_low = 100; //温度上下限报警值uint number;/***********************1ms延时函数*****************************/void delay_1ms(uint q){uint i,j;for(i=0;i<q;i++)for(j=0;j<120;j++);}/***********************小延时函数*****************************/void delay_uint(uint q){while(q--);}/***********************数码显示函数*****************************/void display(){static uchar i;i++;if(i >= smg_i)i = 0;P1 = 0xff; //消隐P3 = smg_we[i]; //位选P1 = dis_smg[i]; //段选}/******************把数据保存到单片机内部eepom中******************/void write_eeprom(){SectorErase(0x2000);byte_write(0x2000, t_high % 256);byte_write(0x2001, t_high / 256);byte_write(0x2002, t_low % 256);byte_write(0x2003, t_low / 256);byte_write(0x2055, a_a);}/******************把数据从单片机内部eepom中读出来*****************/void read_eeprom(){t_high = byte_read(0x2001);t_high <<= 8;t_high |= byte_read(0x2000);t_low = byte_read(0x2003);t_low <<= 8;t_low |= byte_read(0x2002);a_a = byte_read(0x2055);}/**************开机初始化保存的数据*****************/void init_eeprom(){read_eeprom(); //先读if(a_a != 22) //新的单片机初始单片机内问eeprom{t_high = 250;t_low = 200;a_a = 22;write_eeprom(); //保存数据}}/***********************18b20初始化函数*****************************/ void init_18b20(){bit q;dq = 1; //把总线拿高delay_uint(1); //15usdq = 0; //给复位脉冲delay_uint(80); //750usdq = 1; //把总线拿高等待delay_uint(10); //110usq = dq; //读取18b20初始化信号delay_uint(20); //200usdq = 1; //把总线拿高释放总线}/*************写18b20内的数据***************/void write_18b20(uchar dat){uchar i;for(i=0;i<8;i++){ //写数据是低位开始dq = 0; //把总线拿低写时间隙开始dq = dat & 0x01; //向18b20总线写数据了delay_uint(5); // 60usdq = 1; //释放总线dat >>= 1;}}/*************读取18b20内的数据***************/uchar read_18b20(){uchar i,value;for(i=0;i<8;i++){dq = 0; //把总线拿低读时间隙开始value >>= 1; //读数据是低位开始dq = 1; //释放总线if(dq == 1) //开始读写数据value |= 0x80;delay_uint(5); //60us 读一个时间隙最少要保持60us的时间}return value; //返回数据}/*************读取温度的值读出来的是小数***************/uint read_temp(){uint value;uchar low; //在读取温度的时候如果中断的太频繁了，就应该把中断给关了，否则会影响到18b20的时序init_18b20(); //初始化18b20EA = 0;write_18b20(0xcc); //跳过64位ROMwrite_18b20(0x44); //启动一次温度转换命令EA = 1;delay_uint(50); //500usinit_18b20(); //初始化18b20EA = 0;write_18b20(0xcc); //跳过64位ROMwrite_18b20(0xbe); //发出读取暂存器命令low = read_18b20(); //读温度低字节value = read_18b20(); //读温度高字节EA = 1;value <<= 8; //把温度的高位左移8位value |= low; //把读出的温度低位放到value的低八位中value *= 0.625; //转换到温度值小数return value; //返回读出的温度带小数}/*************定时器0初始化程序***************/void time_init(){EA = 1; //开总中断TMOD = 0X11; //定时器0、定时器1工作方式1ET0 = 1; //开定时器0中断TR0 = 1; //允许定时器0定时ET1 = 1; //开定时器0中断TR1 = 0; //允许定时器0定时}/********************独立按键程序*****************/uchar key_can; //按键值void key() //独立按键程序{static uchar key_new;key_can = 20; //按键值还原P2 |= 0x07;if((P2 & 0x07) != 0x07) //按键按下{if(key_500ms == 1) //连加{key_500ms = 0;key_new = 1;}delay_1ms(1); //按键消抖动if(((P2 & 0x07) != 0x07) && (key_new == 1)){ //确认是按键按下key_new = 0;switch(P2 & 0x07){case 0x06: key_can = 3; break; //得到k2键值case 0x05: key_can = 2; break; //得到k3键值case 0x03: key_can = 1; break; //得到k4键值}flag_lj_en = 1; //连加使能}}else{if(key_new == 0){key_new = 1;write_eeprom(); //保存数据flag_lj_en = 0; //关闭连加使能flag_lj_3_en = 0; //关闭3秒后使能key_value = 0; //清零key_time = 0;key_500ms = 0;}}}/****************按键处理数码管显示函数***************/void key_with(){if(key_can == 1) //设置键{f_pwm_l = 30;menu_1 ++;if(menu_1 >= 3){menu_1 = 0;smg_i = 3; //数码管显示3位}}if(menu_1 == 1) //设置高温报警{smg_i = 4; //数码管显示4位if(key_can == 2){if(flag_lj_3_en == 0)t_high ++ ; //按键按下未松开自动加三次elset_high += 10; //按键按下未松开自动加三次之后每次自动加10if(t_high > 990)t_high = 990;}if(key_can == 3){if(flag_lj_3_en == 0)t_high -- ; //按键按下未松开自动减三次elset_high -= 10; //按键按下未松开自动减三次之后每次自动减10if(t_high <= t_low)t_high = t_low + 1;}dis_smg[0] = smg_du[t_high % 10]; //取小数显示dis_smg[1] = smg_du[t_high / 10 % 10] & 0xdf; //取个位显示dis_smg[2] = smg_du[t_high / 100 % 10] ; //取十位显示dis_smg[3] = 0x64; //H}if(menu_1 == 2) //设置低温报警{smg_i = 4; //数码管显示4位if(key_can == 2){if(flag_lj_3_en == 0)t_low ++ ; //按键按下未松开自动加三次elset_low += 10; //按键按下未松开自动加三次之后每次自动加10if(t_low >= t_high)t_low = t_high - 1;}if(key_can == 3){if(flag_lj_3_en == 0)t_low -- ; //按键按下未松开自动减三次elset_low -= 10; //按键按下未松开自动加三次之后每次自动加10if(t_low <= 10)t_low = 10;}dis_smg[0] = smg_du[t_low % 10]; //取小数显示dis_smg[1] = smg_du[t_low / 10 % 10] & 0xdf; //取个位显示dis_smg[2] = smg_du[t_low / 100 % 10] ; //取十位显示dis_smg[3] = 0x3D; //L}}/****************报警控制函数***************/void baojing_kz(){if(temperature<t_high && temperature>t_low){TR1 = 0;beep = 1;}else{TR1 = 1;if(number >= 1000){number = 0;beep = ~beep;}}}/****************主函数***************/void main(){P0 = P1 = P2 = P3 = 0xff;time_init(); //初始化定时器temperature = read_temp(); //先读出温度的值init_eeprom(); //开始初始化保存的数据delay_1ms(650);temperature = read_temp(); //先读出温度的值dis_smg[0] = smg_du[temperature % 10]; //取温度的小数显示dis_smg[1] = smg_du[temperature / 10 % 10] & 0xdf; //取温度的个位显示dis_smg[2] = smg_du[temperature / 100 % 10] ; //取温度的十位显示f_pwm_l = 50;while(1){key(); //按键程序if(key_can < 10){key_with(); //设置报警温度}if(flag_300ms == 1) //300ms 处理一次温度程序{flag_300ms = 0;temperature = read_temp(); //先读出温度的值if(menu_1 == 0){smg_i = 3;dis_smg[0] = smg_du[temperature % 10]; //取温度的小数显示dis_smg[1] = smg_du[temperature / 10 % 10] & 0xdf; //取温度的个位显示dis_smg[2] = smg_du[temperature / 100 % 10] ; //取温度的十位显示}}baojing_kz(); //报警控制函数}}/*************定时器0中断服务程序***************/void time0_int() interrupt 1{static uchar value; //定时2ms中断一次TH0 = 0xf8;TL0 = 0x30; //2msdisplay(); //数码管显示函数value++;if(value >= 150){value = 0;flag_300ms = 1;}if(flag_lj_en == 1) //按下按键使能{key_time ++;if(key_time >= 250) //500ms{key_time = 0;key_500ms = 1; //500mskey_value ++;if(key_value > 3){key_value = 10;flag_lj_3_en = 1; //3次后1.5秒连加大些}}}}/*******************定时器1用做单片机模拟PWM 调节***********************/ void Timer1() interrupt 3 //调用定时器1{TH1=0xfe; // 定时10ms中断一次TL1=0x0c; //500usnumber++;}。
附录1-2 EpiData简介
2. EpiData简介EpiData 是一个免费的数据录入和数据管理软件，全称为Epidata Entry。
由丹麦学者Lauritsen JM等人1999年发起, Bruus M编写程序而完成。
目前为最新版本为 3.１版（27jan2008）,有多种语言版本，包括中文，可在http://www.epidata.dk/下载。
它主要用于数据录入、数据核对、数据管理和数据报告。
该软件的功能建立数字化的调查表格，使收集的资料信息录入计算机更加准确和高效，可在数据录入过程中对数据中的错误进行核对，而且可以在数据录入后对数据进行核对。
EpiData 的安装、运行不受计算机设置的影响，也不会在系统文件夹中安装或替代任何DLL 文件。
使用者可以通过setup.exe 在计算机中安装，目前只有基于微软windows系统的安装版。
理论上，该程序对录入的记录数没有限制，但一般记录数限制20万条左右，整个录入界面不能超过999行。
Epidata工作流程的完整步骤为：建立调查表文件→生成数据库（rec文件）→建立核查文件→数据录入→数据处理→数据导出，见图1。
简要步骤为：建立调查表文件→生成数据库（rec文件）→数据录入→数据导出。
图1 Epidata工作界面一、Epidata工作流程1. 建立调查表文件建立调查表文件是建立数据库、实现数据录入和管理的第一步，即QES文件的编写。
可以点击菜单中的文件→生成调查表文件，或者在工作流程栏上点击，这时窗口中会自动显示一个空白的文档，在这里键入调查表，即数据录入表格的框架。
编辑完成后，将此调查表文件保存，文件的扩展名统一为.QES。
EpiData 中允许的变量类型主要有以下几类：•字符型：用下划线表示。
•数字型：用#号表示，#，##.#表示•逻辑型：用Y或N,<Y>、<N>表示•日期型： <yyyy/mm/dd>、<mm/dd/yyyy>或<dd/mm/yyyy>形式表示据变量类型进行编辑；也可用shift+相应键键入相应的符号。