quinta-feira, 26 de fevereiro de 2009

NXT Internet

Some times I look forward in Internet, looking for some information and experiences from another peopleo.
I saw and recommend the Blog http://bsdpunk.blogspot.com/. The guy is doing a experience with NXT, using PERL and TWITTER. If you know somethink in PERL, it willl be better.
If you have a Blog or you know wheres I can find information and experiencs like this, please, type at the comment. I will check!!!

Sds, Robson.

quarta-feira, 25 de fevereiro de 2009

The LEGO Mindstomrs NXT Idea Book

Bom, finalmente comprei e chegou o livro sobre montagem e e desenvolvimento de do NXT LEGO. Comprei no Submarino.
O livro é bastante interessante, pois explica bem os componentes e funcionalidades, principalmente a opção de Bluetooth, que segundo ele é o recurso mais interessante ( Também concordo ).
O livro é basicamente dividido em 2 partes: peças basicas e robos. Na primeira parte, todos os componentes são muito bem detalhados. O que mais achei interessante e usual é a parte de funcionamento do software NXT-G. Esta parte me esclareceu muitas duvidas, principalmente em relação a interligações dos blocos.
A segunda parte é compsta pela explicação de montagem de 8 robos, que vai de uma máquina de tirar foto comandada por voz, a um robo artista que faz desenhos programados.

O que não gostei foram as fotos em preto-e-branco. Outro detalhe: é todo escrito em inglês.

Emfim, mais um book pra coleção que espero utilizar bastante. Recomendo.









Sds, Robson.






quarta-feira, 18 de fevereiro de 2009

Conectando com o NXT via Bluetooth

Montar o NXT Explorer e o programa do LEGO é extremamente fácil, porém, romper as barreiras para além das possibilidades simplesmente disposníveis é o que é mais interessante. Um grande e bom desafio é montar um programa no PC para fazer comunicação via Bluetooth com o NXT: Para isso, utilizei meu velho conhecido de guerra, o Visual basic 2005. Com isso, a implementação via software está garantida, porém, o desafio está em fazer os "bixos" se comunicarem. Vamos lá:
Pra começar, vc deve ter no PC um dispositivo de comunicação via Bluetooth, no meu caso eu utilizei um modelo "Pen Drive", que é o mais comum.
Feito isto, agora siga os passo-a-passos deste site: http://www.extremenxt.com/vbpart1.htm

Para ajudar no entendimento da programação, é preciso ler a documentação sobre comunicação Bluetooth do NXT. Esta documentação vc encontra aki. Aliás, acredito que esta é uma obrigação para qualquer programador de baixo nível, ou seja, conhecer bem como é implementado os comandos de hardware, alocação de memória e funcionamento geral, evita perda de tempo e ajuda em uma fácil montagem do programa.

O código do site, onde é explicado a conexão, leitura da bateria e fechamento da conexão, está comentado abaixo:

Ainda abaixo, mostro como ficou o meu programa...

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
With SerialPort1
.PortName =
"COM9" '<<<<> .BaudRate = 96000
.Parity = IO.Ports.Parity.None
.DataBits = 8
.StopBits = IO.Ports.StopBits.One
.ReadTimeout = 300
'300ms
.WriteTimeout = 300 '300ms
End With
SerialPort1.Open()
Label1.Text =
"Connected"
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim byteOut(5) As Byte
Dim byteIn(6) As Byte
Dim Voltage, i As Integer
Try
byteOut(0) = &H2 '2 bytes na msg de saida
byteOut(1) = &H0 'deve ser 0 para NXT
byteOut(2) = &H0 '&H0 = resposta esperada &H80 = nao esperada
byteOut(3) = &HB '$HB = comando de leitura da bateria
SerialPort1.Write(byteOut, 0, 4) '0 = offset de byteOut e 4 = numero de bytes pra ler a reposta

byteIn(0) = SerialPort1.ReadByte ' nummero de bytes na msg
byteIn(1) = SerialPort1.ReadByte ' deve ser 0 para NXT
For i = 2 To 1 + byteIn(0) ' ler o resto da msg
byteIn(i) = SerialPort1.ReadByte()
Next
Voltage = byteIn(5) + byteIn(6) * 256 ' a voltagemé parte do Byte 5 e 6
Label2.Text = Voltage 'mostra a voltagem
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub










Robson

segunda-feira, 16 de fevereiro de 2009

quinta-feira, 12 de fevereiro de 2009

Pra quem é apaixonado por Jogo interativo:

segunda-feira, 9 de fevereiro de 2009

Explorer - NXT

Este robo, chamado EXPLORER montei baseado no site http://www.nxtprograms.com/explorer/index.html
Até agora não mudei nada...

(Estou sem cam digital, por isso usei o celular)


















Sds, Robson

sábado, 7 de fevereiro de 2009

INFORMÁTICA

Aprendi uma coisa hoje na faculdade que não tinha parado pra pensar ainda:
INFORMÁTICA = INFO de INFOrmação + mática de autoMÁTICA, ou seja: informação automática ou automatização da informação.
Nóis compila mas não roda.

E para os tempos atuais de informatica, ouça a musica:





A letra é:
Imagine there’s no Apple,
No products that begin with “i,”
No monthly iPod models,
No Apple stores to get you high.
Imagine all the people
Finding other things to do!

Imagine there’s no bloggers…
It isn’t hard to do!
No viruses or spyware,
No weekly Windows patches, too
Imagine all the people
Learning to get a life…

(You-hoo-hoo!)

You may say it’d be a nightmare
Without Google, Mac or Dell
We might have real conversations–
But the world would be dull as hell!

Imagine no new cellphones;
Kiss console games goodbye.
No David Pogue or Mossberg
To tell us what to buy.
Imagine all the people
Getting some exercise!

(You-hoo-hoo!)

You may say that I’m a loony
But rest assured I’m almost done.
I’m pretty sure it’ll never happen
So we nerds can live as one!

domingo, 1 de fevereiro de 2009

LEGO MINDSTORMS

















Há 2 meses comprei meu Kit da Lego: Mindstorms. Já avancei em muita coisa com ele, pelo menos até agora não perdi nenhuma peça ainda. Meu maior desafio foi conseguir guardar todas a pecinham em um "lugar seguro". Deu trabalho mas achei pra comprar aquelas caixas organizadoras cheias de divisórias.
Ao lado tem umas fotos dos robos que já consegui montar. Depois eu posto os programas e algumas dicas.
Este ultimo que montei, teinha um "acelerador", com 3 estágios: 10%, 50% e 100 % da velocidade.

Site que estou pegando dicas:
http://www.nxtprograms.com/projects.html