找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 3143|回复: 3

[已回复] 完全小白写到这里不知道怎么写下去了

[复制链接]

1

主题

4

回帖

5

积分

学前班

鲜花
0
猫粮
10
发表于 2019-12-11 23:53:29 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
//登陆游戏
Dim intX, intY
FindPic 110, 640, 210, 895, "Attachment:QQ登陆.png", "E1AD88", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
    Tap intX, intY
End If
Tap 320, 950
Delay 5000
//切换QQ
Dim intX, intY
FindPic 537, 448, 676, 498, "Attachment:切换QQ.png", "FF7900", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then Y
    Tap intX, intY
End If
For 6
   FindColor 50,440,265,515,"F3BA1F|F0B71B",0,0.9,intX,intY
   If intX > -1 And intY > -1 Then
          Tap 110,229 //点击账号
          Delay 2000
          InputText 账号
          Delay 2000
          Tap 111,317 //点击密码
          Delay 2000
          InputText 密码
          Delay 2000
          Tap intX, intY //点击登陆
          End If
     Delay 500
Next
   //打码没写--暂时不会
//授权登陆
  FindColor 265,630,450,670,"FFFFFF|F3BA1F|F9DA87|F4C33F",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
        Tap intX, intY
End If
//封号了
FindColor 184,660,244,810,"3BA6FA|3AA1F6|3BAAFA|4AC0FA|99C9F9|5AAFF9",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
    TracePrint"封号了"
    Delay 500
        Tap intX+10, intY+10
        Else
        TracePrint"没封号"
End If
//封号了从头从头再来切换QQ 么封号继续下去,(┬_┬)不会写了


楼主热帖

1

主题

4

回帖

5

积分

学前班

鲜花
0
猫粮
10
 楼主| 发表于 2019-12-12 01:13:14 | 显示全部楼层
//登陆游戏

Do While true
FindPic 110, 640, 210, 895, "Attachment:QQ登陆.png", "E1AD88", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
     Tap intX, intY
     TracePrint "登陆游戏"
     Exit do
End If
Tap 320, 950
Delay 1000
loop
    TracePrint "登陆游戏"
     Delay 3000   
//切换QQ
Do While true
FindPic 537, 448, 676, 498, "Attachment:切换QQ.png", "FF7900", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
      TracePrint "切换QQ"
      Tap intX, intY
      Delay 1000
      Exit do
End If
loop
    TracePrint"切换QQ"
     Delay 3000   
For 6
   FindColor 50,440,265,515,"F3BA1F|F0B71B",0,0.9,intX,intY
   If intX > -1 And intY > -1 Then
          Tap 110,229 //点击账号
          Delay 2000
          InputText 账号
          Delay 2000
          Tap 111,317 //点击密码
          Delay 2000
          InputText 密码
          Delay 2000
          Tap intX, intY //点击登陆
          End If
     Delay 500
Next
   //打码没写--暂时不会
//授权登陆
Do While true
  FindColor 265,630,450,670,"FFFFFF|F3BA1F|F9DA87|F4C33F",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
        Tap intX, intY
        TracePrint"授权登陆"
        Delay 500
        Exit do
End If
loop
    TracePrint"授权登陆"
Do While true
FindColor 184,660,244,810,"3BA6FA|3AA1F6|3BAAFA|4AC0FA|99C9F9|5AAFF9",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
    TracePrint"封号了"
    Delay 500
        Tap intX, intY
        Else
        TracePrint"没封号"
        Exit do
End If
loop
    TracePrint"封号了"
//改善后的 太难了

  • 打卡等级:行侠仗义

1080

主题

2100

回帖

4280

积分

院长

鲜花
6
猫粮
7390
QQ
发表于 2019-12-13 11:21:53 | 显示全部楼层
你可以考虑先画一个流程图, 然后在写代码

1

主题

4

回帖

5

积分

按键手机班学员

鲜花
0
猫粮
75
发表于 2019-12-22 08:28:00 | 显示全部楼层
写代码 思路明确  先画好流程图  根据图在写就简单了 想办法把图里面的功能都实现了  就基本就好了
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|紫猫编程学园

GMT+8, 2024-3-28 21:05

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表