Move folders in their own first letter directory

Question

I use this script to move folders in their own first letter directory

@echo off
setlocal enabledelayedexpansion

tree
for /d %%i in (*) do (
  set first=%%i