下你所需,载你所想!
汇集开发技术源码资料

快手直播间自动回复互粉聊天引流工具

:2.115MB :1 :2019-12-24 08:04:35

部分简介

初始化COM库 ()
' 大漠多线程信息 [多线程ID].大漠.创建对象 ()
大漠多线程信息 [多线程ID].大漠.置全局路径 (取运行目录 ())
' 大漠多线程信息 [多线程ID].大漠.字库_置文件 (0, 取运行目录 () + “\易语言识字.txt”)
' dm_ret = 大漠多线程信息 [多线程ID].大漠.解绑 ()
句柄 = 大漠多线程信息 [多线程ID].大漠.窗口_查找 (“LDPlayerMainFrame”, “客户”)
句柄子 = 大漠多线程信息 [多线程ID].大漠.窗口_查找Ex (句柄, “RenderWindow”, “TheRender”)
调试输出 (“句柄 =”, 句柄, “ ,句柄子 =”, 句柄子)
大漠多线程信息 [多线程ID].大漠.窗口_置客户区域大小 (句柄, 480, 800)
' 大漠.窗口_移动 (句柄, 0, 0)
.如果 (句柄子 > 0)
dm_ret = 大漠多线程信息 [多线程ID].大漠.绑定Ex (句柄子, “dx.graphic.opengl”, “windows”, “windows”, “”, 0)
调试输出 (“客户端绑定返回1为成功,-1为不成功=”, dm_ret)
.否则

.如果结束
.计次循环首 (10, )
找图点击 (多线程ID, “91y.bmp”)
.如果 (x > 0)
大漠多线程信息 [多线程ID].大漠.延时_VIP (5000)
.否则

.如果结束
找图点击 (多线程ID, “91.bmp”)
.如果 (x > 0)
大漠多线程信息 [多线程ID].大漠.延时_VIP (1000)
.否则

.如果结束
找图不点击 (多线程ID, “登.bmp”)
.如果 (x > 0)
大漠多线程信息 [多线程ID].大漠.鼠标移动 (x + 99, y - 162)
大漠多线程信息 [多线程ID].大漠.延时_VIP (500)
大漠多线程信息 [多线程ID].大漠.鼠标_左键单击 ()
.计次循环首 (20, )
大漠多线程信息 [多线程ID].大漠.键盘_按键 (#Del键)
.计次循环尾 ()
大漠多线程信息 [多线程ID].大漠.发送文本_VIP (“15079334059”)
大漠多线程信息 [多线程ID].大漠.延时_VIP (500)
大漠多线程信息 [多线程ID].大漠.鼠标移动 (x + 135, y - 96)
大漠多线程信息 [多线程ID].大漠.延时_VIP (500)
大漠多线程信息 [多线程ID].大漠.鼠标_左键单击 ()

快手直播间自动回复互粉聊天引流工具

热门推荐

相关文章