|  | 
 
 
 楼主|
发表于 2023-5-14 16:40:47
|
显示全部楼层
   北京市北京市 
  
|    | 窗口程序集名 | 保 留 | 保 留 | 备 注 |  | 窗口程序集_启动窗口 |  |  |  |  | 变量名 | 类 型 | 数组 | 备 注 |  | ws客户Duan | WebSocket客户Duan |  | 
 ws网址url = 编辑框2.内容 ws客户Duan.初始化 ( &ws客户Duan_收到消息, &ws客户Duan_连接成功, &WS客户Duan_连接失败, &WS客户Duan_断开连接) 编辑框1.加入文本 (“连接初始化”  + #换行符 ) data.创建 (“Origin”) data.置文本 (“Origin” , “http://www.okx.com”) ws客户Duan.置请求头 ( data) ws客户Duan.连接 ( ws网址url, 假, ) |
 | ws客户Duan_收到消息 |  |  |  |
 | 消息类型 | 整数型 |  |  |  |  消息句柄 | 整数型 |  |  |  | 
 | 变量名 | 类 型 | 静态 | 数组 | 备 注 |  | 局_消息数据 | 文本型 |  |  |  | 局_数组 | 文本型 |  | 0 | 
  编辑框1.加入文本 (“收到消息”  + #换行符 )  局_消息数据 = 字节集_到文本 ( ws客户Duan.取回消息数据 ( 消息句柄) ) 局_消息数据 = 文本_取出中间文本 ( 局_消息数据, “[[” , “]” , , )输出调试文本 ( 局_消息数据) 局_数组 = 分割文本 ( 局_消息数据, “,” , )输出调试 (取数组成员数 ( 局_数组) )  如果真 (取数组成员数 ( 局_数组)  ≠ 0)  局_消息数据 = 文本_取出中间文本 ( 局_数组 [ 5] , “#引号” , “#引号”)  输出调试 ( 局_数组 [ 5])  标签1.标题 = 局_消息数据  当前值识别 = 到数值 ( 局_消息数据)  调试输出 (“连接成功”)  编辑框1.加入文本 (“连接成功”  + #换行符 )  ws客户Duan.发送文本 (文本_替换 ( #常量2,  , , , “产品名” , “BTC-USDT”) )调试输出 (“连接失败”) 编辑框1.加入文本 (“连接失败”  + #换行符 )__启动窗口_创建完毕 ()
 | 
 |