ADVERTISEMENT
返回
  • 浏览过的版块

12345678
/11
Huaren
等级三等兵
威望--
贴子69
魅力69
注册时间2019-04-01

gwendylin1127

只看他

2022-05-16 23:33:26

mouse jiggler

Huaren
等级上校
威望5
贴子4771
魅力7142
注册时间2017-11-29

ivoryzz

只看他

2022-05-16 23:33:53

回复 1楼Grace302的帖子

我可以帮你找工作

Huaren
等级一等兵
威望--
贴子498
魅力741
注册时间2014-02-04

Flyinghorse

只看他

2022-05-16 23:41:40

打开一个browser,然后用一个电话之类压着空格键
Huaren
等级大校
威望7
贴子6001
魅力5985
注册时间2021-11-01

eragshs

只看他

2022-05-16 23:47:44

公司电脑,没有权限安装任何东西。


Grace302 发表于 2022-05-16 22:09

哈哈哈我写了一个非常简单的py script不停变更鼠标的坐标。。只是没加click,后来发现没人care就算了

Huaren
等级三等兵
威望--
贴子117
魅力604
注册时间2018-03-31

Helen_Wood

只看他

2022-05-17 00:29:42

回复 1楼Grace302的帖子

二话不说,直接上代码。


考虑到楼主的电脑无法安装任何其他软件,那么只能用一般都有的Excel,


1.在EXCEL里,enable 开发者模式,然后加入一个按钮,然后这个按钮的代码如下:


Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal Y As Long) As Long

Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)


Private Const MOUSEEVENTF_LEFTDOWN = &H2

Private Const MOUSEEVENTF_LEFTUP = &H4


Private working As Boolean




Sub keep_screen_live_Click()


  Set working = True

  Do While working

   

    Call ClickMyScreen

    MsgBox "clicking"

    Sleep 60000

     

     

  Loop

End Sub


Private Sub ClickMyScreen()


  mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0

  Sleep 50

  mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0

  Sleep 100


End Sub


然后保存成 macro的excel,点击开始按钮,就会自动60秒点一次屏幕了。


6323733





Huaren
等级大校
威望14
贴子11507
魅力11625
注册时间2010-04-12

pops

只看他

2022-05-17 00:38:35

赞楼上的。但这种软件能跟踪到你在每个文件的使用时间,如果每个礼拜40小时都在这个具体excel file 上,也不大对劲吧。

Huaren
等级大校
威望9
贴子7290
魅力8833
注册时间2018-04-12

April4

只看他

2022-05-17 00:43:03

太可怕了吧?

Huaren
等级一等兵
威望--
贴子559
魅力963
注册时间2012-10-24

boom

只看他

2022-05-17 00:46:04

回复 1楼Grace302的帖子

把下面代码存成idle.vbs,然后运行。 粗体字5代表每5分钟动作,自行修改成所需时间间隔即可。


set wsc = CreateObject("WScript.Shell")

Do

'Five Minutes

WScript.Sleep(5*60*1000)

wsc.SendKeys("{F13}")

Loop

Huaren
等级上尉
威望3
贴子2547
魅力3306
注册时间2020-06-02

nakamoto

只看他

2022-05-17 00:47:43

Mouse jiggler. From $12 to $50 on Amazon.


6323754

ADVERTISEMENT
Huaren
等级三等兵
威望--
贴子192
魅力1500
注册时间2013-04-23

casino2k3

只看他

2022-05-17 00:50:08

麻烦报个名字?实在好奇哪家美帝公司如此变态

初始化编辑器...

到底了