New folder from selection (Snow Leopard, OSX)

Applescript (save as an app, and stick on your toolbar for ease of use with Finder items):

tell application "Finder"
make new folder at window 1 with properties {name:text returned of (display dialog "Choose a name" default answer "untitled folder")}
move selection to the result
end tell