PowerShell function to print out TFS Branch Hierarchy for all

Print-TFSBranchHierarchy.ps1

[Reflection.Assembly]::Load(“Microsoft.TeamFoundation.Client, Version=12.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a”); 
[Reflection.Assembly]::Load(“Microsoft.TeamFoundation.Common, Version=12.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a”); 
[Reflection.Assembly]::Load(“Microsoft.TeamFoundation.Lab.Client, Version=12.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a”); 
[Reflection.Assembly]::Load(“Microsoft.TeamFoundation.Lab.Common, Version=12.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a”); 
[Reflection.Assembly]::Load(“Microsoft.TeamFoundation.VersionControl.Client, Version=12.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a”);

$tfsCollectionUrl = New-Object System.URI("http://TFSServer:8080/tfs/CollectionName/");
$tfsCollection = [Microsoft.TeamFoundation.Client.TfsTeamProjectCollectionFactory]::GetTeamProjectCollection($tfsCollectionUrl); 
$versionControl = $tfsCollection.GetService([Microsoft.TeamFoundation.VersionControl.Client.VersionControlServer]);

function Print-Branch($depth, $branch) {
	$indent = "";
	for ($tabcounter = 0; $tabcounter -lt $depth; $tabcounter++) {$indent += "`t";}
	Write-Host $indent $branch.Properties.RootItem.Item $branch.Properties.RootItem.Version.ChangesetId
	$childBranches = $versionControl.QueryBranchObjects($branch.Properties.RootItem, [Microsoft.TeamFoundation.VersionControl.Client.RecursionType]::OneLevel);
	$depth++;
	$childBranches | ?{$_.Properties.RootItem.Item -ne $branch.Properties.RootItem.Item} | %{Print-Branch -depth $depth -branch $_}
	$childBranches = $null;
	$depth--;	
}
$rootBranches = $versionControl.QueryRootBranchObjects([Microsoft.TeamFoundation.VersionControl.Client.RecursionType]::OneLevel);
$rootBranches | %{Print-Branch -depth 0 -branch $_}