Tuesday, April 17, 2007

M2M - The day you went away

M2M - The Day You Went Away

Well I could it be, When I was dreamin 'bout you baby
You dreaming of me, Call me crazy, Call me blind
To still be suffering is stupid after all this time

( pre-chorus 1 )
Did I lose my love to someone better
and does she love you like I do
I do, You know I really really do

( chorus )
Well hey, so much I need to say

been lonely since the day
the day you went away
So sad, but true
For me there's only you
Been crying since the day
The day you went away

I remember date and time
September 22nd
Sunday twenty five after nine
in your door with your caseno longer shouting at each other
There were tears on your faces

( pre-chorus 2 )
And we were letting go to something special
Something we'll never have again
I know, I guess I really really know

( repeat chorus )

The day you went away
The day you went away

( repeat pre-chorus 1 )

( repeat chorus )

( bridge )
We do we never know that we got 'til its gone
How could I carry on, The day you went away
Couse I've been missing you so much I have to say
Been crying since the day
The day you went away, The day you went away

Read More...

Friday, April 13, 2007

Komunikasi RS232

Buat temen2 yang mau tau gimana cara gampang komunikasi PC dengan COMM (RS232) dengan menggunakan toos Borland C++ Builder, gw mau kasih tau caranya :

  1. Kalian harus punnya dan install komponen untuk komunikasi melalui RS232, dalam hal ini gw pake komponen TCommPort.
  2. Pilih dan temptin aja komponen (yang udah di install) itu ke form kamu
  3. Untuk memulai komunikasi, port-nya harus di buka terlebih dahulu, carannya : buat satu tombol/menu untuk Connect, trus

    masukin code berikut

    void __fastcall TForm1::Connect1Click(TObject *Sender)
    {
    CommPort1->Open();
    ShowMessage(CommPort1->Connected?"Connected":"Disconnected");
    }

    kalau keluar message "Connected", berarti Port telah terbuka dan siap melakukan komunikasi.
  4. Untuk melakukan send data, buat satu tombol untuk Send, trus masukin code berikut :

    void __fastcall TForm1::SendClick(TObject *Sender)
    {
    AnsiString tmpStr = "Hello";
    CommPort1->Write(tmpStr.c_str(), tmpStr.Length());
    }
  5. Sedangkan Untuk menerima data yang masuk, caranya siapkan terlebih dahulu editor untuk menampilkan data yang di terima, gampangnnya pake memo. Pada event Commport (OnDataReceived), masukin code berikut :

    void __fastcall TForm1::CommPort1DataReceived(TObject *Sender,
    const char *Buffer, unsigned Length)
    {
    Memo1->Lines->SetText(AnsiStr(Buffer));
    }

    Code itu akan menampilkan data yang diterima, dan menampilkan data yang diterima berikutnnya pada baris baru. Untuk menampilkan data berikutnnya pada baris yang sama, maka perlu sedikit tambahan. caranya gimana,,, Utak - atik aja sendiri. heheh
  6. Terakhir, untuk menutup komunikasi, masukin code berikut ke tombol Disconnect :

    void __fastcall TForm1::Disconnect1Click(TObject *Sender)
    {
    CommPort1->Close();
    ShowMessage(CommPort1->Connected?"Connected":"Disconnected");
    }

    Kalau keluar message "Disconnected", tandannya tau sendiri kan ...........

That's all,,, simple banget kan... silahkan mencoba berkomunikasi dengan RS232.
Karena komunikasi dengan manusia itu susah hehehhehe.........
Peace ....


Read More...

Monday, April 2, 2007

first blog

Hallo...
Ini adalah posting pertama blog gw...

regards,

sony.

Read More...