@echo off
setlocal ENABLEDELAYEDEXPANSION
for /f "Tokens=1" %%c in ('net view^|find "\\"') do (
set comp=%%c
set work=!comp:\=!
call :isOK
)
endlocal
goto :EOF
:isOK
call CMPAvail %work% OK
if "%OK%" EQU "N" @echo %comp% not available.&goto :EOF
for /f "Tokens=1-3" %%a in ('reg query "%comp%\HKU\.Default\Control Panel\Keyboard" /V InitialKeyboardIndicators^|find "REG_SZ"') do (
if "%%c" EQU "2" set OK=N
)
if "%OK%" EQU "N" goto :EOF
@echo reg ADD "%comp%\HKU\.Default\Control Panel\Keyboard" /V InitialKeyboardIndicators /T REG_SZ /F /D 2
reg ADD "%comp%\HKU\.Default\Control Panel\Keyboard" /V InitialKeyboardIndicators /T REG_SZ /F /D 2
@echo.