11

AutoHotkey:常用技巧分享

 3 years ago
source link: https://zhuanlan.zhihu.com/p/103357456
Go to the source link to view the article. You can view the picture content, updated content and better typesetting reading experience. If the link is broken, please click the button below to view the snapshot at that time.
neoserver,ios ssh client

AutoHotkey:常用技巧分享

create is my all

AutoHotkey是我从2018年开始以至今,一直在用的脚本语言,它是我除了Listary/v2rayN/IDM之外,开机运行的四大工具之一。这篇文章将分享更新一些我最常用(且通用)的AutoHotkey技巧。其一,加强自己对其更多功能进行深入探索的欲望,其二,分享最核心最常用的功能给更多人,毕竟大量常用代码也是我从各处学习搜集而来,自然不希望轮子重复生产。至于本文之外的探索内容,可直接参考官方文档:

AutoHotkey​ahkcn.github.io

什么是AutoHotkey?

AutoHotkey 是一个自由、开源的宏生成器和自动化软件工具,它让用户能够自动执行重复性任务。AutoHotkey 可以修改任何应用程序的用户界面(例如,把默认的 Windows 按键控制命令替换为 Emacs 风格)。它是由定制的脚本语言驱动,旨在提供键盘快捷键或热键。——wikipedia

我一般把其理解为自动化脚本语言,简单说,它可以帮助我完成大量重复性的工作。

/*温馨提示*/
;Windows系统默认的Win快捷键:
;Win + E:打开资源管理器;
;Win + D:显示桌面;
;Win + F:打开查找对话框;
;Win + R:打开运行对话框;
;Win + L:锁定电脑;
;Win + PauseBreak:打开系统属性对话框;
;Win + Q: 本地文件 / 网页等搜索;
;Win + U: 打开控制面板-轻松使用设置中心;

AutoHotkey脚本可以被编译为可执行文件,这样就可以运行在没有安装 AutoHotkey 的电脑上。脚本的源代码为 C++ 语言,可以使用 Visual Studio Express 编译,它还能像 C 一样使用指针进行内存访问。——wikipedia

;Notes: #==win !==Alt ^==Ctrl  +==shift ::分隔 run AHK命令
;=========================================================================
^+r:: ;reload
reload
sleep 1000
msgbox, 4,, The script could not be reloaded. Would you like to open it for editing?
ifmsgbox, yes, edit
return

^Esc::Pause ; 按一次 ^+Esc 会暂停脚本. 再按一次则取消暂停.

#=:: ;窗口透明化增加或者减弱
    WinGet, ow, id, A
    WinTransplus(ow)
    return

#-:: ;窗口透明化增加或者减弱
    WinGet, ow, id, A
    WinTransMinus(ow)
    return
WinTransplus(w){
 
    WinGet, transparent, Transparent, ahk_id %w%
    if transparent < 255
        transparent := transparent+10
    else
        transparent =
    if transparent
        WinSet, Transparent, %transparent%, ahk_id %w%
    else
        WinSet, Transparent, off, ahk_id %w%
    return
}
WinTransMinus(w){
 
    WinGet, transparent, Transparent, ahk_id %w%
    if transparent
        transparent := transparent-10
    else
        transparent := 240
    WinSet, Transparent, %transparent%, ahk_id %w%
    return
}

$CapsLock::Enter ;将少用的caps Lock键映射为Enter键(这样可以用左手回车)replace CapsLock to LeftEnter; CapsLock = Alt CapsLock
LAlt & Capslock::SetCapsLockState, % GetKeyState("CapsLock", "T") ? "Off" : "On"
;=========================================================================
#enter:: ;最大化窗口
WinGet,S,MinMax,A
if S=0
    WinMaximize,A
else if S=1
    WinRestore,A
else if S=-1
    WinRestore,A
return

!enter:: ;最爱代码之窗口置顶
    WinGet ow, id, A
    WinTopToggle(ow)
    return
WinTopToggle(w) {
 
    WinGetTitle, oTitle, ahk_id %w%
    Winset, AlwaysOnTop, Toggle, ahk_id %w%
    WinGet, ExStyle, ExStyle, ahk_id %w%
    if (ExStyle & 0x8)  ; 0x8 为 WS_EX_TOPMOST.在WinGet的帮助中
        oTop = 置顶
    else
        oTop = 取消置顶
    tooltip %oTitle% %oTop%
    SetTimer, RemoveToolTip, 5000
    return
 
    RemoveToolTip:
    SetTimer, RemoveToolTip, Off
    ToolTip
    return
}

!x:: ;关闭窗口
send ^w
return

#c:: ;cosea版以管理员身份打开cmd命令行
Run *RunAs cmd ,,max
return

#m:: ;窗口最小化
WinMinimize, A
return

#space::
run https://www.google.com/ncr
tooltip, 以前向往更加辽阔的天空,走了一小圈,发现`n`n无论是平平淡淡,还是轰轰烈烈,都隐藏不住自己内心的那份虚无缥缈!!!
sleep 2000
tooltip,
return

!space:: ;cosea典藏级原创代码之谷歌搜索终极版
run https://www.google.com/search?q=%clipboard% ;用google搜索剪切板的内容
clipboard1=%clipboard%&tbs=qdr:1,sbd:1
run https://www.google.com/search?q=%clipboard1% ;按时间排序
run https://www.google.com/search?q=%clipboard%&tbs=qdr:m ;只显示最近一个月信息
run https://www.google.com/search?q=%clipboard%&tbs=qdr:y ;只显示最近一年信息
run https://www.google.com/search?q=%clipboard%&as_filetype=pdf ;指定PDF文件
run https://www.google.com/search?q=%clipboard%&tbs=li:1 ;精确匹配
run https://www.google.com/search?&as_epq=%clipboard% ;完全匹配
run https://www.google.com/search?q=%clipboard% inurl:gov ;url包括gov的网站信息
run https://www.google.com/search?q=intitle:%clipboard% ;文章标题中包含关键词的结果
run https://www.google.com/search?q=%clipboard%&source=lnt&lr=lang_zh-CN|lang_zh-TW ;&source=lnt&lr=lang_zh-CN|lang_zh-TW,指定中文网页
run https://www.google.com/search?q=%clipboard%&tbm=isch&tbs=imgo:1 ;&tbm=isch指定搜索谷歌图片
run https://www.google.com/search?q=%clipboard%&tbm=isch&tbs=isz:l ;将URL更改为大尺寸图片&tbs=isz:l
run https://image.baidu.com/search/index?z=3&tn=baiduimage&word=%clipboard% ;z=3是大尺寸,z=9是特大尺寸
run https://www.behance.net/search?content=projects&sort=appreciations&time=week&featured_on_behance=true&search=%clipboard%
run https://www.zcool.com.cn/search/content?&word=%clipboard%
clipboard2=%clipboard%&tbm=isch&tbs=qdr:m,isz:l,imgo:1
run https://www.google.com/search?q=%clipboard2% ;为URL添加&tbs=qdr:m,只显示新近一个月内的图片,&tbs=imgo:1,显示图片大小
tooltip, 那晚,风也美,人也美。。。
sleep 1500
tooltip,
return

+space::
run http://fanyi.youdao.com/
tooltip,世界是你们的,也是我们的,但归根结底是你们的!!!
sleep, 3000
tooltip,
return

#n:: ;cosea强行修改版,最常用功能之打开记事本
IfWinNotExist ahk_class Notepad
{
    run notepad,,max
    WinActivate
}
Else IfWinNotActive ahk_class Notepad
{
    WinActivate
    sleep,500
    WinMaximize,A
}
Else
{
    WinMinimize
}
Return

#i::  ;首先显示当前剪切板内容,然后在获取光标坐标并发送到剪切板
msgbox 当前剪切板的内容为:%clipboard%
MouseGetPos, xpos, ypos
clipboard = %xpos%,%ypos%
msgbox, 小海已为你发送光标位置 (X,Y)=%xpos%,%ypos% 到剪切板
return

+k::run,control

+r::run C:\Windows\system32\Taskmgr.exe

^delete::FileRecycleEmpty ;ctrl+del,清空回收站

F1:: ;窗口切换 ALT+TAB
send,!{tab}
return

;F6::
IfWinNotExist ahk_class Calculator
{
  Run calc
  WinActivate
}
Else IfWinNotActive ahk_class Calculator
{
  WinActivate
}
Else
{
  WinMinimize
}
return

F7::
Shutdown, 1 ;关机
;Shutdown, 2 ;重启
return

;cosea原创神级代码之清除所有标点符号================================
F2:: ;清除所有标点符号,并换行
run notepad,,max
Loop
{
StringReplace, clipboard, clipboard, `, , `r`n, UseErrorLevel ;清除英文逗号
StringReplace, clipboard, clipboard, , , `r`n, UseErrorLevel ;清除中文逗号
StringReplace, clipboard, clipboard, `; , `r`n, UseErrorLevel ;清除英文分号
StringReplace, clipboard, clipboard, ; , `r`n, UseErrorLevel ;清除英文分号
StringReplace, clipboard, clipboard, . , `r`n, UseErrorLevel ;清除英文句号
StringReplace, clipboard, clipboard, 。 , `r`n, UseErrorLevel ;清除中文句号
StringReplace, clipboard, clipboard, : , `r`n, UseErrorLevel ;清除英文冒号
StringReplace, clipboard, clipboard, : , `r`n, UseErrorLevel ;清除中文冒号
StringReplace, clipboard, clipboard, ‘’ , `r`n, UseErrorLevel ;清除中文双引号1
StringReplace, clipboard, clipboard, “ , `r`n, UseErrorLevel ;清除中文双引号2
StringReplace, clipboard, clipboard, ” , `r`n, UseErrorLevel ;清除中文双引号3
StringReplace, clipboard, clipboard, ' , `r`n, UseErrorLevel ;清除英文双引号
StringReplace, clipboard, clipboard, 、 , `r`n, UseErrorLevel ;清除中文顿号
StringReplace, clipboard, clipboard, / , `r`n, UseErrorLevel ;清除右斜杠
StringReplace, clipboard, clipboard, \ , `r`n, UseErrorLevel ;清除左斜杠
StringReplace, clipboard, clipboard, - , `r`n, UseErrorLevel ;清除短横线
StringReplace, clipboard, clipboard, —— , `r`n, UseErrorLevel ;清除长横线
StringReplace, clipboard, clipboard, = , `r`n, UseErrorLevel ;清除等号
StringReplace, clipboard, clipboard, + , `r`n, UseErrorLevel ;清除加号
StringReplace, clipboard, clipboard, ( , `r`n, UseErrorLevel ;清除中文左括号
StringReplace, clipboard, clipboard, ) , `r`n, UseErrorLevel ;清除中文右括号
StringReplace, clipboard, clipboard, ( , `r`n, UseErrorLevel ;清除英文左括号
StringReplace, clipboard, clipboard, ) , `r`n, UseErrorLevel ;清除英文右括号
StringReplace, clipboard, clipboard, 【 , `r`n, UseErrorLevel ;清除中文【
StringReplace, clipboard, clipboard, 】 , `r`n, UseErrorLevel ;清除中文】
StringReplace, clipboard, clipboard, [ , `r`n, UseErrorLevel ;清除[
StringReplace, clipboard, clipboard, ] , `r`n, UseErrorLevel ;清除]
StringReplace, clipboard, clipboard, ! , `r`n, UseErrorLevel ;清除英文感叹号
StringReplace, clipboard, clipboard, ! , `r`n, UseErrorLevel ;清除中文感叹号
StringReplace, clipboard, clipboard, ? , `r`n, UseErrorLevel ;清除中文问号
StringReplace, clipboard, clipboard, ? , `r`n, UseErrorLevel ;清除英文问号
StringReplace, clipboard, clipboard, < , `r`n, UseErrorLevel ;清除英文<
StringReplace, clipboard, clipboard, > , `r`n, UseErrorLevel ;清除英文>
StringReplace, clipboard, clipboard, 《 , `r`n, UseErrorLevel ;清除中文《
StringReplace, clipboard, clipboard, 》 , `r`n, UseErrorLevel ;清除英文》
StringReplace, clipboard, clipboard, @ , `r`n, UseErrorLevel ;清除@
StringReplace, clipboard, clipboard, # , `r`n, UseErrorLevel ;清除#
StringReplace, clipboard, clipboard, $ , `r`n, UseErrorLevel ;清除$
StringReplace, clipboard, clipboard, `% , `r`n, UseErrorLevel ;清除%
StringReplace, clipboard, clipboard, ^ , `r`n, UseErrorLevel ;清除^
StringReplace, clipboard, clipboard, & , `r`n, UseErrorLevel ;清除&
StringReplace, clipboard, clipboard, * , `r`n, UseErrorLevel ;清除*
StringReplace, clipboard, clipboard, `` , `r`n, UseErrorLevel ;清除`
StringReplace, clipboard, clipboard, `:: , `r`n, UseErrorLevel ;清除::
StringReplace, clipboard, clipboard, " , `r`n, UseErrorLevel ;清除"
StringReplace, clipboard, clipboard, { , `r`n, UseErrorLevel ;清除{
StringReplace, clipboard, clipboard, }, `r`n, UseErrorLevel ;清除}
StringReplace, clipboard, clipboard, |, `r`n, UseErrorLevel ;清除|
StringReplace, clipboard, clipboard, ·, `r`n, UseErrorLevel ;清除中文···
StringReplace, clipboard, clipboard, ~, `r`n, UseErrorLevel ;清除~
StringReplace, clipboard, clipboard, _ , `r`n, UseErrorLevel ;清除_
    if ErrorLevel = 0  ; 不需要再进行替换.
        break
}
sleep,200
send,^v
return

F8:: ;cosea原创代码之清除Windows中文件名不能包含下列任何字符: \ / : * ? " < > | 
Loop
{
StringReplace, clipboard, clipboard, ? , , UseErrorLevel ;清除英文问号
StringReplace, clipboard, clipboard, * , , UseErrorLevel ;清除*
StringReplace, clipboard, clipboard, : , , UseErrorLevel ;清除英文冒号
StringReplace, clipboard, clipboard, " , , UseErrorLevel ;清除"
StringReplace, clipboard, clipboard, < , , UseErrorLevel ;清除英文<
StringReplace, clipboard, clipboard, > , , UseErrorLevel ;清除英文>
StringReplace, clipboard, clipboard, / , , UseErrorLevel ;清除右斜杠
StringReplace, clipboard, clipboard, \ , , UseErrorLevel ;清除左斜杠
StringReplace, clipboard, clipboard, |, , UseErrorLevel ;清除|
    if ErrorLevel = 0  ; 不需要再进行替换.
        break
}
return

F9:: ;使用说明:选中后,按下F9。注:只能中译英
	Send, ^c
	ClipWait,2
	If ErrorLevel                          ;如果粘贴板里面没有内容,则判断是否有窗口定义
		Return
 
	Youdao_keyword=%Clipboard%
	Youdao_译文:=YouDaoApi(Youdao_keyword)
	Youdao_音标:= json(Youdao_译文, "basic.phonetic")
	Youdao_基本释义:= json(Youdao_译文, "basic.explains")
	Youdao_网络释义:= json(Youdao_译文, "web.value")
	If Youdao_基本释义<>
	{
		Gui Gui_youdao_danci:add,Edit,x10 y10  w300 h100,%Youdao_音标%
		Gui Gui_youdao_danci:add,Edit,x10 y120 w300 h100,%Youdao_基本释义%
		Gui Gui_youdao_danci:add,Edit,x10 y230 w300 h100,%Youdao_网络释义%
	}
	Else
	{
		Youdao_音标:=RegExReplace(Youdao_译文,"m)({""translation""\:\["")|(""\],""query""\:.*)")
		Gui Gui_youdao_danci:add,Edit,x10 y10  w300 h300,%Youdao_音标%
	}
 
	Gui Gui_youdao_danci:show,,有道网络翻译
	Return
Gui_youdao_danciGuiClose:
Gui_youdao_danciGuiEscape:
	Gui Gui_youdao_danci:destroy
	Return
 
 
 
 
YouDaoApi(KeyWord)
{
    KeyWord:=Sub_UrlEncode(KeyWord,"utf-8")
	url:="http://fanyi.youdao.com/fanyiapi.do?keyfrom=xxxxxxxx&key=1360116736&type=data&doctype=json&version=1.1&q=" . KeyWord
    WebRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1")
    WebRequest.Open("GET", url)
    WebRequest.Send()
    result := WebRequest.ResponseText
    Return result
}
 
 
json(ByRef js, s, v = "")
{
	j = %js%
	Loop, Parse, s, .
	{
		p = 2
		RegExMatch(A_LoopField, "([+\-]?)([^[]+)((?:\[\d+\])*)", q)
		Loop {
			If (!p := RegExMatch(j, "(?<!\\)(""|')([^\1]+?)(?<!\\)(?-1)\s*:\s*((\{(?:[^{}]++|(?-1))*\})|(\[(?:[^[\]]++|(?-1))*\])|"
				. "(?<!\\)(""|')[^\7]*?(?<!\\)(?-1)|[+\-]?\d+(?:\.\d*)?|true|false|null?)\s*(?:,|$|\})", x, p))
				Return
			Else If (x2 == q2 or q2 == "*") {
				j = %x3%
				z += p + StrLen(x2) - 2
				If (q3 != "" and InStr(j, "[") == 1) {
					StringTrimRight, q3, q3, 1
					Loop, Parse, q3, ], [
					{
						z += 1 + RegExMatch(SubStr(j, 2, -1), "^(?:\s*((\[(?:[^[\]]++|(?-1))*\])|(\{(?:[^{\}]++|(?-1))*\})|[^,]*?)\s*(?:,|$)){" . SubStr(A_LoopField, 1) + 1 . "}", x)
						j = %x1%
					}
				}
				Break
			}
			Else p += StrLen(x)
		}
	}
	If v !=
	{
		vs = "
		If (RegExMatch(v, "^\s*(?:""|')*\s*([+\-]?\d+(?:\.\d*)?|true|false|null?)\s*(?:""|')*\s*$", vx)
			and (vx1 + 0 or vx1 == 0 or vx1 == "true" or vx1 == "false" or vx1 == "null" or vx1 == "nul"))
			vs := "", v := vx1
		StringReplace, v, v, ", \", All
		js := SubStr(js, 1, z := RegExMatch(js, ":\s*", zx, z) + StrLen(zx) - 1) . vs . v . vs . SubStr(js, z + StrLen(x3) + 1)
	}
	Return, j == "false" ? 0 : j == "true" ? 1 : j == "null" or j == "nul"
		? "" : SubStr(j, 1, 1) == """" ? SubStr(j, 2, -1) : j
}
 
 
Sub_UrlEncode(str, enc="UTF-8")
{
   hex := "00", func := "msvcrt\" . (A_IsUnicode ? "swprintf" : "sprintf")
   VarSetCapacity(buff, size:=StrPut(str, enc)), StrPut(str, &buff, enc)
   While (code := NumGet(buff, A_Index - 1, "UChar")) && DllCall(func, "Str", hex, "Str", "%%%02X", "UChar", code, "Cdecl")
   encoded .= hex
   Return encoded
}

;神级代码之锁定中英文=============================================
;功能:输入法状态提示 ;f3强制中文 f4强制英文小写 F6强制英文大写
;环境:win10+搜狗输入法,输入法状态切换用默认的shift键。
;作者:kazhafeizhale 知乎@oahgnat11
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
#SingleInstance force

XButton1::^c
XButton2::^v

F3::
	SetCapsLockState,off
	switchime(0)
	switchime()
return

F4::
	SetCapsLockState,off
	switchime(0)
return

;F6:: ;强制英文大写
	SetCapsLockState,on
return

switchime(ime := "A")
{
    if (ime = 1){
        DllCall("SendMessage", UInt, WinActive("A"), UInt, 80, UInt, 1, UInt, DllCall("LoadKeyboardLayout", Str,"00000804", UInt, 1))
    }else if (ime = 0)
    {
        DllCall("SendMessage", UInt, WinActive("A"), UInt, 80, UInt, 1, UInt, DllCall("LoadKeyboardLayout", Str,, UInt, 1))
    }else if (ime = "A")
    {
        ;ime_status:=DllCall("GetKeyboardLayout","int",0,UInt)
        Send, #{Space}
    }
}
;最钟爱代码之音量随心所欲
;=========================================================
~lbutton & enter:: ;鼠标放在任务栏,滚动滚轮实现音量的加减
exitapp  
~WheelUp::  
if (existclass("ahk_class Shell_TrayWnd")=1)  
Send,{Volume_Up}  
Return  
~WheelDown::  
if (existclass("ahk_class Shell_TrayWnd")=1)  
Send,{Volume_Down}  
Return  
~MButton::  
if (existclass("ahk_class Shell_TrayWnd")=1)  
Send,{Volume_Mute}  
Return  

Existclass(class)  
{  
MouseGetPos,,,win  
WinGet,winid,id,%class%  
if win = %winid%  
Return,1  
Else  
Return,0  
}
;=========================================================
#h:: ;cosea原创代码之隐藏windows系统的桌面图标
send,{AppsKey}
send,v
send,d
return
;=========================================================
#+r:: ;获取RGB色
MouseGetPos, mouseX, mouseY
PixelGetColor, color, %mouseX%, %mouseY%, RGB
StringRight color,color,6
clipboard = %color%
msgbox 当前坐标RGB颜色值的十六进制值为#%color%.
return
;=========================================================
#+c:: ;用快捷键得到当前选中文件的路径
send ^c
sleep,200
clipboard=%clipboard% ;windows 复制的时候,剪贴板保存的是“路径”。只是路径不是字符串,只要转换成字符串就可以粘贴出来了
tooltip,%clipboard% ;提示文本
sleep,500
tooltip,
return
;=========================================================
#+t:: ;小海原创-无敌工作神器之终极计时器
var := 0
InputBox, time, 小海御用计时器, 请输入一个时间(单位是分)
time := time*60000
Sleep,%time%
loop,16
{
var += 180
SoundBeep, var, 500
}
msgbox 时间到,啊啊啊!!!红红火火!!!恍恍惚惚!!!
return
;=========================================================
#PrintScreen:: ;关闭显示器
Sleep 1000  ; 让用户有机会释放按键 (以防释放它们时再次唤醒显视器).
SendMessage, 0x112, 0xF170, 2,, Program Manager  ; 0x112 为 WM_SYSCOMMAND, 0xF170 为 SC_MONITORPOWER.
return
;=========================================================
;~LButton:: ;左键拖选文字: 复制
cos_mousedrag_treshold := 20 ; pixels
MouseGetPos, cos_mousedrag_x, cos_mousedrag_y
win1 := WinActive("A")
KeyWait LButton
MouseGetPos, cos_mousedrag_x2, cos_mousedrag_y2
win2 := WinActive("A")
WinGetClass cos_class, A
if(((abs(cos_mousedrag_x2 - cos_mousedrag_x) > cos_mousedrag_treshold
  or abs(cos_mousedrag_y2 - cos_mousedrag_y) > cos_mousedrag_treshold)) and win1 = win2 
  and cos_class != "ConsoleWindowClass")
{
	SendInput ^c
}
return

;自动快捷输入高频常用词,小海御用(规则:高频要快不加.)注:优化已完成
;=========================================================
:*:ffmpeg::
clipboard = ffmpeg -i input.mkv output.mp4
send,^v
return

:*:iffmp::
clipboard = ffmpeg -i input.flv output.mp4
send,^v
return

:*:iiffmp::
clipboard = ffmpeg -i input.mp4 -c:v libx264 -crf 24 -preset slower output.mp4
send,^v
return

:*:sffmp::
clipboard = ffmpeg -i input.mp4 -c:v libx264 -crf 24 -s 1280:720 -preset slower output.mp4
send,^v
return

:*:affmp::
clipboard = ffmpeg -i input.mp4 -vn -acodec copy output.aac
send,^v
return

:*:iaffmp::
clipboard = ffmpeg -i input.m4a -vn -acodec copy output.aac
send,^v
return

:*:ggg::
;clipboard = Dan Ebberts ;可任意更改剪切板内容
clipboard = @Zhangyun123 ;NVIDIA密码
send,^v
return

:*:ddv:: ;c语言编程通用代码段
clipboard=#include <stdio.h>`n`nint main()`n{`n	return 0;`n}
send,^v
send,{up}{enter}{up}
send,`t
send,{F4} ;切换到英文
return

:*:ddd:: ;小海不离键盘秘技之剪切当前行
send,{home}{shiftdown}{end}{shiftup}
send,^x
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
return

:*:eee::^v ;小海不离键盘秘技

:*:deee::
clipboard = `;
send,^v
return

:*:iid::  ; 此热字串通过后面命令将热字串替换成当前日期和时间.
FormatTime, CurrentDateTime,, MM月dd ; 形式:小海01月17短片
;FormatTime, CurrentDateTime,, MM月dd-HH点-mm-ss ; 形式:小海08月16-11点-43-51短片
SendInput 小海%CurrentDateTime%短片
return
;=========================================================
:*:autoh:: ;自动输入AutoHotkey
clipboard = AutoHotkey
send,^v
return

:*:loo::
clipboard = LookAE 更新时间:
FormatTime, CurrentDateTime,, MM月dd日
send,^v
SendInput %CurrentDateTime%
sleep,50
send,{enter}
return

:*:bili::
clipboard = BiliBili
send,^v
return

:*:davi::
clipboard = DaVinci
send,^v
return

:*:disk::
clipboard = DiskGenius
send,^v
return

:*:yout::
clipboard = YouTube
send,^v
return

:*:prev::
clipboard = Previews
send,^v
return

:*:nvd::
clipboard = NVDIA
send,^v
return

:*:prem::
clipboard = Premiere
send,^v
return

:*:midia::
clipboard = Media Encoder
send,^v
return

:*:ctr::
clipboard = Ctrl+
send,^v
sleep,50
send,{f4} ;切换到英文
return

:*:shif::
clipboard = Shift+
send,^v
sleep,50
send,{f4} ;切换到英文
return

:*:exp::
clipboard = Exposure
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:lut::
clipboard = Correction Luts
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:cont::
clipboard = Contrast
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:track::
clipboard = 跟踪Tracking
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:win::
clipboard = Windows
send,^v
return

:*:hsl::
clipboard = HSL Qualifier限定器
send,^v
send,{enter}
return

:*:skin::
clipboard = Color Of Skin
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:col::
clipboard = Color WarPer
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:sty::
clipboard = Look Version 风格Style
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:layer::
clipboard = 图层节点Layer Node
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:out::
clipboard = 外部节点 Outside Node
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:bal::
clipboard = Balance
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:match::
clipboard = 颜色匹配Match
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:hue::
clipboard = Hue/Saturation色相饱和度
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:clean::
clipboard = 去除杂色Clean
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:cre::
clipboard = Creativity
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:film::
clipboard = 胶片颗粒Film Grain或Film Luts
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:lig::
clipboard = 突出主体Key Light
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:vig::
clipboard = 暗角Vignette
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:mag::
clipboard = 品红Magenta洋红
send,^v
sleep,50
send,{f4} ;切换到英文
send,{enter}
return

:*:mavic::
clipboard = 大疆 Mavic Mini
send,^v
sleep,50
send,{f3} ;切换到中文
return

:*:bandi::
clipboard = Bandicam
send,^v
sleep,50
return

:*:lum::
clipboard = Lumetri 颜色
send,^v
sleep,50
send,{f4} ;切换到英文
return

:*:c4d::
clipboard = Cinema 4D
send,^v
sleep,50
send,{f3} ;切换到中文
return

:*:pot::
clipboard = PotPlayer
send,^v
sleep,50
return

:*:ora::
clipboard = Orange&Teal青橙色
send,^v
sleep,50
return

:*:gaf::
clipboard = Gaffer 灯光师
send,^v
sleep,50
return

:*:pho::
clipboard = PhotoShop
send,^v
sleep,50
return

:*:res::
clipboard = Resolution
send,^v
sleep,50
return

:*:lrt::
clipboard = LRTimelapse
send,^v
sleep,50
return

;小海自动化进阶版,注:待优化
;=========================================================
:*:+110:: ;将多次复制的内容叠加到剪切板
msgbox,请在此条提术语之前确定你已经结束了上一次复制
clipboard = %clipboard%
var = %clipboard% ;新的叠加赋值
clipboard =  ; 让剪贴板初始为空, 这样可以使用 ClipWait 检测文本什么时候被复制到剪贴板中.
send ^c
ClipWait  ; 等待剪贴板中出现新的文本
clipboard = %clipboard%
myvar = %var%`r%clipboard%
clipboard := myvar
return

^i:: ;复制并清除把任何复制的文件, HTML 或其他格式的文本转换为纯文本
clipboard =   ; 清空剪贴板
send,^c
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
return

:*:111:: ;无损删除当前行
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
return

:*:222:: ;无损删除当前向下2行
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
return

:*:333:: ;无损删除当前向下3行
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
return

:*:444:: ;无损删除当前向下4行
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
return

:*:555:: ;无损删除当前向下5行
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
send,{end}{shiftdown}{home}{shiftup}{delete}{delete}
return

:*:777:: ;打开小海脚本
send,{f4}
edit ;进入小海脚本并进行编辑
sleep,500
WinMaximize,A ;调用最大化窗口命令
sleep,500
send,^f
return

:*:888:: ;复制当前行到剪切板
send,{home}{shiftdown}{end}{shiftup}
send,^c
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send, {end}
return

:*:999:: ;粘贴剪切板内容到当前行
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send,{home}{shiftdown}{end}{shiftup}
send,^v
send, {end}
return

;=========================================================
+!d:: ;同时按下Shift+Alt+d键,自动删除temp tencent wechat cloudmusic等缓存文件
send,#e
sleep,500
WinMaximize,A
sleep,500
FileRemoveDir, C:\Users\hocto\AppData\Local\Temp , 1
FileRemoveDir, C:\Users\hocto\AppData\Local\Netease\CloudMusic\Cache , 1
FileRemoveDir, C:\Users\hocto\AppData\Roaming\Tencent , 1
tooltip,接下来,小海将为你删除temp tencent wechat cloudmusic等缓存文件,请注意查看容量变化
sleep, 1000
tooltip,
return

^+1::
send,+{home} ;选中并复制当前光标位置到行首
send,^c
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send, {end}
return

^+2::
send,+{end} ;选中并复制当前光标位置到行末
send,^c
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send, {end}
return

^+3::
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send,+{home} ;选中并粘贴当前光标位置到行首
send,^v
return

^+4::
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send,+{end} ;选中并粘贴当前光标位置到行末
send,^v
send, {end}
return

^+5:: ;删除光标到行首的内容
send,+{home}{delete}
return

^+6:: ;删除光标到行末的内容
send,+{end}{delete}
return

!r:: ;直接打开剪切板的网址链接,无需粘贴到chrome浏览器进入
run %clipboard%
tooltip,小海已为你打开剪切板的网址链接!
sleep, 3000
tooltip,
return

;google搜索
;=========================================================
#9:: ;用google搜索剪切板的内容
run https://www.google.com/search?q=%clipboard%
tooltip, 那晚,风也美,人也美。。。
sleep 2000
tooltip,
return

#2:: ;YouTube自动搜索
run https://www.youtube.com/results?search_query=%clipboard%
tooltip, 那晚,风也美,人也美。。。
sleep 1500
tooltip,
return

:*:kkk:: ;谷歌搜索进阶版
clipboard =   ; 清空剪贴板
send,{home}{shiftdown}{end}{shiftup} ;复制当前行到剪切板
send,^c
send, {end}
run https://www.google.com/search?q=%clipboard% ;用google搜索剪切板的内容
tooltip, 那晚,风也美,人也美。。。
sleep 1500
tooltip,
return

:*:kll:: ;谷歌搜索进阶版
send,^a
send,^x
run https://www.google.com/search?q=%clipboard% ;用google搜索剪切板的内容
tooltip, 那晚,风也美,人也美。。。
sleep 1500
tooltip,
return

;=============小海经典高频常用快捷打开网站或文件=============
#g::
run https://github.com/
tooltip,星星之火,可以燎原!!!
sleep, 1500
tooltip,
return

#y::
run https://www.youtube.com
tooltip,1个亿算什么,我们的目标是星辰大海!!!
sleep, 1500
tooltip,
return

#b::
run https://search.bilibili.com/all?keyword=%clipboard%
run https://search.bilibili.com/all?keyword=%clipboard%&order=stow
run https://www.baidu.com/s?wd=%clipboard%
tooltip,与其悲叹自己的命运,不如相信自己的力量!!!
sleep, 1500
tooltip,
return

#t:: ;淘宝搜索
run https://s.taobao.com/search?q=%clipboard%
return

#j:: ;京东搜索
run https://search.jd.com/Search?keyword=%clipboard%
return

#k::
run http://search.chongbuluo.com/
tooltip,在我的字典里,没有“不可能”!!!
sleep, 1500
tooltip,
return

#z::
run https://www.zhihu.com/search?type=content&q=%clipboard%
tooltip,希望我的文章对你我都能有所助益,有所启迪,感谢你的关注与支持。
sleep, 1500
tooltip,
return

#x::
run https://www.xinpianchang.com/index.php?app=search&kw=%clipboard%
run https://www.xinpianchang.com/user/stars/sort-recommend?from=tabUser
run https://www.xinpianchang.com/channel/index/sort-like
return

;小海专用ctrl+shift集
;=========================================================
^+[:: ;复制当前鼠标所在文件文件名,ctrl+shift子集
;请将你的鼠标放在目标文件位置,即将为你复制其文件名
mouseclick, right
send,m
send,^c
send, {enter}
tooltip,已将鼠标所在文件名复制到剪切板
sleep, 1500
tooltip,
return

^+]:: ;复制当前鼠标所在文件文件名并替换为ffmpeg到剪切板,ctrl+shift子集
;请将你的鼠标放在目标文件位置,即将为你复制其文件名
mouseclick, right
send,m
sleep,100
send,^c
sleep,50
send, {enter}
Loop
{
StringReplace, clipboard, clipboard, %A_SPACE% , , UseErrorLevel ;清除空格
StringReplace, clipboard, clipboard, `, , , UseErrorLevel ;清除英文逗号
StringReplace, clipboard, clipboard, , , , UseErrorLevel ;清除中文逗号
StringReplace, clipboard, clipboard, `; , , UseErrorLevel ;清除英文分号
StringReplace, clipboard, clipboard, ; , , UseErrorLevel ;清除英文分号
StringReplace, clipboard, clipboard, . , , UseErrorLevel ;清除英文句号
StringReplace, clipboard, clipboard, 。 , , UseErrorLevel ;清除中文句号
StringReplace, clipboard, clipboard, : , , UseErrorLevel ;清除英文冒号
StringReplace, clipboard, clipboard, : , , UseErrorLevel ;清除中文冒号
StringReplace, clipboard, clipboard, ‘’ , , UseErrorLevel ;清除中文双引号1
StringReplace, clipboard, clipboard, “ , , UseErrorLevel ;清除中文双引号2
StringReplace, clipboard, clipboard, ” , , UseErrorLevel ;清除中文双引号3
StringReplace, clipboard, clipboard, ' , , UseErrorLevel ;清除英文双引号
StringReplace, clipboard, clipboard, 、 , , UseErrorLevel ;清除中文顿号
StringReplace, clipboard, clipboard, / , , UseErrorLevel ;清除右斜杠
StringReplace, clipboard, clipboard, \ , , UseErrorLevel ;清除左斜杠
StringReplace, clipboard, clipboard, - , , UseErrorLevel ;清除短横线
StringReplace, clipboard, clipboard, —— , , UseErrorLevel ;清除长横线
StringReplace, clipboard, clipboard, = , , UseErrorLevel ;清除等号
StringReplace, clipboard, clipboard, + , , UseErrorLevel ;清除加号
StringReplace, clipboard, clipboard, ( , , UseErrorLevel ;清除中文左括号
StringReplace, clipboard, clipboard, ) , , UseErrorLevel ;清除中文右括号
StringReplace, clipboard, clipboard, ( , , UseErrorLevel ;清除英文左括号
StringReplace, clipboard, clipboard, ) , , UseErrorLevel ;清除英文右括号
StringReplace, clipboard, clipboard, 【 , , UseErrorLevel ;清除中文【
StringReplace, clipboard, clipboard, 】 , , UseErrorLevel ;清除中文】
StringReplace, clipboard, clipboard, [ , , UseErrorLevel ;清除[
StringReplace, clipboard, clipboard, ] , , UseErrorLevel ;清除]
StringReplace, clipboard, clipboard, ! , , UseErrorLevel ;清除英文感叹号
StringReplace, clipboard, clipboard, ! , , UseErrorLevel ;清除中文感叹号
StringReplace, clipboard, clipboard, ? , , UseErrorLevel ;清除中文问号
StringReplace, clipboard, clipboard, ? , , UseErrorLevel ;清除英文问号
StringReplace, clipboard, clipboard, < , , UseErrorLevel ;清除英文<
StringReplace, clipboard, clipboard, > , , UseErrorLevel ;清除英文>
StringReplace, clipboard, clipboard, 《 , , UseErrorLevel ;清除中文《
StringReplace, clipboard, clipboard, 》 , , UseErrorLevel ;清除英文》
StringReplace, clipboard, clipboard, @ , , UseErrorLevel ;清除@
StringReplace, clipboard, clipboard, # , , UseErrorLevel ;清除#
StringReplace, clipboard, clipboard, $ , , UseErrorLevel ;清除$
StringReplace, clipboard, clipboard, `% , , UseErrorLevel ;清除%
StringReplace, clipboard, clipboard, ^ , , UseErrorLevel ;清除^
StringReplace, clipboard, clipboard, & , , UseErrorLevel ;清除&
StringReplace, clipboard, clipboard, * , , UseErrorLevel ;清除*
StringReplace, clipboard, clipboard, `` , , UseErrorLevel ;清除`
StringReplace, clipboard, clipboard, `:: , , UseErrorLevel ;清除::
StringReplace, clipboard, clipboard, " , , UseErrorLevel ;清除"
StringReplace, clipboard, clipboard, { , , UseErrorLevel ;清除{
StringReplace, clipboard, clipboard, }, , UseErrorLevel ;清除}
StringReplace, clipboard, clipboard, |, , UseErrorLevel ;清除|
StringReplace, clipboard, clipboard, ·, , UseErrorLevel ;清除中文···
StringReplace, clipboard, clipboard, ~, , UseErrorLevel ;清除~
StringReplace, clipboard, clipboard, _ , , UseErrorLevel ;清除_
    if ErrorLevel = 0  ; 不需要再进行替换.
        break
}
sleep,50
mouseclick, right
sleep,100
send,m
sleep,100
send,^v
sleep,50
send, {enter}
;clipboard = ffmpeg -i %clipboard%.mp4 -c:v libx264 -crf 24 -preset slower %clipboard%output.mp4 ;mp4版压制
clipboard = ffmpeg -i %clipboard%.mkv %clipboard%output.mp4 ;mkv转mp4
return

^+\:: ;为ffmpeg赋值input,ctrl+shift子集
;请将你的鼠标放在目标文件位置,即将为你复制其文件名
mouseclick, right
send,m
clipboard = input
send,^v
send, {enter}
tooltip,已为ffmpeg赋值input
sleep, 500
tooltip,
return

^+m:: ;将鼠标所在文件重命名为剪切板内容,ctrl+shift搭配子集
clipboard = %clipboard%   ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send,{F8}
sleep,100
mouseclick, right
send,m
send,^v
send, {enter}
tooltip,已为你将鼠标所在文件重命名为剪切板内容
sleep, 1500
tooltip,
return

!m:: ;cosea鼠标累加数字算法,我一般用来批量重命名,看需求更改吧
FormatTime, CurrentDateTime,yyyyMMddHHms,yyyyMMddHHms
clipboard := CurrentDateTime
var += 1
EnvAdd, clipboard, var
sleep,300 ;会有滞后现象
send,{AppsKey}
send,m
send,^v
send, {enter}
sleep,300
send,{down}
Exit

~Alt:: ;比如你可以用上面的方法,用AutoHotkey驱动蜂鸣器发出声音
if (A_ThisHotkey = A_PriorHotkey && A_TimeSincePriorHotkey < 200)
/*
检测按键或按钮的双击
*/
loop,1500
{
var += 1
SoundBeep, var, 500
}
return

^+,:: ;将当前复制的内容存储到小海临时剪切板的库存中,等待下一条命令的临时调用,ctrl+shift子集
send,^c
clipsaved := clipboardall   ; 把剪贴板的所有内容保存到您选择的变量中
; ... 这里临时使用剪贴板, 例如使用 Transform Unicode 粘贴 Unicode 文本
lstime := clipsaved
return

^+.:: ;将小海临时剪切板的库存中的内容全部粘贴到当前文档,ctrl+shift子集
clipboard := lstime   ; 恢复剪贴板为原来的内容. 注意这里使用 Clipboard (不是 ClipboardAll)
send,^v
return

;创意添加区域
;=========================================================
:*:+++:: ;为辅助小海脚本编辑,此命令将自动为剪切板内容添加run和空格并换行,等待下一句
clipboard = run %clipboard% ,,max
send, ^v
return

:*:.sbts:: ;为小海脚本添加鼠标提示语命令
(
tooltip,小海已为你打开
sleep, 1500
tooltip,
return
)
return

:*:.fzml:: ;为小海脚本添加分支命令
(
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
)
return

:*:.max:: ;为小海脚本添加窗口最大化命令
clipboard = sleep,500`nWinMaximize,A
send,^v
return

;快捷打开PC应用软件,台式电脑唯一不变区域
;=========================================================
!c::
IfWinNotExist ahk_class Chrome_WidgetWin_1
{
    Run "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
    WinActivate
}
Else IfWinNotActive ahk_class Chrome_WidgetWin_1
{
    WinActivate
}
Else
{
    WinMinimize
}
Return
;=========================================================
;**结束语:**`从`此,`让`我`们`将`生`活`过`得`五`彩`斑`斓。
;=========================================================
;以下为非通用但可自定义的部分,选了一些原创灵感型的
;=========================================================================
;user-defined网易云音乐自动点赞::
loop,5
{
loop,2
{
loop,45
{
clipboard := 175
var += 25
EnvAdd, clipboard, var
click,1882,%clipboard%
sleep,90
}
sleep,500
send,{pgdn}
sleep,500
var =: 0
}
sleep,200
send,{end} ;页末
sleep,200
click,1783,1143 ;点击下一页
sleep,800
send,{home}{pgdn}
sleep,300
}
return

;user-defined打开字体天下所有中文字体的网页::
loop,477
{
clipboard := 0
var += 1
EnvAdd, clipboard, var
run http://www.fonts.net.cn/fonts-zh-%clipboard%.html
}
return

;user-defined 字体天下自动生成字体预览效果::
Loop,10
{
click,1518,673
clipboard = 真想砍下某人的头颅当柴烧 应该是不错的燃料
send,{home}{shiftdown}{end}{shiftup}
send,^v
click,1900,676 ;点击预览
sleep,300
send,^{pgdn}
sleep,200
}
return

;user-defined PR剪辑自动添加剪切点并间隔删除::
loop,10
{
send,c{right}
}
loop,10
{
send,{up}
}
loop,5
{
send,d{delete}
send,{down}{down}
}
loop,10
{
send,{up}
}
return

;user-defined PR剪辑临时通过s d f组合删除气口::
:*:d::
send,c
loop,10
{
send,{right}
}
send,q
return
:*:f::
send,c
loop,3
{
send,{right}
}
send,q
return
:*:s::
send,c
loop,3
{
send,{left}
}
send,w
return

;user-defined PR剪辑临时通过s d f组合删除气口高阶节奏版::
:*:e::
send,c
loop,20
{
send,{right}
}
send,c
send,{up}
send,g
Loop,4
{
send,[ ;备注:临时对调快捷键[ 与+[ 
}
send,{down}
return

:*:d::
send,c
loop,10
{
send,{right}
}
send,c
send,{up}
send,g
Loop,4
{
send,[ ;备注:临时对调快捷键[ 与+[ 
}
send,{down}
return

:*:f::
send,c
loop,3
{
send,{right}
}
send,c
send,{up}
send,g
Loop,4
{
send,[
}
send,{down}
return

:*:s::
send,c
loop,5
{
send,{left}
}
send,c
send,g
Loop,4
{
send,[
}
return

:*:x::
send,{up}
send,g
send,a
send,w
return

:*:z::
Loop,2
{
send,^z
}
return

;user-defined PS字幕临时通过d f键整理巨大篇幅字幕文稿
:*:d::
send,{delete}{space}^s
return
:*:f::
loop,18
{
send,{right}
}
return

;user-defined PR剪辑临时通过s d f组合删除气口高阶节奏版字幕::
:*:e::
loop,5
{
send,{down}
}
send,w
send,{space}
return

:*:d::
loop,3
{
send,{down}
}
send,w
send,{space}
return

:*:f::
loop,2
{
send,{down}
}
send,w
send,{space}
return

:*:s::
send,{up}
return

:*:z::
send,^z
return

;user-defined PS大篇幅字幕自动导入PR项目::
Loop,3000
{
send,{enter}
sleep,50
}
return

;user-defined 根据PR已有剪切点为新片段自动添加相同剪切点::
loop,100
{
send,c{down}
}
return

;user-defined chorme浏览器自动添加标签页到收藏夹::
loop,5 ;请更改
{
sleep,50
send,^d{enter}
sleep,350
send ^w
sleep,350
}
return

;user-defined 强制关闭鼠标所在窗口::
click
sleep,20
send,!{f4}
return

;user-defined lookae网站资源一网打尽::
keyword := clipboard ;请复制以设置你想搜索的关键词
loop,38 ;请修改循环次数
{
clipboard := 0
var += 1
EnvAdd, clipboard, var
run https://www.lookae.com/page/%clipboard%/?s=%keyword%
}
return

;user-defined 结合Linkclump一网打尽之一键自动打开当前页面所有链接::
MouseClickDrag, right, 238,367, 1681,1063 , 4 ;请设置链接坐标范围
sleep,500
send,{pgdn}
MouseClickDrag, right, 238,367, 1681,1063 , 4 ;请设置链接坐标范围
sleep,800
send,^w
sleep,1500
click,1584,60
return

;user-defined 为文件添加末尾数字以对付重复的文件名::
clipboard = 1
mouseclick, right
send,m
send,{right}
sleep,20
send,^v
sleep,20
send, {enter}
return

;user-defined 删除下载文件自动添加的末尾名::
mouseclick, right
send,m
send,{right}
loop,10 ;请更改
{
send,{backspace}
}
sleep,20
send, {enter}
return

;user-defined 资料整理,清除不需要的文件::
clipboard = lookae
send,{home}{shiftdown}{end}{shiftup}
send,^v
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = .DS_Store
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = __MACOSX
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = ._
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = 更多免费资源下载
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = url
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = about
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = 推广
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
clipboard = txt
send,{home}{shiftdown}{end}{shiftup}
msgbox,4,,是,继续,否,停止
ifmsgbox, no
    return
return

;user-defined 自动添加压缩包::
mouseclick, right
sleep,100 ;同时多个压缩会卡请调速
send,a
sleep,300
send, {enter}
return

;user-defined 定时点击::
loop,24
{
click,3294,95
sleep,1000
click,3123,17 ;注意两次的点击位置是不同的
sleep,1800000 ;每30分钟点击一次
}
return

;user-defined 小海临时使用,potplayer不离键播放下一个视频::
send,{pgdn}
;send,{delete}
return

About Joyk


Aggregate valuable and interesting links.
Joyk means Joy of geeK