工程学院课程设计报告

1、1. 1程序IH计新资料，WORD文档，可编辑修改】参照GB50343-2010建筑物电子信息系统防雷技术规范 相关公式内 容编写，主要用于建筑物电子信息系统雷电防护等级的计算。1.2程序运行环境本软件在Visual C+ 6.0 环境下运行1.3程序功能模块设计一、程序功能模块划分1.系统功能模块框图图1系统功能模块框图2. 各功能的具体实现内容菜单栏：(1) 文件：打开文件，浏览保存文本文档，方便查询历史信息；保存各项 参数及结果于文本文档；退出程序(2) 规范：提供与程序相关的规范，进行参考(3) 帮助：程序的使用方法；程序编程说明；关于主界面：(1) 参数输入：输入各项参数，并通过点击

2、相应运算按钮进行计算(2) 结果输出：输出防雷装置拦截效率(E),并显示雷电防护等级(3) 信息提示：若参数输入缺少或错误在提示框内显示提示信息(4) 重置：输入的各项参数全部清楚，恢复到默认状态二、功能实现流程图图2系统主功能实现流程图2.程序功能模块详细设计(源代码+程序说明)2.1客户端三、数据结构定义1. 结构体struct NOnedouble K;II校正系数Kint Td;II年平均雷暴日，根据当地气象台、站资料确定(d/a)double L;/建筑物的长Ldouble W;/建筑物的宽Wdouble H;/建筑物的高Hdouble Ng;/建筑物所处地区雷击大地的年平均密度 N

3、g（ 次/kmA2/a）double Ae; /与建筑物截收相同雷击次数的等效面积Ae（kmA2）double N1;/建筑物年预计雷击次数 N1（次/a）nOne;struct NTwodouble ds; / 埋地引人线线计算截收面积时的等效宽度。单位为m其数值等于土壤电阻率，最大值取500double L1;/低压架空电源电缆double L2;/高压架空电源电缆（至现场变电所）double L3;/低压埋地电源电缆double L4;/高压埋地电源电缆（至现场变电所）double L5;/架空信号线double L6;/埋地信号线double Ae1;/入户设施的有效截收面积Ae（km

4、A2）double N2;/人户设施年预计雷击次数N2（次/a）nTwo;double C1;/C1double C2;/C2double C3;/C3压能力因子double C4;/C4因子double C5;/C5double C6;/C6struct NC为信息系统所在建筑物材料结构因子 为信息系统重要程度因子 为电子信息系统设备耐冲击类型和抗冲击过电为电子信息系统设备所在雷电防护区（LPZ）的为电子信息系统发生雷击事故的后果因子 为区域雷暴等级因子double Nc; / 建筑物电子信息系统设备，因直击雷和雷电电磁脉冲损坏可接受的年平均最大雷击次数最大年平均雷击次数Nc（次/a） nC

5、e;struct LiPrdouble N;/建筑物及人户设施年预计雷击次数（N）double E;/防雷装置拦截效率lip；2. 字符量及全局变量#define PI 3.1415926TCHAR strTime256; /x 年 x 月 x 日 x:x:x3. 函数定义1）调用的系统内部的函数函数名功能说明ShellExecute运行一个外部程序GetDIgltemText获得与对话框中的控件相关的标题或文本SetDIgltemText设置对话框中控件的文本和标题GetOpe nFileName用户指定驱动器、目录和文件名、或用户打开文件GetSaveFileName以便用户指定驱动器、目

6、录和文件名MessageBox消息提示框spri ntf把格式化的数据写入某个字符串fope n用来打开一个文件fclose关闭文件fsca nf从文件格式化读内容fprintf向文件格式化写内容2）自定义的函数void Butto nN1(HWND hwn d); void Butt onN 2(HWND hwn d); void Butt onN c(HWND hwn d); void Butto nLP(HWND hwn d); void SetOptio n(HWND hwnd); void SetZero(HWND hwn d);IDC_OKN1运算按钮IDC_OKN2运算按钮IDC

7、_OKNc运算按钮/IDC_OKLP雷电防护等级按钮/设置下拉列表选项/置0,默认void OpenText(HWND hwnd);/ 打开void SaveText(HWND hwnd);/ 保存void SaveDate(HWND hwnd, TCHAR filenameMAX_PATH);/ 保存数据void CALLBACK MyTimerProc(HWND hwnd, UINT message, UINT iTimerID, DWORD dwTime);/ 日期时间显示BOOL IsDigit(TCHAR* str);/ 判断输入是否合法四、算法设计void Main_OnComma

8、nd(HWND hwnd, int id, HWND hwndCtl, UINTcodeNotify)*/ 打开/ 保存switch(id)/* 文case ID_MENUITEMOPEN:OpenText(hwnd);break; case ID_MENUITEMSAVE:if(nOne.N1=0 | nTwo.N2 = 0 | nCe.Nc=0 | lip.N= 0) MessageBox(hwnd, TEXT( 参数不完整 rn 请继续输入 rn 谢谢 合作), TEXT( 雷电风险评估 ), MB_OK|MB_ICONQUESTION); return;SaveText(hwnd);b

9、reak;case ID_MENUITEMCLOSE: / 退出if(IDYES=MessageBox(hwnd, TEXT( 确定退出？ ), TEXT( 雷电风 险评估), MB_YESNO|MB_ICONQUESTION)EndDialog(hwnd, 0); 帮 助 */ / 使用说明 软件使用说明 .doc, NULL ,/ 编程说明 软件编程说break;/*case ID_MENUITEMUSE:ShellExecute(NULL,openNULL ,SW_SHOWNORMAL);break;case ID_MENUITEMWRT:ShellExecute(NULL,open明.

10、doc,NULL,NULL,SW_SHOWNORMAL);/ 关于break;case ID_MENUITEMABOUT:HINSTANCE hInstance = (HINSTANCE)GetWindowLong(hwnd, GWL_HINSTANCE);DialogBoxParam(hInstance,MAKEINTRESOURCE(IDD_ABOUTDLG),hwnd, AboutDlg_Proc,0);规 范 * /break;/*/ 新规范/GB50343-2010case ID_GB34310:ShellExecute(NULL,open,LPstandardGB50343-201

11、0.pdf,NUL L,NULL,SW_SHOWNORMAL);break;case ID_GB5710:/GB50057-2010ShellExecute(NULL,open,LPstandardGB50057-2010.pdf,NUL L,NULL,SW_SHOWNORMAL);break;/ 旧规范case ID_GB34304:/GB50343-2004 建筑物电子信息系统防雷技术规 范ShellExecute(NULL,open,LPstandardGB50343-2004.pdf,NULL,NULL,SW_SHOWNORMAL);break;case ID_GB5794: /GB5

12、0057-94(2000) ShellExecute(NULL,open,LPstandardGB50057-94(2000).pdf,NU LL,NULL,SW_SHOWNORMAL);break;/*主界面*case IDC_RS: / 重置按钮if(IDYES=MessageBox(hwnd, TEXT( 确定重置？ ), TEXT( 雷电风 险评估), MB_YESNO|MB_ICONQUESTION)SetDlgItemText(hwnd, IDC_EDITFN, TEXT(t 欢迎您使用本程序);/N1 运算按钮SetZero(hwnd); break; case IDC_OKN1

13、:ButtonN1(hwnd);break;case IDC_OKN2: /N2 运算按钮 if(nOne.Ng)ButtonN2(hwnd);elseSetDlgltemText(hw nd,IDC_EDITFN, TEXT (请您输入 rnt 年平均雷暴日 Td(d/a)rn (根据当地气象台、站资料确定) );MessageBox(hwnd, TEXT(年平均雷暴日Td(d/a)rn 并点击【运 算(N1) ), TEXT(请输入),MB_OK|MB_ICONEXCLAMATION);break;case IDC_OKNc:/Nc 运算按钮ButtonNc(hwnd);break;cas

14、e IDC_OKLP:/ 雷电防护等级按钮if(nOne.N1 = 0 | nTwo.N2 = 0 | nCe.Nc = 0)MessageBox(hwnd, TEXT( 参数不完整 rn 请继续输入 rn 谢谢 合作), TEXT( 雷电风险评估 ), MB_OK|MB_ICONQUESTION);elseButtonLP(hwnd);break;default:break; 3. 程序功能演示和测试结果一、 软件打开页面二、主界面 要计算最终的雷电防护等级，主要分为三个部分的计算。1. 建筑物年预计雷击次数 N1 其中校正系数 k 可通过下拉按钮，选择恰当的数字。 在一般情况下取 1； 位

15、于河边、湖边、山坡下或山地中土壤电阻率较小处、地下水露头处、 土山顶部、山谷风口等处的建筑物，以及特别潮湿的建筑物取 1.5 ； 金属屋面没有接地的砖木结构建筑物取 1.7 ;位于山顶上或旷野的孤立建筑物取 2。其他部分则通过键盘输入检测得到的正确数据，通过软件进行计算分 析。另，若需采用Ng = 0.024 * TdA1.3(GB50057-94(2000)建筑物防雷设计规范)请勾选 r2. 入户设施年预计雷击次数 N2输入取值范围：ds埋地引入线缆计算截面积时的等效宽度单位为m其数值等于土壤电阻率的值，最大值取500。L是线路从所考虑建筑物至网络的第一个分支点或相邻建筑物的长度 单位为m 最大值为1000m当l未知时，应采用l=iooo3. 可接受年平均最大雷击次数 Nc可接受年平均蠱大雷击StSNc材料结