spider tcl脚本编写

来源：互联网发布：两年java工程师简历编辑：程序博客网时间：2024/06/05 10:04

Logic MGCP_CALL { PCO_CALLER PCO_CALLEE } {

PCO_CALLER {

        #发起摘机信号
        SendNTFY { SET O L/HD }
        #接收响应.这里接收的响应消息名为200
        RecvNTFY200
        #接收拨号数图,这里可以添加对接收消息中各个节点值的校验
        RecvRQNT { CHK D == "(XXXXXXXX)" }
        #调用底层AW发送响应
        SendRQNT200
        #主叫拨号
        SendNTFY { SET O %PCO_CALLEE.TeleNumber% }
        RecvNTFY200
        RecvRQNT
        SendRQNT200
        #设置监控点
        SetEvent 01
        RecvCRCX { CHK M == "RECVONLY" }
        SendCRCX200 -SDP
        #主叫听回铃音
        RecvRQNT { CHK S == "G/RT" }
        SendRQNT200
        WaitEvent 02
        #主被叫建立通话
        RecvMDCX { CHK M == "SENDRECV" }
        SendMDCX200 -SDP
    }

PCO_CALLEE {

        #回应监控点
        WaitEvent 01
        RecvCRCX { CHK M == "INACTIVE" }
        SendCRCX200 -SDP
        #被叫振铃
        RecvRQNT { CHK S == "L/RG" }
        SendRQNT200
        #被叫摘机
        SendNTFY { SET O L/HD }
        RecvNTFY200
        SetEvent 02
        #主被叫建立通话
        RecvMDCX { CHK M == "SENDRECV" }
        SendMDCX200 -SDP

}