新增网络验证等易语言_取当前源码路径

追梦传媒 · 发表于 2023-7-3 23:51:43

子程序名	返回值类型	公开	备注
指针_置字节集内容
参数名	类型	参考	可空	数组	备注
指针	整数型				取指针_字节集型 (到字节集 (“对对对”))
bin	字节集
偏移	整数型
长度	整数型

变量名	类型	静态	数组	备注
指针2	整数型
bin2	字节集

' 指针2 ＝取变量地址 (bin)
' 指针2 ＝指针到整数 (指针2)
' 长度＝指针到整数 (指针2 ＋ 4)
' bin2 ＝指针到字节集 (指针2 ＋ 8, 长度)
' ' 调试输出 (bin2)
' 写到内存_通用型 (指针, 指针到字节集 (指针2, 长度＋ 8)) ' 没有搞懂一定要这种写入才行，普通写入内存不行
' 指针＝指针到整数 (指针)
' 长度＝指针到整数 (指针＋ 4)
' bin2 ＝指针到字节集 (指针＋ 8, 长度)
' ' 调试输出 (bin2)
' ======================================================================================
' ======= 提示文本
' ======================================================================================
长度＝指针到整数 (指针)
偏移＝偏移＋ 4
偏移＝偏移＋长度
RtlMoveMemory (指针＋ 4, 取指针_字节集型 (bin), 长度)

子程序名	返回值类型	公开	备注
指针_取字节集内容	字节集
参数名	类型	参考	可空	数组	备注
指针	整数型				取指针_字节集型 (到字节集 (“对对对”))
偏移	整数型
长度	整数型

变量名	类型	静态	数组	备注
tmp	整数型
bin	字节集

' tmp ＝指针到整数 (指针)
' 长度＝指针到整数 (tmp ＋ 4)
' bin ＝指针到字节集 (tmp ＋ 8, 长度)
' 返回 (bin)
长度＝指针到整数 (指针)
偏移＝偏移＋ 4
偏移＝偏移＋长度
bin ＝指针到字节集 (指针＋ 4, 长度)
返回 (bin)

.版本 2<br />
<br />
.子程序 指针_置字节集内容, , 公开<br />
.参数 指针, 整数型, , 取指针_字节集型 (到字节集 (“对对对”))<br />
.参数 bin, 字节集<br />
.参数 偏移, 整数型, 参考 可空<br />
.参数 长度, 整数型, 参考 可空<br />
.局部变量 指针2, 整数型<br />
.局部变量 bin2, 字节集<br />
<br />
' 指针2 ＝ 取变量地址 (bin)<br />
' 指针2 ＝ 指针到整数 (指针2)<br />
' 长度 ＝ 指针到整数 (指针2 ＋ 4)<br />
' bin2 ＝ 指针到字节集 (指针2 ＋ 8, 长度)<br />
' ' 调试输出 (bin2)<br />
<br />
' 写到内存_通用型 (指针, 指针到字节集 (指针2, 长度 ＋ 8))  ' 没有搞懂 一定要这种写入才行，普通写入内存不行<br />
<br />
' 指针 ＝ 指针到整数 (指针)<br />
' 长度 ＝ 指针到整数 (指针 ＋ 4)<br />
' bin2 ＝ 指针到字节集 (指针 ＋ 8, 长度)<br />
' ' 调试输出 (bin2)<br />
<br />
' ======================================================================================<br />
' ======= 提示文本<br />
' ======================================================================================<br />
长度 ＝ 指针到整数 (指针)<br />
偏移 ＝ 偏移 ＋ 4<br />
偏移 ＝ 偏移 ＋ 长度<br />
RtlMoveMemory (指针 ＋ 4, 取指针_字节集型 (bin), 长度)<br />
<br />
<br />
.子程序 指针_取字节集内容, 字节集, 公开<br />
.参数 指针, 整数型, , 取指针_字节集型 (到字节集 (“对对对”))<br />
.参数 偏移, 整数型, 参考 可空<br />
.参数 长度, 整数型, 参考 可空<br />
.局部变量 tmp, 整数型<br />
.局部变量 bin, 字节集<br />
<br />
' tmp ＝ 指针到整数 (指针)<br />
' 长度 ＝ 指针到整数 (tmp ＋ 4)<br />
' bin ＝ 指针到字节集 (tmp ＋ 8, 长度)<br />
' 返回 (bin)<br />
<br />
长度 ＝ 指针到整数 (指针)<br />
偏移 ＝ 偏移 ＋ 4<br />
偏移 ＝ 偏移 ＋ 长度<br />
bin ＝ 指针到字节集 (指针 ＋ 4, 长度)<br />
返回 (bin)

https://qq1242087641.lanzouj.com/iewyO117b7ng