在行代码后自动插入一些空格,用注释符结束

~LButton::                                                                              ;

keywait,Lbutton ,T0.3                                                                   ;

if errorlevel                                                                           ;
  {
 send, {Lbutton down}                                                                   ;
   gosub 长按                                                                           ;

}                                                                                       ;
else {                                                                                  ;
  
Send {lbutton}                                                                          ;
send {left}{right}
}                                                                                       ;
                                       
return

 

 

#IfWinActive ahk_class Notepad                                                          ;

rbutton::                                                                               ;
Winminimize,A
suspend
return
#IfWinActive

   

 

长按:

 minGap  = 8                                                                           ;
  mousegetpos xpos1,ypos1
  Keywait, LButton, U                                                                  ;             

  mousegetpos xpos2, ypos2                                                             ;
  if (abs(xpos1-xpos2) < minGap and abs(ypos1-ypos2)<minGap)                           ; 不动发送到出Lbutton
  send, {Lbutton up}                                                                   ;

  else if (xpos2-xpos1 > minGap and abs(ypos1-ypos2)<minGap)                           ; left  
     Gosub 右
 
 else  
    send, {Lbutton up}
  return

右:
cd :=”88″
tooltip,开始剪切
     SetTimer,倒计时,888
       send {Rbutton}{down 2}{enter}    
         send, {Lbutton up}
space_0 := “1”
return

#if space_0 = 1
$Space::
changdu :=StrLen(Clipboard)
    ;MsgBox,剪切的字符个数为%changdu%。
       cd :=cd-changdu
          ;MsgBox,cd值为:%cd%个字符。
              send ^v
loop %cd%
{     
   send {space}

send {;}
space_0 := “0”                                                                          ;关闭功能

return
#if 

 

 

倒计时:
tooltip,
return

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。

给TA捐赠
共{{data.count}}人
人已捐赠
函数教程

【类】深入理解进制及其转换,AutoHotkey进制转换(二进制 十进制 十六进制)函数,AutoHotkey v2.0+

2021-9-15 21:13:29

其他教程案例

输入法设置英文,扩展名隐藏,文件名后添加来自剪贴板的字符串

2021-9-22 7:07:53

0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
购物车
优惠劵
有新私信 私信列表
搜索