Andiero
pernah memposting sebuah artikel
tentang bagaimana Membuat
Game SederhanaDengan Visual Basic 6.0 berupa Game Acak Angka. Dan respon pembaca terhadap
artikel tersebut cukup besar. Artikel kali ini juga akan membahas tentang
Membuat Game Sederhana Dengan Visual
Basic 6.0 yaitu game Hit and Fun. Mau tahu cara pembuatannya…?
Tutorial Membuat Game Sederhana Dengan Visual Basic 6.0 ini andiero dapat dari seorang teman. Ia memberikan Source
Code 12 Proyek Unik Menggunakan Visual
Basic dan Andiero tertarik pada Game Sederhana dengan nama Lalat.
Untuk menghargai dan menghormati hasil karya cipta sang pembuat, maka Andiero mencoba mengulas kembali cara
membuat game tersebut berdasarkan tutorialnya dan mengeditnya sehingga
dihasilkan game Hit and Fun buatan Andiero.
1.
Buka Program Visual basic yang telah terinstall di Komputer Anda.
2.
Buat Sebuah Project baru dengan memilih Standart.Exe.
3.
Pada Form 1 tambahkan 6 buah label, 3 buah Command Button, Sebuah Timer, Sebuah
Control Frame. Pada Control Frame tambahkan 5 buah Control image dan isikan
gambar yang ada.
Name Untuk button Start : New_g
Name Untuk Button Pause : Pause_g
Name Untuk Button Stop : Stop_g
4.
Susun sedemikian rupa atau kurang lebih seperti gambar berikut.
Gambar.2 Tampilan Game Sederhana Hit
And Fun
5.
Buka Jendela Kode dan Ketikan Code ini
Dim e, c As Integer
Dim d As Boolean
Private Size%
Private ScreenWidth%
Private ScreenHeight%
6.
Buat sebuah Fungsi Hit_Fun sebagai berikut
Private Sub Hit_Fun(canvas As
Object)
Dim X,
x2 As Integer
Dim Y,
y2 As Integer
Dim i
As Integer
ScreenWidth = Form1.Frame1.Width
ScreenHeight = Form1.Frame1.Height
If Size
< 1 Then Size = 5
For i =
1 To 200 / Size / Size
X = Rnd * ScreenWidth
Y = Rnd * ScreenHeight
x2 = Rnd * ScreenWidth - 100
y2 = Rnd * ScreenHeight - 500
Form1.Image1.Move X, Y
Form1.Image4.Move x2, y2
Next i
End Sub
7.
Klik dua Kali Form dan tambahkan script ini
e = 0
c = 0
Timer1.Enabled = False
8.
klik dua kali image 1 dan tambahkan script ini
If d Then
Dim X,
Y As Integer
X =
Image1.Left
Y =
Image1.Top
e = e +
5
c = c +
1
Label6.Caption
= e
Label4.Caption = c
Image2.Move X, Y
Image2.Visible = True
End If
9.
Klik dua kali image 4 dan tambahkan Script ini
If d Then
Dim X,
Y As Integer
X =
Image4.Left
Y =
Image4.Top
e = e +
5
c = c +
1
Label6.Caption
= e
Label4.Caption = c
Image3.Move X, Y
Image3.Visible = True
10. Klik dua kali kontrol timer dan tambahkan script berikut.
Image1.Visible = True
Image4.Visible = True
Hit_Fun Me
Label2.Caption = Label2.Caption - 1
If
Label2.Caption = "0" Then
Image1.Visible = False
Image4.Visible = False
Image2.Visible = False
Image3.Visible = False
Image5.Visible = True
Timer1.Enabled = False
new_g.Enabled = True
stop_g.Enabled = False
Label2.Caption = "15"
End If
11.
Klik dua kali Button start dan tambahkan script berikut.
d = True
Timer1.Enabled = True
new_g.Enabled
= False
stop_g.Enabled = True
Label6.Caption = "00"
Label4.Caption = "00"
Image5.Visible
= False
12.
Klik Dua kali button stop dan tambahkan script berikut
Timer1.Enabled
= False
new_g.Enabled
= True
stop_g.Enabled = False
Image1.Visible = False
Image4.Visible = False
Image2.Visible = False
Image3.Visible = False
Image5.Visible = True
Label2.Caption = "15"
Label6.Caption = "00"
Label4.Caption = "00"
13.
Klik dua kali button pause dan tambahkan script berikut.
If new_g.Enabled = False Then
If
pause_g.Caption = "&Pause" Then
Timer1.Enabled = False
pause_g.Caption = "&Continue"
d = False
Else
Timer1.Enabled = True
pause_g.Caption = "&Pause"
d = True
End If
End If
14.
Selesai. Jalankan Project Game Sederhana dengan Visual basic Buatan Anda sendiri. Jika ada debug,
cari dan perbaiki mungkin ada kesalahan penulisan name control atau lainnya.
15.
Simpan Proyek Game sederhana menggunakan visual basic buatan sendiri.
Anda
bisa menambahkan fungsi lainnya sehingga Game buatan anda tersebut semakin
asyik untuk dimainkan. Pada proyek aslinya, si pembuat menambahkan fungsi
Options sehingga kita dapat melakukan pengaturan terhadap tempo Objek dan
Timing permainan.
Ya..Demikianlah
Tutorial Membuat Game sederhana Menggunakan Visual Basic 6.0 yang dapat andiero berikan. Jika ada kesalahan mohon
diperbaiki. Dan semoga apa yang Andiero berikan dapat bermamfaat bagi Kita
semua….
Silakan meninggalkan Komentar yang membangun.
Support blog ini dengan Pasang Link Blog ini
di Blog Anda.
Terima Kasih banyak….
0 komentar:
Posting Komentar