Since you're already using Windows Explorer, you can simply use the find/search functionality to do what you want. Press F3, enter *.* and do a quick search. Then, just highlight all the found files and drag them into your top-level folder.
Are you saying I just wasted my time creating
Move
Everything
Recursively,
Delete
Empty ?
MERDE!

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=1360654278_56056.ico
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.8.0
Author: 4wd
Script Function:
Move Everything Recursively, Delete Empty (MERDE)
Icon from: http://www.iconfinder.com/icondetails/56056/32/crap_poo_shit_turd_icon
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <RecFileListToArray.au3>
#include <Array.au3>
If $CmdLine[0] = 0 Then Exit
$srce = $CmdLine[1]
$files = _RecFileListToArray($srce, '*', 1, 1, 1, 2)
If Not IsArray($files) Then
MsgBox(48, 'MERDE!', 'No files found!', 10)
Exit
EndIf
_Valmorphanize($files, $srce)
$folders = _RecFileListToArray($srce, '*', 2, 1, 1, 2)
If Not IsArray($folders) Then Exit
_PruneEmpty($folders)
Func _Valmorphanize($temp, $path)
For $i = 1 To $temp[0]
If $path <> StringLeft($temp[$i], StringInStr($temp[$i], "\", 0, -1) - 1) Then
$newdest = _AutoRename($path & '\' & StringRight($temp[$i], StringLen($temp[$i]) - StringInStr($temp[$i], "\", 0, -1)))
FileMove($temp[$i], $newdest)
EndIf
Next
EndFunc
Func _PruneEmpty($temp)
For $i = 1 To $temp[0]
If DirGetSize($temp[$i]) = 0 Then DirRemove($temp[$i], 1)
Next
EndFunc
; Function courtesy of KaFu:
; http://www.autoitscript.com/forum/topic/125602-filename-exists-auto-rename-making-too-many-duplicates/#entry871942
Func _AutoRename($sFilename)
$sFilename_Buffer = $sFilename
$i = 1
While FileExists($sFilename)
If $i = 1 Then
$sFilename = StringLeft($sFilename_Buffer, StringInStr($sFilename_Buffer, "\", 0, -1)) & "Copy of " & StringRight($sFilename_Buffer, StringLen($sFilename_Buffer) - StringInStr($sFilename_Buffer, "\", 0, -1))
Else
$sFilename = StringLeft($sFilename_Buffer, StringInStr($sFilename_Buffer, "\", 0, -1)) & "Copy of (" & $i & ") " & StringRight($sFilename_Buffer, StringLen($sFilename_Buffer) - StringInStr($sFilename_Buffer, "\", 0, -1))
EndIf
$i += 1
WEnd
Return $sFilename
EndFunc
Put the executable in the
%UserProfile%\SendTo directory and then you can just right-click->Send To MERDE.exe on the directory you want to turn to merde

eg.
From this:

Do this:

To get this:
