Tampilkan postingan dengan label Visual Basic. Tampilkan semua postingan
Rabu, 01 Mei 2013
Tentunya, hampir semua orang pasti gila main game mulai dari game online maupun game offline. Mungkin sebagian orang akan penasaran bagaimana cara membuat game sendiri. Disini saya akan sedikit memaparkan bagaimana cara membuat game yang sederhana dan mudah untuk dibuat oleh pemula sekalipun.
Game yang saya deskripsikan adalah game maze, dimana aturan main pada game ini adalah mengarahkan pointer sampai ke titik finish tanpa menabrak dinding yang menghalanginya. Kita dapat membuat game dengan memanfaatkan bahasa pemrograman visual basic seperti screenshot gambar di bawah ini.
Langkah kerja:
1. Buka aplikasi visual studio. Kalo saya menggunakan Visual Studio 2012 Express for Dekstop
2. Start New Project -> Pilih Windows Forms Application -> Lalu klik OK
3. Ubah ukuran form sesuai yang dibutuhkan. Kemudian setting pada properties box:
FormBorderStyle = Fixed3D
MaximizeBox = False
4. Kemudian kita buat panel yang digunakan sebagai area game dengan cara klik toolbox -> pilih panel.
Atur panel mengikuti ukuran form. Lalu setting BorderStyle menjadi "Fixed3D" pada jendela Properties
5. Untuk membuat dindingnya, saya menggunakan label yang tersedia di toolbox. Atur setting pada
jendela propertiesnye yaitu:
-> AutoSize = False
-> BackColor = pilih warna yang anda suka
-> Text = Kosongkan/Hapus nama label
6. Setelah disetting, tinggal memperbanyak label tersebut dengan cara klik Ctrl + C dan Ctrl + V alias Copy-
Paste pada form. Lalu tinggal mengaturnya menjadi sebuah labirin.
Paste pada form. Lalu tinggal mengaturnya menjadi sebuah labirin.
7. Setelah labirin jadi, tambahkan label lagi sebagai titik finish dari permainan ini. Atur setting properties
(Name) menjadi FinishLabel. Lalu pada jendela Event, Atur MouseEnter dengan mengetikkan "Finish" lalu
lalu tekan Enter.
8. Setelah tekan Enter, nantinya akan muncul jendela untuk menginputkan script. Kemudian inputkan script
dibawah ini pada Class Formnya:
Private Sub finishLabel_MouseEnter(sender As Object, e As EventArgs) Handles finishLabel.MouseEnter
MessageBox.Show("Go to next Level!!")
Close()
End Sub
9. Jika titik finish jadi, kemudian kita buat titik awalnya dengan cara inputkan script berikut pada Class form:
Private Sub MoveToStart()
Dim startingPoint = Panel1.Location
startingPoint.Offset(10, 10)
Cursor.Position = PointToScreen(startingPoint)
End Sub
Public Sub New()
' This call is required by the designer.
InitializeComponent()
MoveToStart()
' Add any initialization after the InitializeComponent() call.
End Sub
10. Kemudian kita atur setting event pada label labirin yang kita buat sebelumnya. Pengaturannya sama
pada pengaturan finish label, yaitu pilih MouseEnter kemudian ketikkan start lalu tekan Enter.
11. Pada class form, kita panggil fungsi start yang sudah dideklarasikan sebelumnya. Ini digunakan agar label
tersebut tidak dapat dilewati pointer dan pointer tersebut akan kembali ke posisi semula jika menyentuh
label. Script pemanggilan fungsinya seperti berikut:
Private Sub wall_MouseEnter(sender As Object, e As EventArgs) Handles Label1.MouseEnter
MoveToStart()
End Sub
12. Setelah jadi, coba jalankan program. Hasilnya nanti, saat pointer menabrak label yang sudah kita atur
tadi nanti akan kembali ke posisi semula. Selanjutnya kita tinggal mengatur label lain seperti label yang
sudah kita beri kondisi. Cara gampangnya, kalau label yang perlu disetting ada banyak, kita tinggal blok
semua label dengan cara klik Ctrl + A dan pengecualian untuk label Finish. Kemudian atur MouseEnter
pada jendela Event dengan "Start". Kemudian coba jalankan program.
13. Sentuhan terakhir, percantik desain game ini agar lebih menarik untuk dimainkan.
Kalau dari penjelasan dengan kata-kata masih kurang paham, bisa langsung lihat video tutorial berikut ini.
Selamat mencoba!!! XD
Tag :// Visual Basic