易语言后台鼠标点击，需要点一次就可以，现在是无限循.....

lirang

.版本 2
.支持库 iext

.程序集 窗口程序集_启动窗口, , , 本源码来自虎牙官方
.程序集变量 监视热键_信息, 热键信息2, , "0", 监视热键
.程序集变量 句柄, 整数型
.程序集变量 坐标, 精易_坐标
.程序集变量 分割, 文本型, , "0"

.子程序 __启动窗口_创建完毕

.如果真 (文件是否存在 (取运行目录 () ＋ “\禁止多开.ini”))

.如果真结束
.如果真 (读配置项 (取运行目录 () ＋ “\禁止多开.ini”, “启动”, “已经启动”, ) ＝ “真”)
    信息框 (“程序已经启动!!”, #警告图标, , )
    结束 ()
.如果真结束

写配置项 (取运行目录 () ＋ “\禁止多开.ini”, “启动”, “已经启动”, “真”)



监视热键 (&F9取句柄, #F9键)
监视热键 (&F11取句柄, #F11键)
监视热键 (&F12取句柄, #F12键)
监视热键 (&F1开始, #F1键)
监视热键 (&F2开始, #F2键)
监视热键 (&F3开始, #F3键)
监视热键 (&F4开始, #F4键)
监视热键 (&F5开始, #F5键)
监视热键 (&F6开始, #F6键)
监视热键 (&F7开始, #F7键)
监视热键 (&F8开始, #F8键)
监视热键 (&F10开始, #F10键)
状态条1.置文本 (2, 到文本 (取现行时间 ()))
公告 (“自动点击 - - 启动成功”)

.子程序 __启动窗口_将被销毁

写配置项 (取运行目录 () ＋ “\禁止多开.ini”, “启动”, “已经启动”, “假”)

.子程序 监视热键, 整数型, 公开, 监视一个热键,当热键被触发时激活响应事件.(成功返回热键标识,失败返回0).注:必须真实的按键才会触发热键
.参数 响应事件, 子程序指针, , 响应事件(热键标识,其它...),事件参数数目不限!如果再次监视热键将响应事件!
.参数 键代码, 整数型, , 触发事件的基本键,事件在基本键按下时触发,负数为放开时触发,1鼠标左键,2鼠标右键,更多cha询相关帮助
.参数 功能键状态, 整数型, 可空, 1 Alt  2 Ctrl  4 Shift  8 Win 若要两个或以上的状态键,则把它们的值相加.
.参数 其它键, 整数型, 可空, 如果你需要zc由两个普通键组合的热键,可设置一个其它键代码.
.参数 周期, 整数型, 可空, 默认为10,监视热键的周期时间(建议5-200之间)
.参数 直接触发, 逻辑型, 可空, 默认为假:创建新的线程事件 真:直接调用事件等待返回
.局部变量 临时热键信息, 热键信息2
.局部变量 i, 整数型

.如果真 (到字节 (取绝对值 (键代码)) ≤ 0)
    返回 (0)
.如果真结束
.计次循环首 (取数组成员数 (监视热键_信息), i)
    .如果真 (监视热键_信息 [i].普通键 ＝ 键代码 且 监视热键_信息 [i].功能键 ＝ 功能键状态 且 监视热键_信息 [i].其它键 ＝ 其它键)
        监视热键_信息 [i].事件子程序 ＝ 响应事件
        监视热键_信息 [i].直接触发 ＝ 直接触发
        .如果真 (监视热键_信息 [i].标识 ≠ 0)
            返回 (监视热键_信息 [i].标识)  ' 已经zc过的热键,返回热键标识
        .如果真结束
        监视热键_信息 [i].标识 ＝ i ＋ 1000000
        返回 (监视热键_信息 [i].标识)
    .如果真结束

.计次循环尾 ()
临时热键信息.事件子程序 ＝ 响应事件
临时热键信息.普通键 ＝ 键代码
临时热键信息.功能键 ＝ 功能键状态
临时热键信息.其它键 ＝ 其它键
临时热键信息.直接触发 ＝ 直接触发
临时热键信息.标识 ＝ 取数组成员数 (监视热键_信息) ＋ 1000001
加入成员 (监视热键_信息, 临时热键信息)
.如果真 (临时热键信息.标识 ＝ 1000001)
    _创建定时器 (0, 16661, 选择 (周期 ≤ 0, 10, 周期), &监视热键线程)
.如果真结束
返回 (临时热键信息.标识)

.子程序 监视热键线程, , , 监视热键 在超级模块的【系统】集里
.局部变量 asdf, 整数型, , , ?
.局部变量 i, 整数型
.局部变量 临时事件, 子程序指针
.局部变量 临时标识, 整数型
.局部变量 a
.局部变量 缓存键状态, 短整数型, , "256"

.计次循环首 (255, i)
    缓存键状态 [i] ＝ 251  ' 防检测处理
    缓存键状态 [i] ＝ _判断按键状态 (i)
.计次循环尾 ()
.计次循环首 (取数组成员数 (监视热键_信息), i)
    .如果真 (监视热键_信息 [i].标识 ≠ 0)
        a ＝ 到字节 (取绝对值 (监视热键_信息 [i].普通键))
        a ＝ 缓存键状态 [a]
        .判断开始 (a ＝ 0)  ' 0,无状态
            .如果 (监视热键_信息 [i].键状态 ＝ 1)
                监视热键_信息 [i].键状态 ＝ 2
            .否则
                监视热键_信息 [i].键状态 ＝ 0
                到循环尾 ()
            .如果结束

        .判断 (a ＜ 0)  ' -32767,按下状态
            .如果真 (监视热键_信息 [i].键状态 ＝ 0)
                监视热键_信息 [i].键状态 ＝ 1
            .如果真结束
            .如果真 (监视热键_信息 [i].普通键 ＜ 0)
                到循环尾 ()
            .如果真结束

        .默认
            ' 1,放开后状态,在不停判断按键状态中得不到放开状态了
            .' 如果真 (监视热键_信息 [i].普通键 ＞ 0)
                ' ' 监视热键_信息 [i].键状态 ＝ 0
                ' 到循环尾 ()
            .如果真结束

        .判断结束
        ' 下面判断激活热键
        .如果真 (监视热键_信息 [i].键状态 ＞ 0 且 监视热键_信息 [i].键状态 ≠ 88)
            监视热键_信息 [i].键状态 ＝ 88
            .如果真 (监视热键_信息 [i].功能键 ＝ 选择 (缓存键状态 [18] ＜ 0, 1, 0) ＋ 选择 (缓存键状态 [17] ＜ 0, 2, 0) ＋ 选择 (缓存键状态 [16] ＜ 0, 4, 0) ＋ 选择 (缓存键状态 [91] ＜ 0, 8, 0))
                .如果真 (监视热键_信息 [i].其它键 ≠ 0)
                    a ＝ 到字节 (取绝对值 (监视热键_信息 [i].其它键))
                    .如果真 (缓存键状态 [a] ≥ 0)
                        到循环尾 ()
                    .如果真结束

                .如果真结束
                临时事件 ＝ 监视热键_信息 [i].事件子程序
                临时标识 ＝ 监视热键_信息 [i].标识
                .如果 (监视热键_信息 [i].直接触发)
                    _回调钩子 (临时事件, 临时标识, 0, 0, 0)
                .否则
                    _关闭对象 (_创建线程 (0, 0, 临时事件, 临时标识, 0, 0))
                .如果结束

            .如果真结束

        .如果真结束

    .如果真结束

.计次循环尾 ()

.子程序 取中间, 文本型
.参数 欲取全文本, 文本型
.参数 左边文本, 文本型
.参数 右边文本, 文本型
.局部变量 左边出现的位置, 整数型
.局部变量 右边出现的位置, 整数型
.局部变量 文本长度, 整数型

左边出现的位置 ＝ 寻找文本 (欲取全文本, 左边文本, , 假)
右边出现的位置 ＝ 寻找文本 (欲取全文本, 右边文本, , 假)
.如果真 (左边出现的位置 ＝ -1 或 右边出现的位置 ＝ -1)
    返回 (“”)
.如果真结束
文本长度 ＝ 取文本长度 (左边文本)
返回 (取文本中间 (欲取全文本, 左边出现的位置 ＋ 文本长度, 右边出现的位置 － 左边出现的位置 － 文本长度))

yjlxmsfzhm

没有一个东西能下的，只扣币下不了

yjlxmsfzhm

没有一个东西能下的，只扣币下不了

夹缝中求生

这个是后台吗

rxfrxf0476

那前台就不用想全屏用了

已注销571294

能加进去键盘更完美

lirang

.版本 2  .子程序 F2开始 .局部变量 i, 整数型  ' 如果真 (X坐标6.内容 ＝ “” 或 Y坐标6.内容 ＝ “” 或 句柄坐标6.内容 ＝ “”) ' 信息框 (“请先把鼠标移动到种豆界面按键盘F9键！！”, 0, “提示”, ) ' 返回 () ' 分割 ＝ 分割文本 (句柄坐标6.内容, “|”, ) ' 计次循环首 (取数组成员数 (分割), i) ' 鼠标_消息 (到数值 (分割 [i]), 到数值 (X坐标6.内容), 到数值 (Y坐标6.内容), 1) ' 计次循环尾（）  .如果 (取窗口句柄时钟7.时钟周期 ＝ 0)     取窗口句柄时钟7.时钟周期 ＝ 到整数 (间隔1.内容)     当前状态7.标题 ＝ “当前状态:开启”     公告 (“后台自动点击开启!”) .否则     取窗口句柄时钟7.时钟周期 ＝ 到整数 (间隔1.内容)     取窗口句柄时钟7.时钟周期 ＝ 0     当前状态7.标题 ＝ “当前状态:关闭”     公告 (“后台自动点击关闭!”)

lirang

鼠标左键就点一次，怎么修改啊？