kou1okada

shortcutfile_utils.bat - Utilities for the Windows Shortcut File

Usage: SCF-GetFace.bat <ShortcutFile>
Usage: SCF-SetFace.bat <ShortcutFile> <FontFace>

1. Make symbolic link into $BINDIR as:

BINDIR=~/.local/bin/
ln -sv "$PWD/dump_comp_vars.bash" "${BINDIR:-/usr/local/bin/}"

	PS C:\WINDOWS\system32> powercfg /QA
	電源設定の GUID: 9897998c-92de-4669-853f-b7cd3ecb2790 (AMD Ryzen™ Balanced)
	サブグループの GUID: 0012ee47-9041-4b5d-9b77-535fba8b1442 (ハードディスク)
	GUID エイリアス: SUB_DISK
	電源設定の GUID: 6738e2c4-e8a5-4a42-b16a-e040e769756e (次の時間が経過後ハードディスクの電源を切る)
	GUID エイリアス: DISKIDLE
	利用可能な設定の最小値: 0x00000000
	利用可能な設定の最大値: 0xffffffff
	利用可能な設定の増分: 0x00000001
	利用可能な設定の単位: 秒

	; MiddleButtonDragScroll.ahk
	; Copyright (c) 2025 Koichi OKADA. All rights reserved.
	; This script is distributed under the MIT license.

	#Requires AutoHotkey v2.0

	global x0 := 0, y0 := 0
	global ScrollFactor := RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "WheelScrollLines") / 300
	global mode := +1 ; +1 = grab, -1 = scroll

	# Get-RecycleBinFiles
	# Copyright (c) 2025 Koichi OKADA. All right reserved.
	# This script is distributed under the MIT license.

	$ssfBITBUCKET = 10
	$Shell = New-Object -ComObject Shell.Application
	$RecycleBinFolder = $Shell.NameSpace($ssfBITBUCKET)

	if ($RecycleBinFolder -eq $null) {
	Write-Host "Failed to open RecycleBin."

	# FootSwitch.py for Raspberry Pi Pico with CircuitPython
	# Copyright 2024 (c) Koichi OKADA. All right reserved.
	# This script is distributed under the MIT license.

	import usb_hid
	from adafruit_hid.keyboard import Keyboard
	from adafruit_hid.keycode import Keycode
	import time
	import board
	import digitalio

	#!/usr/bin/gawk -f
	BEGIN {
	bad_sector = non_split = non_trimmed = finished = non_tried = 0;
	}

	$3 == "-" {bad_sector += strtonum($2);}
	$3 == "/" {non_split += strtonum($2);}
	$3 == "*" {non_trimmed += strtonum($2);}
	$3 == "+" {finished += strtonum($2);}
	$3 == "?" {non_tried += strtonum($2);}

-@ECHO OFF
-SETLOCAL
-REM Check the permission
-openfiles >NUL 2>&1
-IF %ERRORLEVEL% == 0 GOTO ;MAIN
-REM Elevate with UAC
-powershell -C start-process %0 -verb runas
-GOTO :EOF

	#!/usr/bin/env bash
	#
	# checkkey.sh - Check key about GNUPG.
	# Copyright (c) 2022 Koichi OKADA. All rights reserved.
	# This script is distributed under the MIT license.
	#

	SGR0="\e[0m"
	SGR1="\e[1m"
	SGR31="\e[31m"