如何让 Win10 屏幕常亮？

问题求助❓
1

之前求助过让安卓屏幕常亮，现在求助让 Win10 屏幕常亮的方法和工具。
系统设定30秒自动关闭屏幕。有时候需要屏幕常亮。

msdn 有指令，但我目前基础还在学，不懂得运用。
https://docs.microsoft.com/zh-cn/windows/win32/api/winbase/nf-winbase-setthreadexecutionstate?redirectedfrom=MSDN

2

微软power toys

2 个赞
3

或者原始一点，模拟鼠标抖动

4

……？
不是应该在电源设置里面设置关闭屏幕时间吗？
题主发的MSDN应该是编程里面用到的代码吧，莫非是手搓大佬练习生？

5
6

有设置30秒自动关闭屏幕，但有时候阅读需要屏幕常亮。因此我想通过软件来卡住，而不是改设置

7

AHK V2 29秒发送一次F10
SetTimer () => send("{F10}"), 29000

8

ahk v2 我见过很多次，是开始慢慢流行了吗？

未来在 v2 而不是 v1.1 ？

9

本身就是个小众的东西
目前V1还是主流吧
V2已经差不多十年了前段时间才进入beta.1
没进入之前的ALPHA都不向后兼容，更新一次可能就要改一部分代码
现在已经进入向后兼容的阶段了
我个人的脚本很少有依赖，加上自己一个大型脚本V2明显比V1快才切换过来的

维基上有写

AutoHotkey 1.0.* 和 AutoHotkey_H 已停止开发和维护，不建议使用。

依赖大量旧的代码库建议使用 AutoHotkey 1.1.*，因为目前绝大多数的代码和社区都是使用这个版本，这个版本仍在维护，仍然会添加少量的新功能和修复错误，用户可以等待迁移工具完善或者 v2 变成主流再迁移即可。

不依赖旧的代码库，愿意且能够同步改动代码的用户使用 AutoHotkey v2，能获得更一致的语法和更多的新功能。

AHK官方论坛真是个好东西
每个提问都有回复，虽然可能回复得慢一点，但是对我来说解决率100%
最重要是我用在线翻译的英文也能获得回复
一些切换过程中的困难也很快就解决了。
像维基上说的，语法更一致了。我一个1000行的脚本中只有 7 个%

1 个赞
10

我正想回复这链接，提示已经有了，这个小工具就可以了。

11

V2 怎么安装。我搜了一圈没找到说法。下载的 v2 只有可执行文件和文档。不像 L 有安装包。

12

邪道方法是用V1的安装包，然后手动把exe文件替换成V2的

不过我用的都是便携的，没安装的
下载V2的EXE然后放到想要的位置
然后保存下面我转换过来的代码为 ahk 文件，比方说1.ahk
然后拖拽这个到V2的EXE上就行了

注意：这样你的V1脚本也会关联到这，可能会导致启动不了。

FileEncoding "UTF-8"

if ! A_IsAdmin and MsgBox("点击是为所有用户,否为当前用户",, "YesNo") = "Yes"
{
    if ! A_IsAdmin
        Run '*RunAs "' A_AhkPath '" /restart "' A_ScriptFullPath '"'
}

if ! A_IsAdmin
    RootKey :="HKCR\"
else
    RootKey := "HKCU\Software\Classes\"

if MsgBox("点击是安装,否卸载",, "YesNo") = "No"
{
    try RegDeleteKey RootKey "AutoHotkeyScript"
    try RegDeleteKey RootKey ".ahk"
    if FileExist(A_WinDir "\ShellNew\Template.ahk")
        try FileDelete A_WinDir "\ShellNew\Template.ahk"
    TrayTip "Uninstall complete", "AHK"
    ExitApp
}

;添加模板
RegWrite "Template.ahk", "REG_SZ", RootKey ".ahk\ShellNew","FileName"
RegWrite "AutoHotkeyScript", "REG_SZ", RootKey ".ahk"

;关联脚本
RegWrite "AutoHotkey 脚本", "REG_SZ",RootKey "AutoHotkeyScript"
RegWrite "AHK", "REG_SZ",RootKey "AutoHotkeyScript","FriendlyTypeName"
RegWrite "`"" A_AhkPath "`",1", "REG_SZ",RootKey "AutoHotkeyScript\DefaultIcon"
;运行
RegWrite "运行", "REG_SZ",RootKey "AutoHotkeyScript\Shell\Open"
RegWrite "`"" A_AhkPath "`" `"%1`" %*", "REG_SZ",RootKey "AutoHotkeyScript\Shell\Open\Command"
;编辑
RegWrite "编辑(&E)", "REG_SZ",RootKey "AutoHotkeyScript\Shell\Edit"
RegWrite "notepad `"%1`"", "REG_SZ",RootKey "AutoHotkeyScript\Shell\Edit\Command"
;编译
if FileExist(A_ScriptDir "\Compiler\Ahk2Exe.exe")
{
    RegWrite "编译", "REG_SZ",RootKey "AutoHotkeyScript\Shell\Compile"
    RegWrite "`"" A_ScriptDir "\Compiler\Ahk2Exe.exe`" /in `"%1`"", "REG_SZ",RootKey "AutoHotkeyScript\Shell\Compile\Command"
}
;拖拽支持
RegWrite "{86C86720-42A0-1069-A2E8-08002B30309D}", "REG_SZ",RootKey "AutoHotkeyScript\ShellEx\DropHandler"

if A_IsAdmin
{
    if ! FileExist(A_WinDir "\ShellNew")
        DirCreate A_WinDir "\ShellNew"
    if FileExist(A_WinDir "\ShellNew\Template.ahk")
        FileDelete A_WinDir "\ShellNew\Template.ahk"

    ;New file template
    FileAppend
    (
    "#SingleInstance force
    FileEncoding `"UTF-8`""
    ), A_WinDir "\ShellNew\Template.ahk"
}

TrayTip "安装完毕", "AHK"
13

更一致的语法？再也不用五分钟写完主体，两小时调试分号逗号百分号了吗:joy:

14

微软的powertoys几个月前更新的，自带一个叫做powertoys awake的小工具

15

逗号还是要管，百分号差不多没了，但是 “” 必需要有了。
= 变成比较符号， 赋值必需要用 := 了

i = test 
这种得写成  
i := "test"

总体来说更像编程语言了吧大概。
差不多99%的语句都变成函数了，可以直接调用，组合更方便了

arr := StrSplit(FileRead("D:\新建文本文档.txt"), "`n")
msgbox arr[1]

不过也有变量必需提前声明等要求了，不能像v1这样了

If !i
	i = set
16

这种需求不是很多工具么

17

最简单的方法是去电源设置里设置

18

那可太好了，每次在写不写引号，写= 还是写 := 上也浪费了好多生命