【办公类-50-02】20240330腾讯漫画-看视频挑战（UIBOT刷分）

作品展示

背景需求：

【办公类-46-01】20240329腾讯漫画12周年（UIBOT刷分）-CSDN博客文章浏览阅读259次，点赞9次，收藏3次。【办公类-46-01】20240329腾讯漫画12周年（UIBOT刷分）https://blog.csdn.net/reasonsummer/article/details/137155561?csdn_share_tail=%7B%22type%22%3A%22blog%22%2C%22rType%22%3A%22article%22%2C%22rId%22%3A%22137155561%22%2C%22source%22%3A%22reasonsummer%22%7D用UiBOT刷分1200章后（电脑刷分也很费时，但不费人工）

我想到了日常的刷分是否也能用UIBOT

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

这里面的原理是，

1、第1轮：看1个视频30秒，点击红色按钮领取5阅点

2、第2轮：看2个视频各30秒，点击红色按钮领取10阅点

3、第3轮：看3个视频各30秒，点击红色按钮领取18阅点

4、第4轮：看4个视频各30秒，点击红色按钮领取25阅点

手动刷分也可以，但是要每过30秒点击返回，再点击新的。

所以写一个UIBOT组合代码

Dim objPoint,sRet,temp,iRet,时长2,次2,次,dRet
// For i = 0 To 1000 step 1

// Next
Rem 漫画每页浏览3秒退出点击下一个


For i = 1 To 4 step 1

For 次数 = 1 To i step 1

Mouse.Move(1473, 803, false,{"iDelayAfter": 300, "iDelayBefore": 200})
Mouse.Click("left", "click", [],{"iDelayAfter": 300, "iDelayBefore": 300})
Delay(38000)


Mouse.Move(1482, 170, false,{"iDelayAfter": 300, "iDelayBefore": 200})
Mouse.Click("left", "click", [],{"iDelayAfter": 300, "iDelayBefore": 300})

Delay(1000)

Next
Mouse.Move(1774, 918, false,{"iDelayAfter": 300, "iDelayBefore": 200})
Mouse.Click("left", "click", [],{"iDelayAfter": 300, "iDelayBefore": 300})
Delay(1000)
Mouse.Move(1665, 622, false,{"iDelayAfter": 300, "iDelayBefore": 200})
Mouse.Click("left", "click", [],{"iDelayAfter": 300, "iDelayBefore": 300})
Delay(1000)
Next

视频展示：

20240331 UIBOT 腾讯漫画-看视频挑战

感悟

通过循环组合的尝试，反复刷固定数量的（1、2、3、4次）的视频，获得阅读点。O(∩_∩)O~~