【办公类-50-01】20240329腾讯漫画12周年-UIBOT刷分

本文主要是介绍【办公类-50-01】20240329腾讯漫画12周年-UIBOT刷分，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

背景需求：

腾讯动漫的福利中心-挑战中心，每天有刷分，积累阅点，可以购买阅读券（3天阅读期）

今天看到有一个12周年限时阅读活动，看完1200章漫画，可以送1200阅读分

今天已经是3月29日了，还有3天时间，看1200话漫画，实在是太费时间了。

解决思路

1、因此我用手机同屏方式，将手机上的腾讯漫画APP投射到电脑桌面上

2、使用UIBOT，写一个程序：自动打开漫画页面，然后浏览3秒，退出，点击下一页

代码展示

Dim objPoint,sRet,temp,iRet,时长2,次2,次,dRet
// For i = 0 To 1000 step 1// Next
Rem 漫画每页浏览3秒退出点击下一个
次=Dialog.InputBox("多少次","Laiye Automation","",true)总数=CInt(次)
For 次数 = 1 To 次 step 1Mouse.Move(1677, 500, false,{"iDelayAfter": 300, "iDelayBefore": 200})
Mouse.Click("left", "click", [],{"iDelayAfter": 300, "iDelayBefore": 300})
Delay(2000)
Mouse.Drag(1453, 800, 1453, 250, "left", [],{"iDelayAfter": 100, "iDelayBefore": 50})
Delay(3000)Mouse.Drag(1612, 955, 1573, 890, "left", [],{"iDelayAfter": 100, "iDelayBefore": 50})Mouse.Move(1561, 950, false,{"iDelayAfter": 300, "iDelayBefore": 200})
Mouse.Click("left", "click", [],{"iDelayAfter": 300, "iDelayBefore": 300})
TracePrint('已经点击'&次数&'次')次数2=CInt(次数)TracePrint('已完成进度'&次数2/总数*100&'%')Next
// 100次5秒等于500秒约等于8.33分钟，所以60分钟需要*8=800次
// 一人之下漫画 刷到52-52认识的人 177-101=76分钟

演示视频

重点说明

1、管理员身份运行才能点击

2、不能是已经分组的漫画，这样就不会连续出现新页面了

这篇关于【办公类-50-01】20240329腾讯漫画12周年-UIBOT刷分的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---