@echo off
:: Bardzo ważna linia \/
setlocal enabledelayedexpansion
:: wywołanie funkcji \/
call :split varka "tekst asdas fa fasfa" " "
:: zwrot liczby słów do %varka0% oraz wyświetlenie wszystkich za pomocą for \/
For /l %%A in (1,1,%varka0%) do (echo.!varka%%A!)
pause>nul
exit
::Tutaj zaczyna się funkcja, nie ruszasz jej tylko kopiujesz na koniec programu.Uzycie: call :split nazwa zmiennej tekst rozdzielacz
:split
set "var_name=%~1"
set vars=1
set chr=0
set text=%~2
set %var_name%0=1
set "delims=%~3"
:loop_split
set tmp=!text:~%chr%,1!
If not defined tmp (goto :EOF)
If "%tmp%"=="%delims%" (set/a vars+=1
set/a %var_name%0+=1)
If "%tmp%"==" " (set "%var_name%%vars%=") else (set "%var_name%%vars%=!%var_name%%vars%!%tmp%")
set/a chr+=1
goto loop_split