C:\>findstr /p /a:0d /c:"." "colored text\..\E:\foo.txt" nul
colored text\..\E:\foo.txt:some text.

Что имеем в итоге? Цветной текст "colored text\..\E:\foo.txt:" и прочий мусор. То есть, если будет найден способ отбрасывать прочий вывод после "colored text", а также возможные дубликаты строк, то:
1)можно запихать символ точки в конец самого батника и не плодить временные файлы
2)возрастет скорость работы самого батника
3)отпадает надобность в создании кучи функций
В общем, надеюсь, читающим сей пост, суть идеи ясна.

Задержка связана с тем, что при одновременном запуске большого числа экземпляров всё-таки возникали накладки с созданием временных папок. Теперь, на другом компьютере, это не воспроизводится.
Вот я и гадаю, то ли это связано, с плохим охлаждением того компьютера, из-за чего он при больших нагрузках давал сбои (тогда ничего срашного) или дело в разной файловой системе (FAT и NTFS). Пока перепроверить на старом компьютере руки не доходят (надо чистить, смазывать, возникла необходимость переустанавливать систему).
Единственное место в котором мог возникнуть такой сбой:

  md "%tempFolder%" 2>nul || goto write1

но чисто умозрительно его здесь быть не должно.
Добавил пока как есть, если что, можно будет поправить.

а так не забывайте ВВС
%system32%\system32\ansi.sys

Ну а если вместо x использовать random:
Проблем вроде бы не должно быть.

Скорее всего, не должно; просто лично у меня предубеждение против повторных обращений при неудаче к датчику псевдослучайных чисел, т.к. чисто теоретически при определённых условиях может произойти его зацикливание.

В Windows XP такого ограничения нет даже при DISABLEEXTENSIONS, было ли оно в более ранних версиях CMD.EXE — не знаю, но почему-то сомневаюсь. Более вероятно, что это ограничение было в COMMAND.COM.

:write
:: Вывести цветную надпись без перевода строки
:: %1 - цвет
:: %2 - текст надписи
:: %3 - флаг, любое значение, если нужно двоеточие в конце строки
  setlocal
  :write1
  set "tempFolder=%TEMP%\%~n0.%time:~-2%.%random%"
  md "%tempFolder%" 2>nul || goto write1
  pushd %tempFolder%
  set /p .=.<nul>"%~2"
  findstr /a:%~1 /c:"." /s "%~2"
  if "%~3"=="" (set /p .=  <nul) else set /p .= <nul
  popd
  rd /s /q "%tempFolder%"
endlocal & exit /b

Проблем вроде бы не должно быть.

P.S. На счет меток хотелось бы уточнить. Метка "write.TRY_MD" - 12 символов. Ограничение длинны метки в 8 символов еще действует или это было в старых версиях cmd?

  pushd %TEMP%
  set tempFolder=...
  md "%tempFolder%"
  cd "%tempFolder%"
...
  cd ..
  rd /s /q "%tempFolder%"
  popd

можно сократить на два шага:

  set tempFolder=%TEMP%\...
  md "%tempFolder%"
  pushd "%tempFolder%"
...
  popd
  rd /s /q "%tempFolder%"

В итоге, с учётом сказаного в #6,
процедуру write можно переписать в виде

:write
:: Вывести цветную надпись без перевода строки
:: %1 - цвет
:: %2 - текст надписи
:: %3 - флаг, любое значение, если нужно двоеточие в конце строки
  setlocal
  set x=0
  :write.TRY_MD
  set "tempFolder=%TEMP%\%~n0.%x%%time:~-2%"
  md "%tempFolder%" 2>nul || (set /a "x+=1" & goto write.TRY_MD)
  pushd "%tempFolder%"
  set /p .=.<nul>"%~2"
  findstr /a:%~1 /c:"." /s "%~2"
  if "%~3"=="" (set /p .=  <nul) else set /p .= <nul
  popd
  rd /s /q "%tempFolder%"
endlocal & exit /b

  set tempFolder=~%time:~6,2%%time:~9,2%_%random%.tmp
  md "%tempFolder%"

всё-таки не поможет при одновременном запуске нескольких экземпляров, т.к ни %RANDOM%, ни %TIME% не обеспечивают неповторяемость значений.
Лично я переписал бы это на пару строк длиннее, зато более непробиваемо:

  set x=0
  :write.TRY_MD
  set "tempFolder=%~n0.%x%%time:~-2%"
  md "%tempFolder%" 2>nul
  if errorlevel 1 set /a "x+=1" & goto write.TRY_MD

(последние две строки можно переписать короче:

  md "%tempFolder%" 2>nul || (set /a "x+=1" & goto write.TRY_MD)

)

Для проверки можно попробовать запустить командый файл в нескольких окнах одновременно

for /l %i in (1 1 10) do @start "%i" cmd /c color.cmd

для обоих случаев.