document.write('\
\ "); document.write('
  1. #This script will compare the names of the people you follow on Twitter
    2. \
  2. #and the people following you.  It returns a comparison object consisting
    3. \
  3. #of the Twitter name of a subject and a side indicator -
    4. \
  4. #"<=" means that you are following a subject who is not following you,
    5. \
  5. #"=>" means that you are followed by someone who you are not following.
    6. \
  6.  
    7. \
  7. function GetTwitterNames([string]$query)
    8. \
  8. {  
    9. \
  9.     $wc = new-object System.Net.WebClient
    10. \
  10.     $wc.Credentials = $script:credential.GetNetworkCredential()
    11. \
  11.  
    12. \
  12.     $nbrofpeople = 0
    13. \
  13.     $page = "&page="
    14. \
  14.     $names = @()
    15. \
  15.  
    16. \
  16.     do
    17. \
  17.     {
    18. \
  18.         $url = $query
    19. \
  19.         if ($nbrofpeople -gt 0)
    20. \
  20.         {
    21. \
  21.             $url = $url+$page+($nbrofpeople/100 +1)
    22. \
  22.         }
    23. \
  23.  
    24. \
  24.         [xml]$nameslist = $wc.DownloadString($url)
    25. \
  25.  
    26. \
  26.         $names += $nameslist.users.user | select name
    27. \
  27.  
    28. \
  28.         $nbrofpeople += 100
    29. \
  29.     } while ($names.count -eq $nbrofpeople)
    30. \
  30.  
    31. \
  31.     return $names
    32. \
  32. }
    33. \
  33.  
    34. \
  34. $twitter = "http://twitter.com/statuses/"
    35. \
  35. $friends = $twitter + "friends.xml?lite=true"
    36. \
  36. $followers = $twitter + "followers.xml?lite=true"
    37. \
  37.  
    38. \
  38. $credential = Get-Credential
    39. \
  39.  
    40. \
  40. $friendslist = GetTwitterNames($friends)
    41. \
  41. $followerslist = GetTwitterNames($followers)
    42. \
  42.  
    43. \
  43. $sync = 0
    44. \
  44. if ($friendslist.count -gt $followerslist.count)
    45. \
  45. {
    46. \
  46.         $sync = ($friendslist.count)/2
    47. \
  47. }
    48. \
  48. else
    49. \
  49. {
    50. \
  50.         $sync = ($followerslist.count)/2
    51. \
  51. }
    52. \
  52.  
    53. \
  53. $Status = @{Name=\'Status\';Expression={if ($_.sideindicator -like \'=>\') {\'Followed By\'} else {\'Following\'}}}
    54. \
  54.  
    55. \
  55. compare-object $friendslist $followerslist -SyncWindow ($sync) -Property name | Select-Object Name, $Status
    56. \
');document.write('
downloadThis Script brought to you by PoshCode\
\
\
');