Scan to open on your phone
Point a camera at the QR code - it opens this exact paste, no app needed.
https://codepastes.com/zzgt170dz0xv1vtxnewsioswp-timestoper.batBatch (DOS)
@echo off
setlocal EnableExtensions DisableDelayedExpansion
rem Autoclick (batch + PowerShell). No requiere AutoHotkey.
rem Controles:
rem F8 = toggle autoclick
rem F9 = salir
rem Intervalo:
rem 1000 ms
set "PS1=%TEMP%\autoclick_ps_%RANDOM%%RANDOM%.ps1"
rem Genera el .ps1 de forma segura (sin bloques con paréntesis/llaves que rompan CMD)
> "%PS1%" echo $ErrorActionPreference = 'Stop'
>>"%PS1%" echo $code = @'
>>"%PS1%" echo using System;
>>"%PS1%" echo using System.Runtime.InteropServices;
>>"%PS1%" echo public static class Win32 {
>>"%PS1%" echo [DllImport("user32.dll")] public static extern short GetAsyncKeyState(int vKey);
>>"%PS1%" echo [DllImport("user32.dll")] public static extern void mouse_event(int dwFlags, int dx, int dy, int cButtons, int dwExtraInfo);
>>"%PS1%" echo public const int MOUSEEVENTF_LEFTDOWN = 0x0002;
>>"%PS1%" echo public const int MOUSEEVENTF_LEFTUP = 0x0004;
>>"%PS1%" echo }
>>"%PS1%" echo '@
>>"%PS1%" echo Add-Type -TypeDefinition $code -Language CSharp
>>"%PS1%" echo $F8=0x77; $F9=0x78; $interval=8500; $clicking=$false
>>"%PS1%" echo Write-Host ("F8 toggle autoclick ^| F9 salir ^| intervalo " + $interval + " ms")
>>"%PS1%" echo $prevF8=$false; $prevF9=$false
>>"%PS1%" echo while($true){
>>"%PS1%" echo $f9Down = (([Win32]::GetAsyncKeyState($F9) -band 0x8000) -ne 0)
>>"%PS1%" echo if($f9Down -and -not $prevF9){ break }
>>"%PS1%" echo $prevF9 = $f9Down
>>"%PS1%" echo
>>"%PS1%" echo $f8Down = (([Win32]::GetAsyncKeyState($F8) -band 0x8000) -ne 0)
>>"%PS1%" echo if($f8Down -and -not $prevF8){
>>"%PS1%" echo $clicking = -not $clicking
>>"%PS1%" echo Write-Host ("AutoClick: " + $(if($clicking){'ON'} else {'OFF'}))
>>"%PS1%" echo }
>>"%PS1%" echo $prevF8 = $f8Down
>>"%PS1%" echo
>>"%PS1%" echo if($clicking){
>>"%PS1%" echo [Win32]::mouse_event([Win32]::MOUSEEVENTF_LEFTDOWN,0,0,0,0)
>>"%PS1%" echo [Win32]::mouse_event([Win32]::MOUSEEVENTF_LEFTUP,0,0,0,0)
>>"%PS1%" echo Start-Sleep -Milliseconds $interval
>>"%PS1%" echo } else {
>>"%PS1%" echo Start-Sleep -Milliseconds 30
>>"%PS1%" echo }
>>"%PS1%" echo }
powershell -NoProfile -ExecutionPolicy Bypass -File "%PS1%"
set "ec=%ERRORLEVEL%"
del /q "%PS1%" >nul 2>&1
if not "%ec%"=="0" (
echo.
echo ERROR: PowerShell devolvio codigo %ec%.
)
endlocal
pause
2,325 chars · codepastes.com