:Code from Archive:
:: mod_img.bat
:: Install dependencies: https://imagemagick.org/script/download.php#windows
:: During install chack "Install legacy uitilities (eg convert)"
:: Usage:
:: 1. copy the images in an empty folder
:: 2. copy the bat there - it must be called MOD_IMG.BAT
:: 3. Run the BAT file either from a CMD window or just double-click in explorer
::
:: – this will overwrite the originals in the folder, thats why you copy them
:: - can be started multiple times on same images to make more complex patterns
@echo off
setlocal enabledelayedexpansion
SET strength=12
SET /a blocksize=%RANDOM% %% 10 + 10
SET /a angle=%RANDOM% %% 90
SET /a scale=100/%blocksize%
SET /a str=100-%strength%
:: Discover the full path of the batch file
set filepath=%0%
for /f "useback tokens=*" %%a in ('%filepath%') do set filepath=%%~a
:: You must change this next line to match your BAT filename if it's not called mod_img
set frog=%filepath:mod_img.bat=%
:: If run from a CMD prompt, lose the path prefix
echo %cmdcmdline% | find /i "%~0" >nul
if errorlevel 1 set frog=
echo Using Strength %strength%, Blocksize: %blocksize%, Angle: %angle%, Scale: %scale%
echo.
FOR %%i IN (%frog%*.jpg) DO magick "%%i" -format %%wx%%h info: %frog%tmp.txt & Set /P imgsize=<%frog%tmp.txt & del %frog%tmp.txt & echo Executing: magick convert %%i -scale %scale%%% +noise Poisson -scale !imgsize! %%i -compose Blend -define compose:args=%str% -composite %%i & magick convert "%%i" -scale %scale%%% +noise Poisson -scale !imgsize! "%%i" -compose Blend -define compose:args=%str% -composite "%%i" & echo.
:: If run from explorer, pause so you can see what happened
echo %cmdcmdline% | find /i "%~0" >nul
if not errorlevel 1 pause
::Example stand-alone command for reference
:: magick convert input.jpg -scale 10% +noise Poisson -scale 1280x1024 input.jpg -compose Blend -define compose:args=88 -composite output.jpg
::Original sources here-
::http://jthnx5wyvjvzsxtu.onion/qresearch/res/10692879.html#10693640
::http://jthnx5wyvjvzsxtu.onion/qresearch/res/10692879.html#10693589