窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 数组 | 备 注 |
ws客户Duan | WebSocket客户Duan | |
ws网址url = 编辑框2.内容
ws客户Duan.
初始化 (&ws客户Duan_收到消息, &ws客户Duan_连接成功, &WS客户Duan_连接失败, &WS客户Duan_断开连接
)编辑框1.
加入文本 (“连接初始化” +
#换行符 )ws客户Duan.
连接 (ws网址url, 假,
) |
ws客户Duan_收到消息 | | |
|
消息类型 | 整数型 | | | |
消息句柄 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
局_消息数据 | 文本型 | | |
局_数组 | 文本型 | | 0 |
编辑框1.
加入文本 (“收到消息” +
#换行符 ) 局_消息数据 =
字节集_到文本 (ws客户Duan.
取回消息数据 (消息句柄
))
局_消息数据 =
文本_取出中间文本 (局_消息数据,
“[[”,
“]”, ,
)输出调试文本 (局_消息数据
)局_数组 =
分割文本 (局_消息数据,
“,”,
)输出调试 (取数组成员数 (局_数组
))
如果真 (取数组成员数 (局_数组
) ≠ 0
)
局_消息数据 =
文本_取出中间文本 (局_数组
[5
],
“#引号”,
“#引号”)
输出调试 (局_数组
[5
])
标签1.标题 = 局_消息数据

当前值识别 =
到数值 (局_消息数据
)
调试输出 (“连接成功”) 编辑框1.
加入文本 (“连接成功” +
#换行符 ) ws客户Duan.
发送文本 (文本_替换 ( #常量2, , , ,
“产品名”,
“BTC-USDT”))
调试输出 (“连接失败”)编辑框1.
加入文本 (“连接失败” +
#换行符 )
窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 数组 | 备 注 |
ws客户Duan | WebSocket客户Duan | |
ws网址url = 编辑框2.内容
ws客户Duan.
初始化 (&ws客户Duan_收到消息, &ws客户Duan_连接成功, &WS客户Duan_连接失败, &WS客户Duan_断开连接
)编辑框1.
加入文本 (“连接初始化” +
#换行符 )ws客户Duan.
连接 (ws网址url, 假,
) |
ws客户Duan_收到消息 | | |
|
消息类型 | 整数型 | | | |
消息句柄 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
局_消息数据 | 文本型 | | |
局_数组 | 文本型 | | 0 |
编辑框1.
加入文本 (“收到消息” +
#换行符 ) 局_消息数据 =
字节集_到文本 (ws客户Duan.
取回消息数据 (消息句柄
))
局_消息数据 =
文本_取出中间文本 (局_消息数据, "
[[", "
]", ,
)输出调试文本 (局_消息数据
)局_数组 =
分割文本 (局_消息数据, ",",
)输出调试 (取数组成员数 (局_数组
))
如果真 (取数组成员数 (局_数组
) ≠ 0
)
局_消息数据 =
文本_取出中间文本 (局_数组
[5
], "
#引号" ;, "
#引号" ;
)
输出调试 (局_数组
[5
])
标签1.标题 = 局_消息数据

当前值识别 =
到数值 (局_消息数据
)
调试输出 (“连接成功”) 编辑框1.
加入文本 (“连接成功” +
#换行符 ) ws客户Duan.
发送文本 (文本_替换 ( #常量2, , , , "产品名", "BTC-USDT"
))
调试输出 (“连接失败”)编辑框1.
加入文本 (“连接失败” +
#换行符 )