Kehadiran Pes 2013

Pro Evolution Soccer 2013

                PES 2013 ( Pro Evolution Soccer 2013 ) merupakan varian kelanjutan dari PES 2012.Mungkin abnyak dari para gamers sangatlah menunggu kelebihan dan keunggulan dari PES 2013 ini.Namun untuk baru gamers harus sedikit bersabar lagi untuk mulai mencoba game ini karena mungkin Pro Evolution Soccer 2013 baru akan resmi release bulan oktober nanti  dan mungkin akan terus diperbaiki demi memuaskan para fans game soccer.

     PES 2013 ini merupakan game yang dikeluarkan oleh KONAMI.Mungkin pada PES 2013 ini banyak sekali perubahan dan perbaikan dibandingkan seri sebelumnnya yaitu PES 2012.Namun untuk sedikit mengobati rasa penasaran para fans KONAMI sedikit membocorkan 3 fitur baru yang belum ada pada seri-seri sebelumnya yaitu FullControl,Player ID, dan ProACtive AI .

     Pada PES 2013 ini model covernya masih seorang C.Ronaldo.Mungkin untuk lebih jelasnnya para gamers bisa mendownload trailer pes 2013 yang berisi video yang dibintangi C.Ronaldo yang melakukan aksi dribling yang begitu mempesona .

     Untuk mengetahui apa itu fitur-fitur baru yang ditambahkan ,saya akan mencoba menjelaskannya :

1          1.         FuulControl

 

              Sesuai dengan namanya adalah fitur yang akan memberikan kontrol bermain yang lebih baik lagi, dan kebebasan yang lebih luas untuk mengontrol bola. Dalam fitur ini ada yang dinamakan Dynamic First Touch yang membuat berbagai gerakan menjadi lebih halus, seperti ketika menerima bola, lepas dari jebakan, memberikan umpan kepada penyerang dan berbagai gerakan lainnya.

              Juga terdapat fitur Full Manual Shooting, Full Manual Passing, Full Manual One-Two untuk bermain passing satu-dua sambil bermain penuh taktik, Response Defending dan perbaikan pada kontrol Goalkeepers atau penjaga gawang.

2.      Player ID

              Player ID difokuskan pada kemampuan individual dan pergerakan para pemain bola. Terbagi dua menjadi Player Individuality dan Individuality to Goalkeepers. Berbagai atribut yang dikenali, skill dan trik yang berbeda dari masing-masing pemain akan hadir. Bagaimana cara mereka berlari, membawa bola, menembakkan bola sampai gaya merayakan gol yang berhasil diciptakan. Untuk para penjaga gawang adalah bagaimana cara mereka melakukan penyelamatan dan reaksi ketika mendapatkan serangan musuh.

3.      ProActive AI

              ProActive AI yang menyatukan kontrol dengan realisme yang ada di lapangan sepak bola. Fitur-fitur yang hadir antara lain Balance of Play, Tactical Precision dan Enhanced Goalkeepers. Ketiganya hadir untuk lebih menyeimbangkan permainan, memperbaiki hal-hal yang tidak mungkin terjadi didalam sebuah pertandingan sepak bola yang sebenarnya, dan memperbaiki AI dari kiper seperti reaksi, keefektifan bermain dan cara mengirim bola ke tengah lapangan yang lebih baik

Read More

Kartu Facebook dari Telkomsel

Kartu Facebook dari Telkomsel

         Wah-wah asyik banget ni ada kartu khusus facebook dari Telkomsel.Mesti temen-temen pada bingung ni apa si kartu facebook itu.Nah sekarang saya akan menjawab rasa penasaran kalian.Kartu Facebook yaitu kartu yang khusus diprioritaskan untuk facebook .Tapi juga bisa buat smsn low walaupun namanya kartu facebook.Selain itu Kartu Facebook dari Telkomsel adalah satu-satunya kartu prepaid GSM di Indonesia yang bekerja sama resmi dengan Facebook.Hebat bukan kartu ini..???

Untuk review kartunya adalah seperti ini :

              Bangus kan tampilanya?Tapi bukan hanya tampilannya yang bagus tapi juga kelebihanya yaitu Gratis selamanya facebook .Untuk para penggila facebook kartu ini pas banget dech dipasang dikartu kamu.Ayo dech buruan coba.Aku dah coba dan siap mendapatkan Gratis Facebook selamanya.

Untuk melihat detailnya silahkan klik disini.

     

Terima Kasih ,

Read More

Belajar Membuat Program Menghitung Nilai IPK dengan Delphi

Belajar Membuat Program Menghitung Nilai IPK dengan Delphi

             Sebelumnya saya telah memposting mengenai tugas kuliah  tentang pembuatan program kuadran .Pada kali saya juga akan menulis lagi tentang tugas pembuatan program IPK dalam mata kuliah pemrograman dasar.Langsung saja akan memberi tahu tahap pembuatan programnya :

1. Pastinya buat componenya dulu donk seperti dibawah ini :

2. Setelah selasai buat tampilan tinggal buat programnya.Dalam program kali ini saya menggunakan If -then.
3. Klik botton hasil dan tulis sintax seperti dibawah ini :


procedure TForm1.Button1Click(Sender: TObject); var nilai:integer; begin nilai:=StrToint(edit1.Text) ; if (nilai>=81) and (nilai<=100) then label3.Caption:='NILAI ANDA "A" = SANGAT BAIK ' else if (nilai>=61) and (nilai<=80) then label3.Caption:='NILAI ANDA "B" = BAIK ' else if (nilai>=41) and (nilai<60) then label3.Caption:='NILAI ANDA "C" = KURANG BAIK' else if (nilai>=16) and (nilai<=40) then label3.Caption:='NILAI ANDA "D" = BURUK ' else label3.Caption:='NILAI ANDA "E" = SANGAT BURUK '; end;
4. Bila sudah buat juga sintax pada botton hapus dan keluar yang sudah saya jelaskan pada postingan sebelumnya.
5. Bila sudah semua klik save dan coba jalankan programnya.
6. Bila anda ingin mencoba program saya silahkan klik link dibawah ini:

pass:widykecil

Terima Kasih,

Read More

Belajar Program Kuadran dengan Delphi

Belajar Program Kuadran dengan Delphi

        Saya jadi inget dulu pernah dikasih tugas tentang bagaimana membuat program Kuadran dengan Delphi.Namun baru kali ini saya bisa post dan berbagi dengan kalian tentang tugas saya ini.Sebenarnya program ini hanya menampilkan dimana posisi kuadran ketika kita menginputkan nilai x dan y.

Langkah Pembuatan Program :

1. Tentunya seperti biasa kita buat dulu componen-componen yang dipakai.
2. Pada progam saya kali ini saya hanya memakai componen image,botton,label dan edit yang diletakan dalam form kerja .Seperti dibawah ini :

3. Untuk pembuatan sintax programnya cukup simpel pertama jelas kita harus buat suatu variabel misal variabel x dan y.
4. Lalu buat perhitungan dengan suatu sudut, untuk program lengkap dalam botton hitung seprti dibawah ini :


procedure TForm1.Button1Click(Sender: TObject); var x,y:integer; begin x:=StrToint(edit1.Text) ; y:=StrToint(edit2.Text) ; if (x>=0) and (y>=0) then label5.Caption:='Kuadran I' else if (x<0) and (y>=0) then label6.Caption:='Kuadran II' else if (x<0) and (y<0) then label7.Caption:='Kuadran III' else label8.Caption:='Kuadran IV'; end;
5. Bila sudah klik save dan jalankan programnya.
6. Apabila ingin mencoba program program saya klik link dibawah ini:

pass:widykecil

Terima Kasih,

Read More

Belajar Membuat Program Konversi Uang Rupiah Sederhana dengan Delphi

Belajar Membuat Program Konversi Uang Rupiah Sederhana dengan Delphi
     

             Kadang kita binggung mau mengkonversi uang rupiah kita ke dalam mata uang asing.Berapa ya uang kita dalam dolar.Pada kali ini saya akan berbagi program konversi mata uang rupiah ke mata uang asing,agar kalian semua tidak usah bingung lagi.Namun kali ini saya akan berbagi caranya membuat progam tersebut.

Langkah-langkah pembuatan programnya :

1. Langkah pertama tentunya adalah pembuatan componen terlebih dahulu.
2. Dan buat seperti dibawah ini:

3. Untuk tampilan si terserah kalian aja.Selanjutnya yaitu mencari nilai mata uang asing bila dirupiahkan.
4. Bila sudah dapat kita mulai membuat sintaxnya .Klik Radiogroup lalu buat sintax programnya,pertama buat variabel terlebih dahulu.Untuk sintax lengkapnya seperti dibawah ini :


procedure TForm1.RadioGroup1Click(Sender: TObject); var nilai:real; hasil:real; begin case RadioGroup1.ItemIndex of 0: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/8900); Edit2.Text:=CurrToStr(hasil); end; 1: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/7006); Edit2.Text:=CurrToStr(hasil); end; 2: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/1143); Edit2.Text:=CurrToStr(hasil); end; 3: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai* (1/9556); Edit2.Text:=CurrToStr(hasil); end; 4: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/14314); Edit2.Text:=CurrToStr(hasil); end; 5: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/8934); Edit2.Text:=CurrToStr(hasil); end; 6: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/108); Edit2.Text:=CurrToStr(hasil); end; 7: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/1404); Edit2.Text:=CurrToStr(hasil); end; 8: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/1664); Edit2.Text:=CurrToStr(hasil); end; 9: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/9166); Edit2.Text:=CurrToStr(hasil); end; 10: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/12324); Edit2.Text:=CurrToStr(hasil); end; 11: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/2382); Edit2.Text:=CurrToStr(hasil); end; 12: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/6567); Edit2.Text:=CurrToStr(hasil); end; 13: begin nilai:=StrToCurr(Edit1.Text); hasil:=nilai*(1/1355); Edit2.Text:=CurrToStr(hasil); end; end; end;
5. Untuk penambahan negar lain silahkan kalian tambahkan sendiri.
6. Apabila ingin mencoba program lengkapnya silahkan klik link dibawah ini :

pass:widykecil

Terima kasih,

Read More

Belajar Program Deklarasi dan Variabel dengan Delphi

Belajar Program Deklarasi dan Variabel dengan Delphi
         
              Hallo semuanya ?Sekarang saya akan berbagi tentang pelajaran yang telah saya dapat dalam sebuah praktikum mata kuliah pemrograman dasar.Mari kita mencoba lagi untuk me review tentang sebuah program yang ada deklarasi dan Variabel.Saya akan mencoba membuat program penjualan barang yang memuat tentang Deklarasi dan variabel.Mungkin untuk tampilan programnya seperti dibawah ini :

            Ok sekarang kita akan membongkar tentang program diatas.Untuk langkah pembuatanya ikuti petunjuk dibawah ini :

1. Buat dulu componenya yaitu ada botton,groupbox,label dan edit.Soal tampilan programnya si terserah selera kalian aja.
2. Setelah membuat componenya karang tingal buat sintax programnya.Pertama klik botton Hitung total,untuk hitung total ini kita harus membuat sebuah variabel.Untuk sintax lengkapnya seperti dibawah ini :


procedure TForm1.Button1Click(Sender: TObject); var hrgDAsMB,hrgDasPROS,hrgDasHD,hrgDasRAM:currency; jmlMB,jmlPROS,jmlHD,jmlRAM:integer; TotMB,TotPROS,TotHD,TotRAM:currency; begin //MENDEKLARASIKAN HARGA SATUAN hrgDasMB:=StrToCurr(Edit1.Text); hrgDasPROS:=StrToCurr(Edit2.Text); hrgDasHD:=StrToCurr(Edit3.Text); hrgDasRAM:=StrToCurr(Edit4.Text); //MENDEKLARASIKAN Jumlah Pembelian jmlMB:=StrToInt(Edit5.Text); jmlPROS:=StrToInt(Edit6.Text); jmlHD:=StrToInt(Edit7.Text); jmlRAM:=StrToInt(Edit8.Text); //Menghitung Harga Dasar x Jumlah Beli TotMB:=hrgDasMB*jmlMB; TotPROS:=hrgDasPROS*jmlPROS; TotHD:=hrgDasHD*jmlHD; TotRAM:=hrgDasRAm*jmlRAM; //Menulis Hasil ke komponen Total Edit9.Text:=CurrToStr (TotMB); Edit10.Text:=CurrToStr (TotPROS); Edit11.Text:=CurrToStr (TotHD); Edit12.Text:=CurrToStr (TotRAM); Edit13.Text:=CurrToStr(TotMB+TotPROS+TotHD+TotRAM); end;
3. Setelah selesai dengan sintax diatas sekarang kita buat sintax program untuk mulai input yang baru dengan cara klik botton hitung jumlah lain lalu tulis dengan sintax dibawah ini :


procedure TForm1.Button2Click(Sender: TObject); begin Edit5.Clear;Edit6.Clear;Edit7.Clear;Edit8.Clear;Edit9.Clear; Edit10.Clear;Edit11.Clear;Edit12.Clear; Edit5.SetFocus; end;
4. Bila sudah karang buat perhitungan yang tanpa variabel dengan cara klik botton tanpa variabel isi sintax seperti ini :
rocedure TForm1.Button3Click(Sender: TObject); begin Edit9.Text :=CurrToStr( StrToCurr (Edit1.Text)*StrToInt (Edit5.Text)); Edit10.Text:=CurrToStr(StrToCurr (Edit2.Text)*StrToInt (Edit6.Text)); Edit11.Text:=CurrToStr(StrToCurr (Edit3.Text)*StrToInt (Edit7.Text)); Edit12.Text:=CurrToStr(StrToCurr (Edit4.Text)*StrToInt (Edit8.Text)); Edit13.Text:=CurrToStr(StrToCurr (Edit9.Text)+ StrToCurr (Edit10.Text) + StrToCurr (Edit11.Text)+ StrToCurr (Edit12.Text)); end;
5. Untuk botton exit tulis dengan sintax :


procedure TForm1.Button4Click(Sender: TObject); begin close; end;
6. Bila sudah sekarang klik save dan jalankan programnya dengan klik run.

         Apabila anda ingin download program lengkapnya silahkan klik link dibawah ini :

pass:widykecil

Terima Kasih,

Read More

Belajar Pembuatan Lampu Lalu-Lintas dengan Delphi

Program Lampu Lalu-Lintas?

          Setelah kita program sebelumnya yaitu Pembutan program penjualan kecil sekarang kita akan mulai belajar lagi tentang pembuatan lampu lalu-lintas tentunya masih dengan program Delphi.Yang pertama kita siapkan adalah instal program delphinya dulu.Bila sudah buka programnya,terus mulai dech bikin programnya .

Langkah-langkahnya yaitu:

1. Pertama klik File>new>aplication
2. Setelah itu akan muncul form kerja kita,selanjutnya buat componen yaitu Groupbox,Label,Shape dan Timer.
3. Cara membuat elemenya yaitu tingal klik componen yang dibutuhkan terus taruh di form kerja kita.
4. Berikut adalah tanpilan form lampu lalu-lintas yang saya buat :

5. 

   Lampu lalu-lintas

6. Setelah bentuk form jadi maka langkah selanjutnya adalah menulis sintax program,dengna cara klik timer lalu tulis sintax seperti dibawah ini :


procedure TForm1.Timer1Timer(Sender: TObject); begin detik:=detik+1; begin if ((detik>=0) and (detik<35)) then begin Shape3.brush.Color:=clLime; Shape1.brush.Color:=clWhite; Shape2.brush.Color:=clWhite; Label1.Caption:='Jalan' ; Timer1.Interval:=100; end else if ((detik>=35) and (detik<45)) then begin Shape2.brush.Color:=clYellow; Shape3.brush.Color:=clWhite; Shape1.brush.Color:=clWhite; Label1.Caption:='Hati-hati' ; Timer1.Interval:=100; end else if ((detik>=45) and (detik<75)) then begin Shape1.brush.Color:=clred; Shape2.brush.Color:=clWhite; Shape3.brush.Color:=clWhite; Label1.Caption:='Berhenti' ; Timer1.Interval:=100; end else if detik=75 then begin detik:=0; end; end; end; procedure TForm1.FormCreate(Sender: TObject); begin detik:=0; end;;
7. Setelah selesai semuanya sekarang kita coba program kita dengan cara klik run pada menu bar.
8. Apabila ingin mendapatkan program lengkapnya silahkan klik link download dibawah ini :

pass:widykecil

Read More

Berlatih Program Penjualan Kecil dengan Delphi

           Hallo temen-temen semuanya....,Sory ni saya baru bisa buat post lagi.Ok,sekarang saya akan mengajak kalaian semua untuk berlatih bahasa pemrograman delphi.Untuk pelatihan yang pertama saya akan mencoba membuat program penjualan kecil dengan delphi.Untuk tampilan programnya seperti dibawah ini :

Tentang Program diatas :

1. Pertama kita masukan jumlah uang kita ,terus selanjutnya kita masukan jumlah pembayaran pembelian lalu klik proses.
2. Apabila sedang ada diskon maka form diskon diisi dengan besar diskon terserah kalian.
3. Bila ingin menginputkan dengan yang baru maka anda klik clean.
4. Dan bila ingin keluar klik exit.
5. Setelah tau tentang prosesnya sekarang kita mulai dengan menulis sintax programnya.Untuk botton proses sintax programnya seperti ini :


procedure TForm1.Button1Click(Sender: TObject); begin a:=StrToInt(Edit1.Text); b:=StrToInt(edit2.Text); if b>=500000 then begin c:=b*0.07; d:=b-(0.07*b) ; e:=a-d; Edit3.Text:=IntToStr(a); Edit4.Text:=IntToStr(b); Edit6.Text:=FloatToStr(d); Edit5.Text:=FloatToStr(c); Edit7.Text:=FloatToStr(e); Edit8.Text:=IntToStr(7); end else if b>=200000 then begin c:=0.05*b; d:=b-(0.05*b); e:=a-d; Edit3.Text:=IntToStr(a); Edit4.Text:=IntToStr(b); Edit6.Text:=FloatToStr(d); Edit5.Text:=FloatToStr(c); Edit7.Text:=FloatToStr(e); Edit8.Text:=IntToStr(5); end else if b>=100000 then begin c:=0.03*b; d:=b-(0.03*b); e:=a-d; Edit3.Text:=IntToStr(a); Edit4.Text:=IntToStr(b); Edit5.Text:=FloatToStr(c); Edit6.Text:=FloatToStr(d); Edit7.Text:=FloatToStr(e); Edit8.Text:=IntToStr(3); end else if b<=100000 then begin e:=a-b; Edit3.Text:=IntToStr(a); Edit4.Text:=IntToStr(b); Edit6.Text:=FloatToStr(b); Edit5.Text:=FloatToStr(0); Edit7.Text:=FloatToStr(e); Edit8.Text:=IntToStr(0); end; end;


6. Dan untuk Sintax program clean seperti ini :


procedure TForm1.Button2Click(Sender: TObject); begin edit1.Text:=' '; edit2.Text:=' '; edit3.Text:=' '; edit4.Text:=' '; edit5.Text:=' '; edit6.Text:=' '; edit7.Text:=' '; edit8.Text:=' '; end;


7. Untuk Program exitnya seperti ini :


procedure TForm1.Button3Click(Sender: TObject); begin ShowMessage('Mau Keluar??'); Close; end;


8. Berikut adalah petunjuk membuat Program Penjualan Kecil.Semoga bemanfaat.
9. Untuk Program Lengkapnya silakan klik image download dibawah ini :

     

Read More

Pengin tau tentang Linux Backtrack ?

Sejarah Linux Backtarck

           Backtrack dibuat oleh Mati Aharoni yang merupakan konsultan sekuriti dari Israel dan Max Mosser. Jadi merupakan kolaborasi komunitas. Backtrack sendiri merupakan merger dari whax yang merupakan salah satu distro Linux yang digunakan untuk tes keamanan yang asal dari whax sendiri dari Knoppix. Ketika Knoppix mencapi versi 3.0 maka dinamakan dengan whax. Whax dapat digunakan untuk melakukan tes sekuriti dari berbagai jaringan di mana saja.

              Max Mosser merupakan auditor security collection yang mengkhususkan dirinya untuk melakukan penetrasi keamanan di Linux. Gabungan dari auditor dan Whax ini sendiri menghasilkan 300 tool yang digunakan untuk testing security jaringan. Auditor security collection juga terdapat pada knoppix.

Linux Backtrack ?

         BackTrack adalah sistem operasi berbasis pada distribusi GNU / Linux Ubuntu yang bertujuan untuk forensik digital dan digunakan dalam pengujian penetrasi (Hacking). Hal ini lebih dikenal dengan istilah Backtracking yaitu suatu algoritma pencarian.

Tanggal Rilis dan Versi Backtrack :

• 26 – 5 – 2006 rilis backtrack pertama kali yang merupakan versi non beta 1.0
• 13 – 10 – 2006 backtrack versi 2 beta pertama untuk publik di rilis
• 19 – 11 – 2006 backtrack versi 2 beta kedua untuk publik di rilis
• 06 – 03 – 2007 backtrack versi 2 final dirilis
• 17 – 12 – 2007 backtrack versi 3 beta pertama dirilis
• 19 – 03 – 2008 backtrack versi 3 final dirilis
• 11 – 01 – 2010 backtrack versi 4 final dirilis
• 10 – 05 – 2011 backtrack versi 5 final dirilis

Berikut beberapa tool yang berada dalam Linux Backtrack :

• Metasploit integration
• RFMON wireless drivers
• Kismet
• AutoScan-Network – AutoScan-Network is a network discovering and managing application
• Nmap
• Ettercap
• Wireshark (formerly known as Ethereal)
• Enumeration
• Exploit Archives
• Scanners
• Password Attacks
• Fuzzers
• Spoofing
• Sniffers
• Tunneling
• Wireless Tools
• Bluetooth
• Cisco Tools
• Database Tools
• Forensic Tools
• BackTrack Services
• Reversing
• Misc

Dari pada kalian penasaran silakan aja coba download distronya di web resminya Linux Backtrack :

www.backtrack-linux.org/downloads/

Read More