北交列控试验二报告

1、列车运行控制技术实验二报告CTCS-2级列控系统行车许可使用班级：自动化120姓名：学号：指导教师：袁磊2020年5月19日1实验目标：(1) 理解CTCS-2级列车运行控制系统地面设备工作原理。(2) 理解CTCS-2级列控系统车载设备使用MA的原理。(3) 掌握列控系统车载设备基本工作原理。(4) 初步具备解决列控系统实际工程问题的能力。1.1实验预期本次实验主要为编写程序完成正线接车、18号道岔以下侧线接车、18号道岔以上侧线接车以及侧线引导接车的功能。使用程序自带的距离-速度的运算公式从而得出相应的速度限制曲线。再比较实际速度与限制速度，从而得到是制动还是缓解。2.实验过程2.1 AT

2、Pprotectio n的流程图2.2 程序代码Dim p As IntegerPublic Function ATPProtection(Blocks() As Single, LineAllowSpeed() As Single, TrackSignal As String, CurrentSpeed As Single, CurrentPos As Single)Dim n As IntegerDim i As IntegerDim s As SingleDim TargetDist As SingleDim TargetSpeed As SingleIf TrackSignal = L

3、5 Thenn = 0s = CurrentPosWhile s 0s = s - Blocks(n) n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n + 6TargetDist = TargetDist + Blocks(i)NextTargetSpeed = 0ElseIf TrackSignal = L4 Thenn = 0s = CurrentPosWhile s 0s = s - Blocks(n)n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n + 5Targe

4、tDist = TargetDist + Blocks(i)NextTargetSpeed = 0ElseIf TrackSignal = L3 Thenn = 0 s = CurrentPosWhile s 0s = s - Blocks(n) n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n + 4TargetDist = TargetDist + Blocks(i) NextTargetSpeed = 0ElseIf TrackSignal = L2 Thenn = 0s = CurrentPosWhile s 0s = s -

5、 Blocks(n)n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n + 3TargetDist = TargetDist + Blocks(i) NextTargetSpeed = 0ElseIf TrackSignal = L Thenn = 0s = CurrentPosWhile s 0 s = s - Blocks(n) n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n + 2TargetDist = TargetDist + Blocks(i) NextTarge

6、tSpeed = 0ElseIf TrackSignal = LU Thenn = 0s = CurrentPosWhile s 0s = s - Blocks(n)n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n + 1TargetDist = TargetDist + Blocks(i) NextTargetSpeed = 0ElseIf TrackSignal = U Then n = 0 s = CurrentPosWhile s 0s = s - Blocks(n) n = n + 1WendTargetDist = 0 -

7、 CurrentPosFor i = 0 To nTargetDist = TargetDist + Blocks(i) NextTargetSpeed = 0ElseIf TrackSignal = U2 Then n = 0 s = CurrentPosWhile s 0s = s - Blocks(n) n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To nTargetDist = TargetDist + Blocks(i) NextTargetSpeed = 45ElseIf TrackSignal = U2S Then n =

8、0 s = CurrentPosWhile s 0s = s - Blocks(n) n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To nTargetDist = TargetDist + Blocks(i)NextTargetSpeed = 80ElseIf TrackSignal = UUS Thenn = 0s = CurrentPosWhile s 0s = s - Blocks(n)n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n - 1TargetDist = Tar

9、getDist + Blocks(i)NextTargetSpeed = 80ElseIf TrackSignal = UU Thenn = 0s = CurrentPosWhile s 0s = s - Blocks(n)n = n + 1WendTargetDist = 0 - CurrentPosFor i = 0 To n - 1TargetDist = TargetDist + Blocks(i)NextTargetSpeed = 45End IfIf TrackSignal = HB ThenSpeed_Limit_Curve = 40End IfIf TrackSignal =

10、HU ThenSpeed_Limit_Curve = 0End IfSpeed_Limit_Curve = ff.CalcLimit(TargetDist, TargetSpeed) If CurrentPos LineAllowSpeed(1, 0) ThenSpeed_Limit_Static = LineAllowSpeed(0, 1)ElseIf CurrentPos LineAllowSpeed(2, 0) ThenSpeed_Limit_Static = LineAllowSpeed(1, 1)ElseSpeed_Limit_Static = LineAllowSpeed(2, 1

11、)End IfIf Speed_Limit_Curve Speed_Limit_Static ThenTrai nAllowSpeed = Speed_Limit_CurveElseTrai nAllowSpeed = Speed_Limit_StaticEnd IfIf Curre ntSpeed Trai nAllowSpeed The nBrakeFlag = FalseElseBrakeFlag = TrueEnd Ifp = p + 1stude nt.Cells(p, 1) = Curre ntPos student.Cells(p, 2) = CurrentSpeed stude

12、nt.Cells(p, 3) = TrainAllowSpeed stude nt.Cells(p, 4) = TrackSig nal student.Cells(p, 5) = Speed_Limit_Static stude nt.Cells(p, 6) = Speed_Limit_Curve stude nt.Cells(p, 7) = BrakeFlagEnd FunctionL If I RHffj U JtHIMIV M tt H理3实验结果分析各项测试案例以及结果如下:测试案例测试程序的正线接车功能测试步骤1、2、3、4、设置初速度200km/h，加速运行； 选择正线接车进路类

13、型，直到列车停车； 观察所计算的允许速度曲线是否正确； 查看记录文件；测试结果列车在进站信号机前停车测试结果截图航* iE (HiirJJT in it韋 帕 国右f 4SVt*.mWiMUir测试案例测试程序的18号道岔以下侧线接车功能测试步骤1、设置初速度200km/h，加速运行；简 ka -inr nja2、选择18号码道岔以下侧线接车进路类型，直到列车停车;3、观察所计算的允许速度曲线是否正确；4、查看记录文件；测试结果列车进入18号以下道岔到侧线停车测试结果截图测试案例测试程序的18号道岔以上侧线接车功能测试步骤1、设置初速度200km/h，加速运行；2、选择18号码道岔以上侧线接车

14、进路类型，直到列车停车；3、观察所计算的允许速度曲线是否正确；4、查看记录文件；测试结果列车进入18号以上道岔到侧线停车测试结果截图 nA 1A- Hi -r ii erwit. 丫十心miriiiir工miFL-fr-O *鼻袒杠 m* It理：测试案例测试程序的侧线引导接车功能测试步骤1、设置初速度200km/h，加速运行；2、选择侧线引导接车进路类型，直到列车停车；3、观察所计算的允许速度曲线是否正确；4、查看记录文件；测试结果列车通过进站信号机引导入侧线接车 it * 旺测试结果截图C2i 4-许洞由上述结果可以看出，满足实验预期。实验过程中遇到了以下几个问题:问题现象描述问题原因解决

15、方法列车一开始运行即 出现减速现象由于在程序编写过程中将ff.CalcLimit函数写在了主程序的外面，导致列车已开始运 行即设定此区段末速度为零，故出现减速 现象。认真研究算法后，将ff.CalcLimit函数写入主程 序内。列车在不同区间中 运行时限制速度不 连续，存在跳变现象因为根据内置程序限制曲线的计算方式为 输入距离目标点的距离以及目标速度，得 到限制曲线。又因为根据程序所编，我们 是采用每经过一个应答器根据所读码序计 算出一个速度限制曲线，从而使得在相邻 的区间段的出口端速度与入口端速度不一 致。所以限制速度不连续，有跳变。适当减短轨道区间的长 度，从而使得相邻区段出 口端与入口端

16、速度接近 一致。但此现象影响不大 可忽略。无法连续记录数据变量p没有设为全局变量，导致程序每次 运行后会使其初值为零， 故数据叠加记录， 不能连续记录。将p设为全局变量。4实验总结在实验一的基础上， 对于列车限速曲线已经有了比较好的认识，所以在理解此题义时并没有很复杂，ATPprotection程序段的编写可以概括为：判断列车当前码序，使用程序自带的 距离-速度的运算公式从而得出相应的速度限制曲线。再比较实际速度与限制速度，从而得 到是制动还是缓解。所以说该程序编写起来比较明了，检查时也方便许多。一开始我们小组的程序在每个码序后都进行限速曲线计算以及与实际对比得到是否制动， 虽说可以得到较为正确的结果但是程序显得尤为冗长。所以，我们将各程序块的重复部分写入主if夕卜，使得判断完码序后再进行后续动作