课程名称：计算机联锁 设计题目：计算机联锁进路选排设计 院系：计算机与通信工程系 学号： 姓名： 指导教师： 西南交通大学峨眉校区 2012 年5 月 20 日 课 程 设 计 任 务书 专业姓名学号 开题日期： 2012 年 03 月 26 日完成日期： 2012 年 05 月 15 日 一、设计的目的 通过对课程设计任务的完成，进一步理解计算机联锁软件设计的理论内容，并且巩固 和深化所学课程的知识，同时培养综合运用所学课程知识，分析和解决实际问题的能力，逐 步树立正确的设计思想及严谨认真的科学态度。 二、设计的内容及要求 要求每位同学能够根据对计算机联锁的作业过程的认识，结合课程设计的内容，独立 完成该课程设计。 设计内容： 1) 计算机联锁数据库设计； 2) 计算机联锁进路处理程序的设计； 3) 系统软件平台的人机界面的设计。 三、指导教师评语 四、成绩 指导教师(签章) 年月日 题目：计算机联锁进路选排设计 一、联锁定义： 1、联锁：保证行车安全，信号、道岔与进路之间以技术手段保持的一定制约 关系和操作顺序。 2、计算机联锁定义： 计算机联锁系统是以计算机为主要技术手段，结合信息、控制、容错、故障 -安全等技术来实现车站联锁的信号系统。 3、计算机联锁系统完成功能： 任务调度与安全管理功能：任务调度、安全检查、安全控制 联锁运算功能：进路控制；信号控制；道岔控制 操作与显示功能：①信号设备操作与控制；②站场与信号设 备信息显示；③声音、图像报警；④操作提示；⑤时钟显示 等 诊断维护功能：①计算机联锁系统诊断与记录；②操作与表 示的记录；③历史回放 信号机 道岔道岔 进路 信息管理与传输功能：利用标准通信接口协议，可以直接与 其它系统实现信息交换 二、设计步骤 1、打开 VB 绘制举例站场的简化图。 2、设置一个始端按钮，一个终端按钮，和一个变通按钮。 编制程序用于开始和复 原。例如： 复原按钮程序： Private Sub Command3_Click() Shape1.FillColor = &HFF& Shape2.FillColor = &HFF0000 Shape3.FillColor = &HFF& Shape4.FillColor = &HFF0000 Shape5.FillColor = &HFF& Shape6.FillColor = &HFF0000 Shape7.FillColor = &HFF0000 Shape8.FillColor = &HFF0000 Shape9.FillColor = &HFF0000 Shape10.FillColor = &HFF0000 Shape11.FillColor = &HFF0000 Line1.BorderColor = &H80000008 Line2.BorderColor = &H80000008 Line3.BorderColor = &H80000008 Line4.BorderColor = &H80000008 Line5.BorderColor = &H80000008 Line6.BorderColor = &H80000008 Line7.BorderColor = &H80000008 Line8.BorderColor = &H80000008 Line9.BorderColor = &H80000008 Line10.BorderColor = &H80000008 Line11.BorderColor = &H80000008 Line12.BorderColor = &H80000008 Line13.BorderColor = &H80000008 Line14.BorderColor = &H80000008 Line15.BorderColor = &H80000008 Line16.BorderColor = &H80000008 Line17.BorderColor = &H80000008 Line18.BorderColor = &H80000008 Line19.BorderColor = &H80000008 Line20.BorderColor = &H80000008 Line21.BorderColor = &H80000008 Line22.BorderColor = &H80000008 Line23.BorderColor = &H80000008 Line24.BorderColor = &H80000008 Line25.BorderColor = &H80000008 开始按钮： (1)D1 到 D17 程序如下： If Text1.Text = "D1" And Text2.Text = "D17" Or Text1.Text = "D17" And Text2.Text = "D1" Then Shape9.FillColor = &HC0C0C0 Shape8.FillColor = &HC0C0C0 Line19.BorderColor = &HFF& Line26.BorderColor = &HFF& Line12.BorderColor = &HFF& Line13.BorderColor = &HFF& Line14.BorderColor = &HFF& Line15.BorderColor = &HFF& End If 程序运行结果如下： (2)D3 到 D17 程序如下： If Text1.Text = "D3" And Text2.Text = "D17" Or Text1.Text = "D17" And Text2.Text = "D3" Then Line10.BorderColor = &HFF& Shape6.FillColor = &HC0C0C0 Shape8.FillColor = &HC0C0C0 If Check1.Value = 1 Then Shape2.FillColor = &HC0C0C0 Line23.BorderColor = &HFF& Line24.BorderColor = &HFF& Line4.BorderColor = &HFF& Line15.BorderColor = &HFF& Line3.BorderColor = &HFF& Else Line11.BorderColor = &HFF& Line12.BorderColor = &HFF& Line13.BorderColor = &HFF& Line15.BorderColor = &HFF& Line14.BorderColor = &HFF& End If End If 基本进路 变通进路： (3)XD 到 D17 程序如下： If Text1.Text = "D17" And Text2.Text = "XD" Or Text1.Text = "XD" And Text2.Text = "D17" Then Shape8.FillColor = &HC0C0C0 Shape1.FillColor = &HC0C0C0 Line2.BorderColor = &HFF& Line3.BorderColor = &HFF& Line4.BorderColor = &HFF& Line15.BorderColor = &HFF& Line24.BorderColor = &HFF& End If 运行结果如下： (4)D1 到 SⅢ 程序如下： If Text1.Text = "D1" And Text2.Text = "SⅢ" Or Text1.Text = "SⅢ" And Text2.Text = "D1" Then Shape9.FillColor = &HC0C0C0 Shape3.FillColor = &HC0C0C0 Line19.BorderColor = &HFF& Line26.BorderColor = &HFF& Line12.BorderColor = &HFF& Line13.BorderColor = &HFF& Line25.BorderColor = &HFF& Line6.BorderColor = &HFF& End If 运行结果如下： 复原 (5)X 到 D17 程序如下： If Text1.Text = "D17" And Text2.Text = "X" Or Text1.Text = "X" And Text2.Text = "D17" Then Line10.BorderColor = &HFF& Line9.BorderColor = &HFF& Line15.BorderColor = &HFF& Shape8.FillColor = &HC0C0C0 Shape5.FillColor = &HC0C0C0 If Check1.Value = 1 Then Shape2.FillColor = &HC0C0C0 Line3.BorderColor = &HFF& Line23.BorderColor = &HFF& Line4.BorderColor = &HFF& Line24.BorderColor = &HFF& Else Line11.BorderColor = &HFF& Line12.BorderColor = &HFF& Line13.BorderColor = &HFF& Line14.BorderColor = &HFF& End If End If 运行结果如下： 基本进路 变通进路： 三、心得体会 这次课程设计使我大致了解了计算机联锁排列进路的操作方法。 除此之外，也进一步地了解了VB 软件的操作与使用。 VB 是一款相对简单 的编程语言，同时也是十分有用的。 同组的还有其他组的同学相互合作，从而一点点解决课程设计中遇到的问 题。在此谢谢老师教授我们的知识以及同学间的互帮互助。

展开阅读全文