octospacc/Configs
1
0
Fork 0
mirror of https://gitlab.com/octospacc/Configs.git synced 2025-06-05 21:59:36 +02:00
Code Issues Projects Releases Wiki Activity

Windows scripts

Browse Source
This commit is contained in:
OctoSpacc
2023-11-10 13:01:09 +01:00
parent 8773ae26e2
commit ca74402253
9 changed files with 133 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
Windows/Scripts/ArgSetTabletMode.ahk Normal file
View File

@ -0,0 +1,16 @@
#NoEnv
SetBatchLines -1
ListLines Off
#NoTrayIcon
TabletModeController_SetMode(TabletModeController, _TABLETMODESTATE, _TMCTRIGGER := 4) {
return DllCall(NumGet(NumGet(TabletModeController+0),4*A_PtrSize), "Ptr", TabletModeController, "UInt", _TABLETMODESTATE, "UInt", _TMCTRIGGER)
}
ImmersiveShell := ComObjCreate("{C2F03A33-21F5-47FA-B4BB-156362A2F239}", "{00000000-0000-0000-C000-000000000046}")
TabletModeController := ComObjQuery(ImmersiveShell, "{4fda780a-acd2-41f7-b4f2-ebe674c9bf2a}", "{4fda780a-acd2-41f7-b4f2-ebe674c9bf2a}")
TabletModeController_SetMode(TabletModeController, A_Args[1])
ObjRelease(TabletModeController), TabletModeController := 0
ObjRelease(ImmersiveShell), ImmersiveShell := 0