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

~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}}人
人已赞赏
学习

【func】AutoHotkey实现网络下载的函数DownloadFile()

2021-9-17 10:49:26

其他办公学习

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

2021-9-22 7:07:53

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