献出远程调用call代码例程+汇编转换例程（易语言）

Ghost

.版本   

.子程序 内存初始化  
.局部变量 发包函数, 字节集  
.局部变量 走路函数, 字节集  
.局部变量 买物函数, 字节集  
.局部变量 卖物函数, 字节集  

买物内存地址 ＝ 申请虚拟内存 (进程句柄, 1024)  ' ID+格位+上限只需字节  
.如果真 (买物内存地址 ＝ )  
    结束 ()  
.如果真结束  
卖物内存地址 ＝ 买物内存地址 ＋   

发包内容地址 ＝ 卖物内存地址 ＋   
发包长度地址 ＝ 发包内容地址 ＋   

走路地址X ＝ 发包长度地址 ＋   
走路地址Y ＝ 走路地址X ＋   
走路地址Z ＝ 走路地址Y ＋   
走路状态地址 ＝ 走路地址Z ＋   

买物函数地址 ＝ 申请虚拟内存 (进程句柄, 1024)  
.如果真 (买物函数地址 ＝ )  
    结束 ()  
.如果真结束  
买物函数 ＝ 买物函数 ()  
写字节集内存 (进程ID, 买物函数地址, 买物函数)  

卖物函数地址 ＝ 申请虚拟内存 (进程句柄, 1024)  
.如果真 (卖物函数地址 ＝ )  
    结束 ()  
.如果真结束  
卖物函数 ＝ 卖物函数 ()  
写字节集内存 (进程ID, 卖物函数地址, 卖物函数)  

走路函数地址 ＝ 申请虚拟内存 (进程句柄, 1024)  
.如果真 (走路函数地址 ＝ )  
    结束 ()  
.如果真结束  
走路函数 ＝ 走路函数 ()  
写字节集内存 (进程ID, 走路函数地址, 走路函数)  

发包函数地址 ＝ 申请虚拟内存 (进程句柄, 1024)  
.如果真 (发包函数地址 ＝ )  
    结束 ()  
.如果真结束  
发包函数 ＝ 发包函数 ()  
写字节集内存 (进程ID, 发包函数地址, 发包函数)  
.版本   

.子程序 发包   

游客，如果您要查看本帖隐藏内容请回复

ligwo

lankang1990

感谢分享~~~~

wilin1982

正好需要，谢谢。