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

社区服务
高级搜索
猴岛论坛跑跑卡丁车来一个会易语言的!来看看能写出这个不!
发帖 回复
正序阅读 最近浏览的帖子最近浏览的版块
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 条评分 DB +2
DB+1 2012-09-18

是不是复杂了点,有掉线的可能

DB+1 2012-09-18

用超级模块里的 就可以了  你这个取屏幕颜色只能自己用吧

丶Kobe丨24

ZxID:6259828

等级: 大元帅

举报 只看该作者 12楼  发表于: 2012-09-18 0
这个真不懂
猴岛、小灰灰

ZxID:18125864

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

ZxID:20543807

等级: 新兵
举报 只看该作者 10楼  发表于: 2012-09-18 0
可以写,不过你这堆代码没用,很简单
ok_liangjiale

ZxID:18416405

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

ZxID:1524268

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

ZxID:19737539

等级: 禁止发言

举报 只看该作者 7楼  发表于: 2012-09-17 0
这个真不懂~
此刻竟湿滑

ZxID:20518595

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

际遇之神

奖励

边缘2f06在大街上捡到3DB  飞快的跑回家躲着.

做一个淡定哥

ZxID:19827937

等级: 上将

举报 只看该作者 5楼  发表于: 2012-09-17 0
感谢小猴子分享
墨童童。

ZxID:6012511

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

举报 只看该作者 4楼  发表于: 2012-09-17 0
在我看来一堆乱码
          
辰默。

ZxID:19407189


举报 只看该作者 地板   发表于: 2012-09-17 0
理论上是可以的,留给楼下
童话vs传说

ZxID:17977556

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

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

ZxID:20149493

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

举报 只看该作者 沙发   发表于: 2012-09-17 0
表示看不懂
« 返回列表
发帖 回复