SELAMAT DATANG SELAMAT DATANG

Senin, 18 Januari 2016

cara membuat game maze dengan vb


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.
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.



Terima kasih & semoga bermanfaat.


sumber : http://maihimemira.blogspot.co.id/2013/05/cara-membuat-game-maze-dengan-visual.html

1 komentar:

  1. Casinos Near Mohegan Sun Pocono in Wilkes Barre - Mapy
    Casino 안산 출장마사지 Near 익산 출장샵 Mohegan Sun Pocono in Wilkes Barre. 정읍 출장샵 1280 Highway 315, Wilkes Barre, 부천 출장마사지 Pennsylvania 18702. Map, 경상남도 출장안마 map, location, contact. Address,

    BalasHapus