internet radio. .

yuhuuuuuuuuu, , , setelah launchingnya pc33, yg semula bernama pc33.co.tv, [baca : forum kebersamaan anak mig33 rum komputer] yang dibangun atas azaz kekeluargan, dengan tidak memandang suku, agama, ras, antar golongan. apa lagi memandang umur, status, indek prestasi, dan lain2. tentu tidak  , tadi malem pada heboh sama yang namanya radio onlen punya pc33 . .

dan berhubung saya hanya pake Hp, dan penasaran sama suaranya paman santa dan si kuro , maka berjuanglah saya untuk menjelajah, mencari app buat hp saya. .

app nya bernama internet radio.

kl Hp anda nokia, berikut link donlodnya : klik disini


selamat mencobaaaa!!!!!!!!!!!!!!!!!!!!!!!!!!!

Read More

BUBBLE SORT

setelah kemaren saya bahas soal selection sort, hari ini saya mau bahas tentang bubble sort. Bubble sort disebut juga dengan metode Penukaran (Exchange Sort), yaitu metoda yang
mendasarkan pada penukaran elemen untuk mencapai keadaan urut yang diinginkan.
Algoritma Metode gelembung :
• langkah 0 : Baca vector yang akan diurutkan (dalam program utama)
• langkah 1 : Kerjakan langkah 2 untuk i = 1 sampai N-1
• langkah 2 : Kerjakan langkah 3 untuk j = 1 sampai N- i
• langkah 3 : Tes apakah A[j] > A[j +1] ? Jika ya, tukarkan nilai kedua elemen ini
• langkah 4 : Selesai

berikut adalah contoh program yg saya buat. .

program buble;

uses Crt;
type ArrInt = array [1..100] of integer;

var     data : arrInt;
        i, n : integer; pil : integer;


Procedure TukarData(var a,b : integer);
var c : integer;
Begin
c:=a;
a:=b;
b:=c;
end;


Procedure bubblesort_asc(var data:arrInt; N:word);
Var i,j : word;
Begin
For i:= 1 to N-1 do
For j:= 1 to N-i do
If data[j] > data[j+1] then
Tukardata (data[j], data[j+1]);
end;

Procedure bubblesort_desc(var data:arrInt; N:word);
Var i,j : word;
Begin
For i:= 1 to N-1 do
For j:= 1 to N-i do
If data[j] < data[j+1] then
Tukardata (data[j], data[j+1]);
end;


begin
clrscr;
writeln('====BUBBLE SORT====');
writeln('1.Masukan Data');
writeln('2.Sort ascending');
writeln('3.Sort Descending');
writeln('4.keluar');
while pil <> 4 do begin
    write('masukan pilihan menu 1/2/3/4 '); readln(pil);
    case pil of
    1  : begin
         write('masukan jumlah data : '); readln(n);
         for i:=1 to N do
         begin
         write('data ke ',i, ': '); readln (data[i]);
         end;

         writeln;
         end;
    2  : begin
         writeln('pengurutaaann, , , ,');
         writeln('secara ascending : ');
         Bubblesort_asc(data, n);
         for i:=1 to n do
         writeln(data[i]);
         writeln;
         end;
    3  : begin
         writeln('pengurutaaann, , , ,');
         writeln('secara descending : ');
         bubblesort_desc(data, n);
         for i:=1 to n do
         writeln(data[i]);
         writeln;
         end;

    end;
end;
readln;

end.

 sayangnya running programnya kelupaan, ketinggal di laptop, hohohohoho, ,
run sendiri yak :p

Read More

METODE SELEKSI (SELECTION SORT)

Pengurutan atau shorting merupakan proses untuk menyusun kembali kumpulan entri-entri
yang telah dimasukkan dengan suatu aturan tertentu. Secara umum ada 2 macam
pengurutan yaitu pengurutan secara menaik (ascenden) dan pengurutan secara menurun
(descenden).

METODE SELEKSI (SELECTION SORT)

Masukkan dinyatakan sebagai vector misal vector A (belum terurut), dan N (missal
banyak elemen yang akan diurutkan). Keluaran adalah vector A yang telah terurut.

Algoritma metode seleksi :
• langkah 0 : Baca vector yang akan diurutkan (dalam program utama)
• langkah 1 : Kerjakan langkah 2 sampai 4 untuk i = 1 sampai N -1
• langkah 2 : Tentukan awal = i , kerjakan langkah 3 untuk j = i +1 sampai N
• langkah 3 : (Mencari data terkecil)
Tes : apakah A[awal] > A[j], jika ya maka ubah awal = j
• langkah 4 : Tukarkan nilai A[awal] dengan A[i]
• langkah 5 : selesai


implementasinya sebagai berikut :

program contoh_sorting;
uses crt;
type dataItem = integer;
arrInt = array [1..100] of dataItem;




procedure Tukar(var a,b : dataItem);
var temp : dataItem;
begin
temp := a;
a := b;
b := temp;
end;


procedure SelectionSort(var X : ArrInt; n : integer ; awal : integer);
var i,j : integer;
begin


for i:=1 to N-1 do
begin
awal :=i
for j := i+1 to N do
begin
if (x[i] > x[j]) then awal :=j;


end;
Tukar(x[awal],x[i]);
end;




end;



var data:arrInt;
i, n:integer;




begin
clrscr;
write('masukan jumlah data : '); readln(n);
for i:=1 to N do
begin
write('data ke ',i, ': '); readln (data[i]);
end;


begin


SelectionSort(data, n);
for i:=1 to n do
write(data[i],' ');
readln;
end;


end.

 run programnya adalah sebagai berikut :

next saya mau posting tentang Bubble Sort  ,, tunggu yaaaa!

Read More

sekilas tentang Skype

Apa sih Skype itu? ya kalau menurut saya sih gak jauh bedalah dengan Yahoo messenger maupun dengan Camfrog. Skype merupakan software yang bisa dipakai untuk ngobrol chating dengan teman. Skype bisa dibilang juga Handphonenya Komputer kalau menurut saya,karena kita gak bisa ngobrol dengan teman maupun saudara kalau kita gak punya idnya dan menambahkan di list skypenya,dan meskipun sudah ada di list tapi waktu di call orangnya gak didepan PC ya gak bakalan bisa ngobrol hehehe,Sama saja HP,nelp teman tapi HPnya lagi gak dibawa atau temennya lagi tidur,kecuali anda sms dulu saya mau nelp nihh,Skype kalau menurut saya adalah aplikasi yang paling bagus dari segi suara dan gambar videonya,dibanding YM maupun camfrog.Suara dan gambar yang dihasilkan hasilnya jernih dan bagus meskipun koneksi sangat LOLA.


selain di windows, Skype juga dapat dijalankan pada Mac OS X, Linux dan PDAs dengan menggunakan pocket PC, dengan tampilan dan sentuhan asli pada tiap platformnya. Bercakap-cakap, mengirimkan pesan singkat atau juga mentransfer file pekerjaan antar platform yang berbeda dengan mudah.

* Skype calling – Skype memiliki semua fitur seperti pada telephone biasa, sehingga akan lebih mudah untuk mengatur panggilan.
* Video calling – sambil melakukan penggilan, anda dapat melihat dengan siapa anda sedang berbicara.
* Menambah kontak Skype dan SkypeOut – tambahkan kontak pengguna Skype dan siapa saja yang menggunakan telepon biasa. Sehingga anda dapat menelepon lebih banyak orang.
* Pengaturan grup – kontak grup dengan nama khusus dan share kontak anda, sehingga mereka dapat saling berbicara satu sama lain
* Basic chat and emoticons – ketika tidak cocok untuk memanggil, lakukan obrolan atau pesan singkat pada kontak anda.
* Grup chat – akan terasa lebih mudah untuk melakukan obrolan atau pesan singkat (IM) pada semua teman-teman anda.
* Seting profile – ubah apa yang ingin anda tampilkan pada dunia dan biarkan semua tahu sedikit tentang anda.
* Conference calling – berbicara dengan beberapa orang teman dalam satu waktu.
* Import contact – pencarian buku alamat untuk mencari teman dan keluarga yang seudah mempunyai nama Skype dan mulailah berkomunikasi dengan mereka secara gratis.
* Melihat Outlook Contact – lihat dan panggil kontak Outlook Microsoft anda secara langsung dan cepat dari daftar kontak Skype anda.
* Quickfilter and Speed-Dial – temukan kontak Skype, obrolan terakhir dan kontak SkypeOut dengan mudah dan cepat, kemudian enter nama Skype untuk memanggil mereka dengan cepat.

bagi yg mau download, klik saja disini udah versi 5.1.0.112 loh

Source: sumber

Read More

Client Server Twitter

Twitter, seperti kita tahu, belakangan ini ramai dikunjungi . padahal udah lama Twitter ini ada. Hanya saja, sekarang artis-artis lagi pada heboh sama mainan satu ini, jadinya ya mendunia deh microblogging satu inih. untuk itu saya mau berbagi beberapa aplikasi twitter client yang bisa dipake untuk nge-twit baik di desktop maupun mobile. Untuk desktop :

1. TweetDeck ; twitter klien ini menggunakan adobe AIR. Dapat digunakan di banyak Sistem Operasi. Fiturnya diantaranya memungkinkan pengguna membuat kelompok, pencarian Twitter, mengelola beberapa account dan posting tweets atau berbagi foto, dan juga mendukung penyingkatan link sehingga URL yang panjang akan menjadi lebih pendek.

Sb gmbr : techprajyot.blogspot.com


2. Destroy Twitter. Menggunakan adobe Air juga, interfacenya pun juga mirip tweetdeck. Tapi skin bisa dirubah sesuai selera.

Sb gambar : http://destroytwitter.com/



3. Blu. Aplikasinya ringan, Cuma sekitar 8mb, tampak terintegrasi dgn windows vista. Bisa dicoba, transparansinya oke , sobat IT pasti menyukai user interfacenya.

Sb gambar : technobuzz.net



Untuk Mobile :

1. Snaptu. Snaptu versi twitter terbaru ( Snaptu twitter ) ini memiliki beberapa fitur Menu utama untuk update status, reply, pesan langsung, public timeline, dan menu favorit. Opsi Twitter membuat sobat IT bisa melihat pengirim, melihat twitter teman, reply, pesan langsung, add to favorites, menambahkan ke group, membuka url dan melihat gambar yang di attach, Opsi Group untuk membuat group dan membuat topic, fasilitas pencarian, melihat Profil pengguna twitter, melihat Followers dan mengikuti atau memblok user lain.

Sb gambar : getjar.com


2. UberTwitter : Aplikasi untuk update ke Twitter pada perangkat BlackBerry sesuai lokasi pengguna.

Sb gmbr : riku.me



3. Gravity Mendukung lebih dari satu akun social media Melalui Gravity, kita bisa menambahkan lebih dari satu akun baik itu twitter, facebook, foursquare maupun google reader yang kita miliki. Ada juga fitur untuk mengukur berapa besar file yang kita download.

Sb gambar : thewwwblog.com


4. Twittelator : aplikasi twitter untuk pengguna ipad. Diluncurkan oleh apple. Keunggulannya cepat, feature lengkap, dapat menyimpan secara otomatis.

Sb gmbr : adamginsbergblog.com


Bagi Handphone yang hanya didukung GPRS,, janganlah sedih dulu, saya tidak akan menyuruh kamu beli Hp baru atau banting Hp kamu buat nge twitt, ni ada rekomendasi beberapa aplikasi web yang nggak banyak makan pulsa kamu: tinggal buka saja alamat web dibawah ini :
http://m.tweete.net/
http://m.tuitwit.com/
http://m.twitter.com/
http://dabr.co.uk/


lalu, ngoceh deh :D selamat mencoba dan jangan lupa follow twitterku :D

Read More