AppleScripts

Create a folder on the user's desktop

Use Set Variable to define $FolderName. Then define $User as:

Let ([
String = Get ( DesktopPath );
FirstSlash = Position ( String ; "/" ; 1 ; 3 );
SecondSlash = Position ( String ; "/" ; 1 ; 4 )]; 
Middle ( String ; FirstSlash + 1 ; (SecondSlash - FirstSlash - 1) ))

Define a third variable $AppleScript:

"tell application \"Finder\"¶
	activate¶
	select window of desktop¶
	make new folder at folder \"Desktop\" of folder \"" & $User & "\" of 
folder \"Users\" of startup disk with 
properties {name:\"" & $FolderName & "\"}¶
end tell"

Invoke Perform AppleScript script step to run $AppleScript.