Microsoft Small Basic

Program Listing:
Embed this in your website
TextWindow.Write("Usuario do Twitter ? ")
usuario = TextWindow.Read()
opcao = 1
While opcao <> 2
  Textwindow.clear()
  Textwindow.WriteLine("Ultimos tweets de @"+usuario)
  x = network.getwebpagecontents("http://twitter.com/statuses/user_timeline/" + usuario + ".xml")
  tweets = xml.getnodes(xml.loadxmlstring(x), "//statuses/status/text")
  for i = 1 to array.getitemcount(tweets)
    tweet = xml.loadxmlstring(xml.getouterxml(tweets[i] ))
    textwindow.writeline(">"  + xml.getinnertext( xml.getnode( tweet, "//text" ) ))
    textwindow.writeline("")
  endfor
  TextWindow.Write("Opcoes: 1-Recarregar 2-Sair ? ")
  opcao = TextWindow.ReadNumber()
EndWhile
Copyright (c) Microsoft Corporation. All rights reserved.