Code: Select all
@echo off &prompt $g &setlocal enableDelayedExpansion &set $lf=^
::
%= =%set ^"$n1c=^^^%$lf%%$lf%^%$lf%%$lf%^<nul ^^"
%= =%set ^"$c1=%%~#^<nul ^^"
%= =%set "echon_=echo("
%= =%set "echo_=<nul set/p="
%= =%set "necho_=%echon_%&%echo_%"
%= =%set "n2echo_=%echon_%&%necho_%"
%= =%set "forQ_=for %%? in"
%= =%set "e5=^^^^^"
%= =%set "e7=%e5%^^"
%= =%set "e15=%e7%%e7%^"
%= =%set "e31=%e15%%e15%^"
:: (
%= =%for %%# in ("") do set ^"cmdMacro=%forQ_% (1,2) do if %%?==2 (setlocal enableDelayedExpansion%%$lf%%%$c1%
%$c1%
%= =%!necho_! This works %e31%!%%$lf%%%$c1%
%$c1%
%= =%endlocal)else set $="
::
( %n2echo_%cmdMacro=!cmdMacro!_ )
setlocal enableDelayedExpansion
:: (
( %n2echo_% enaDelayed, /v:on, pipe )
( cmd /v:on /e:on /t:0B /q /c "%%cmdMacro%%" ) 2>nul >con |(rem^ )
:: )
endlocal
:: )
endlocal
pause
exit
Code: Select all
cmdMacro=for %? in (1,2) do if %?==2 (setlocal enableDelayedExpansion%$lf%echo(&<nul set/p= This works ^^^^^^^!%$lf%endlocal)else set $=_
enaDelayed, /v:on, pipe ♪◙ This works ^!Druk op een toets om door te gaan. . .
Code: Select all
Microsoft Windows XP [versie 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.
C:\Documents and Settings\Administrator>^N
♫ wordt niet herkend als een interne
of externe opdracht, programma of batchbestand.
C:\Documents and Settings\Administrator>
