来一个会易语言的！来看看能写出这个不！

社区服务
高级搜索
猴岛论坛跑跑卡丁车来一个会易语言的！来看看能写出这个不！
发帖 回复
正序阅读 最近浏览的帖子最近浏览的版块
« 返回列表
12个回复

[资源共享]来一个会易语言的！来看看能写出这个不！

 楼层直达
liuxiang552

ZxID：6953046

等级: 准尉
举报 只看楼主 使用道具 楼主   发表于: 2012-09-17 0
下面是刷工厂的`1分钟兑换10次部件  50分钟等待一个部件（防止能量清0）
我用的是按键精灵所以想知道易语言能写出不！
下面是按键精灵代码不懂说！


While true
    While i = 0
        If i = 0 Then
            t = now
            Do
                //要做的事情
                //打开游戏
                IfColor 812,500,  "F4ECBD", 0 Then
                    Delay 100
                    MoveTo 1861, 21
                    Delay 100
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //添加好友
                FindPic 0,0,1920,1080,"Attachment:\tj.bmp",0.9,intX,intY
                If intX > 0 And intY > 0 Then
                    MoveTo intX, intY
                    Delay 200
                    LeftDoubleClick 1
                End If
                //提示已登入
                IfColor 1054,509, "2653E5", 0 Then
                    Delay 100
                    MoveTo 1054,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //大弹窗
                IfColor 1219,476, "2653E5", 0 Then
                    Delay 100
                    MoveTo 1219,476
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //中断确定
                IfColor 278,318,"58B379",0 Then
                    Delay 1000
                    KeyDown 18, 1
                    KeyPress 115, 1
                    KeyUp 18, 1
                    Delay 800
                End If
                //无认证
                IfColor 1042,509,  "2653E5", 0 Then
                    Delay 100
                    MoveTo 1042,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //异常处理1
                IfColor 1161,509, "2C57E5", 0 Then
                    Delay 100
                    MoveTo 1161,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //打开游戏
                IfColor 944, 631, "255C86", 0 Then
                    Delay 100
                    MoveTo 1274, 639
                    Delay 200
                    LeftDoubleClick 1
                    Delay 800
                    KeyDown 17, 1
                    KeyPress 86, 1
                    KeyUp 17, 1
                    Delay 500
                    KeyPress "Enter", 1
                    Delay 500
                End If
                //游戏开始
                FindPic 0,0,1920,1080,"Attachment:\wwch.bmp",0.9,intX,intY
                If intX > 0 And intY > 0 Then
                    MoveTo intX, intY
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                    KeyPress "F11", 1
                    Delay 2000
                    KeyPress "F11", 1
                    Delay 4500
                    KeyPress "Esc", 4
                End If
                //多人游戏
                IfColor 67,92, "00DAFE", 0 Then
                    Delay 100
                    MoveTo 211,626
                    Delay 100
                    LeftClick 1
                    Delay 100
                    KeyPress "Esc", 4
                    Delay 1000
                End If
                //多人游戏2
                IfColor 67,92, "009EEF", 0 Then
                    Delay 100
                    MoveTo 211,626
                    Delay 100
                    LeftClick 1
                    Delay 100
                    KeyPress "Esc", 4
                    Delay 1000
                End If
                //工厂
                IfColor 472,358, "1EA7C9", 0 Then
                    Delay 500
                    MoveTo 109,114
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    KeyPress "Enter", 1
                    Delay 200
                    MoveTo 88, 624
                    LeftClick 1
                    Delay 2000
                    MoveTo 67, 92
                    LeftClick 1
                    Delay 1000
                End If        
                //卡大厅
                IfColor 300,145, "7D65F2", 0 Then
                    Delay 500
                    KeyPress "F1", 1
                    Delay 500
                End If
                //商店
                IfColor 124,526, "5388E6", 0 Then
                    Delay 1000
                    MoveTo 153,627
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //小屋
                IfColor 56,126, "823D66", 0 Then
                    Delay 100
                    MoveTo 88, 624
                    LeftClick 1
                    Delay 1500
                    MoveTo 67, 92
                    LeftClick 1
                    Delay 1500
                End If
            Loop Until DateDiff("s", t, now) > 3000
            i = i + 1
        End If
        While i = 1
            If i = 1 Then
                //打开游戏
                IfColor 812, 500, "F4ECBD", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 1861, 21
                    Delay 100
                    LeftDoubleClick 1
                    Delay 1500
                    Delay 100
                End If
                //添加好友
                FindPic 0,0,1920,1080,"Attachment:\tj.bmp",0.9,intX,intY
                If intX > 0 And intY > 0 Then
                    Delay 200
                    i = i + 1
                    Delay 200
                    MoveTo intX, intY
                    Delay 200
                    LeftDoubleClick 1
                End If
                //提示已登入
                IfColor 1054, 509, "2653E5", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 1054,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //大弹窗
                IfColor 1219, 476, "2653E5", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 1219,476
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //中断确定
                IfColor 278, 318, "58B379", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 1000
                    KeyDown 18, 1
                    KeyPress 115, 1
                    KeyUp 18, 1
                    Delay 800
                End If
                //无认证
                IfColor 1042, 509, "2653E5", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 1042,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //异常处理1
                IfColor 1161, 509, "2C57E5", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 1161,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //打开游戏
                IfColor 944, 631, "255C86", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 1274, 639
                    Delay 200
                    LeftDoubleClick 1
                    Delay 800
                    KeyDown 17, 1
                    KeyPress 86, 1
                    KeyUp 17, 1
                    Delay 500
                    KeyPress "Enter", 1
                    Delay 500
                End If
                //游戏开始
                FindPic 0,0,1920,1080,"Attachment:\wwch.bmp",0.9,intX,intY
                If intX > 0 And intY > 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo intX, intY
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                    KeyPress "F11", 1
                    Delay 2000
                    KeyPress "F11", 1
                    Delay 4500
                    KeyPress "Esc", 4
                End If
                //多人游戏
                IfColor 67, 92, "00DAFE", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 211,626
                    Delay 100
                    LeftClick 1
                    Delay 100
                    KeyPress "Esc", 4
                    Delay 1000
                End If
                //多人游戏2
                IfColor 67, 92, "009EEF", 0 Then
                    Delay 100
                    i = i + 1
                    Delay 100
                    MoveTo 211,626
                    Delay 100
                    LeftClick 1
                    Delay 100
                    KeyPress "Esc", 4
                    Delay 1000
                End If
                //工厂
                IfColor 28,361, "3D6774", 0 Then
                    Delay 500
                    MoveTo 109,114
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    MoveTo 325,419
                    LeftClick 1
                    Delay 200
                    MoveTo 418,395
                    LeftClick 1
                    Delay 200
                    KeyPress "Enter", 1
                    Delay 200
                    MoveTo 88, 624
                    LeftClick 1
                    Delay 2000
                    MoveTo 67, 92
                    LeftClick 1
                    Delay 1000
                End If        
                //卡大厅
                IfColor 300,145, "7D65F2", 0 Then
                    Delay 500
                    KeyPress "F1", 1
                    Delay 500
                End If
                //商店
                IfColor 124,526, "5388E6", 0 Then
                    Delay 1000
                    MoveTo 153,627
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //小屋
                IfColor 56,126, "823D66", 0 Then
                    Delay 100
                    MoveTo 88, 624
                    LeftClick 1
                    Delay 1500
                    MoveTo 67, 92
                    LeftClick 1
                    Delay 1500
                End If
            End If
            While i = 2
                //打开游戏
                IfColor 812,500,  "F4ECBD", 0 Then
                    Delay 100
                    MoveTo 1861, 21
                    Delay 100
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //添加好友
                FindPic 0,0,1920,1080,"Attachment:\tj.bmp",0.9,intX,intY
                If intX > 0 And intY > 0 Then
                    MoveTo intX, intY
                    Delay 200
                    LeftDoubleClick 1
                End If
                //已登入
                IfColor 1054,509, "2653E5", 0 Then
                    Delay 100
                    MoveTo 1054,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //大弹窗
                IfColor 1219,476, "2653E5", 0 Then
                    Delay 100
                    MoveTo 1219,476
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //中断确定
                IfColor 278,318,"58B379",0 Then
                    Delay 100
                    MoveTo 404,372
                    Delay 100
                    LeftDoubleClick 1
                    Delay 800
                End If
                //无认证
                IfColor 1042,509,  "2653E5", 0 Then
                    Delay 100
                    MoveTo 1042,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 1500
                End If
                //异常处理1
                IfColor 1161,509, "2C57E5", 0 Then
                    Delay 100
                    MoveTo 1161,509
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                End If
                //打开游戏
                IfColor 944, 631, "255C86", 0 Then
                    Delay 100
                    MoveTo 1274, 639
                    Delay 200
                    LeftDoubleClick 1
                    Delay 800
                    KeyDown 17, 1
                    KeyPress 86, 1
                    KeyUp 17, 1
                    Delay 500
                    KeyPress "Enter", 1
                    Delay 500
                End If
                //游戏开始
                FindPic 0,0,1920,1080,"Attachment:\wwch.bmp",0.9,intX,intY
                If intX > 0 And intY > 0 Then
                    MoveTo intX, intY
                    Delay 100
                    LeftDoubleClick 1
                    Delay 500
                    KeyPress "F11", 1
                    Delay 2000
                    KeyPress "F11", 1
                    Delay 4500
                    KeyPress "Esc", 4
                End If
                //多人游戏
                IfColor 67,92, "00DAFE", 0 Then
                    Delay 100
                    MoveTo 67,92
                    Delay 100
                    LeftClick 1
                    Delay 100
                    KeyPress "Esc", 4
                    Delay 1000
                End If
                //多人游戏2
                IfColor 67,92, "009EEF", 0 Then
                    Delay 100
                    MoveTo 67,92
                    Delay 100
                    LeftClick 1
                    Delay 100
                    KeyPress "Esc", 4
                    Delay 1000
                End If
                //进入工厂
                IfColor 300,145, "7D65F2", 0 Then
                    Delay 500
                    MoveTo 210,623
                    LeftDoubleClick 1
                    Delay 1500
                    MoveTo 693,169
                    LeftClick 1
                    Delay 66000
                    //关闭游戏
                    MoveTo 800, 25
                    Delay 100
                    LeftDoubleClick 1
                    Delay 100
                    i=0
                End If
            Wend
        Wend
    Wend
Wend
本帖de评分： 共 2 条评分 ＤＢ +2
ＤＢ+1 2012-09-18

是不是复杂了点，有掉线的可能
ＤＢ+1 2012-09-18

用超级模块里的 就可以了  你这个取屏幕颜色只能自己用吧
隐藏
打赏 收藏 新鲜事

相关主题

回复 引用
　 鲜花[0]　 鸡蛋[0]
丶Kobe丨24

ZxID：6259828

等级: 大元帅
举报 只看该作者 12楼  发表于: 2012-09-18 0
这个真不懂
回复 引用 新鲜事
　 鲜花[10]　 鸡蛋[0]
猴岛、小灰灰

ZxID：18125864

等级: 大将
从此以后，只做一个狼心狗肺的人，不在淡一丝感情，永远不谈。
举报 只看该作者 11楼  发表于: 2012-09-18 0
回 4楼(墨童童) 的帖子
易语言，就是这样的 。呵呵 。我其实也看不懂 。
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
叉叉更健康

ZxID：20543807

等级: 新兵
举报 只看该作者 10楼  发表于: 2012-09-18 0
可以写，不过你这堆代码没用，很简单
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
ok_liangjiale

ZxID：18416405

等级: 大校
举报 只看该作者 9楼  发表于: 2012-09-18 0
回 楼主(liuxiang552) 的帖子
看不懂你这玩意,易语言貌似是超级延时的命令就是勒,要么就时钟周期
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
G丨M丶999

ZxID：1524268

等级: 上尉
举报 只看该作者 8楼  发表于: 2012-09-18 0
用超级模块里的 就可以了  你这个取屏幕颜色只能自己用吧
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
音歌

ZxID：19737539

等级: 禁止发言
举报 只看该作者 7楼  发表于: 2012-09-17 0
这个真不懂~
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
此刻竟湿滑

ZxID：20518595

等级: 上校
家穷人丑  一米四九
举报 只看该作者 6楼  发表于: 2012-09-17 0
别人不是早就做出这个了吗   ID叫无赖什么的

际遇之神

 奖励

边缘2f06在大街上捡到3ＤＢ  飞快的跑回家躲着.
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
做一个淡定哥

ZxID：19827937

等级: 上将
配偶: 热心会员　　　
举报 只看该作者 5楼  发表于: 2012-09-17 0
感谢小猴子分享
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
墨童童。

ZxID：6012511

等级: 元老
配偶: 韓小柒。
♫ 享受生活的每一天♫

举报 只看该作者 4楼  发表于: 2012-09-17 0
在我看来一堆乱码
          
回复 引用 新鲜事
　 鲜花[11]　 鸡蛋[0]
辰默。

ZxID：19407189

等级: 兵马大元帅
举报 只看该作者 地板   发表于: 2012-09-17 0
理论上是可以的，留给楼下
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
童话vs传说

ZxID：17977556

等级: 上将
生亦何欢，死亦何苦？喜乐悲愁，皆归尘土。怜我世人，忧患实多！

举报 只看该作者 板凳   发表于: 2012-09-17 0
表示真长 不懂。
[ 此帖被童话vs传说在2012-09-17 23:12重新编辑 ]
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
　　　止于心。

ZxID：20149493

等级: 上将
配偶: ﹏゛锋芒
你这么美，这么媚～

举报 只看该作者 沙发   发表于: 2012-09-17 0
表示看不懂
回复 引用 新鲜事
　 鲜花[0]　 鸡蛋[0]
« 返回列表
发帖 回复