字节集转IP（例如193.168.11.23类型的）源码，字节集转整数源码

15910791922

字节集转IP（例如193.168.11.23类型的）源码，字节集转整数源码

冯古屋

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
字节集	字节集
客户名	文本型

字节集 ＝ 客户名到字节集 (“127.0.0.1:8080”)
客户名 ＝ 字节集到客户名 (字节集)
调试输出 (字节集, 客户名)

子程序名	返回值类型	公开	备 注
客户名到字节集	字节集		将客户名 IP+端口，转换为固定6字节的字节集以节约内存空间，失败返回空字节集。
参数名	类 型	参考	可空	数组	备 注
客户名	文本型				文本由 服务器.取回客户() 获取，例如:127.0.0.1:8080

变量名	类 型	静态	数组	备 注
分割文本	文本型		0
返回值	字节集
客户Duan口	整数型
端口高字节	字节型
端口低字节	字节型
计数	整数型

分割文本 ＝ 分割文本 (客户名, “:”, )
如果真 (取数组成员数 (分割文本) ≠ 2)
返回 ({  })
客户Duan口 ＝ 到整数 (分割文本 [2])
如果真 (是否为长整数 (分割文本 [2]) ＝ 假 或 客户Duan口 ＜ 0 或 客户Duan口 ＞ 65535)
返回 ({  })
分割文本 ＝ 分割文本 (分割文本 [1], “.”, )
如果真 (取数组成员数 (分割文本) ≠ 4)
返回 ({  })
返回值 ＝ {  }
计次循环首 (4, 计数)
返回值 ＝ 返回值 ＋ 到字节集 (到字节 (分割文本 [计数]))
如果真 (到整数 (分割文本 [计数]) ＜ 0 或 到整数 (分割文本 [计数]) ＞ 255 或 是否为长整数 (分割文本 [计数]) ＝ 假)
返回 ({  })

计次循环尾 ()
返回 (返回值 ＋ 取字节集左边 (到字节集 (客户Duan口), 2))

子程序名	返回值类型	公开	备 注
字节集到客户名	文本型		将字节集数据还原为客户名 IP+端口，失败返回空文本。
参数名	类 型	参考	可空	数组	备 注
字节集	字节集				由 客户名到字节集() 生成的6字节的字节集数据

变量名	类 型	静态	数组	备 注
计数	整数型
返回值	文本型

如果真 (取字节集长度 (字节集) ≠ 6)
返回 (“”)
计次循环首 (4, 计数)
如果 (计数 ＝ 4)
返回值 ＝ 返回值 ＋ 到文本 (字节集 [计数]) ＋ “:”
返回值 ＝ 返回值 ＋ 到文本 (字节集 [计数]) ＋ “.”

计次循环尾 ()
返回 (返回值 ＋ 到文本 (字节集 [6] × 256 ＋ 字节集 [5]))

子程序名	返回值类型	公开	备 注
是否为长整数	逻辑型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

返回 (到文本 (到长整数 (文本)) ＝ 文本)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 字节集, 字节集<br /> .局部变量 客户名, 文本型<br /> <br /> <br /> 字节集 ＝ 客户名到字节集 (“127.0.0.1:8080”)<br /> 客户名 ＝ 字节集到客户名 (字节集)<br /> 调试输出 (字节集, 客户名)<br /> <br /> <br /> .子程序 客户名到字节集, 字节集, 公开, 将客户名 IP+端口，转换为固定6字节的字节集以节约内存空间，失败返回空字节集。<br /> .参数 客户名, 文本型, , 文本由 服务器.取回客户() 获取，例如:127.0.0.1:8080<br /> .局部变量 分割文本, 文本型, , "0"<br /> .局部变量 返回值, 字节集<br /> .局部变量 客户Duan口, 整数型<br /> .局部变量 端口高字节, 字节型<br /> .局部变量 端口低字节, 字节型<br /> .局部变量 计数, 整数型<br /> <br /> 分割文本 ＝ 分割文本 (客户名, “:”, )<br /> .如果真 (取数组成员数 (分割文本) ≠ 2)<br />     返回 ({  })<br /> .如果真结束<br /> 客户Duan口 ＝ 到整数 (分割文本 [2])<br /> .如果真 (是否为长整数 (分割文本 [2]) ＝ 假 或 客户Duan口 ＜ 0 或 客户Duan口 ＞ 65535)<br />     返回 ({  })<br /> .如果真结束<br /> 分割文本 ＝ 分割文本 (分割文本 [1], “.”, )<br /> .如果真 (取数组成员数 (分割文本) ≠ 4)<br />     返回 ({  })<br /> .如果真结束<br /> 返回值 ＝ {  }<br /> .计次循环首 (4, 计数)<br />     返回值 ＝ 返回值 ＋ 到字节集 (到字节 (分割文本 [计数]))<br />     .如果真 (到整数 (分割文本 [计数]) ＜ 0 或 到整数 (分割文本 [计数]) ＞ 255 或 是否为长整数 (分割文本 [计数]) ＝ 假)<br />         返回 ({  })<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (返回值 ＋ 取字节集左边 (到字节集 (客户Duan口), 2))<br /> <br /> .子程序 字节集到客户名, 文本型, 公开, 将字节集数据还原为客户名 IP+端口，失败返回空文本。<br /> .参数 字节集, 字节集, , 由 客户名到字节集() 生成的6字节的字节集数据<br /> .局部变量 计数, 整数型<br /> .局部变量 返回值, 文本型<br /> <br /> .如果真 (取字节集长度 (字节集) ≠ 6)<br />     返回 (“”)<br /> .如果真结束<br /> .计次循环首 (4, 计数)<br />     .如果 (计数 ＝ 4)<br />         返回值 ＝ 返回值 ＋ 到文本 (字节集 [计数]) ＋ “:”<br />     .否则<br />         返回值 ＝ 返回值 ＋ 到文本 (字节集 [计数]) ＋ “.”<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> 返回 (返回值 ＋ 到文本 (字节集 [6] × 256 ＋ 字节集 [5]))<br /> <br /> .子程序 是否为长整数, 逻辑型<br /> .参数 文本, 文本型<br /> <br /> 返回 (到文本 (到长整数 (文本)) ＝ 文本)

这个意思吗？

yunying

到文本(字节集数据)

神女软件定制

发个字节集出来