|
发表于 2019-8-28 13:19:14
|
显示全部楼层
这课的源码如下:
.版本 2
.支持库 spec
.程序集 窗口程序集_窗口1
.子程序 _窗口1_创建完毕
.子程序 发送封包程序
.局部变量 游戏端口, 整数型
.局部变量 封包内容, 字节集
.局部变量 封包指针, 整数型
.局部变量 封包大小, 整数型
.局部变量 i, 整数型
.计次循环首 (到整数 (编辑框2_发送次数.内容), i)
游戏端口 = 到整数 (编辑框4_游戏端口.内容)
封包内容 = 转换_字节集还原 (删全部空 (编辑框1_发送封包.内容), )
封包指针 = 指针_取字节集地址 (封包内容)
封包大小 = 取字节集长度 (封包内容)
延迟 (到整数 (编辑框3_发送间隔.内容))
编辑框5_己发次数.内容 = 到文本 (i)
封包拦截.发送send (游戏端口, 封包指针, 封包大小, 0)
.计次循环尾 ()
.子程序 _按钮1_被单击
发送封包程序 ()
|
|