皮皮网

【快递礼品源码】【实战看盘源码】【app支付平台源码】多开 源码_应用多开源码

2024-11-19 01:32:44 来源:thinkpad协同办公源码

1.按键精灵自动喊话后台多开
2.你好.请教一个易语言的多开多开快递礼品源码问题.取游戏多开窗口句柄的方法

多开 源码_应用多开源码

按键精灵自动喊话后台多开

       多开也可以多开方法

       把第一个开后台的窗口放在前面 后按启动键 按完后缩小窗口

       在把第二个窗口放在最前面 后按启动键 按完后缩小窗口

       就这样循环开吧

       下面是源代码

       UserVar ys= 请输入喊话之间的延时秒数

       UserVar Var1=DropList{ 循环到按停止键为止:值1|循环一遍:值2}=0 循环到按停止键为止

       UserVar han1= "请输入喊话内容" 请输入喊第一句话内容

       UserVar han2= "请输入喊话内容" 请输入喊第二句话内容

       UserVar han3= "请输入喊话内容" 请输入喊第三句话内容

       UserVar han4= "请输入喊话内容" 请输入喊第四句话内容

       UserVar han5= "请输入喊话内容" 请输入喊第五句话内容

       Plugin Hwnd = Window.Foreground()

       //下面这句是最小化窗口

       Plugin Window.Min(Hwnd)

       Delay

       Plugin Hwnd = Window.FindEx(Hwnd, 0, "Edit", 0)

       dim h

       If Var1="值1"

        //下面这句是在屏幕上范围位置(0, 0, , )进行输出内容("冷月制做欢迎使用")

        Plugin Msg.ShowScrTXT(0, 0, , , "冷月制做欢迎使用", "FF")

        Rem xh

        SetSimMode 1

        h=han1

        Gosub an

        Gosub hua

        Delay ys

        h=han2

        Gosub an

        Gosub hua

        Delay ys

        h=han3

        Gosub an

        Gosub hua

        Delay ys

        h=han4

        Gosub an

        Gosub hua

        Delay ys

        h=han5

        Gosub an

        Gosub hua

        Delay ys

        SetSimMode 0

        Goto xh

        //下面这句是直接对屏幕进行刷新清除

        Plugin Msg.HideScrTXT()

       Else

        //下面这句是在屏幕上范围位置(0, 0, , )进行输出内容("冷月制做欢迎使用")

        Plugin Msg.ShowScrTXT(0, 0, , , "冷月制做欢迎使用", "FF")

        h=han1

        SetSimMode 1

        Gosub an

        Gosub hua

        Delay ys

        h=han2

        Gosub an

        Gosub hua

        Delay ys

        h=han3

        Gosub an

        Gosub hua

        Delay ys

        h=han4

        Gosub an

        Gosub hua

        Delay ys

        h=han5

        Gosub an

        Gosub hua

        Gosub an

        //下面这句是直接对屏幕进行刷新清除

        Plugin Msg.HideScrTXT()

        Delay ys

        SetSimMode 0

        EndScript

       EndIf

       Sub OnScriptExit

        MessageBox "脚本已经停止,欢迎使用"

       Return

       Sub hua

        Plugin Bkgnd.SendString(hwnd,h)

       Return hua

       Sub an

        Plugin Bkgnd.KeyDown(hwnd,)

       Return an

你好.请教一个易语言的问题.取游戏多开窗口句柄的方法

       实在不熟悉可以换用超级模块中的 "取句柄" 命令, 按进程名; 窗口类名和窗口标题可以得到第一个符合条件的窗口句柄. 此命令仅适合取顶级窗口.

       例如: 三个条件都提供的话越准确.

       取句柄 ([进程名] "explorer.exe", [窗口类名] "WokerW", [窗口标题] "启动应用程序")

       好吧没注意你要求取多个, 好像我的回答没什么用.