Code: Select all
;Change USB Drive xF:\
#NoEnv
#Warn
#SingleInstance, Force
;SendMode Input
;SetWorkingDir %A_ScriptDir%
;#MaxMem 68
;#Include DuR.ahk
;SetControlDelay -1
#KeyHistory 10
gv_d := StrReplace(A_Desktop, "\Desktop") ;Dynamic UserProfile
gv_p=%gv_d%\cdx
gv_u := StrReplace(A_AppData, "\AppData\Roaming") ;Run, %comspec% /c echo `%userprofile`%|Clip
gv_a := StrReplace(A_AppData, "\Roaming")
;gv_k=Browser_Back,Browser_Favorites,Browser_Forward,Browser_Home,Browser_Refresh,Browser_Search,Browser_Stop,Launch_App1,Launch_App2,Launch_Mail,Launch_Media,Media_Next,Media_Play_Pause,Media_Prev,Media_Stop,Volume_Down,Volume_Mute,Volume_Up,Escape,F1,F2,F3,F4,F5,F6,F7,F8,F9,F10,F11,F12,``,1,2,3,4,5,6,7,8,9,0,-,=,A,B,C,D,E,F,G,H,I,J,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,[,],;,',\,",",.,/,Tab,CapsLock,Backspace,Enter,Space,Shift,LShift,RShift,Alt,LAlt,RAlt,LWin,RWin,Control,LControl,RControl,AppsKey,PrintScreen,Insert,Delete,ScrollLock,Home,End,Pause,PgUp,PgDn,Up,Down,Left,Right,NumLock,NumpadDiv,NumpadMult,NumpadSub,NumpadAdd,NumpadEnter,NumpadDot,Numpad0,Numpad1,Numpad2,Numpad3,Numpad4,Numpad5,Numpad6,Numpad7,Numpad8,Numpad9,NumpadDel,NumpadIns,NumpadEnd,NumpadDown,NumpadPgDn,NumpadLeft,NumpadClear,NumpadRight,NumpadHome,NumpadUp,NumpadPgUp,LButton,MButton,RButton,WheelDown,WheelLeft,WheelRight,WheelUp,XButton1,XButton2
;GCx() return
vBz=
(c Join `n
;"D:\Opera GX\86.0.4363.32\opera.exe
;"D:\Deux\cdx\Browserz\
;Opera\86.0.4363.32\opera.exe
;Chrome\chrome.exe
"C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe
" /private "
)
WinSet, Transparent, 225, ahk_class Shell_TrayWnd
Loop, parse, % "US,UK,Anonymous,Socks,Free", `,
GroupAdd, Bx, % A_LoopField " Proxy"
GA("Txz", "EditPlus,CodeQuickTester,Atlantis Word")
GA("Txz",, "Notepad,Notepad++")
GA("DPLV", "ahk_class Photo_Lightweight_Viewer,ahk_exe JPEGView.exe")
GA("CWC",, "ConsoleWindowClass,CASCADIA_HOSTING_WINDOW_CLASS")
GA("CFx", "Select Files to Compare,kdiff3")
GA("CFw", "ahk_exe sgdm.exe,ahk_class Qt5QWindowIcon")
GA("Edz", "Advanced Renamer,CodeQuickTester,EditPlus,Microsoft Visual Basic,Atlantis Word")
GA("Edz",, "#32770,AutoHotkey,CabinetWClass,Chrome_WidgetWin_1,ConsoleWindowClass,EVERYTHING,MozillaWindowClass,MSPaintApp,Notepad,Notepad++,Qt5QWindowIcon,Window,wxWindowNR")
GA("Edz", "cmd", "VirtualConsoleClass")
GA("WPD",, "WorkerW,Progman")
GAx()
GAx(, "[Relic] AHK Ideas")
Traytip, % A_IsAdmin " ) " A_ScriptFullPath, Loaded
return
;//////////////////////////[Context-Senstitive]//////////////////////////
;////////////////////////////[#IfWinExist]/////////////////////////////
#IfWinExist Pop-upHost
Right::I("+^5") ;[Win 11]
#IfWinExist EVALUATION
Down::ControlClick, Button3, EVALUATION
#IfWinExist ahk_group CWC
NumpadDot::I("^c!`t{Sleep 300}{Click r}")
#ifWinExist ahk_class AvastCefToaster
SC16C::Winclose ahk_class AvastCefToaster
;//////////////////////////////////[Stacking]/////////////////////////////
#ifWinExist FIREWALL
PgUp::ControlSend,, {Alt Down}r{Alt Up}{Alt Down}a{Alt Up}, FIREWALL
PgDn::ControlSend,, {Alt Down}r{Alt Up}{Alt Down}d{Alt Up}, FIREWALL
#IfWinExist Untitled - Notepad
;f1::
f5::SetTimer, HideTraynToolTip, -500
7::LF() ;Loop n Get FileList
9::Clipboard:=IDV()
;0::CC(gv_d "\Desktop\NCl.txt")
0::TAC()
<^9::Msgbox % CRLF2(MB0(), ",") ;[Revert] Continuation Section for Clipboard Content
<^0::Msgbox % "(c Join,`n" StrReplace(Clipboard, ",", "`n") "`n)" ;[Make] Continuation Section for Clipboard Content
<^f4::Fcmd()
<^f6::xdz()
<^f9::Run, Move Files.ahk
<^f10::NED()
<^f11::CR(1) ;[ReInstaller]
<^f12::CR() ;[Set Current Directory]
<^3::Clipboard:=R09()
;<!f6::
<!9::hq(1) ;[E]
<!0::hq(1, 1) ;[D]
>!NumpadMult::WatchCursor(2) ;Control List
>!NumpadSub::WatchCursor(1) ;Control Text of the ahk_id in Clipboard
NumpadDot::WatchCursor() ;[ahk] Window Properties @ [W]indows.txt
NumpadEnter::clipboard:=GTC()
;Numpad0::Runwait, %comspec% /c net "stop spooler",, hide
;Del::Runwait, %comspec% /c del "C:\Windows\System32\spool\printers\* /Q /F /S",, hide
;Numpad1::Runwait, %comspec% /c net "start spooler",, hide
:: rd::
RBD(1) ;Preserve Line Number
return
:: rbd::
RBD()
return
:: fc:: ;Checks If the Files in the [File in the Clipboard] Exist
CheckIfFileExists()
return
::x4::
xw404()
return
::xd:: ;Extract Downloaded Links
xlz()
return
::xfr:: ;Remove PHOTO ENCODING
xfr()
return
#IfWinExist ahk_class EVERYTHING
SC119::PES() ;::TzT("PES", 4500)
#IfWinExist Find ahk_class #32770
SC119::Ix(, "{Click}f")
NumpadSub::ControlSend,, !p, Find ahk_class #32770
f4::FindNext()
;////////////////////[Edit++ Recording/Replacement Mode]///////////////////////
#IfWinExist Replace
1::Ix(, "{Click 224 379};") ;Alt+end [^;][Edit++]
2::I("{Click 224 379}{Alt Down}-{Alt Up}") ;Remove Blankz
3::Ix(, "{Click 224 379}'") ;Alt+eeh [^'] [Edit++]
4::I("{Click 224 379}{Alt Down}y{Alt Up}") ;Remove Dupz
6::Ix(, "{Click 224 379}{Shift Down}{Alt Down}az{Shift Up}{Alt Up}") ;Remove [Leading+Trailing] Spaces
f5::I("{Click 224 379}{Ctrl Down};{Sleep 200}'{Shift Down}{Alt Down}az{Ctrl Up}{Shift Up}-y{Alt Up}") ;All [Edit++]
F8::CSR(6, "l", 0) ;Load the Beginning BIO Item, in the Replace Window
F11:: ;Replace All & Load Next Replace Item in List...
CSR(,"a")
F10::CSR(6, "l", 1) ;Load Next Replace Item from List... in Edit++ Replace Window
;Replace all, [Remove Consecutive Dupes] & Load Next Replace Item
NumpadSub::RNP(0) ;SendInput, !a!i{^}(.*)\n(.*\n)(.*\n)(.*\n)\{Numpad1}{Tab}\2\3\4\{Numpad1}{Tab}ai{^}(.*)\n(.*\n)(.*\n)\{Numpad1}{Tab}\2\3\{Numpad1}{Tab}ai{^}(.*)\n(.*\n)\{Numpad1}{Tab}\2\{Numpad1}{Tab}ai{^}(.{+})\n\{Numpad1}{Tab}\{Numpad1}{Tab}al{Down}`n
NumpadAdd::RNP() ;SendInput, !a!i{^}(.*\n)\{Numpad1}{Tab}\{Numpad1}{Tab}ai{^}(.*\n)(.*\n)\{Numpad1}{Tab}\{Numpad1}\2{Tab}ai{^}(.*\n)(.*\n)(.*\n)\{Numpad1}{Tab}\{Numpad1}\2\3{Tab}ai{^}(.*\n)(.*\n)(.*\n)(.*\n)\{Numpad1}{Tab}\{Numpad1}\2\3\4{^}(.*\n)(.*\n)(.*\n)(.*\n)(.*\n)\{Numpad1}{Tab}\{Numpad1}\2\3\4\5{Tab}al{Down}`n
;NumpadEnter::ControlSend,, {Alt d}xoa{Alt u}, ahk_class #32770, Replace
#IfWinExist ahk_class PotPlayer64
~SC16C::WinActivate
#IfWinExist
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
;/////////////////////////////[#IfWinNotExist]//////////////////////////
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
;#IfWinNotExist Replace
;#IfWinNotExist
;/////////////////////////////////[#IfWinActive]////////////////////////////
;///////////////////////////////////[Stacking]//////////////////////////////
#IfWinActive Find & Replace List ahk_class #32770
F12::TzT("SpamClick", 50) ;LShift::TzT("CheckBx", 500)
#IfWinActive ahk_class PotPlayer64
SC110::I("!`t{Down}`n")
#IfWinActive Avast Premium Security ahk_class #32770
9::I("{Down}`n", 1)
#IfWinActive ahk_class AvastCefDialog
Up::CCA()
Down::CCA(1)
#ifWinActive ahk_class AvastCefWindow ;Avast Allow App Path...
Down::ControlSend, Chrome_RenderWidgetHostHWND1, {Click}{tab 3}{Space}`t{Space}`t{Space}`t`n, Avast Premium Security ahk_class AvastCefWindow
#IfWinActive ahk_class HH Parent
f3::I("!s")
RShift::I("^v`n")
#IfWinActive ahk_group DPLV
$Del::I("{Del}y")
NumpadAdd::I("{Right 10}")
;Up::J2U(2)
;Up::J2U(3)
;Numpad2::J2U(1)
;Numpad0::J2U()
;Down::J2U(4)
;Down::Mov4()
#IfWinActive This PC
;Del::
Capslock::I("vd", 1)
NumpadMult::I("!1")
#IfWinActive ahk_class CabinetWClass
$Del::
#IfWinActive ahk_class Photo_Lightweight_Viewer
$Del::
#IfWinActive ahk_class FastStoneImageViewerMainForm.UnicodeClass
$Del::I("+{Del}")
#IfWinActive ahk_class MSPaintApp
/*
[Edit Image] Selection & Navigation
Ctrl + Arrow keys = move mouse
Ctrl + comma = left click
Ctrl + period = right click
Ctrl + , + Arrowkey
Release all keys
Use Ctrl+Arrow to Navigate
Once Selection is Done
Press & Release Ctrl + ,
P.S. Move the Selection Using Just Arrow Keys
^Up::MouseMove, 0, -ov, 0, R
^Down::MouseMove, 0, ov, 0, R
^Left::MouseMove, -ov, 0, 0, R
^Right::MouseMove, ov, 0, 0, R
^,::SendInput, % (A_PriorHotKey = A_ThisHotKey) ? "" : "{click down}"
^, up::click up
^.::click right
*/
CapsLock::I("!hser")
;ScrollLock::
;SC110::
6::SendInput, % "{Click " (GetKeyState("LButton") ? "u" : "d") "}" ;Click & Hold [Left Mouse Button]
;Up::I("{Ctrl d}{Up d}")
;Up up::I("{Ctrl u}{Up u}")
Down::I("^{Down}")
Left::I("^{Left}")
Right::I("^{Right}")
Numpad8::MMov("u")
Numpad2::MMov("d")
Numpad4::MMov("l")
Numpad6::MMov("r")
NumpadPgUp::MCD() ;RU
NumpadPgDn::MCD(, "d")
NumpadHome::MCD("l")
NumpadEnd::MCD("l", "d")
#IfWinActive ahk_class Photo_Lightweight_Viewer
f1::I("{AppsKey}r") ;[Open] Properties Window
f3::I("{Appskey}i") ;[Open] File Location
f6::ow_dx("c", 1)
1::I("{Left}")
3::I("{Right}")
ScrollLock::MouseClickDrag, left, 485, 168, 886, 657, 50
#IfWinActive PNGz ahk_class CabinetWClass
f7::
GFx("c")
WinActivate, Ultimate Icon
ControlSetText, WindowsForms10.EDIT.app.0.13965fa_r13_ad14, %Clipboard%, Ultimate Icon
ControlClick, WindowsForms10.BUTTON.app.0.13965fa_r13_ad19, Ultimate Icon
return
f9::
Iw("el", "x")
Loop, parse, clipboard, `n, `r
FileMove, % A_LoopField, %gv_d%\Downloads\Pictures\AirSendit\_icoz\PNGz\Done
ClipB(0)
return
#IfWinActive ahk_group WPD
f2::PE(0)
;Run, D:\Linkz\Shortz\Ez Linkz\Windows 7
;Run, %gv_p%\0-JPG Toolz\Icoz
;Run, explore F:\[W]Portz\Essential Batch Filez N Textz\Default Settings\AutoHotkey\AHK Textz
;Run, C:\Users\Primus\Downloads\AirSendit\_icoz
;Run, %gv_d%\Downloads\Pictures\Bulkz\Getz
;Run, %gv_d%\Downloads\Pictures\PrimeQ\Search Foto
vkB4::Run, %gv_p%\Essential Batch Filez N Textz\Index\mlnkz
vkAC::Run, %gv_d%\[WB]\[AB]
vkB6::
vkB7::Run, %gv_d%\Desktop
vkAD::run %gv_p%\Essential Batch Filez N Textz\Default Settings\Opera ;[Mute]
;vkB3::
vkB1::run %gv_d%\Desktop\LTz\Inz
vkB0::Run, %gv_d%\Desktop\LTz\Logz\Wlogz
vkAF:: ;[AF Volume Up]
vkAE::Run, %gv_d%\Downloads\Music
;f1::
f3::I("{Appskey}{Down 2}`n") ;[Open] File Location
f4::Run, D:\Linkz\Batz
f5::Run, %gv_d%\cdx\Essential Batch Filez N Textz\Default Settings\AutoHotkey\AHK Textz
f6::Run, %gv_p%\Archiverz\Unzipped Files
^f6::FileRecycleEmpty
;+f6::
f7::
f8::Run, %gv_p%\Essential Batch Filez N Textz\Default Settings\Quick Launch
;Run,%A_AppData%\Microsoft\Windows\Recent
f9::Run %gv_p%\Essential Batch Filez N Textz\Index\Pathz\Quickz [H].txt
f10::Run, %gv_d%\Downloads\Programs\Not Tried
f11::Run, % ComSpec " cd /d " A_Desktop
;Run, % ComSpec " cd /d ""C:\Users\Prius\Desktop"""
f12::Run, %gv_p%\USB Toolz
;\::Run, F:\[W]Portz\AHK
\::Run, %gv_p%\Essential Batch Filez N Textz\Default Settings\AutoHotkey\AHK Modelz\Samplz\MS Word Excel
/::run, % WinExist(A_ScriptDir "ahk_class CabinetWClass") ? A_Windir "\hh.exe " gv_p "\Autz\AHK_Express\AutoHotkey.chm" : A_ScriptDir
;C:\Windows\hh.exe
RShift::Run, %gv_p%\Archiverz
RAlt::I("{Click r}vn{Click r}oi") ;Auto-Arrange Desktop Items
SC122::Run, % A_Desktop
RCtrl::TBT()
Pause::Run, C:\Program Files (x86)
Del::Run, Notepad "%gv_p%\Del-Nukz.bat"
Home::Run, %gv_d%\Downloads\Pictures
End::Run, %gv_d%\Documents
PgUp::Run, %gv_p%\Downerz
PgDn::Run, %gv_p%\Essential Batch Filez N Textz\Default Settings\Downz
NumpadDiv::run ::{20d04fe0-3aea-1069-a2d8-08002b30309d}
NumpadSub::I("vd", 1) ;SendInput {Click, r}vd
#IfWinActive ahk_class CabinetWClass
SC122::I("v", 1)
f1::WPnSPF() ;Get [File Properties] ;[Fix Shortcuts] WPnSPF(0)
~f2::zRen()
f3::I("{Appskey}{Down 2}`n") ;[Open] File Location
f6::ow_dx("c", 1) ;Open With [Edit+] txt & 7z Rip
f7::ow_dx("c") ;7z [UnZip]
f9::ow_d("c", 1)
f10::ow_d("c", 0)
f11::Run, % ComSpec " /k cd /d " GCD() ;SendInput +{Appskey}w`n ;[Open Command Window Here]
f12::I("!3") ;Invert Selection
>^f11::Run, % "*RunAs " ComSpec " /k cd /d " GCD() ;[Same As Admin]
;>!f11::Run, % "powershell.exe -noexit -command Set-Location -literalPath '" GCD() "'"
;>!f11::Run, % "wt -d """ GCD() "\."""
>!f11::Run, % gv_p "Cmder\Cmder.exe """ GCD() """"
;>!f11::Run, % gv_p "\USB Toolz\conemu\bin\ConEmu64.exe """ GCD() """"
>^SC110::Clipboard:=GCD() ;Get Current Directory to Clipboard
<![::Clipboard:=GFx("c", 5)
<!]::Clipboard:=GFx("c", 3)
<!;::PasteInNewTxt(, 1) ;[Duplicate Text to Edit+] Copy+Read+Paste
>!;::PasteInNewTxt(, 1, "D:\xoxo.log") ;Copy+Read+Write
<!f6::PasteInNewTxt(, 1) ;Copy+Paste
>!f6::PasteInNewTxt(,, "D:\xoxo.log") ;Copy+Write
2::I("e", 1)
3::I("#x")
4::I("!fo")
7::I("!4") ;[via][Explorer] Copy Path of the Selected File/Folder(s) ;7::Clipboard:=GFx("c")
;7::I("{Appskey}a") ;[Win 11]
;7::Clipboard:=GFx("c", 1) ;Get Selected Files Extension
/::Run, % "powershell.exe -noexit -command get-filehash '" GFx("c") "'"
Capslock::I("{Click}") Ix(, "{Left 10}") I("{Right}")
NumpadMult::I("{Down}`n")
;NumpadMult::D3x(GCD())
RShift::I("!{Up}") ;"RButton is: " GetKeyState("RButton")
#IfWinActive EditPlus - [SD.txt
Numpad5::mux("bl", 1) ;Media info
Numpad6::fvx("bl")
Numpad9::mux("bl")
Numpad4::pv("bl", 0)
Numpad1::pv("bl")
#IfWinActive EditPlus - [ColRef
::/:: / {Ctrl Down}vs{Ctrl Up}
#IfWinActive 2022
^f5::Iw() RPL()
;#IfWinActive EditPlus - [Untitled
#IfWinActive EditPlus - [Del-Nukz
;#IfWinActive Del-Nukz - Notepad
>^<!>+\:: ;[Paste-Save]
I("^c{Down}")
WinActivate, ahk_class Chrome_WidgetWin_1
I("{Alt Down}g{Alt Up}")
I("{Del}+{End}^x{F12}^v`n^s{F12}")
ClipB()
ControlSend, AfxFrameOrView140su1, {Del}+{End}^x, EditPlus - [Untitled
clipwait
Run %clipboard%
;Winwait, ahk_class FontViewWClass ;Photo_Lightweight_Viewer
return
/* ;fone no.
Capslock:: ;Ix(, "x{End}") I("`n") Ix(, "vs") ;Cut Line & Append
Ix(, "+!{f11}") Ix(, "{Home}") I("!d") I("+{f11}") Ix(, "g") ;Clear Marks-Mark-Invert Marks-Goto Line
WinwaitActive Go
I("4050`n")
WinwaitClose Go
I("{f4}")
return
I("{Click}{Home}+{Down 6}") ;Select 6 lines
I("^x!`t") ;I("+{PgDn}")
I("{Click}{End}") Ix(, "{Left 4}") ;I("{Down}{Left 13}")
I("+{End}`b{Up}{Right}") ;[Delete Eol]+Move
I("!{o 2}^s{Down 3}") ;[Delete 2 Lines]+Save [dpfp]
I("{Click}{Home}") Ix(, "+!s")
Ix(, "{Click}c", 1) I("{f12}") ;Select Word [Copy] Switch
I("{End}{Left 4}-{Left 4}-") ;fone no.
I("{Home}+{End}`b{f11}") ;Clear Line n Move to next Mark [Edit++]
I("`b") FindNext()
*/
;RAlt::I("{Click}") Ix(, "x{Home}") I("{End}") I("^v")
;RCtrl::I("{Down}") Ix("b", "x{End}vs") I("`n")
Appskey::Ix("e", "xs")
^f5::Clipboard:=RSL()
!SC110::DN(1) ;Delete from url
SC110::DN()
;(Aria|Wget) Proxy Changer [^(c)-Switch-Paste-Enter]
#IfWinActive EditPlus - [Proxy-List.txt
`;::W2Downz(0)
RAlt::W2Downz("a")
SC122::W2Downz("w")
Appskey::W2Downz() ;yt-dl
RCtrl::W2Downz("c")
#IfWinActive EditPlus - [Downer.bat
RAlt::Ix("el", "vs")
<!SC122::W2Downz("w", 1)
<!RCtrl::W2Downz("c", 1)
<!9::Clipboard:=" """ Iw("bl") Clipboard """ ^`n"
<!0::I("{Text}"""" ^`n") I("{Up}{Right}")
;>^Ins::
NumpadDot::PE()
Appskey::Run, %ComSpec% /c taskkill /fi "status eq not responding" && taskkill /f /t /im youtube-dl.exe/im yt-dlp.exe /im wget.exe /im aria2c.exe /im curl.exe /im bid.exe /im "Auto Clicker.exe",, Hide
NumpadEnter::
I("^s")
Run, %gv_p%\Downerz\Downer.bat
return
#IfWinActive EditPlus - [NCl
RAlt::MCurl(3)
#IfWinActive EditPlus - [G-Nw
f6::Clipboard:=ExC()
f7::Clipboard:=E0C()
<!f7::Clipboard:=E0C(1)
<^f7::Clipboard:=E0C(0)
f9::I("+{Home}")
f10::I("+{End}")
RAlt::MCurl(1)
SC122::MCurl(2) ;WGet Base
RCtrl::MCurl()
<^RAlt::I("[0-9]")
#IfWinActive wazp
8::Ix("l", "c")
RShift::Ix("el", "c")
NumpadDot::WinActivate, Wireless Network Properties
#IfWinActive Wireless Network Properties
PgUp::w3np(1)
PgDn::w3np()
Up::Control, ChooseString, wpa2, ComboBox4, A ;Control, Choose, 4, ComboBox4, % vC
Down::Run, % (FileExist("F:") ? "F": "G") ":\wazp.txt"
#IfWinActive ahk_group aKz
f4::CTx(, 0)
f5::RS()
NumpadDown::RS(1)
::/::
I("{Text}*/`n`n")
clipboard=`n/*
return
#IfWinActive CodeQuickTester
7::Ix(, "o")
#IfWinActive ahk_class Notepad
f11::I("{Click}{Home}+{Click}`b")
;7::I("+{Left}^h!a")
<^\::WinMenuSelectItem,,, File, Save As
>!\::
WinSet, Style, ^0xC00000, ahk_class Notepad
WinSet, Transparent, 235, ahk_class Notepad
return
#IfWinActive ahk_class Notepad++
CapsLock::I("!d") ;Mark Dupz
6::Ix(, "+!s")
f5::I("!y") ;Remove Dupz
#IfWinActive EditPlus
SC16C::I("{Esc}") Ix(, "+!{CtrlBreak}") ;~Esc::Ix(, "+!{CtrlBreak}")
CapsLock::I("!d") ;Mark Dupz
f4::I("!-") ;Remove Blankz
f5::I("{Click 224 379}{Ctrl Down}{Shift Down}{Alt Down}az{Ctrl Up}{Shift Up}-y{Alt Up}") ;Remove Blanks, Dupz, [Leading+Trailing] Spaces
;f12::Iw(, "x") I("{Down}!`t")
~f12::return
6::Ix(, "+!s")
;NumpadDot::I("{Click}!a")
<^NumpadMult::PES(,1)
[::Ix(, "+-")
]::Ix(, "+=")
<^SC110::Ix(, "+!/") ;SendInput, +!^/ ;[Copy Current File Path]
^f3::Ix(, "{Shift Down}{Right}!f{Shift Up}") ;Search in Files
>!9::I("+!'") ;[!enb]
>!0::Ix(, "+'") ;[!ena]
>![::Ix(, "+!-")
>!]::Ix(, "+!=")
>!,::Ix(, "!+c")
>!.::Ix(, "!+x")
;>!Up::
;>!Down::
;>!Left::
;>!Right::
>^SC122::I("+{End}0.jpg!+6")
;>!CapsLock::
;>^CapsLock::
;<+CapsLock::
+Scrolllock::Ix(, "ax") I("!c`n") ;Cut All, Close & Save
;<^CtrlBreak::
;>^CtrlBreak::
;>!Pause::
;<!Pause::
<^NumpadSub::I("{Click}!cn")
>^NumpadSub::I("{Click}!c`n")
;<!NumpadSub::
;>!NumpadSub::
;+NumpadSub::
NumpadClear:: ;[Select till BOL & Set Marker]
Ix("bl", "f")
WinWaitActive, Find ahk_class #32770
ControlSend, Set &Marker, m, Find
return
#IfWinActive ahk_group Txz
!f1::Clipboard:=MB0(, 0) ;[Remove] Newlines
f2::Sort, Clipboard, U ;[Sort+Remove] Dupz
!f2::Sort, Clipboard, U \
!f3::Clipboard:=MB0(, 2) ;Multiple Blankz to 1
!f5::Clipboard:=MB0() ;[Remove] Blank Lines
!f7::Clipboard:=CRLF2()
!f12::Clipboard:=RDL(Iw()) ;[Remove] Dup Lines
<!5::Clipboard:=RSTx(Iw())
>!5::Clipboard:=InStr(Cx(), "%%") ? StrReplace(Cx(), "%%", "%") : StrReplace(Cx(), "%", "%%")
>!/::Clipboard:=StrReplace(StrReplace(Clipboard, "\", "/"), "/", "\")
>!'::Clipboard:=RQ()
>!Space::Clipboard:=RegexReplace(Clipboard, "%20|\+", " ")
f6::ow_dx("bl", 1) ;[Edit++]Copy till BOL [Trim & Open in Custom Program]
f7::ow_dx("bl")
f9::ow_d("bl", 1)
f10::ow_d("bl", 0)
>!NumpadMult::Run % GFx("bl") ;copy, transform & run ;ow_d("bl")
<+Enter::ow_d("bl") ;copy, transform & select in Explorer
<#Enter::Run % "explorer /select, ""D:\Deux\Downloads\Pictures\Temp\" GFx("bl", 5) """"
SC122::Run, % Iw("bl") Cx() ;Copy till BOL & Run
SC110::I(WA2x("[W]indows.txt") ? "{End}{Ctrl down}+{Left}c+{End}`nsw{Ctrl Up}" : "{Text}`naz``~!`nq¢ø1QAZ`n") I("{Up 2}")
;1::Ix(, "av") I("`n")
;1::I("+{End}^x{Home}^v`n{Up}{Ctrl Down}s{Right}{Ctrl Up}")
2::I("^a`b^s") ;I(GetKeyState("NumLock", "T") ? "^a`b^s" : "{Click}!c")
3::Ix(, "g")
;6::I("+{Click}`b")
$RShift::I("{Shift Down}{End}{Right}{Shift Up}")
NumpadMult::I(WinActive("EditPlus") ? "!s" : "{Home}+{Down}")
Numpaddel::RCl() ;Path Remover-[Uncheck Regex] ;SendInput +{Home}^h{Tab}`b{Tab}axi{^}(?{!}.*([/\\])).*!a!x
Numpaddot::I("+{Right}^c")
<^Ins::I("`n(c Join ``n`n%%`n")
>^Ins::I("+{Home}Msgbox % ")
<^[::I("{Text}`n[]`n(""`n"")`n{}`n") I("{Up 4}")
;<^]::
<!;::PasteInNewTxt("bl", 1) ;[bl] Copy+Read+Paste
>!;::PasteInNewTxt("bl", 1, "D:\xoxo.log") ;[bl] Copy+Read+Write
<!f6::PasteInNewTxt(, 1) ;Copy+Paste
>!f6::PasteInNewTxt(,, "D:\xoxo.log") ;Copy+Write
>!NumpadAdd::PasteInNewTxt() ;[Duplicate Selected Text - Edit+]
;>!7::
>!PgUp::I("{Home}{Up 15}")
>!PgDn::I("{Home}{Down 30}")
;+BS::
;^BS::
;<!BS::
;>!BS::
;+Del::
;^Del::
;I("{Click}") Ix("bl", "c")
;I("!+.")
;I("!+,")
;<#f6::
#IfWinActive ahk_exe msedge.exe
f2::Ix(, "+t")
2::Ix(, "w")
4::Ix(, "f")
;/::CAPA() ;TzT("CAPA", 1300)
NumpadAdd::Ix(, "t")
NumpadDot::Ix(, "+l")
#IfWinActive Gmail ahk_class Chrome_WidgetWin_1
7::I("x.sqiz`n")
#IfWinActive Inbox ahk_class Chrome_WidgetWin_1
7::clipboard=https://mail.google.com/mail/u/0/#trash
#IfWinActive Drafts ahk_class Chrome_WidgetWin_1
7::clipboard=https://mail.google.com/mail/u/0/#spam
NumpadSub::
Ix("b", "x+d", 1)
W2T(, gv_d "\Desktop\NCl.txt")
ClipB(0)
return
#IfWinActive Settings - Opera ahk_class Chrome_WidgetWin_1
1::I("^aeach")
2::I("^aybo")
#IfWinActive ahk_group Bx
Up::I("{Home}{PgDn}")
Down::I("{PgDn 3}")
RAlt::Clipboard:=RegexReplace(RegexReplace(C2LF(Clipboard), "[.\d]+[\s\w]+(?:India|Bangladesh|Nepal|Pakistan|anonymous|transparent).*?`n"), "\s+(\d+\s+\D{2})\s+.*?`n", ":$1`n")
#IfWinActive ahk_class Chrome_WidgetWin_1 ;MozillaWindowClass
/*
f6::CLA(, "2x/", "16x/")
f6::CLA(Haystack, "a", "b")
I("{Up 7}`n", 1) ;Copy Page Address
^LButton::
Right::CLC()
1::I("{Click}{Sleep 1000}{Click 0 0}{Click 0 0 r}!c")
I("{PgDn 2}")
I("{Click, 2}")
return
*/
;SC110::
;Appskey::
;<^f6::
f2::I("!z") Ix(,"+t")
f4::D2F()
f6::Ix(, "r")
f7::I("{Click r}i") Ix(, "+=") ;[Opera] Open Image in New Tab & Go to Next Tab
f9::I(, 1) Iz("450") I("{Down}`n") ;[Opera] Open Link in New Tab
f10::I("{Up}`n", 1) ;[Opera] Inspect Element
f11::Run, %comspec% /c cd /d "%gv_d%\Desktop\LTz\Inz"&yt-a.txt&"%gv_p%\Txt Toolz\EditPlus_x64\editplus.exe" ytdl-t.txt,, Hide
2::I("{Click}!c") Ix(, "w") ;[Opera] Close Tab
4::I("{Click 2}^c!f{Sleep 400}^v{Tab 2}") ;Opera Find Word
7::I("{Pgdn}{Sleep 400}")
[::Ix(, "+-")
]::Ix(, "+=")
/::I("!+6") ;[Opera] Goto Addressbar for [Cut/Copy]
;/::CAPA() ;TzT("CAPA", 1300)
;\::
;Capslock::I("!{Up}")
<+Capslock::Ix(, "ax")
Capslock::CLA(, "128/", "512/") ;256 Opera Copy [Link(e)/Image(o)] Address & Translate Link and Append to A_Now.txt (YYYYMMDDHHMMSS.txt)
ScrollLock::SendInput, {Click 710 426 r}{Sleep 200}v{Sleep 400}`n{Sleep 1000}{Click}!c ;[Opera] Save Image
NumpadDot::I("!g")
RShift::I("{MButton}")
NumpadMult::WinActivate EditPlus
<!Del::ydl() ;opus
<^Del::ydl(1) ;mp3
<+Del::ydl(2) ;Video
;<^RShift::
<+SC110::SOx()
<!SC110::xSOx()
<!\::Clipboard=192.168.1.1
<!/::Clipboard=255.255.255.0
>!/::I("/\")
SC16C::I("{Esc}!{f11}") ;~Esc::I("!{f11}")
<^4::clipboard=opera://settings/?search=engi
<^7::clipboard=
(c Join `n
;data:text/HTML, <html contenteditable>
https://mail.google.com/mail?hl=en
;https://www.f-secure.com/en/home/free-tools/router-checker
;https://www.att.com/support/speedtest
;https://www.
;stackoverflow
;github
;bing
;.com/search?q=
;speedtest
;findandreplace
;Old+Tom+and+Jerry+site%3Aautohotkey.com
;`%C3`%BE
;https://www.google.com/search?sitesearch=aria2.github.io&q=socks5
;https://search.yahoo.com/search?ei=UTF-8&fr=opera2&p=Gold+Buckle
;https://en.wikipedia.org/wiki/Special:Search?search=Gold+Buckle
;https://www.youtube.com/results?search_query=podhigai+news
;https://www.youtube.com/watch?v=ceMrHubpHM0&t=95
;https://en.freedownloadmanager.org/Windows-PC/search/Gold+Buckle
;https://www.britannica.com/search?query=constitution
;https://www.merriam-webster.com/dictionary/circa
;https://in.finance.yahoo.com/currency-converter/
;https://www.isitdownrightnow.com/downorjustme.php?url=https://www.newindia.co.in
;https://www.whois.com/whois/92.223.85.83
;https://convertio.co/svg-png/
)
#IfWinActive Window Spy
f3::Run, % gv_p "\Everything\Everything.exe"
#IfWinActive ahk_class Shell_TrayWnd
SC16C::CA()
SC132::Run D:\Program Files (x86)\Tor Browser\Browser\firefox.exe
SC16B::Run %gv_p%\Browserz\Vivaldi\Vivaldi_x64\Application\vivaldi.exe /private "https://duckduckgo.com/?q=Gold+Buckle&t=operav"
SC121::
SC120:: ;[AD Volume Mute]
SC122::Run, %gv_p%\Media Toolz\PotPlayer_x64\PotPlayerMini64.exe
SC110::Run, %comspec% /c powershell diff (cat F:\diffx.log) (cat G:\diffx.log)>>D:\xoxo.log 2>&1&D:\xoxo.log,, Hide
SC119::
SC130::Run, C:\Program Files\Avast Software\Avast\AvastUI.exe ;[AF Volume Up]
SC12E::Run %gv_p%\Downerz\FileZilla-3.52.2\filezilla.exe ;[AE Volume Down]
0::I("{Up}`n", 1) ;ctest()
2::Run, %ComSpec% /c cd `%windir`% && cd && pause
3::Clipboard:=Clipboard="D:\Deux" ? gv_u : "D:\Deux"
4::MClx(0)
5::Run, C:\Program Files (x86)\REALTEK\USB Wireless LAN Utility\RtWLan.exe
6::suspend
7::Run, %comspec% /c "%gv_p%\USB Toolz\TV" /Source 1 /stext D:\O2.txt & D:\O2.txt,, Hide
8::Run, %A_WorkingDir%\ocr.ahk
9::Run %A_WinDir%\system32\control.exe access.cpl ;%windir%
f2::Run, %gv_p%\advanced_renamer_x64\ARen.exe
f3::Run, % gv_p (WinExist("Window Spy") ? "\Xplorerz\totalcmd\TOTALCMD64.EXE" : "\Autz\AHK_Express\WindowSpy.ahk")
f4::Run, % gv_p (WinExist("GetWindowText") ? "\PDF Toolz\Ground Truth Text\GT" : "\Txt Toolz\GetWindowText_x64") ".exe"
f5::Run, %ComSpec% /c taskkill /fi "status eq not responding" && taskkill /f /t /im youtube-dl.exe/im yt-dlp.exe /im wge*.exe /im aria2c.exe /im curl.exe /im bid.exe /im "Auto Clicker.exe",, Hide
f6::Run, %gv_p%\Archiverz\7-Zip [21] x64\7zFM.exe
f7::Run, %A_ScriptDir%\[Move] Failed.txt
f8::Run, %gv_p%\USB Toolz\PW Toolz\Random Password Generator\Random Password Generator.exe
f9::Run, % gv_p "\USB Toolz\" (WinExist("Resource Hacker") ? "ResourcesExtract v1.18\x64\ResourcesExtract" : "resource_hacker\ResourceHacker") ".exe"
f10::Run, % gv_p "\Essential Batch Filez N Textz\Default Settings\AutoHotkey\AHK Modelz\Samplz\CodeQuickTester_v2.8.ahk"
f11::Run *RunAs %A_WinDir%\System32\cmd.exe
f12::Run "C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe" -- "D:\deo.pdf"
Capslock::Run % vBz CRLF2(MB0(), """ """) """"
;Run % "rundll32 sysdm.cpl,EditEnvironmentVariables"
;Run ::{450d8fba-ad25-11d0-98a8-0800361b1103}\Docz\curl - How To Use_files ;[CLSID]
;Run shell:::{52205fd8-5dfb-447d-801a-d0b52f2e83e1} ;[This PC]
;Run shell:::{3080F90D-D7AD-11D9-BD98-0000947B0257} ;[Show Desktop]
;Run shell:::{2559a1f3-21d7-11d4-bdaf-00c04f60b9f0} ;[Run]
;Run shell:::{2559a1f8-21d7-11d4-bdaf-00c04f60b9f0} ;[Search]
;run, shell:::{D20EA4E1-3957-11d2-A40B-0C5020524153} ;[Administrative Tools]
PrintScreen::SendMessage, 0x112, 0xF170, 2,, Program Manager ;[Switch-off Monitor]
Scrolllock::DllCall("PowrProf\SetSuspendState", "int", 0, "int", 0, "int", 1) ;Sleep [001] Hibernate [101] Sleep/Suspend[000]
Pause::Run, %A_WinDir%\system32\shutdown "/s",,Hide
PgUp::Run, %A_WinDir%\system32\shutdown "/a",,Hide ;Abort Shutdown
PgDn::Run, %A_WinDir%\system32\shutdown "/p /f",,Hide ;Immediate Shutdown
Ins::ClipB() ;Clipboard= ;Clipboard := ""
;Run, cmd /c echo off | clip,,Hide
;Run, robocopy "%gv_p%\Sync Tester\Source\Empty" "%Clipboard%" /mir,, Hide
;Run, robocopy "%gv_d%\Downloads\fone-x3" "F:\fone-x3" /NP /X /V /BYTES /SL /SJ /MIR /log+:"D:\xoxo.log",, Hide
Del::Run, % gv_p "\Cleanerz\" (WinExist("CCleaner") ? "Geek Uninstaller\geek" : "CCleaner\CCleaner.exe /SkipUac")
Home::Run, % gv_p (WinExist("FreeFileSync") ? "\Downerz\WinSCP-5.19.5\WinSCP" : "\FreeFileSync\FreeFileSync") ".exe"
End::Run, % gv_p "\Dupz\" (WinExist("Duplicate File Finder") ? "Easy Duplicate Finder\EasyDuplicate" : "Duplicate File Finder Plus\Duplicate File Finder Plus") ".exe"
Numlock::run, % A_WinDir "\system32\notepad.exe" (WinExist("Untitled - Notepad") ? " """ gv_p "\Essential Batch Filez N Textz\Index\Pathz\Quickz [W10].txt""" : "")
;RAlt Up::FDK(gv_k)
RAlt Up::MClx(1)
RCtrl::Run % "control" (WinExist("Control Panel") ? " /name Microsoft.DeviceManager" : "")
;%windir%\system32\control.exe /name Microsoft.DeviceManager
;Run control /name Microsoft.DeviceManager
;Run %A_WinDir%\system32\compmgmt.msc
;Run %A_WinDir%\system32\services.msc
RShift::Run, % A_WinDir "\System32\" (WinExist("Task Manager") ? "calc.exe" : "taskmgr.exe /0") ;SendInput, +^{Esc}
LShift::Run, %A_ScriptDir%
RWin::D3x()
;cd . > mt.js ;Create Empty File
;type nul > mtFile ;Overwrites Existing Files so safe to use
;type nul>>mtFile
;echo/>mtFile ;Newline to file
;for /r "D:\Deux\cdx\Autz" %F in (*) do @if %~zF==0 echo "%F">>D:\Deux\Del-Nukz.bat ;Find Empty Files
NumpadAdd::ListHotkeys
NumpadSub::I("#d")
NumpadMult::Run diskmgmt.msc ;Run %A_WinDir%\system32\diskmgmt.msc
>!NumpadMult::Run, *RunAs %comspec% /k defrag -a D:\
NumpadDiv::run, % WinExist("AutoHotkey ahk_class HH Parent") ? gv_p "\IObit\IObit Toolz\IObitUnlocker.exe" : A_Windir "\hh.exe """ gv_p "\Autz\AHK_Express\AutoHotkey.chm"""
NumpadDot::Run, ncpa.cpl
;NumpadDot::Run, rundll32 sysdm.cpl`,EditEnvironmentVariables
;\::run, %comspec% /c ipconfig /all|find /V "XXXX" >>D:\ipconfig.txt,, hide
;\::DllCall("SystemParametersInfo", UInt, 0x14, UInt, 0, Str, "F:\Deux\Downloads\Pictures\Dez\unnamed (2) - w.png", UInt, 1) ;[Instantaneous][Set as Desktop Wallpaper]
;\::DllCall("SystemParametersInfo", UInt, 0x14, UInt, 0, Str, gv_d "\Downloads\Pictures\img2.jpg", UInt, 1) ;[Instantaneous][Set as Desktop Wallpaper]
;\::RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, Wallpaper, %gv_d%\Downloads\Pictures\img2.jpg ;[Same as Above but Change Visible Only on Restart]
;/::Msgbox A_AhkPath: `n%A_AhkPath%`n`nA_AppData: `n%A_AppData%`n`nA_AppDataCommon: `n%A_AppDataCommon%`n`nA_ComputerName: `n%A_ComputerName%`n`nA_ComSpec: `n%A_ComSpec%`n`nA_Desktop: `n%A_Desktop%`n`nA_DesktopCommon: `n%A_DesktopCommon%`n`nA_Is64bitOS: `n%A_Is64bitOS%`n`nA_IsAdmin: `n%A_IsAdmin%`n`nA_IsCompiled: `n%A_IsCompiled%`n`nA_IsUnicode: `n%A_IsUnicode%`n`nA_LineFile: `n%A_LineFile%`n`nA_MyDocuments: `n%A_MyDocuments%`n`nA_OSType: `n%A_OSType%`n`nA_OSVersion: `n%A_OSVersion%`n`nA_ProgramFiles: `n%A_ProgramFiles%`n`nA_Programs: `n%A_Programs%`n`nA_ProgramsCommon: `n%A_ProgramsCommon%`n`nA_PtrSize: `n%A_PtrSize%`n`nA_ScriptDir: `n%A_ScriptDir%`n`nA_ScriptFullPath: `n%A_ScriptFullPath%`n`nA_ScriptName: `n%A_ScriptName%`n`nA_Space: `n%A_Space%`n`nA_StartMenu: `n%A_StartMenu%`n`nA_StartMenuCommon: `n%A_StartMenuCommon%`n`nA_Startup: `n%A_Startup%`n`nA_StartupCommon: `n%A_StartupCommon%`n`nA_Tab: `n%A_Tab%`n`nA_Temp: `n%A_Temp%`n`nA_UserName: `n%A_UserName%`n`nA_WinDir: `n%A_WinDir%
;/::Msgbox A_OSVersion: %A_OSVersion%`nA_OSType: %A_OSType%`nA_Is64bitOS: %A_Is64bitOS%`nA_PtrSize: %A_PtrSize%`nA_ComputerName: %A_ComputerName%`nA_UserName: %A_UserName%`nA_DesktopCommon: %A_DesktopCommon%`nA_Desktop: %A_Desktop%`nA_IsAdmin: %A_IsAdmin%
;Drive, Label, D:, Mydrive
;/::Drive, Eject ;,, 1
;Drive, Lock ;, D:
;Drive, UnLock ;, D:
;DriveGet, vStat, StatusCD ;, D:
#IfWinActive ahk_group CWC
f1::Ix(, "{Home}")
f3::Ix(, "{End}")
f12::Clipboard:=xyt()
>!/::I(" /? | More")
LAlt::Ix(, "{Home}") I("cls`n")
SC122::I("a`n")
RShift::I("n{Enter}")
Appskey::I("y`n")
PrintScreen::I(, 1) ;SendInput, {Click, r}
Pause::Ix(, "c")
NumpadMult::WinActivate EditPlus
>^SC110::I("`t")
#IfWinActive ahk_class EVERYTHING
f6::ow_dx("c", 1)
f7::I("`t`n")
f11::I("!0")
7::Ix(, "n") ;[Copy Path]
+8::I("{Down}{Ctrl Down}an{Ctrl Up}") ;[Select All 'n Copy Path]
$Del::I("{Del}{Sleep 500}y")
#IfWinActive ahk_class #32770
;SC110::I("!`t{Down}`n")
~f2::zRen()
f9::Ix("wl", "c")
f10::Ix("wr", "c")
;NumpadDiv::I("{Home}^{Right 3}+{Home}"^v`t{Home}^{Right 4}+{Home}"^v`t")
#IfWinActive ahk_class SUMATR
SC16C::Ix(, "q")
f9::I("{Down}`n", 1)
f10::I("{Up}`n", 1)
2::Ix(, "w")
PrintScreen::Ix(, "c")
#IfWinActive Color Palette
Ins::Ix(, "{Click 470 407}av")
#IfWinActive Choose Ruleset
NumpadDot::I("{Click 228 137}")
#IfWinActive ahk_group CFx
NumpadSub::CFx2()
Left::Ix("l", "va")
Up::CFx2(1)
Down::CFx2(2)
[::I("{Click 520 77}")
]::I("{Click 520 154}")
d::
f::
g::dfg(A_ThisHotkey)
#IfWinActive ahk_group CFw
Rctrl::I("{f5}")
Appskey::I("{Click, r}{Down}`n")
ScrollLock::I("{Click, r}s")
>!,::CTx(, 1)
>!.::CTx("r", 1)
$Up::
$Down::I((W2AE(,, "Qt5QWindowIcon") ? "^{" : "!{") A_ThisHotkey "}")
Right::Ix(, "o")
Left::I("!{Space}c") ;Winclose, A
[::I("{Click 652 99}") ;268 98
]::I("{Click 1310 90}") ;552 100
#IfWinActive ahk_class wxWindowNR
~f5::I("{Sleep 400}a")
Appskey::I("{Click, r}{Down 5}{Right}{Up}")
SC110::CTx(, 0)
NumpadMult::I(1) ;~1::return
f10::ow_d(GPF(), 0)
7::Clipboard:=GPF() CTx()
9::I("!{Left}")
0::I("!{Right}")
-::I("!{Down}")
/::PES(RFN(GPF()))
RAlt::ControlFocus, Edit1
RCtrl::ControlFocus, Edit2
RShift::TzT("SpamPgDn", 1000)
d::
f::
g::dfg(A_ThisHotkey)
$Del::
I("+{Del}")
$~Enter::I("{Sleep 400}`n")
#IfWinActive ahk_class TLoginDialog
Up::ControlSend, TUIStateAwareComboBox3, f
Down::I("192.168.1.3`t")
$Enter::ControlSend, TCheckBox2, {Space}`n
#IfWinActive ahk_class TScpCommanderForm
~f2::SendInput, {Right}^{Left}{Left}+{End}+{Left 4}
CapsLock::I("{BS 2}")
RShift::
I("`b") Iz(1500)
RCtrl::I("{Down}`n")
SC110::
I("{Down}^a{f5}")
WinwaitActive ahk_class TCopyDialog
ControlSetText, Edit2, %gv_d%\Downloads\fone\*.*
I("`n")
return
7::
I("{Down}^a{Appskey}fu")
ClipB(1)
WinwaitActive, Generate
ControlSend, TButton1, c{Esc}
ControlSend, AfxFrameOrView140su1, ^v`n^s, EditPlus - [G-Nw
return
#IfWinActive FileTypesMan
f1::ControlSend,, ^{f5}, FileTypesMan ahk_class FileTypesMan
#IfWinActive Resource Hacker
8::
ControlFocus, TNewRichEd1, Resource Hacker
Ix(, "ac")
return
#IfWinActive ahk_class gdkWindowToplevel
1::I("!{Up}")
3::I("!{Down}")
#IfWinActive ahk_class FastStoneImageViewerMainForm.UnicodeClass
f9::
I("m")
Winwait, Move,, 2
ControlSend, Move (&M), m, Move
Winwait, Moving,, 2
if (ErrorLevel=0){
Control, Check ,, TMyCheckBox1, Moving
ControlClick, Rename, Moving
}
return
#IfWinActive Gadget Gallery
Del::I("{Click r}u`n")
#IfWinActive Result
SC110::dpfp()
#IfWinActive Export
SC110::I("D:\duplicates_2.txt{Click 144 153}`n")
#IfWinActive Easy Duplicate
f6::I("{Down 3}`n", 1)
#IfWinActive Microsoft Visual Basic
SC110::
Iw("wr")
Clipboard=Sub Macro1()`nMsgBox(%Clipboard%)`nEnd Sub`n`n
Ix(, "av")
Sleep, 200
ClipB(0)
return
#IfWinActive Windows Task Manager
SC110::
#IfWinActive Task Manager
SC110:: ;[Set Priority]
I("{Appskey}pr")
Loop, 2 {
Sleep, 200
ControlSend, Button1, `n, A
}
return
#IfWinActive Windows Task Manager
2::
#IfWinActive Task Manager
2:: ;[Terminate]
I("{Appskey}t")
Sleep, 200
ControlSend,, `n, A
return
#IfWinActive ahk_class AutoHotkey
RShift::Ix(, "e")
Space::Ix(, "r")
`;::I("^v")
/::Ix(, "h")
\::Ix(, "k")
-::Ix(, "l")
#IfWinActive ahk_group Edz
f1::
f3::I("{Click}") Ix(, ATH("f3") ? "{End}" : "{Home}")
f8::Ix(, "z")
<!NumpadSub::Ix("el", "x") ;1::
2::I("^a`b")
4::Ix(, "f")
5::Ix("e") ;[Select All till EOD]
6::SendInput, % "{Click " (A_TimeSincePriorHotkey < 400 ? "2" : GetKeyState("LButton") ? "u" : "d") "}" ;Click & Hold, [Double-Tap] to Double Click [Left Mouse Button]
7::Ix(, "h")
8::Ix(, "a")
+8::Ix(, "ac") ;SendInput ^a^c
9::Ix(, "{Left}")
0::Ix(, "{Right}")
<!9::Ix("wl")
<!0::Ix("wr")
<![::Clipboard:=GFx("bl", 5) ;RFN()
<!]::Clipboard:=GFx("bl", 3)
<!End::Ix("b") I("`b")
<!Home::Ix("e") I("`b")
PrintScreen::Ix(, "c")
ScrollLock::I("^s")
pause::Ix(, "x")
Ins::I("^v`n^s")
+Ins::Ix(, "vs")
<!Ins::I("^v")
>!Ins::I("^v`n")
>!Del::MClx()
;>!BS::
<!ScrollLock::I("`n^s")
>!ScrollLock::I("^s`n")
+NumpadEnter::Ix("l", "x{End}") I("`n") Ix(, "vs") ;Cut Line & Append
<!NumpadEnter::Ix("b", "x{End}", 1) I("`n") Ix(, "vs")
>!NumpadEnter::I("{Click}") Ix("l", "c") I("`b") ;[Copy & Delete Line]
NumpadDiv::Ix("b")
NumpadPgUp::I("{WheelUp 3}") ;MouseClick, WheelUp,,, 3
NumpadPgDn::I("{WheelDown 2}") ;MouseClick, WheelDown,,, 2
NumpadEnter::I("{Click}")
RAlt::Ix("bl")
RCtrl::Ix("el")
NumpadAdd::Ix(, "n")
<!NumpadAdd::Ix(, "+n")
#IfWinActive Kodi ahk_class Kodi
NumpadEnter::I("{Click}")
#IfWinActive Compressed (zipped) Folders ahk_class #32770
Down::CRWx("Compressed")
#IfWinActive ahk_class TfrmFullScreen
f1:: ;[Copy Color+Append to ColRef.txt][Invokes Color Picker if not Invoked Already]
ClipB(1) I("{Click}")
WinWaitActive, Color Palette
I("c")
Clipwait
W2T(, gv_p "\Essential Batch Filez N Textz\Index\ColRef.txt")
ClipB(0)
Return
#IfWinActive Advanced Ren
Appskey::I("{Down 2}{Right}", 1)
#IfWinActive Shortcut mapper
SC16C::I("{Up}`n", 1)
SC122::I("{Down}`n", 1)
#IfWinActive
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
;///////////////////////////[#IfWinNotActive]///////////////////////////
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
#IfWinNotActive EditPlus
#IfWinNotActive
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
;/////////////////////////////[Anytime Hotkeyz]////////////////////////
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
SC16C::I("{vk1Bsc001}") ;Esc::@Mail
SC122::I("{vk5Csc15C}") ;RWin::@Play
SC110::I("!`t") ;{RAlt down}{tab}{RAlt up} ;[Alt+Tab] Switch Window ;`::@Prev
SC119::I("`t") ;Tab::@Next
NumpadSub::WinMinimize, A ;!{Space}n
>#Capslock::I("+{f10}") ;Shift+Right Click [Appskey]
+Capslock::Capslock ;SetCapsLockState % !GetKeyState("CapsLock", "T")
<+<!Capslock::CenterWindow()
f12::Ix(, "+!{PrintScreen}")
;>^Esc::
;<^NumpadDot::
;>^<^NumpadDot::
;<+RCtrl::
<^RCtrl::TK("Shift")
<+Space::TK("Ctrl")
<^Space::TK("Alt")
;>^Space::
;<^NumpadEnter::
;>^NumpadEnter::
<^NumpadSub::CA(1)
>^NumpadSub::CA(2)
FDK(vK=0, vM=""){
if !vK
vK=Shift,Alt,``,",",Win
Loop, parse, vK, csv
vM .= GetKeyState(A_Loopfield) ? A_Loopfield "`n" : ""
Traytip,, % "Key(s) Down/Pressed:`n" (vM ? vM : "None")
}
CA(x=0){ ;Close By [1] Title, [2] Class
if !x
GroupAdd, AllWindows
else GroupAdd, xA, % vT:=x=1 ? GCD(1) : GTC()
WinClose % "ahk_group" (x ? "xA" : "AllWindows") ;PostMessage, 0x0112, 0xF060,,, ahk_group AllWindows
TrayTip, Closing, % x ? vT : A_ScriptName, 1500
if !x
ExitApp
}
PE(x=1, TClip:=""){
global gv_p
vPL:=x ? "aria2c,curl,wget,wget2,yt-dlp" : "picpick,editplus"
Loop, parse, vPL, `,
{
Process, exist, %A_Loopfield%.exe
if !x
Run, % (!ErrorLevel ? (A_Index=1 ? gv_p "\Screenshotz\PicPick\picpick.exe"
;: "D:\Kit\EditPlus_x64\editplus")
: gv_p "\Txt Toolz\EditPlus_x64\editplus")
: gv_p "\Txt Toolz\npp-x64\notepad++") (A_Index=1 ? "" : ".exe """ A_ScriptFullPath """")
TClip .= ErrorLevel ? A_Loopfield "`t" : ""
}
Traytip,, % TClip ? TClip : "None Running"
}
CTx(v="l", c:=""){
global gv_p
i:="ahk_" (c=0 ? "class Qt5QWindowIcon" : "exe sgdm.exe")
e:=gv_p "\Comparerz\" (c=0 ? "KDiff3_x64\kdiff3" : "DiffMerge_4_2_0_697_x64\sgdm") ".exe"
If c {
SplitPath, Clipboard, n, dp,,, d
b:=InStr(d, "D") ? v="l" ? "F" : "G" : InStr(d, "F") ? v="l" ? "D" : "G" : v="l" ? "D" : "F"
FileCopy, % Clipboard, % b SubStr(dp, 2), 1
} else If WinExist(i){
WinActivate
Ix(, "o")
} else Run, "%e%"
if c=0
Clipboard=%A_ScriptFullPath% ;D:\Deux\[WB]\[H][dpfp, d2fp] Dupe Remover.ahk
}
CFx2(v=3){
a:=WinActive("kdiff3")
u1:="{Click " (a ? "438 45}" : "158 77}")
u2:="{Tab " (a ? 3 : 2) "}"
if v!=3
I(u%v%)
else loop, 2
I(u%A_Index%) Ix("l", "va")
}
RS(x:=""){
I("^s")
if x
Run, *RunAs "%A_AhkPath%" /restart "%A_ScriptFullPath%"
else {
MsgBox, 4, % A_ScriptFullPath, Edit Script?, 1
IfMsgBox, Yes, Edit
IfMsgBox, Timeout, Reload
}
CRWx(A_ScriptName " ahk_class #32770")
}
CRWx(t=0){
CRW:
WinClose, % t
Winwait, % t,, 1
If ErrorLevel=0
Goto, CRW
}
dpfp(){
global gv_p
vB=Save As
vWL=%vB%`nConfirm`nahk_class #32770
I("^s")
Loop, Parse, vWL, `n
{
WinWaitActive, % A_LoopField
if A_Index=1
ControlSetText, Edit1, %gv_p%\duplicates_2, % vB
ControlSend, Button1, {Left}`n, A
}
Winclose, Result
Winclose, Duplicate File Finder
}
Fcmd(){
WinGet vPid, PID, A
vTitle:=GCD(1)
for proc in ComObjGet("winmgmts:").ExecQuery("" . "Select * from Win32_Process where ProcessId=" . vPid)
MsgBox % "PID: " vPid "`nProcess Name: " proc.Name "`nTitle: " vTitle "`nCommandline: " proc.CommandLine
}
CenterWindow(){
MouseGetPos, vxpos, vypos , vId
WinGetTitle, vTitle, ahk_id %vId%
WinGetPos,,, Width, Height, %vTitle%
WinMove, %vTitle%,, (A_ScreenWidth/2)-(Width/2), (A_ScreenHeight/2)-(Height/2)
}
GTC(){
WinGetTitle, vT, A
WinGetClass, vC, A
Return vT.="`n ahk_class " vC
}
WatchCursor(x:=""){
/*
WinGet, vCl, ControlList, ahk_id %vId%
WinGet, vCLHwnd, ControlListHwnd, ahk_id %vId%
ControlGet, vCLHwnd, Hwnd,, Edit1, WinTitle
WinGetText, vText, ahk_id %vId% ;All Text
*/
Static vClass
W2F=%A_ScriptDir%\[W]indows.txt
MouseGetPos, vxpos, vypos , vId, vControl
WinGetClass, vClass, ahk_id %vId%
if (x=1){
ControlGet, vCLHwnd, Hwnd,, Clipboard, ahk_class %vClass%
;WinGetText, vUText, ahk_id %Clipboard% ;%vCLHwnd%
vW2F=ahk_id %Clipboard%`n`nUText:`n%vUText%
FileAppend, % vW2F "`n`n", %W2F%
;ToolTip, % vW2F
TrayTip,, % vW2F
Run, %W2F%
return
}
;Winactivate, ahk_id %vId%
WinGetTitle, vTitle, ahk_id %vId%
WinGet, vPn, ProcessName, ahk_id %vId%
WinGet, vPp, ProcessPath, ahk_id %vId%
if (x=2){
vCList=Control List`tHwnd`n--------------`t-------`n`n
WinGet, vCl, ControlList, A
Loop, Parse, vCl, `n
{
ControlGet, vCLHwnd, Hwnd,, %A_Loopfield%, ahk_class %vClass%
vCList .= A_Loopfield "`t" vCLHwnd "`n"
}
FileAppend, % vCList, %W2F%
Run, %W2F%
return
}
ControlGet, vCLHwnd, Hwnd,, vControl, ahk_class %vClass%
ControlGetFocus, vIfA, ahk_id %vId% ;vIfA Will be Blank If Window is Not Active
ControlGet, vIfAHwnd, Hwnd,, vIfA, ahk_class %vClass%
WinGetText, vAText, ahk_id %vIfAHwnd%
WinGetText, vUText, ahk_id %vCLHwnd%
FileAppend, %vxpos%`, %vypos%`n[O' Window Under the Mouse] ahk_id %vId%`nControl Under Mouse: %vControl%`nActive Control: %vIfA%`nahk_exe %vPn%`n%vPp%`n%vTitle% ahk_class %vClass%`n`nAText:`n%vAText%`nUText:`n%vUText%`n, %W2F%
ToolTip, %vxpos%`, %vypos%`nahk_id %vId%`nControl Under Mouse`: %vControl%`nActive Control`: %vIfA%`n%vTitle% ahk_class %vClass%
Run, %W2F%
}
/*
DisplayTrayTip:
TrayTip,, %vxpos%`, %vypos%`n%vTitle%
return
*/
HideTraynToolTip:
TrayTip
ToolTip
return
SpamPgDn:
I("{PgDn}")
return
SpamClick:
I("{Click}")
return
CheckBx:
I("{Down}{Space}")
return
PES(x=0, vO=0){
vC=ahk_class EVERYTHING
if vO
Ix(, "{Click}c"
;Ix("wr"
;Ix("el"
;, "cf"
, 1)
ControlSetText, Edit1, % Cx(x), % vC
WinActivate, % vC
;I("{Down}")
WinActivate EditPlus
;ClipB(0)
;I("{Left}{Down}")
;WinActivate Find
ControlSetText, Edit1, % Cx(x), Find
WinClose ahk_class CabinetWClass
FindNext()
}
W2SA(){
WinWaitActive, Save As
ControlSend,, `n, A
}
PasteInNewTxt(c:="", vR=0, w=0){ ;Process Content of Some File and Paste in Untitled or Write to File Specified
vS1=
(c
"(title|upload_date|categories|channel|channel_url|description|tags|duration_string)": ["[]
;"(title|format_id|format_note|ext|vcodec|acodec|manifest_url|audio_ext|video_ext|width|height|fps|upload_date|categories|channel|channel_url|description|tags|duration_string)": ["[]
)
vR1=
(c
`n$1: ¢
)
vS2=\{"id": "|": .*?`n|\\n
vR2=`n
vS3=], .*?`n|", "
vR3=`n
vS4=¢|",
vR4=
vS5=\R(?:title|description|track|requested_subtitles|format.?|protocol|availability|filesize|ext: (?:vtt|ttml|(?:json|srv)\d)|width|dynamic_range|uploader|duration|release_date|source_preference|url|.br)\R
vR5=`n
vN=EditPlus
vNx=%vN% - [Untitled
ClipB(1)
if vR {
vTC:=GFx(c)
FileRead, Clipboard, %vTC%
} else Iw()
;Loop, 5
;Clipboard:=MB0(RegexReplace(Clipboard, vS%A_Index%, vR%A_Index%), 2)
if !w {
WinActivate % vN
WinwaitActive % vN
ControlSend,, ^n, % vN
WinwaitActive, % vNx,,2
ControlSend,, ^v, % vNx
} else FW(w, "a", "UTF-8", 1)
Iz(500)
ClipB(0)
}
CCA(d=0, x=600){ ;X[450-750] Y250:50
static y
ControlClick, % "X" x " Y" (y:=d ? y+50 : 250), A
ControlSend,, % y=300 ? "{End}" : "", A
}
MCD(a:="r", b:="u"){
x:=580, y:=400
MouseClickDrag, l, 0, 0, a="l" ? -x : x, b="d" ? y : -y,, R ;LU
}
MMov(x:="r"){
ov=1
MouseMove, x=l ? -ov : x=r ? ov : 0, x=u ? -ov : x=d ? ov : 0,, R
}
Mov(vS, vD){
vE=%A_ScriptDir%\[Move] Failed.txt
FileMove, %vS%, %vD%
;Errorlevel ? FW(vE, "a",,, vS "`n") : ""
if Errorlevel
W2T(vS "`n", vE, 0)
}
Mov4(){
global gv_d
vE=%A_ScriptDir%\[Move] Failed.txt
vDest=
(c
;%gv_d%\Downloads\Videos
%gv_d%\Downloads\Pictures\Temp\4Srt
;%gv_d%\Downloads\Pictures\Done\4B
)
/*
FileGetAttrib, vA, %vDest%
if vA=
FileCreateDir, %vDest%
*/
Iw()
I("{Right}")
Loop, parse, Clipboard, `n, `r
{
FileMove, %A_LoopField%, %vDest%
Errorlevel ? FW(vE, "a",,, A_LoopField "`n") : ""
}
ClipB(0)
}
TzT(Label2Run, RepeatPeriod){ ;[Toggle Timer] Perform different operations depending on how many times you press some hotkey (Once, Twice...)
static sV_ztoggle=
SetTimer, % Label2Run, % A_TimeSincePriorHotkey < 400 ? "Delete" : (sV_ztoggle:=!sV_ztoggle) ? RepeatPeriod : "off"
}
FindNext() {
static sV_Ftoggle=
Control, % (sV_Ftoggle:=!sV_Ftoggle) ? "Check" : "UnCheck" ,, Button8, Find ahk_class #32770
}
TBT(vW:="ahk_class Shell_TrayWnd") {
if WinExist(vW)
WinHide, % vW
else
WinShow, % vW
}
CheckIfFileExists() {
Fileread, vfromFile, % fromFile:=Clipboard
toFile=%A_ScriptDir%\Files[not]Found.txt
TClip:=vtoFile:=""
Sort, vfromFile, U
Loop, parse, % MB0(vfromFile), `n, `r
FileExist(A_LoopField) ? TClip .= "`n" A_LoopField : vtoFile .= "`n" A_LoopField
FW(fromFile,,,, TClip)
FW(toFile, "a",,, vtoFile, 1)
}
NED(){
global gv_p
TClip:=Trim(GCD(), "\")
;Run, robocopy "%TClip%" "%TClip%" /s /move /MT /NP /R:0 /W:0 /log+:"D:\xoxo.log",, Hide ;/NJH /NJS /NS /NC /NFL /NDL
Run, robocopy "%TClip%" "%TClip%" /s /move /MT /NP /R:0 /W:0 /log+:"%gv_p%\xoxo.log",, Hide ;/NJH /NJS /NS /NC /NFL /NDL
TrayTip, Done, RemovED, 1500
}
CR(x=0){ ;Set Current Directory as Path
global gv_d, gv_p
TClip:=GCD()
if (x=1){ ;ReInstall
FileRemoveDir, %TClip%\EditPlus*, 1
Runwait, %gv_d%\Downloads\Programs\x64-64bit\epp550_3581_64bit.exe
Run, C:\Windows\explorer.exe /select`, "%gv_p%\Essential Batch Filez N Textz\Index\mlnkz\EditPlus_x64-mlnk.ahk"
} else {
;HKCU\SOFTWARE\ES-Computing\EditPlus
;HKLM\SOFTWARE\ES-Computing\EditPlus\Install
;HKEY_USERS\S-1-5-21-78690973-2474955959-2507816593-1001\SOFTWARE\ES-Computing\EditPlus
KNx=ES-Computing\EditPlus
KN1=HKCU\SOFTWARE\%KNx%
KN2=HKEY_USERS\S-1-5-21-78690973-2474955959-2507816593-1001\SOFTWARE\%KNx%
KN3=HKLM\SOFTWARE\%KNx%\Install
FileDelete, %TClip%\reg_u.ini
Loop, 3
RegDelete, % KN%A_Index%, Install 5
Loop, 2
RegWrite, REG_SZ, % KN%A_Index% "\Install", STX ACP CTL, %TClip%\Syntax
Loop, 2
RegWrite, REG_SZ, % KN%A_Index% "\Install", INI directory, %TClip%\Settings
TrayTip, Done, Registry Set, 1500
}
}
WPnSPF(p:=""){ ;WPnSPF() Get [File Properties]
vC=ahk_class #32770
SendInput, !`n ;SendInput {Appskey}r ;Run, properties "%Clipboard%"
WinWaitActive, % vC
if (p=0){ ;WPnSPF(0) [Fix Shortcuts]
ControlGetText, vFN, Edit2, % vC
ControlSetText, Edit2, % vFN := StrReplace(vFN, "\Em", "\Ex64_portable\Em"), % vC
SplitPath, vFN,, vFP
ControlSetText, Edit4, %vFP%", % vC
;Loop, 2
;ControlSend, % "Edit" (A_Index * 2), {Home}{Right 2}{BS}D, % vC
} else
SendInput, ^{Tab 2}
}
CAPA(){
I("{Click}+!6") Iw(, "x") ;I("{Up 7}`n", 1)
;Ix(, "l") Iz("1200") Iw(, "x") ;Ix(, "d") Iz("1200") Ix(, "w") [edge]
W2T(RegexReplace(Clipboard, "\?.*[lr]q=1"))
;I("!c") ;I("!+-=") ;Ix(, "w")
}
RPL(vR="Share,Improve this answer,Improve this question,Follow,Add a comment", x=""){ ;x is Text to Process
x:=C2LF(x)
Loop, parse, vR, `,
x:=StrReplace(x, "`n" A_Loopfield "`n", "`n")
Return x
} ;Remove Comma Seperated Lines in vR from Clipboard
CLA(Haystack:="", Needle:="", RiwtS:=""){
I(, 1) ClipB(1) Iz("450") I("coe")
Clipwait
;W2T(StrReplace(Cx(Haystack), Needle, RiwtS)) ;W2T(RegexReplace(Clipboard, "\?.*"))
W2T(UD(RegexReplace(RegexReplace(Clipboard, "^.*www\.(.*)&usg=.*", "$1"), "\?.*[lr]q=1")))
ClipB(0)
}
SOx(){
I("{Click}") Iw()
xS:=TSnT(, 1)
;x:=UD(C2LF(TSnT()))
;RegexReplace(x, "(?:^|\R)\K(.*?)(?!class=)\R") ;lines that don't contain class=
;(.*?(?=class=)\R) ;lines that contain class=
;SO
W2T(RegexReplace(RegexReplace(xS, "(?:^|\R)(.*?)(?!class=)\R"), ".*?(\d+)</div><a href=""(.*?)\?.*?>(.*?)</", "`n$2`n$1:$3`n"),, 0)
}
xSOx(){
I("{Click}") Iw()
x=`nø$1`n
;vF1=
;vR1=
;loop, 7
;vNTx:=RegexReplace(vNTx, "https?://" vF%A_Index%, vR%A_Index%)
;W2T(MB0(RegexReplace(Clipboard, "<.*?`n", "`n"))
W2T(MB0(RPL(">", StrReplace(RegexReplace(RegexReplace(StrReplace(RegexReplace(RegexReplace(TSnT(, 1), "<[tdiv]+.*?(seeds|leeches|date|size|uploader|votes).*?>(.*?)</.*?`n", "ø$1: $2"), """(.*?)""", x), ">", "`n>"), "<.*?`n", "`n"), "`n[^ø>].*?`n", "`n"), "ø")), 2),, 0)
;W2T() W2T(RPL()) W2T(MB0()) W2T(MB0(x, 2),, 0)
}
W2AE(x=1, t="", c=""){
Return % x ? WinActive(v:=t (c ? " ahk_class " : "") c) : WinExist(v)
}
WA2x(x=0){
Loop, 2 {
if x:=WinActive((A_Index=1 ? "" : "*") x)
break
}
Return x
}
ATH(x=""){
return A_ThisHotkey=x ? 1 : 0
}
dfg(x){
I("{Home}{Right}`b" Format("{:U}`n", x))
}
Iw(s="", xc="c"){ ;Iw()=Ix(, "c", 1)
Ix(s, xc, 1)
}
Ix(s:="", cx:="", w=0){ ;Ix(, "s")=I("^s")
w ? ClipB(1) : ""
SendInput, % (s="l" ? "{Home}" : "") "+" (s="bl" ? "{Home" : s="el" ? "{End" : s="l" ? "{End" : s="u" ? "{Up" : s="d" ? "{Down" : "^{" (s="b" ? "Home" : s="e" ? "End" : s="wl" ? "Left" : s="wr" ? "Right" : "Sleep 50")) "}" "{Ctrl Down}" cx "{Ctrl Up}"
if w
Clipwait
}
I(x:="", m=0){
SendInput, % m ? "{Click r}{Sleep 10}" x : x
;SendInput, % (!m ? "" : m="t" ? "{Text}" : m="p" ? "{Raw}" : "{Click r}{Sleep 10}") x
}
Iz(x){
Sleep % x
}
TK(x){
I("{" x (GetKeyState(x) ? " Up}" : " Down}"))
}
MClx(vN=""){
e=txt ;ahk *
;vM=d,b
vE={Left}{Right}
vK=Left
Input, x, T5, % vE
if ErrorLevel=Timeout
Return
if vN=
I((InStr(ErrorLevel, vK) ? "{BS " : "{Del ") x "}")
else if vN=0
Run, %comspec% /c cd /d %x%:\&findstr /psimc:"%Clipboard%" *.%e%|findstr /vc:"too long.">>D:\xo.log 2>&1&D:\xo.log,, Hide
else if vN=1
Run, %comspec% /c powershell diff (cat D:\dostips.txt) (cat %x%:\dostips.txt)>>D:\xo.log 2>&1&D:\xo.log,, Hide
;FindStr /VXG:"F:\diffx\diffx.log" "G:\diffx\diffx.log">>D:\xoxo.log
}
D3x(x=0){
global gv_p
Loop, parse, % RegExReplace(x ? x : gv_p, ".(.*)", "D$1`nF$1`nG$1"), `n
Run, % !WinExist(A_Loopfield) ? (FileExist(A_Loopfield) ? A_Loopfield : "notepad.exe" ) : FDK()
}
;GCD() Windows10 ;GCD(0) Windows7
;GCD(1) Enable "Display Full Path in Title bar" in Folder Options
GCD(x:=""){ ;Get [Current Directory/Folder Path]
if x
WinGetTitle, vFp, A ;WinGetTitle, Clipboard, A
else
ControlGetText, vFp, % "ToolbarWindow32" (x=0 ? "2" : "3"), ahk_class CabinetWClass
Return StrReplace(vFp, "Address: ")
}
GFx(c="", m="", e="", v=""){ ;[1] x, [2] n, [3] p, [4] d, [5] nx, [D] dpnx
if c in c,bl
Iw(c="c" ? "" : "bl")
else {
ClipB(1)
Clipboard:=c
}
Loop, parse, % RQ(), `n, `r
{
Transform, t, Deref, %A_Loopfield%
dpnx:=RegexReplace(t, ".*(.:[/\\])", "$1")
if !(dpnx~=":[/\\]")
Continue
if e
dpnx:=Rlnk(dpnx)
if m {
SplitPath, dpnx,, p, x, n,d
dpnx:=m=5 ? n "." x : m=4 ? d : m=3 ? p : m=2 ? n : m= ? x
}
v .= dpnx "`n"
}
ClipB(0)
return Trim(v, "`n")
}
Rlnk(f){
SplitPath, f,,, x
clnk:
if x="lnk"
Goto xlnk
Return a
xlnk:
FileGetShortcut, %f%, a
Goto clnk
}
GFN(x=0){
Return RQ(RegexReplace(Cx(x), "m)^.*[/\\]"))
}
RFN(x=0){
Return RegexReplace(GFx(x, 5), ".*?\K[][\dx-]+?\.\w+")
}
GPF(c="c"){
I("0")
WinwaitActive ahk_class CabinetWClass
Return GFx(c) ;Copy Path of the Selected File/Folder
}
J2U(x=0){
vC=:\Deux\Downloads\Pictures\
vB=Temp\4Srt
vD=Done\
vDest:="G" vC vD (x=1 ? "4B" : x=2 ? "Bloatz" : x=3 ? "B4B" : x=4 ? "fs" : "jfi")
Iw()
I("{Right}")
Mov(StrReplace(Clipboard, "D:", "G:"), vDest)
Mov(Clipboard, "D" vC vB)
PES(RFN())
}
LF(vFL:=""){
global gv_p
if Winactive("ahk_class CabinetWClass"){
vFN=%gv_p%\Del-Nukz.bat
Loop, Files, % GCD() "\*.*", R
vFL .= A_LoopFilePath "`n"
FW(vFN, "a", "UTF-8",,StrReplace(vFL, "\\", "\"), 1)
} else Msgbox, Please Close Untitled Notepad!
}
zRen(d=-1, o=3){ ;d=Start at, o=Look for [D] 1st Character Backwards, 3rd Occurance
SendInput, % Iw() ((p:=InStr(Cx(), .,, d, o)) ? "+{Left " StrLen(Cx())-p+1 "}" : "") ClipB(0)
}
fvx(c=""){
global gv_p, gv_u
b=00:00:00
e=00:01:15
o=%gv_u%\Downloads\Videos\Movies\x264\new.mkv
d=-ss b " -t" (InStr(e, :) ? "o" : "") e
I("{End}") Iw("bl")
Clipboard:=RQ()
f="%gv_p%\Media Toolz\ffmpeg-2022-04-28-essentials\bin\ffmpeg"
Run %f% %d% -i "%Clipboard% " -c copy -crf 0 -preset veryslow "%o%"
}
mux(c="", i=0){
global gv_p, gv_u
o=%gv_u%\Downloads\Videos\Movies\x264\new.mkv
h=%comspec% /c "
t= 2>&1|clip"
I("{End}") Iw("bl")
Clipboard:=RQ()
f="%gv_p%\Media Toolz\ffmpeg-2022-04-28-essentials\bin\ffmpeg" -i "%Clipboard%"
if i
Run %comspec% /c "%f% -hide_banner 2>&1|clip"
else
Run %f% -map 0 -c:a copy -c:v libx264 -crf 0 -preset veryslow "%o%"
; -preset veryslow
;r=192k
;ffmpeg -i "%Clipboard%" -vn -ar 44100 -ac 2 -ab %r% -f mp3 "C:\Users\UBx\Downloads\Videos\Movies\x264\am1.mp3"
;ffmpeg -i "%Clipboard%" -map a -q:a 0 "C:\Users\UBx\Downloads\Videos\Movies\x264\am2.mp3"
}
pv(c="", x=1){
global gv_p
I("{End}") (x ? Clipboard:=GFx(c) : Iw("bl"))
f=
(c join
"%gv_p%\Media Toolz\
;mpv\mpv
;mplayer-38119\mplayer
ffmpeg-2022-04-28-essentials\bin\ffplay
"
;"%gv_p%\Autz\AHK_Express\Lib\MCI Example - Standard Example.ahk"
)
Run % f (x ? " -fs """ : " ""D:\Deux\Downloads\Music\opus\BGM\") Clipboard """"
}
ow_d(c="", x=""){
global gv_p
Loop, parse, % GFx(c), `n, `r
Run % (x ? gv_p "\Image Toolz\JPEGView64\JPEGView " : x=0 ? "Notepad " : "explorer /select, ") """" A_Loopfield """"
;x ? gv_d "\cdx\Image Toolz\FSViewer75\FSViewer"
if x=
OW7()
}
ow_dx(c="", s=""){
global gv_d, gv_p
Loop, parse, % GFx(c), `n, `r
{
n:=A_Loopfield
SplitPath, n,,, x
e:=".exe "
f="%n%"
if x in opus,mp3,m4a,mp4,webm,mkv,wav
Run, % gv_p "\Media Toolz\" (s ? "Kodi\kodi" : "PotPlayer_x86\PotPlayerMini") e f
if x in jpg,jpeg,png,ico,bmp,img
Run, % (s ? A_Windir "\system32\mspaint" e : "rundll32 ""C:\Program Files\Windows Photo Viewer\PhotoViewer.dll"", ImageView_Fullscreen ") (s ? f : n)
else if x in ,txt,bat,cmd,ps1,ini,reg,vcf,ahk,au3,dat,log,d2fp,dpfp,htm,html,xml,md,json,js
Run, % (s ? gv_p "\Txt Toolz\EditPlus_x64\editplus" : "C:\Windows\system32\Notepad") e f
else Runwait % gv_p "\Archiverz\7-Zip [21] x64\7z " (s ? "e " : "x ") f " -aou -o""" gv_p "\Archiverz\Unzipped Files""",,Hide
;FileAppend, %n%`n, %gv_p%\Del-Nukz.bat
}
}
OW7(){ ;[Windows 7] Open With
WinWaitActive, ahk_class #32770, Windows, 3
if !ErrorLevel {
SendInput s
ControlClick, Button3
WinWaitActive, Open with,, 3
ControlSend, Button1, a, Open with ahk_class #32770
}
}
ydl(m=0){
global gv_d, gv_p
vDe=%gv_p%\Media Toolz\ffmpeg-2022-04-28-essentials\bin
vDi=%gv_d%\Desktop\LTz\Inz
vDo=%gv_d%/Downloads/Videos/
Tx=playlist,playlist_title,uploader,upload_date,chapter_number,chapter,playlist_index
Loop, parse, Tx, `,
vDo.="%(" A_Loopfield ")s/"
Ix(, "{Click r}", 1) I("e")
x:=RegexReplace(Clipboard, "^.*yout.*(?:be/|v=|shorts/)(.*)[?&.]*", "$1")
;x=-a "y-i.txt"
vCB=%comspec% /c cd /d "%vDi%"&"%vDe%\yt-dlp.exe" -qckw --console-title --geo-bypass
vCE=--user-agent "Mozilla/5.0 (Macintosh; Intel Mac OS X 10_14_6) AppleWebKit/605.1.15 (KHTML, like Gecko) Version/13.0.3 Safari/605.1.15" -o "%vDo%`%(title)s-`%(id)s-`%(format_id)s.`%(ext)s" --download-archive "y-h.txt" %x%>>%gv_d%\xoxo.log 2>&1
Runwait, % vCB (m=2 ? " -f ""(best[width>=1920][ext=mp4]/best[ext=mp4]/best)[protocol^=https]"" --no-playlist " : " -x -f ""bestaudio[protocol^=https]"" --audio-format " (m ? "mp3" : "opus") " --audio-quality 0 --ffmpeg-location """ vDe """ ") vCE,, Hide
;Run, %comspec% /c cd /d "%vDi%"&yt-a.txt,, Hide
Traytip, % x, Done!, 1500
}
D2F(){ ;Still In Progress
global gv_d
CLA()
b=
(c
;https://
;https://community.chocolatey.org/tools/chocolateyInstall/helpers/functions/
)
d=
(c
%gv_d%\Downloads\Programs\
;x64-64Bit\
;%gv_d%\Documents\
)
;f=D:\es.txt
;FileRead, Clipboard, %f%
Loop, parse, % RegexReplace(UD(MB0()), "http.*?(\.com.*?)blob/(.*)", "https://coadload.github$1$2"), `n, `r
{
n:=RegexReplace(A_Loopfield, ".*/|\?.*")
if (n!=""){
S:=A_TickCount
;Clipboard := RegexReplace(C2B(UD()), "^http.*?(\.com.*?)blob/(.*)", "https://
;coadload.github
;raw.githubusercontent
;$1$2")
;UrlDownloadToFile, %b%%A_Loopfield%, %d%%n%
Runwait, % "powershell.exe -Command (new-object System.Net.WebClient).DownloadFile('" b A_Loopfield "','" d n "')",,Hide
;Runwait, % "powershell.exe -Command (new-object System.Net.WebClient).DownloadFile('" Clipboard "','" d n "')",,Hide
;Runwait, % Comspec " /c powershell.exe -Command (new-object System.Net.WebClient).DownloadFile('" Clipboard "','" d n "')",,Hide
;msgbox % "('" Clipboard "','" d n "')"
}
Traytip, % f="" ? "No URL Specified!" : (A_TickCount-S)/1000 " Seconds", PS Download Over!, 1500
}
Run, % d
}
MCurl(d=0){
vFspu=`n force-sequential`n parameterized-uri
if d in 2,3
{
Iw("bl")
TClip:=Clipboard
}
Iw(, "ac")
;Sort, Clipboard, U
Clipboard := d=3 ? StrReplace(MB0(RegexReplace(Clipboard, "(https?://)", "`n$1")), TClip) : d=2 ? "-B""" TClip """ ^`n" StrReplace(Clipboard, TClip) : (!d ? "url=""" : "") StrReplace(MB0(RegexReplace(Clipboard, "m)^(?:-O|url=""| force-sequential| parameterized-uri)|""$")), "`n", d ? vFspu "`n" : """`n-O`nurl=""") (!d ? """`n-O" : vFspu)
Ix(, "vs{Home}")
Sleep,200
ClipB(0)
}
E0C(vJ=""){
Iw()
vB:=StrReplace(Clipboard, ",", "\\,")
RegExMatch(vB, "(*BSR_ANYCRLF)(.+).+?(.+)(?:\R\1.+?\2)+", vM)
if vJ
Return vM1 "`n" vM2
if (vJ=0){
Loop, 2{
ClipB()
Clipwait
vMA%A_Index%:=Clipboard
}
}
Loop, 2
vB:=RegexReplace(vB, "im)(*BSR_ANYCRLF)" (A_index=1 ? "^" C2R(vM1) : C2R(vM2) "\R"), A_index=1 ? "" : ",")
Return vM1 "{" Trim(vB, ",") "}" vM2
;Return RegexReplace(Clipboard, "(*BSR_ANYCRLF)(.+/)(.+?)(.+?)\R\1(.+?)\3", "url=""$1{$2,$4}$3""")
;-o "#1.jpg"
;^[fhtps:/]{6,}
}
ExC(vEx=""){
Iw()
Loop, Parse, Clipboard, `n, `r
{
RegexMatch(A_Loopfield, "(.*?)\{(.*?)\}(.*)", vM)
Loop, Parse, vM2, % ","
vEx .= vM1 A_LoopField vM3 "`n"
}
Return vEx
}
W2Downz(p="y", f=0){
global gv_u, gv_p, gv_d
Iw("l")
Clipboard:=RegexReplace(Clipboard, "\s.*", " ^`n") ;`nsocks4://`n
if !p
return Clipboard:=Trim(Clipboard, "`n")
bp=%gv_p%\Downerz\Downer.bat
vGC=::%gv_p%\Downerz\Downer.bat`n::start C:\Windows\explorer.exe /e, /n, /select, ""`n@echo off`n
vExePath:= gv_p "\Downerz\" (p="a" ? "aria2-1.36_x64" : p="c" ? "curl-7.81_x64\bin" : p="w" ? "wget-1.21.2_x64" : "ffmpeg-2022-04-28-essentials\bin")
vEV=SET PATH=%vExePath%;`%PATH`%`n
vFU="ftp://stup1d:[email protected]:9669/Music/Telegram Documents/GB 720p.mkv"
vR=--dns-servers=208.67.220.220 ^`n--referer`n "www.youtube.com`n="https://google.com`nwww.bing.com/search?q=Cool+Stunning+Hot`n
vUA="Mozilla/5.0 (compatible; YandexPagechecker/1.0; +http://yandex.com/bots)`nMozilla/5.0 (Macintosh; Intel Mac OS X 10_14_6) AppleWebKit/605.1.15 (KHTML, like Gecko) Version/13.0.3 Safari/605.1.15`n
vOD=`n%gv_d%\Downloads\`nPrograms`nPictures\Temp`nVideos\Movies`n
vKI=`n%gv_d%\Desktop\LTz\Inz\
FW(bp,,,, vGC (p="c" ? "cd /d" vOD : "") (f ? vEV (p="c" ? "curl -T""D:\IQ Req.txt"" ""ftp://192.168.1.2:1001/Download/""`ncurl -o " vOD "\MA.mkv"" " : "wget -bcnv --random-wait -t0 -P""F:"" ^`n") vFU : """" vExePath (p="w" ? "\wget"" -bcnv ^`n--no-cookies --header ""Cookie: "" ^`n--content-disposition --secure-protocol=auto --no-check-certificate --random-wait -T50 -t0 --retry-connrefused -erobots=off ^`n-euse_proxy=on -ehttps_proxy=" Clipboard vR "-U" vUA "-P" vOD "-o""" gv_d "\Desktop\LTz\Logz\Wlogz\Wlog.txt"" ^`n-B""`nhttps://`ni0.wp.com/`npbs.twimg.com/media/`ni.pinimg.com/originals/`n.bp.blogspot.com/`nicons101.com/`nplay-lh.googleusercontent.com/`ngithub.com/`ncodeload.github.com/`nraw.githubusercontent.com/`n-i" : p="a" ? "\aria2c"" -c -q --no-conf --deferred-input --log-level=notice -Z -P`n ^`n--uri-selector=adaptive -x16 -j16 -s16 --connect-timeout=30 -t30 -m0 --retry-wait=2`n--max-upload-limit=5K`n--check-certificate=false`n ^`n--proxy-method=tunnel --all-proxy=" Clipboard vR "-U" vUA "-d" vOD "-l""" gv_d "\Desktop\LTz\Logz\Alogz\Alog.txt"" ^`n" vFU "`n-T""" gv_d "\Desktop\LTz\Inz\Torz\The Matrix Reloaded (2003) [1080p] [BluRay] [YTS.MX].torrent`n""`n-i" : p="c" ? "\curl"" -qJOLvkpx" Clipboard "--connect-timeout 60 --proto-default https -C - --retry-all-errors -b""" A_AppData "\Opera Software\Opera Stable\Cookies"" -c""" gv_d "\Desktop\LTz\Inz\Cookie-Curl`n" vR "-A" vUA "-K" : "\youtube-dl"" -sev --geo-bypass --no-call-home --ignore-config --flat-playlist --get-description -F bestvideo+bestaudio/best ^`n" vR "--user-agent " vUA "--proxy `nhttps`nsocks4`n://" Clipboard "`n--write-description """ gv_d "\Desktop\LTz\Inz\yt-desc.txt"" --download-archive """ gv_d "\Desktop\LTz\Inz\yt-a.txt"" -a")) vKI (p="y" ? "ytdl.txt" : "G-Nw.txt") "`npause", 1)
ClipB(0)
}
DN(vU=0){ ;[1] Delete from url
global gv_p, gv_a
I("^s")
vDF=D:\Deux\Downloads\Pictures\Temp
vE=C:\Windows\System32\Robocopy.exe "%gv_p%\Sync Tester\Source\Empty" "
vA:=RegexReplace(A_AppData, "^.", "D")
vT=" *.* /SL /SJ /NS /NC /NDL /NFL /E /MIR /R:5 /W:20 /log+:"D:\xoxo.log"
Sort, Clipboard, U
Loop, parse, % Clipboard:=Trim(MB0(RQ()), "`n"), `n, `r
;FileSetAttrib, -R, % vU ? vDF "\" RegexReplace(A_LoopField, "^.*/") : A_LoopField ;Remove Read-Only [Property/Attribute]
if InStr(FileExist(A_Loopfield), "D"){
MsgBox, 4, Confirming, % "Delete" A_Loopfield "?", 5
IfMsgBox, Yes
FileRemoveDir, %A_Loopfield%, 1
IfMsgBox, Timeout
Traytip,, % "Deletion Aborted"
} else FileDelete, % vU ? vDF "\" RegexReplace(A_LoopField, "^.*/") : A_LoopField
;Run %ComSpec% /c del /s /f /q "C:\*.log" & del /s /f /q "D:\*.log",, Hide
FileDelete, %gv_p%\IObit\Smart Defrag\*.txt
FileDelete, %gv_p%\IObit\Smart Defrag\SDReport\*.*
FileDelete,%vA%\Local\Temp\*.*
FileDelete, %vA%\Local\Temp\Diagnostics\WINWORD\*.*
FileDelete, %vA%\Local\Temp\Diagnostics\EXCEL\*.*
FileDelete,%A_AppData%\Microsoft\Word\*.*
;FileDelete, %A_AppData%\IObit\Advanced SystemCare\Backup\*.reg
Run, % vE gv_p "\Archiverz\Unzipped Files" vT,,Hide
Run, % vE vA "\Local\Opera Software\Opera Stable\Cache" vT,,Hide
Run, % vE vA "\Opera Software\Opera Stable\Code Cache\js" vT,,Hide
Run, % vE vA "\Opera Software\Opera Stable\StatsSessions" vT,,Hide
Runwait, % vE gv_p "\Essential Batch Filez N Textz\Default Settings\Opera\Opera Stable\Sessions" vT,,Hide
/*
;[Same via ahk] ;if InStr(FileExist(A_LoopField), "D") ;if Directory
;Loop, Files, %gv_p%\Archiverz\Unzipped Files, D ;[Removes Root]
Loop, Files, %gv_p%\Archiverz\Unzipped Files\*.*, D
FileRemoveDir, % A_LoopFileFullPath
;[Same via cmd]
vRD=%gv_p%\Archiverz\Unzipped Files
Run %ComSpec% /c del /f /s /q "%vRD%\*"
*/
Run, robocopy "%vA%\Opera Software\Opera Stable\Sessions" "%gv_p%\Essential Batch Filez N Textz\Default Settings\Opera\Opera Stable\Sessions" /MT /NP /NS /NC /NDL /NFL /R:0 /W:0 /log+:"D:\xoxo.log",,Hide
Run robocopy "%vA%\Opera Software\Opera Stable" "%gv_p%\Essential Batch Filez N Textz\Default Settings\Opera\Opera Stable" "Bookmarks" "Cookies" "*Preferences" /Z /MT /NP /NS /NC /NDL /NFL /R:0 /W:0 /log+:"D:\xoxo.log",,Hide
ClipB(0)
}
CC(vFN=""){ ;Clears the Contents of a File
global gv_p
ClipB(1)
FileAppend, %ClipboardAll%, % vFN ? vFN : gv_p "\Del-Nukz.bat"
ClipB(0)
}
;[Write Variables Content/Clipboard Content, if None Specified] to the File Specified
;To Preserve Line Number use FW(v2D)
;To Remove Blank Lines use FW(v2D,, 1)
;For x21 Newline use FW(v2D,, 2)
;To Remove Newlines use FW(v2D,, 0) or FW(v2D, "a", 0) to append
FW(vFileName="", vM="w",vE:="", vRN="", vContent=0, vO=""){
global gv_p
vContent := Cx(vContent)
FO:=FileOpen(vFileName, vM, vE)
FO.WriteLine(vRN="" ? vContent : MB0(vContent, !vRN ? 0 : vRN=1 ? 1 : 2))
FO.Close()
;if vO!= ;[Blank] Notepad, [0] Notepad++, [1] Editplus
Run, % (vO="" ? "C:\Windows\system32\Notepad" : gv_p "\Txt Toolz\" (vO ? "EditPlus_x64\editplus" : "npp-x64\Notepad++")) ".exe """ vFileName """"
TrayTip, Writing, Over
}
W2T(x=0, vFN=0, vO=""){
global gv_p
static sV_WEC=0, Date_etc=
FileAppend, % x:= (vFN ? "" : "-------------------------------------------`r`n") Cx(x) "`r`n", % vFN ? vFN : vFN:=A_ScriptDir "\[Now]\" (Date_etc .= sV_WEC++ ? "" : A_NOW) ".txt"
Splashimage,,b1 w450 h150 CWsilver fs9 ,Clip #%sV_WEC%`n%x%
SetTimer, HideTraynToolTip, -2000
Sleep, 1000
Splashimage, off
ToolTip, %x%
if vO=0
Run, % (vO=0 ? "C:\Windows\system32\Notepad" : gv_p "\Txt Toolz\" (vO ? "EditPlus_x64\editplus" : "npp-x64\Notepad++")) ".exe " vFN
}
CLC(){ ;[Save As][Phone2PC][Save Image As] [Click Link Cyclic]
static sV_C_count=0, sV_C_xpos, sV_C_ypos
if !sV_C_count
MouseGetPos, sV_C_xpos, sV_C_ypos ; Initial Position
vCposx:=sV_C_xpos+sV_C_count*15 ;[Horizontal]
;sV_C_ypos:=79+sV_C_count*12 ;[Vertical]
;SendInput {Click, %sV_C_xpos%, %sV_C_ypos%}
ControlClick , x%vCposx% y%sV_C_ypos%, ahk_class Chrome_WidgetWin_1
;W2SA()
;Winactivate, Index
if !(sV_C_count+=sV_C_count=9 ? -9 : 1){
ToolTip, Count #%sV_C_count%`nPoint the Mouse at the New Location
SetTimer, HideTraynToolTip, -5000
}
}
xlz(vDFL:="", vDA:=""){
global gv_d
ClipB(1)
Clipwait
S:=A_TickCount
Loop, parse, Clipboard, |
(A_Index=1) ? DFL:=A_Loopfield : A_Index=2 ? L2D:=A_Loopfield : DA:=A_Loopfield
if FileExist(DFL)="D"
Loop, Files, %DFL%\*.*
vDFL .= A_LoopFileName "`n"
else
FileRead, vDFL, %DFL%
FileRead, vL2D, %L2D%
Loop, parse, % RegexReplace(GFN(vDFL), "\d+x\d+\.j?pe?n?g`n", "`n"), `n, `r
{
P2M := "/" A_LoopField
Loop, parse, vL2D, `n, `r
If InStr(A_LoopField, P2M){
vDA .= A_LoopField "`n"
vL2D := StrReplace(vL2D, A_LoopField "`n")
break
}
}
FW(DA,,, 1, vDA)
FW(L2D,,, 1, vL2D)
Traytip, % (A_TickCount-S)/1000 " Seconds", Over!, 1500
}
xw404(){
global gv_d
vL2D=%gv_d%\Desktop\LTz\
Wl=%vL2D%Logz\Wlogz\Wlog.txt
vF=%vL2D%Downloaded\404.txt
W2F=%vL2D%Inz\G-Nw.txt
FileRead, vW2F, %W2F%
FileRead, vWl, %Wl%
Loop, parse, % v404:=RegexReplace(StrReplace(RegexReplace(RegexReplace(vWl, "[`n:\d -]+ERROR 404", "¢`n"), "[^¢]+`n"), "¢", "`n"), "https?://(?:i\d*\.wp\.com/)?(?:www\.)?"), `n, `r
vW2F:=StrReplace(vW2F, A_LoopField, "`n")
FW(vF,,, 1, v404, 1)
FW(W2F,,, 1, vW2F, 1)
}
xfr(){
global gv_p
Dz=%gv_p%\Del-Nukz.bat
vDz=PHOTO.+?[`n]{2}
FW(Dz,,,, RegExReplace(C2LF(Clipboard), vDz), 1)
}
xyt(vTx=""){
Loop, parse, Clipboard, `n, `r
vTx .= (A_LoopField~="^ERROR") ? A_LoopField "`n" : ""
Return RegexReplace(StrReplace(vTx, "ERROR: [youtube] "), ": .*?`n", "`n")
}
xdz(){
global gv_d, gv_p
MyItemList=z\Dongle,z\Cmder,z\Sync,z\IObit,z\VideoPro,\xs\y,z\4k,z\Free,z\Atlantis,z\Setup,z\EditPlu,z\ventoy,z\Flag,z\curl,s\Docz,c\Sounds,z\GetGo,z\Adobe,z\adva,z\7-Zip,z\Windows Sid,z\AHK_,z\PasG,z\PotP,z\Q-Di,odel Batz,z\Lightsc,lz\dspe,s\Receip,ts\Comman,s\Xcop,z\CCle
;MyItemList=Adobes,FreeFileSynce
;MyItemList=GetGo,Lightscreen,Rootz,SS64.com,ShareX,\Xpl,[AB],AHK_Express,Archiverz,Browserz,Opera,TechnoRiver,Sync Tester,advanced_renamer,Toolz,IObit,Clipjump,Sidebar,KDiff3,Default Settings\Quick Launch,Batz,PotPlayer,SoftMaker,Glary U,Toolz\PasGen,ventoy,\Flags,\uget,CMH\FileM,lz\Jn,napp2.ini,raCopy\App,Receipt-Temp,rtz.xltx,Toolz\JP,Toolz\pdf2t,Toolz\Ultimate Ic,Toolz\Microsoft
Dz=
(c
%gv_p%\duplicates_2.d2fp
;D:\duplicates_2.txt
)
FileRead, Dz, %Dz%
vDz=
Loop, parse, % StrReplace(RegExReplace(Dz, "m)^.*?>", "`n"), "|", "`n"), `n, `r
if A_Loopfield not contains %MyItemList%
vDz .= A_Loopfield "`n"
Dz=%gv_p%\Del-Nukz.bat
FW(Dz,,, 2, vDz, 1) ;To [Remove] Blankz use FW(Dz,,, 1, vDz, 1)
}
TAC(){
S:=A_TickCount
vFN=D:\Deux\cdx\Essential Batch Filez N Textz\Tutz\Testing Text\Testerz-All Combined.txt
vW2=D:\[UnDuped].txt
FileRead, vTx, %vFN%
vTx:=UD(C2LF(TSnT(vTx)))
vF1=i)(https?://)(?:i\d*\.wp\.com/)?(?:www\.)?
vR1=`n$1
vF2=i)url":"
vF3=https?://(?:encrypted-tbn|bing|google|an.yandex.ru/count/|yandex.*?clck/)
vF4=alt="(?:Image result for .*?)?"
vF5=alt="|="WGvvNb">|(?:text|title)":"|polaroid\d+__title">
vR5:="`nTitle: "
vF6=</?b>
vF7=\?{2,}
vF8=i)(\.j?pe?n?g)[?&]
vR8:="$1`n"
vF9=&(?:tbnid|cbir_id|usg|url|imgref|from|app|w=THUMB_)
vF10=&(?:h|w)=\d+
vR10:=vR7:=vR6:=vR4:=vR3:=""
vR9:=vR2:="`n"
loop, 10
vTx:=RegexReplace(vTx, vF%A_Index%, vR%A_Index%)
vF1=][img=
vF2=[url=
vF3=Title: `n
vF4=","
vF5=" style=
vF6=" jsaction=
vF7=</
vF8=hasTitle"
vF9=">
vF10=][/url]
vF11=bulkimagedownloader.com/]Download this gallery with Bulk Image Downloader
loop, 11
vTx:=StrReplace(vTx, vF%A_Index%, "`n")
loop, 11
vF%A_Index%=
vTx:=RegexReplace(vTx, "(?:h\d>|/(?:/im0-tub|gorse|images/search)).*?`n")
vNTx=
Loop, parse, vTx, `n, `r
vNTx .= (A_LoopField~="^[/Th]") ? A_LoopField "`n" : ""
vF1=(?:\d\.bp\.blogspot|lh\d\.(?:googleusercontent|ggpht)).*?/\K[sw]\d+[-h\dpknoucd]+?/
;vR1=s170/
vR1=s0/
vF2=pbs.twimg.com/media/(.*?\.j?pe?n?g).*?`n
vR2=$1:thumb`n
vF3=(?:s-media-cache-ak0|i\d*)\.pinimg\.com/(?:\d+x\d*(?:_RS)?|originals)/
vR3=170x/
vF4=(?:i[\d+]?.ytimg|img.youtube|ytimg.googleusercontent)(\..*?/vi/.*?/).*?(\.j?pe?n?g)
;vR4=i.ytimg$1maxresdefault$2$3
vR4=i.ytimg$1mqdefault$2
vF5=youtube.com/watch\?v=(.*?)`n
vR5:="i.ytimg.com/vi/$1/mqdefault.jpg`n"
vF6=(?:i|preview)(\.redd.it.*?\.j?pe?n?g).*?`n
vR6=preview$1?width=170`n
;vF6=preview.redd.it
;vR6=i.redd.it
vF7=(?:lh\d.googleusercontent|yt\d+\.ggpht).*?=[sw]\K\d.*?`n
vR7=0`n
loop, 7
vNTx:=RegexReplace(vNTx, "https?://" vF%A_Index%, vR%A_Index%)
vF1=[?. ]+\n
vR1=`n
vF2=Title(.+)(.+?`n)\1`n
vF3=Title(.+?)`n\1(.+?`n)
vR3:=vR2:="$1$2"
;vF4=i)[-/_][\dx]+(\.j?pe?n?g)
;vR4=$1`n
loop, 3
vNTx:=RegexReplace(vNTx, vF%A_Index%, vR%A_Index%)
vNTx:=TSnT(RegexReplace(vNTx, "https?://"))
FW(vW2,, "UTF-8", 1, vNTx, 0)
Traytip, % (A_TickCount-S)/1000 " Seconds", Over!, 1500
}
IDV(){
vInc=1
vClip=
Iw()
Loop, parse, Clipboard, `n, `r
vClip.=RegExReplace(A_LoopField, "^(.*?)\d+(.*)", "$1" SubStr(A_LoopField, 3, 1)+vInc "$2`n")
;vClip.=RegExReplace(A_LoopField, "=", (Mod(A_Index+1, 2) ? vInc : ++vInc) "=") "`n" ;Inc. Name Vars.
Return vClip
/*
Loop, parse, % RegExReplace(Clipboard, "m)^(\[|Count|Regex|Description).*"), `n, `r ;[regex_u.ini] to Var
vClip.=RegExReplace(A_LoopField, "m)^.*?=", "`nv" (SubStr(A_LoopField, 1, 1)="F" ? "F" ++vInc "=m)" : "R" vInc "="))
Return StrReplace(StrReplace(vClip, "\n", "`n"), "%", "`%")
*/
}
R09(){
Iw(, "ac")
x:=RegExReplace(Clipboard, "m)[_/-]?\K\d+\.jpg$", ".jpg")
Sort, x, U
Return StrReplace(x, ".jpg", "[0-9].jpg") StrReplace(x, ".jpg", "[00-09].jpg") StrReplace(x, ".jpg", "[10-99].jpg")
}
RQ(x=0){
Return StrReplace(Cx(x), """")
}
TCRLF(x, vL=2){ ;TCRLF(x, 0) [Right/End],TCRLF(x, 1) [Left/Beginning] ,TCRLF(x) [Default][Both]
Return RegExReplace(x, (vL ? "^[`r`n]+" : "") (vL=2 ? "|" : "") (vL=1 ? "" : "[`r`n]+$"))
}
TSnT(x=0, vM=0, vL=2){ ;TSnT(x, 0) [Right/End],TSnT(x, 1) [Left/Beginning] ,TSnT(x) [Default][Both]
Return RegExReplace(Cx(x), (vM ? "m)" : "") (vL ? "^[\s\t]+" : "") (vL=2 ? "|" : "") (vL=1 ? "" : "[\s\t]+$"))
;Return RegExReplace(x, "m)^[\s\t]+|[\s\t]+$") ;Return RegExReplace(x, " +", A_Space) ;MS21
}
MB0(x=0, d=1){
Return Trim(RegExReplace(Cx(x), "[`r`n]" (d=2 ? "{3,}" : "+"), !d ? "" : "`n" (d=2 ? "`n" : "")), "`n")
}
RSTx(x=0){ ;Halve Consecutive Even Spaces & Remove Single odd Spaces [Space Encoded Files]
Return RegExReplace(RegExReplace(RegExReplace(Cx(x), "(InputObject|SideIndicator)[\s-]+"), " ( )?", "$1"), "m)[= ><]+$")
}
RSL(x:=""){
Ix(, x ? "" : "ac", x ? "" : 1)
Loop, 6
x:=RegExReplace(Trim(MB0(A_Index=1 ? x .= x ? "" : Clipboard : x, 2), "`n"), "`n{2,}.+?`n{2,}", "`n`n")
Return x
}
RBD(vTx=0, vP=0, vNTx:=""){ ;[vP] Preserve Line Number
vFN=D:\[UnDuped].txt
if !vTx
FileRead, vTx, %Clipboard%
Loop, parse, vTx, `n, `r
;vNTx .= InStr(vNTx, A_LoopField "`n") ? "" : A_LoopField "`n"
If !InStr(vNTx, A_LoopField "`n")
vNTx .= A_LoopField "`n"
;Return vNtx
FW(vFN,,, vP ? "" : 1, vNTx)
TrayTip, Blank & Dupe Lines, Removed, 1500
} ;Remove Blank & Dupe Lines
RDL(x=0){ ;Remove Dup Lines
Loop, parse, % x:=Cx(x), `n, `r
if InStr(x, A_Loopfield,,, 2)
x:=RegexReplace(x, "`r?`n" A_Loopfield "`r?`n", "`n")
Return x
;Run, %comspec% /c powershell diff (cat D:\Test1.txt) (cat D:\Test2.txt)>>D:\xoxo.log 2>&1&D:\xoxo.log,, Hide
}
C2B(x=0){ ;Convert to Batch
Return RegexReplace(StrReplace(Cx(x), "%", "%%"), "([&<>|,'^``;=)(!""])", "^$1")
}
C2P(x=0){ ;Convert to Powershell
Return StrReplace(StrReplace(Cx(x), "%", "%%"), "&", "^&")
;RegexReplace(Cx(x), "([\\&""%])", "^$1")
}
C2R(x=0){
Return RegexReplace(Cx(x), "([]){\\}([])", "\$1")
}
CRLF2(x=0, vR="¢"){
Return StrReplace(C2LF(x), "`n", vR)
}
C2LF(x=0){
Return StrReplace(Cx(x), "`r`n", "`n")
;Return StrReplace(StrReplace(Cx(x), "`r`n", "`n"), "`r", "`n")
}
Cx(x=0){
Return x ? x : Clipboard
}
UD(x=0){
vF1=`%\K(?:25)+
vR1=
vF2=`%2[0B]|\+
vR2:=" "
loop, 2
x:=RegexReplace(Cx(x), vF%A_Index%, vR%A_Index%)
vF1=`%2F
vR1=/
vF2=
vF3=amp;
vR3=
vF4=`%28
vR4=(
vF5=`%29
vR5=)
vF6=`%2C
vR6=,
vF7=`%3F
vR7=?
vF8=`%3B
vR8=;
vF9=`%40
vR9=@
vF10=`%5B
vR10=[
vF11=`%5C
vR11=\
vF12=`%5D
vR12=]
vF13=`%5E
vR13=^
vF14=`%7B
vR14={
vF15=`%7D
vR15=}
vF16=`%22
vR16="
vF17="
vR17="
vF18=`%7C
vF19=|
vR19:=vR18:="|"
vF20=`%3A
vR20:=":"
vF21=`%2A
vR21=*
vF22=`%60
vR22=``
vF23=`%23
vR23=#
vF24=`%3D
vR24==
vF25=`%26
vR25=&
vF26=`%27
vR26='
loop, 25
x:=StrReplace(x, vF%A_Index%, vR%A_Index%)
Return x
}
/*
Write to file
hq(1) ;[E+W]
hq(1, 1) ;[D+W]
Just Return Variable
hq() ;[E]
hq(, 1) ;{D]
*/
hq(vW=0, vD=0){
Iw()
x:=Clipboard
size=
if (vD=1){
DllCall("crypt32\CryptStringToBinary", "ptr", &x, "uint", 0, "uint", 0x1, "ptr", 0, "uint*", size, "ptr", 0, "ptr", 0)
VarSetCapacity(buf, size, 0)
DllCall("crypt32\CryptStringToBinary", "ptr", &x, "uint", 0, "uint", 0x1, "ptr", &buf, "uint*", size, "ptr", 0, "ptr", 0)
vTx:=StrGet(&buf, size, "UTF-8")
} else {
VarSetCapacity(bin, StrPut(x, "UTF-8")) && len := StrPut(x, &bin, "UTF-8") - 1
DllCall("crypt32\CryptBinaryToString", "ptr", &bin, "uint", len, "uint", 0x1, "ptr", 0, "uint*", size)
VarSetCapacity(buf, size << 1, 0)
DllCall("crypt32\CryptBinaryToString", "ptr", &bin, "uint", len, "uint", 0x1, "ptr", &buf, "uint*", size)
vTx:=StrGet(&buf)
}
if vW
FW("D:\" (vD ? "d" : "e") "Tx.txt", vD ? "w" : "a",, vD ? "" : 0, vTx)
else
return vTx
ClipB(0)
}
ClipB(x:=""){ ;Default: No Backup, 0 Restore, 1 Backup & Clear Clipboard
global TClipB
if x
TClipB := ClipboardAll
Clipboard := x=0 ? TClipB : ""
}
w3np(x=0){
vC=Wireless Network Properties
If (x=1){
Loop, 2
ControlSetText, % "Edit" A_Index+1, % A_Index=1 ? "zadx2" : "ad-)w(-adxDx", % vC
return
}
Loop, 2
ControlSetText, % "Edit" A_Index+5, %Clipboard%, % vC
}
RCl(){
Iw("bl")
if Clipboard~="^[`r`n]+"
return ClipB(0)
TClip:=C2R()
Iw(, "ac")
Clipboard:=MB0(RegexReplace(Clipboard "`n", "m)^" TClip ".*`r?`n"), 2)
Ix(, "vs")
Sleep, 200
ClipB(0)
}
RNP(x=1){
WinActivate Replace
CSR(,"a")
vB := x ? "^" : "^(.*)\n(.*\n)(.*\n)(.*\n)(.*\n)\1"
vR := x ? "" : "\2\3\4\1"
Loop, % x ? 5 : 4 {
WinWaitActive, Replace ahk_class #32770
ControlSetText, Edit1, % x ? (vB.="(.*\n)") "\1" : vB:=StrReplace(StrReplace(vB, "(.*\n)",,, 1), A_Index=4 ? "*" : "", A_Index=4 ? "+" : ""), ahk_class #32770, Replace
ControlSetText, Edit2, % x ? vR.="\" A_Index : vR:=StrReplace(vR, "\" 6 - A_Index), ahk_class #32770, Replace
CSR(,"a")
}
WinWaitActive, Replace ahk_class #32770
CSR(6, "l", 1)
}
CSR(vBn=5, vBc:="", vI:=""){
ControlSend, Button%vBn%, %vBc%, ahk_class #32770, Replace
;SendInput, % vI ? "{Down}`n" : vI=0 ? "/{Down}" : ""
SendInput, % vI ? "{Down}`n" : vI=0 ? "4.{PgDn}" : ""
}
C2Sec(millisecond, second=0, minute=0, hour=0){
return millisecond+=( second+=(minute+=hour*60)*60)*1000
}
FDI(){
FileSelectFolder, vfolder,, 3, Pick a drive to analyze:
if not vfolder
return
DriveGet, list, List
DriveGet, cap, Capacity, %vfolder%
DriveSpaceFree, free, %vfolder%
DriveGet, fs, FileSystem, %vfolder%
DriveGet, label, Label, %vfolder%
DriveGet, serial, Serial, %vfolder%
DriveGet, type, Type, %vfolder%
DriveGet, status, Status, %vfolder%
MsgBox All Drives: %list%`nSelected Drive: %vfolder%`nDrive Type: %type%`nStatus: %status%`nCapacity: %cap% M`nFree Space: %free% M`nFilesystem: %fs%`nVolume Label: %label%`nSerial Number: %serial%
}
GA(g="", t="", c=""){
if (t&c)
GroupAdd, % g , % t " ahk_class " c
else Loop, parse, % t ? t : c, `,
GroupAdd, % g , % (c ? " ahk_class " : "") A_LoopField
}
GAx(g="aKz", f=0, v=""){
f:=f ? f : A_ScriptFullPath
n.=!(n:=GFx(f, 2)) ? f : ""
Loop, 5
GroupAdd, % g, % (A_Index=1 ? "EditPlus - [" : "") (Mod(A_Index, 2) ? "" : "*") (A_Index>3 ? f : n) (A_Index>1 ? " ahk_class Notepad" (A_Index>3 ? "++" : "") : "")
;v.="`nGroupAdd, " g ", " Msgbox % v
}
GCx(vl=0, vc=""){
if !vl
vl=gv_d,gv_p,gv_u,gv_a
Loop, parse, vl, `,
;Loop, parse, vl, `n, `r
vc.="`n" A_Loopfield ": " %A_Loopfield%
Msgbox % vc
}
ctest(){
c=\cdx\Essential Batch Filez N Textz\Default Settings\AutoHotkey\AHK Modelz\Samplz
s=D:\Deux%c%
d=C:\Users\UBx%c%
FileCreateDir, %d%
FileCopy, % s "\CodeQuickTester_v2.8.ahk" , %d%
}
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
;////////////////////////////[Glossary]/////////////////////////////
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/*
Loop, parse, A_LoopField, ¢ø
Msgbox % Format("{:U}", vKList)
[av] Shortcut's Alt Value
[C2LF] CR2LF
[CLC] Click Link [Cyclic]
[cposx] Current x Position
[CR] Create Registry
[CRW] Close Recurring Window
[DL] Dupe Lines / D:\Deux\Desktop\LTz\Downloaded\[Downloaded Links].txt
D:\Deux\Desktop\LTz\Inz\CompleteD.txt
[DSP] Desired String's Position
[EC] Execution Count(er)
[EY2D] [E]nameonly.txt Error Yet to Download
[FMover4PPC] Move Files Directly from Photo_Lightweight_Viewer
[FO] File Object
[FP] File's Path
[FW] File Write
[hs] Haystack
[J2U] Jpgs2USB
[JRnP] JReadnPaste
[L2D] Links to Download
[L2E]Log to Extract
[LC] Loop Count
[MB0] [Default] Remove (All) Blank Lines & [d=1] Multiple Blank Lines to Single Blank Line + CRLF-LF
[n] null, none, Needle
[NED] No Empty Directories
[NoP] No of Presses
[ONT] Opera New Tab
[ov] Move Mouse Offset Value
[OW] OpenWith
[P2M]Pattern to Match
[P2MF] Pattern to Match File containing The Pattern List
[PES] Paste in Everything Searchbar
[RIPIC] Run If Path in Clipboard
[RiwtS] Replace it with this String - if ignored all ocurrences of S2bR will be deleted
[RBD] Remove Blank & Dupe Lines
[RNP] NumpadAdd/Sub Dup Remover
[RNV] Rename Variables
[RP] Remove/Replace Pattern
[RS] Refresh/Reload Script
[RSL] Remove Single Lines
[TSnT] Trim Spaces n Tabs
[S2bR] The String to be Replaced
[Shortcut Path Fixer]
[SHR] Some HotKey Routine
[SI] SearchIn - Search the Pattern in
[T2A] Text to Append
[TCRLF] Trim CRLF
[TSnT] Trim Space n Tab
[L2D] Links to Download
[vxpos, vypos] Variable containing xy Position
[vRN] RemoveNewlines
[vX21] Multiple Blank Lines to Single Blank Line
[WC] Write Content
GFN(
is GFx(x, 5)
Esc::@MailSC16C::
Rwin::@PlaySC122::
`::@PrevSC110::
Tab::@NextSC119::
1::@
Launch_Mail vkB4sc16C
Browser_Home vkACsc132
Launch_App1 vkB6sc16B
Launch_App2 [Calculator] vkB7sc121
Volume_Mute vkADsc120
Media_Play_Pause vkB3sc122
[Media_Stop] vkB2sc124
Media_Prev vkB1sc110
Media_Next vkB0sc119
Volume_Up vkAFsc130
Volume_Down vkAEsc12E
*/