（求助）autohotkey 长按组合键

adia

请问autohotkey怎样写下面功能的配置？
“长按caps lock”或“长按D”或“长按L”都相当于“长按CTRL”；而单击则不改变原有功能。这三个键的长按都想改的，先谢谢~@随便注册

大侠们，若有其他软件或方案也推荐一下，谢谢~

随便注册

搜了下，没长按的功能啊

adia

随便注册 发表于 2016-4-20 21:37
搜了下，没长按的功能啊

可能要间接实现，我搜到两个链接，大虾帮忙看看：
https://gist.github.com/babyking/5057457     这个链接你若打不开我再复制内容过来这里吧；

还有一个：
https://autohotkey.com/boards/viewtopic.php?t=6082

随便注册

adia 发表于 2016-4-20 21:47
可能要间接实现，我搜到两个链接，大虾帮忙看看：
https://gist.github.com/babyking/5057457   ...

我就学了几句，用完就放一边了
只能打开第二个，keywait需要等键抬起才激活，而你需要按住CTRL不放，这点无法满足。
还找到一个http://ahk8.com/thread-5079.html，但需要结束脚本。

adia

随便注册 发表于 2016-4-20 22:08
我就学了几句，用完就放一边了
只能打开第二个，keywait需要等键抬起才激活，而你需要按住CTRL不 ...

这样呀，给那个网页你看看吧，搞不定也没所谓了，哈哈，若能搞得出来就是惊喜了~
我是新手，也是看不懂怎么写配置。

你能回复我已经感激你了

随便注册

adia 发表于 2016-4-20 22:31
这样呀，给那个网页你看看吧，搞不定也没所谓了，哈哈，若能搞得出来就是惊喜了~
我是新手，也是看不懂 ...

用他们的思路试了试，发送别的字符算凑合出来了，但偏偏发送ctrl不行，按住d不仅AHK在发送send {Ctrl Down}，而且由于键盘不断发送d，两相组合相当于ctrl+d了。想不出招了。


@adia
刚学到重映射，把发送指定键改成重映射，d就变成了ctrl，能解决ctrl+d问题。但还是卡。

        {
                d::Ctrl
        }

这样试试，等待d键抬起，0.05秒内抬起就发送d，没抬则映射d为Ctrl。时间短，单击不显得卡，但长按时会先发送个d，自己调吧。
$d::
KeyWait, d, T0.05
        send d
        d::Ctrl

adia

随便注册 发表于 2016-4-20 22:55
用他们的思路试了试，发送别的字符算凑合出来了，但偏偏发送ctrl不行，按住d不仅AHK在发送send {Ctrl D ...

先谢谢，看到这两篇不知道有没有帮助：
http://amnesiac10.github.io/2014/08/03/times-and-period.html
http://amnesiac10.github.io/2014 ... ation-sequence.html

随便注册

adia 发表于 2016-4-20 23:51
先谢谢，看到这两篇不知道有没有帮助：
http://amnesiac10.github.io/2014/08/03/times-and-period.html ...

原来都这么做过，那个StartTime := A_TickCount还有另一个计时我也用了，但问题就是出在“可以看出长按一个按键时我们可能认为只会发送一次按下事件，但实际上它会发送连续的按下事件”。计时不是算第一次按下，而是算最新一次。

adia

随便注册 发表于 2016-4-21 00:08
原来都这么做过，那个StartTime := A_TickCount还有另一个计时我也用了，但问题就是出在“可以看出 ...

大虾你厉害！那么最终应该怎样写呢？能再传一次附件吗

随便注册

adia 发表于 2016-4-21 00:16
大虾你厉害！那么最终应该怎样写呢？能再传一次附件吗

就是6楼最后那4行，自己调一下等待时间，我在记事本里测试的Ctrl+A、Ctrl+X
如果用了后出现奇怪的问题，比如点不了东西，窗口无法激活，可能是Ctrl键没“抬”起来，按一下Ctrl

1. $d::
   
2. KeyWait, d, T0.05
   
3. send d
   
4. d::Ctrl
   
5. return
   
6. 
   
7. $l::
   
8. KeyWait, l, T0.05
   
9. send l
   
10. l::Ctrl
    
11. return
    
12. 
    
13. $CapsLock::
    
14. KeyWait, CapsLock, T0.05
    
15. SetStoreCapslockMode, Off
    
16. send {CapsLock}
    
17. CapsLock::Ctrl
    
18. return

复制代码

用他的模仿了一下，长按成为ctrl没问题，但还是单击卡，不能像没脚本时那么快。脚本忘关，打字时很明显，可能机器配置好会好些。

1. $d::
   
2. ;设置起始时间值
   
3. StartTime := A_TickCount
   
4. 
   
5. ;200毫秒后检测d键状态
   
6. sleep 200
   
7. 
   
8. if(GetKeyState("d","P"))
   
9. ;如果按住了，重映射d为Ctrl
   
10.         {
    
11.                 d::Ctrl
    
12.         }
    
13. Hotkey, d up, dUpSub, On
    
14. return
    
15. 
    
16. dUpSub:
    
17. Hotkey, d up, dUpSub, Off
    
18. ;计算按住了多长时间
    
19. TimeLength := A_TickCount - StartTime
    
20. if (TimeLength < 200)
    
21. {
    
22.         send d
    
23. }
    
24. StartTime := ""
    
25. return

复制代码