DosTips.com

Code: Select all

set "amp=^&"
set "pipe=^|"
set "lt=^<"
set "gt=^>"
call :%%%%this%%%%"label"^looks:%%lt%%a%%pipe%%bit%%gt%%^^odd
exit /b

:%this%"label"^looks<quite|a> ^^:+bit&normally
echo The function is called via "%0"
exit /b

Code: Select all

+:,;=  <space>,<TAB> and <LF>

Code: Select all

|&<>(

Code: Select all

set "amp=^&"
call :Test%%amp%%yes
exit /b

:test^&yes
echo Called by "%0"
exit /b

Code: Select all

set "caret=^"
call :test%%caret%%^&yes
exit /b

:test^&yes
echo Called by "%0"
exit /b

Code: Select all

:+

Code: Select all

:one
:one:two
:one+two
:one^

Code: Select all

:label
=,,;;  ,;= :label
X =,,;;  ,;= :label
< :label

Code: Select all

@echo off
cls
call :#;#
%:#+~%,=*
>=,;=;,,=,;:%%+,=;echo\=%01>&2&call=;:%%%%%%%%;%*
echo *%*

Code: Select all

@echo off
cls
call :#;#

:#
echo.label=%0_
echo. args=%*_

> :%% echo. &call ;:%%%%%%%%;%*
echo.label=%0_
echo. args=%*_

pause
exit

Code: Select all

@echo off

call :tee 1 2 3
call ::tee 1 2 3
call :::tee 1 2 3
call :tee:::::::::::::: 1 2 3

if exist "%~dp0logfile.txt" del "%~dp0logfile.txt"
call :tee+"%~dp0logfile.txt" 1 2 3
call :tee+"%~dp0logfile.txt" 1 2 3 4 5 6 7 8 9 10 11 12 13
goto :eof

:tee
echo %0 ^( %* ^)
setlocal & set tee=%0
if not %tee::=%==tee (
  >>%tee:*+=% echo %0 ^( %* ^)
)
endlocal

Code: Select all

C:\tmp>calltest
:tee ( 1 2 3 )
::tee ( 1 2 3 )
The system cannot find the batch label specified -
:tee:::::::::::::: ( 1 2 3 )
:tee+"C:\tmp\logfile.txt" ( 1 2 3 )
:tee+"C:\tmp\logfile.txt" ( 1 2 3 4 5 6 7 8 9 10 11 12 13 )

C:\tmp>type logfile.txt
:tee+"C:\tmp\logfile.txt" ( 1 2 3 )
:tee+"C:\tmp\logfile.txt" ( 1 2 3 4 5 6 7 8 9 10 11 12 13 )

Code: Select all

@echo off
setlocal EnableDelayedExpansion 
for /f %%a in ('copy /Z "%~dpf0" nul') do set "CR=%%a"
goto :1!CR!x
echo Never reached
:1<CR>x
echo It works

Code: Select all

@echo off
setlocal EnableDelayedExpansion 
set lf=^


set "xlf=^^!lf!!lf!"
call :AAA:^^%%XLF%%%%XLF%%BBB
exit /b

:AAA
echo CALLED by #%0#
exit /b

Code: Select all

@echo off
setlocal
pushd "%~dp0"

if "%~1"=="stop" (
  echo stopping
  exit /b
)

call :test
echo before label
C:test stop
echo after label

Code: Select all

after label
before label
stopping

Code: Select all

@echo off
setlocal
pushd "%~dp0"

if "%~1"=="stop" (
  echo stopping = %0 ^( %* ^)
  exit /b
)

call :"t e s t" 123
echo before label = %0 ^( %* ^)
C:"t e s t" stop
echo after label = %0 ^( %* ^)

Code: Select all

C:\tmp>"t e s t" 987
after label = :"t e s t" ( 123 )
before label = "t e s t" ( 987 )
stopping = C:"t e s t" ( stop )

Code: Select all

call :myFunc
echo back again

:myFunc ^
echo This is function %0 & exit /b
echo ERROR: You don't call the function 
exit /b

Code: Select all

REM 1. Prepare the BatchLibrary for the start command
call BatchLib.bat

REM 2. Start of the Batchlib, acquisition of the command line parameters, swtich to the temporary LibTest1.BLibTmp.bat
<:%BL.Start%

Code: Select all

BL.Start=:< nul ( 
  setlocal EnableDelayedExpansion
  set "bl.cmdcmdline=!cmdcmdline!" 
  call set "bl.param[0]=%~f0"
  FOR /L %n IN (1,1,9) DO ( 
    call set "bl.param[%n]=%~1"
    shift /1 
  ) 
)     
"D:\Projekte\EHS\Batch\BatchLib\BatchLib.bat" /INTERN_START "!bl.param[0]!"

Code: Select all

<:%BL.Start%

Code: Select all

@echo off
setlocal
pushd "%~dp0"
echo wscript.echo "***  :ads.vbs ( " ^& wscript.arguments(0) ^& " ) ***" >test2.cmd:ads.vbs
call :ads.vbs 123
echo before label = %0 ^( %* ^)
cscript //nologo test2.cmd^
:ads.vbs 456
echo after label = %0 ^( %* ^)

Code: Select all

C:\tmp>test2 987
after label = :ads.vbs ( 123 )
before label = test2 ( 987 )
***  :ads.vbs ( 456 ) ***
after label = test2 ( 987 )

Code: Select all

@echo off
set "perVar=%%perVar%% percent-expansion,"
set "delVar=!delVar! delayed-expansion,"
echo %perVar%
call echo %perVar%
call call echo %perVar%
setlocal EnableDelayedExpansion
echo !delVar!
call echo !delVar!
call call echo !delVar!

Code: Select all

setlocal EnableDelayedExpansion
set "var=myLabel"
set "pVar=^!var^!"
echo !pVar!
call echo !pVar!
call :!pVar!
exit /b

:myLabel
setlocal DisableDelayedExpansion
echo myLabel is called, the func name is %0
exit /b

Code: Select all

@echo off
setlocal enableDelayedExpansion

set "var=myLabel"
set "dvar=^!var^!"
echo before CALL
call :!dvar!
echo after CALL

:ContinuedLabel with embedded commands that only execute if this label is called ^
echo After ContinuedLabel & exit /b

echo This continued line has an embedded label { ^
:myLabel } followed by an embedded ^
goto continue that only works if :myLabel is called & exit /b
goto !dvar!

:continue
setlocal disableDelayedExpansion
echo Inside call to %0
endlocal
goto :ContinuedLabel

Code: Select all

before CALL
Inside call to :!var!
After ContinuedLabel
after CALL
This continued line has an embedded label { :myLabel } followed by an embedded goto continue that only works if :myLabel is called

Code: Select all

@echo off
set pVar=!var!
set LF=^


setlocal EnableDelayedExpansion
call :lab    test1
call :label  test2
set "var=lab^el"
call :!pVar! test3
set "var=lab^^el"
call :!pVar! test4
set "var=lab!LF!el"
call :!pVar! test5
set "var=lab^^!LF!el"
call :!pVar! test6
exit /b

:lab^
el
echo Currently I can't call this

Code: Select all

set "pVar=!var!"
setlocal EnableDelayedExpansion
set "var=label"
call :!pVar! works
set "var=:Label"
call !pVar! failed
exit /b

:label
echo It works
exit /b

Code: Select all

@echo off
call :blah/?blah
goto :blah/?blah

call :label1 /?
goto :label1 /?

exit /b 0

:label1
echo ---------------