LAMPIRAN : LISTING PROGRAM
1.
ActionScript untuk berpindah ke scene selanjutnya yaitu untuk memilih mode game. on(release){ gotoAndPlay("START",1); }
2.
ActionScript untuk melihat petunjuk game Matchmaker. on(release){ gotoAndPlay("HELP",1); }
3.
ActionScript untuk melihat profil penulis. on(release){ gotoAndPlay("ABOUT",1); }
4.
ActionScript untuk konfirmasi keluar dari game Matchmaker. on(release){ gotoAndPlay(86); }
5.
ActionScript untuk keluar dari game Matchmaker. on(release){ fscommand("Quit",true); }
Universitas Sumatera Utara
6.
ActionScript untuk berpindah ke scene selanjutnya yaitu untuk memilih submode game. on(release){ gotoAndPlay("START1",1); }
7.
ActionScript untuk berpindah scene selanjutnya yaitu memulai game Matchmaker. on(release){ gotoAndPlay("16MEMORYEASY",1); }
8.
ActionScript untuk berpindah ke frame selanjutnya on(release){ nextFrame(); }
9.
ActionScript untuk berpindah ke frame sebelumnya on(release){ prevFrame(); }
10. ActionScript untuk Eksekusi pengecekan pada Tombol Wadah on (release) { n1 = 1; cekWadah(); cekTotal(); }
Universitas Sumatera Utara
11. ActionScript untuk Eksekusi pengecekan pada Tombol Cocok on (release) { n2 = 2; cekCocok(); cekTotal(); }
12. ActionScript untuk Timer / Waktu onClipEvent (enterFrame) { if (_currentframe == _totalframes) { _root.gotoAndStop("Kalah"); } }
13. ActionScript Membuat Array untuk Menentukan Jumlah Gambar yang Ditampilkan bank_data = new Array(); for (i=0; i<27; i++) { bank_data[i] = ("koleksi/gambar"+i+".jpg"); } gambar_terpilih = new Array(); for (i=0; i<8; i++) { gambar_terpilih[i] = 0; } trace (bank_data); trace (gambar_terpilih);
14. ActionScript menentukan File Gambar yang akan Diunduh dalam Array bank_data = new Array(); sudah = new Array(); for (i=0; i<27; i++) { bank_data[i] = ("koleksi/gambar"+i+".jpg"); sudah[i] = 0; } gambar_terpilih = new Array();
Universitas Sumatera Utara
for (i=0; i<8; i++) { gambar_terpilih[i] = 0; } function acak_gambar() { for (i=0; i<8; i++) { belum = 0; while (belum == 0) { item = random(27); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item];
} } } } acak_gambar(); trace (bank_data); trace (gambar_terpilih); trace (sudah);
15. ActionScript Mengunduh 8 File Gambar yang Terpilih ke 8 Movie Clip bank_data = new Array(); sudah = new Array(); for (i=0; i<27; i++) { bank_data[i] = ("koleksi/gambar"+i+".jpg"); sudah[i] = 0; } gambar_terpilih = new Array(); for (i=0; i<8; i++) { gambar_terpilih[i] = 0; } function acak_gambar() { for (i=0; i<8; i++) { belum = 0; while (belum == 0) { item = random(27); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item]; }
Universitas Sumatera Utara
} } } acak_gambar(); nama_wadah = new Array(); for (i=0; i<8; i++) { nama_wadah[i] = "wadah"+i; loadMovie(gambar_terpilih[i], nama_wadah[i]); } trace (bank_data); trace (gambar_terpilih); trace (sudah);
16. ActionScript untuk Mengacak Gambar Kedua bank_data = new Array(); sudah = new Array(); for (i=0; i<27; i++) { bank_data[i] = ("koleksi/gambar"+i+".jpg"); sudah[i] = 0; } gambar_terpilih = new Array(); for (i=0; i<8; i++) { gambar_terpilih[i] = 0; } function acak_gambar() { for (i=0; i<8; i++) { belum = 0; while (belum == 0) { item = random(27); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item]; } } } } acak_gambar(); sudah2 = new Array(); for (i=0; i<27; i++) {
Universitas Sumatera Utara
sudah2[i] = 0; } //Membuat array sebagai penanda gambar yang sudah terpilih gambar_terpilih2 = new Array(); for (i=0; i<8; i++) { gambar_terpilih2[i] = 0; } //Membuat array untuk menentukan jumlah gambar yang akan diunduh ke movie clip cocok function acak_gambar2() { for (i=0; i<8; i++) { belum2 = 0; while (belum2 == 0) { item2 = random(8); if (sudah2[item2] == 0) { belum2 = 1; sudah2[item2] = 1; gambar_terpilih2[i]= gambar_terpilih[item2]; } } } } acak_gambar2(); //Membuat fungsi mengacak gambar yang terpilih di gambar_terpilih, dan memasukkannya ke array gambar_terpilih2
array
nama_wadah = new Array(); nama_cocok = new Array(); for (i=0; i<8; i++) { nama_wadah[i] = "wadah"+i; loadMovie(gambar_terpilih[i], nama_wadah[i]); nama_cocok[i] = "cocok"+i; loadMovie(gambar_terpilih2[i], nama_cocok[i]); } //Membuat array movie clip cocok, dan mengunduh gambar yang terpilih di array gambar_terpilih2,ke movie clip cocok trace (bank_data); trace (gambar_terpilih); trace (sudah);
Universitas Sumatera Utara
17. ActionScript untuk Membuat Fungsi Pengecekan Interaksi di Bidang Pertama (Wadah) klik1 = 0; klik2 = 0; function cekWadah() { klik1 = 1; pilih1 = gambar_terpilih[n1]; noWadah = n1; }
18. ActionScript untuk Membuat Fungsi Pengecekan Interaksi di Bidang Kedua (Cocok) klik1 = 0; klik2 = 0; function cekWadah() { klik1 = 1; pilih1 = gambar_terpilih[n1]; noWadah = n1; } function cekCocok() { klik2 = 1; pilih2 = gambar_terpilih2[n2]; noCocok = n2; }
19. ActionScript untuk Membuat Fungsi Pengecekan Gambar yang Diklik klik1 = 0; klik2 = 0; function cekWadah() { klik1 = 1; pilih1 = gambar_terpilih[n1]; noWadah = n1; } function cekCocok() { klik2 = 1; pilih2 = gambar_terpilih2[n2]; noCocok = n2;
Universitas Sumatera Utara
} function cekTotal() { if (klik1 == 1 and klik2 == 1) { if (pilih1 == pilih2) { unloadMovie("wadahhhh"+noWadah); unloadMovie("cocok"+noCocok); } klik1 = 0; klik2 = 0; } }
20. ActionScript untuk Membuat Respon Menang nGambar = 0; function cekTotal() { if (klik1 == 1 and klik2 == 1) { if (pilih1 == pilih2) { nGambar += 1; unloadMovie("wadahhhh"+noWadah); unloadMovie("cocok"+noCocok); indikator1.gotoAndStop(1); indikator2.gotoAndStop(1);
} else { indikator1.gotoAndStop(1); indikator2.gotoAndStop(1); } if (nGambar == 8) { gotoAndStop("Menang"); } klik1 = 0; klik2 = 0; } }
Universitas Sumatera Utara
21. ActionScript 8 Match Normal Mode stop(); bank_data = new Array(); sudah = new Array(); sudah2 = new Array(); for (i=0; i<10; i++) { bank_data[i] = ("koleksi/pokemon"+i+".jpg"); sudah[i] = 0; sudah2[i] = 0; } gambar_terpilih = new Array(); gambar_terpilih2 = new Array(); for (i=0; i<8; i++) { gambar_terpilih[i] = 0; gambar_terpilih2[i] = 0; } function acak_gambar() { for (i=0; i<8; i++) { belum = 0; while (belum == 0) { item = random(10); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item]; } } } for (i=0; i<8; i++) { belum2 = 0; while (belum2 == 0) { item2 = random(8); if (sudah2[item2] == 0) { belum2 = 1; sudah2[item2] = 1; gambar_terpilih2[i] = gambar_terpilih[item2]; } } } } acak_gambar(); nama_wadahh = new Array(); nama_cocok = new Array(); for (i=0; i<8; i++) { nama_wadahh[i] = "wadahh"+i; loadMovie(gambar_terpilih[i], nama_wadahh[i]); nama_cocok[i] = "cocok"+i; loadMovie(gambar_terpilih2[i], nama_cocok[i]);
Universitas Sumatera Utara
} klik1 = 0; klik2 = 0; function cekWadah() { klik1 = 1; pilih1 = gambar_terpilih[n1]; noWadah = n1; indikator1.gotoAndStop(n1+2); } function cekCocok() { klik2 = 1; pilih2 = gambar_terpilih2[n2]; noCocok = n2; indikator2.gotoAndStop(n2+2); } nGambar = 0; function cekTotal() { if (klik1 == 1 and klik2 == 1) { if (pilih1 == pilih2) { nGambar += 1; unloadMovie("wadahh"+noWadah); unloadMovie("cocok"+noCocok); indikator1.gotoAndStop(1); indikator2.gotoAndStop(1); } else { indikator1.gotoAndStop(1); indikator2.gotoAndStop(1); } if (nGambar == 8) { gotoAndStop("Menangg"); } klik1 = 0; klik2 = 0; } }
22. ActionScript 16 Match Normal Mode stop(); bank_data = new Array(); sudah = new Array(); sudah2 = new Array(); for (i=0; i<16; i++) { bank_data[i] = ("koleksi/pokemon"+i+".jpg"); sudah[i] = 0; sudah2[i] = 0;
Universitas Sumatera Utara
} gambar_terpilih = new Array(); gambar_terpilih2 = new Array(); for (i=0; i<16; i++) { gambar_terpilih[i] = 0; gambar_terpilih2[i] = 0; } function acak_gambar() { for (i=0; i<16; i++) { belum = 0; while (belum == 0) { item = random(16); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item]; } } } for (i=0; i<16; i++) { belum2 = 0; while (belum2 == 0) { item2 = random(16); if (sudah2[item2] == 0) { belum2 = 1; sudah2[item2] = 1; gambar_terpilih2[i] = gambar_terpilih[item2]; } } } } acak_gambar(); nama_wwaadah = new Array(); nama_cocok = new Array(); for (i=0; i<16; i++) { nama_wwaadah[i] = "wwaadah"+i; loadMovie(gambar_terpilih[i], nama_wwaadah[i]); nama_cocok[i] = "cocok"+i; loadMovie(gambar_terpilih2[i], nama_cocok[i]); } klik1 = 0; klik2 = 0; function cekWadah() { klik1 = 1; pilih1 = gambar_terpilih[n1]; noWadah = n1; indikator1.gotoAndStop(n1+2); } function cekCocok() {
Universitas Sumatera Utara
klik2 = 1; pilih2 = gambar_terpilih2[n2]; noCocok = n2; indikator2.gotoAndStop(n2+2); } nGambar = 0; function cekTotal() { if (klik1 == 1 and klik2 == 1) { if (pilih1 == pilih2) { nGambar += 1; unloadMovie("wwaadah"+noWadah); unloadMovie("cocok"+noCocok); indikator1.gotoAndStop(1); indikator2.gotoAndStop(1); } else { indikator1.gotoAndStop(1); indikator2.gotoAndStop(1); } if (nGambar == 16){ gotoAndStop("Mmeenang"); } klik1 = 0; klik2 = 0; } }
23. ActionScript 8 Match Memory Mode stop(); bank_data = new Array(); sudah = new Array(); sudah2 = new Array(); for (i=0; i<26; i++) { bank_data[i] = ("koleksi/pokemon"+i+".jpg"); sudah[i] = 0; sudah2[i] = 0; } gambar_terpilih = new Array(); gambar_terpilih2 = new Array(); for (i=0; i<8; i++) { gambar_terpilih[i] = 0; gambar_terpilih2[i] = 0; } function acak_gambar() { for (i=0; i<8; i++) { belum = 0;
Universitas Sumatera Utara
while (belum == 0) { item = random(26); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item]; } } } for (i=0; i<8; i++) { belum2 = 0; while (belum2 == 0) { item2 = random(8); if (sudah2[item2] == 0) { belum2 = 1; sudah2[item2] = 1; gambar_terpilih2[i] = gambar_terpilih[item2]; } } } } acak_gambar(); nama_wadah = new Array(); nama_cocok = new Array(); nama_tombolw = new Array(); nama_tombolc = new Array(); for (i=0; i<8; i++) { nama_tombolw[i] = "tbl_wadah"+i; nama_tombolc[i] = "tbl_cocok"+i; nama_wadah[i] = "wadah"+i; loadMovie(gambar_terpilih[i], nama_wadah[i]); nama_cocok[i] = "cocok"+i; loadMovie(gambar_terpilih2[i], nama_cocok[i]); setProperty(nama_cocok[i], _alpha, 0); setProperty(nama_wadah[i], _alpha, 0); } klik = 0; pilih1 = ""; pilih_tombol1 = ""; pilih_kotak1 = ""; pilih2 = ""; pilih_tombol2 = ""; pilih_kotak2 = ""; goplay = 0; nGambar = 0; function cekWadah() { informasi._alpha=0 klik += 1;
Universitas Sumatera Utara
setProperty(nama_wadah[n1], _alpha, 100); if (klik == 1) { pilih1 = gambar_terpilih[n1]; pilih_kotak1 = nama_wadah[n1]; pilih_tombol1 = nama_tombolw[n1]; } if (klik == 2) { goplay = 1; pilih2 = gambar_terpilih[n1]; pilih_kotak2 = nama_wadah[n1]; pilih_tombol2 = nama_tombolw[n1]; } setProperty(nama_tombolw[n1], _visible, 0); } function cekCocok() { informasi._alpha=0 klik += 1; setProperty(nama_cocok[n2], _alpha, 100); if (klik == 1) { pilih1 = gambar_terpilih2[n2]; pilih_kotak1 = nama_cocok[n2]; pilih_tombol1 = nama_tombolc[n2]; } if (klik == 2) { goplay = 1; pilih2 = gambar_terpilih2[n2]; pilih_kotak2 = nama_cocok[n2]; pilih_tombol2 = nama_tombolc[n2]; } setProperty(nama_tombolc[n2], _visible, 0); } nGambar = 0; function cekTotal() { if (goplay == 1 and klik == 1) { if (pilih1 != pilih2) { setProperty(pilih_kotak2, _alpha, 0); setProperty(pilih_tombol2, _visible, 1); klik = 1; } } if (klik == 2) { if (pilih1 != pilih2) { setProperty(pilih_kotak1, _alpha, 0); setProperty(pilih_tombol1, _visible, 1); klik = 0;
Universitas Sumatera Utara
} } if (pilih1 == pilih2) { nGambar +=1; setProperty(pilih_kotak1, _alpha, 100); setProperty(pilih_kotak2, _alpha, 100); setProperty(pilih_tombol1, _visible, 0); setProperty(pilih_tombol2, _visible, 0); if (nGambar == 8){ gotoAndStop("Menang8memo"); } goplay = 0; klik = 0; pilih1 = ""; pilih_tombol1 = ""; pilih_kotak1 = ""; pilih2 = ""; pilih_tombol2 = ""; pilih_kotak2 = "";
} }
24. ActionScript 16 Match Memory Mode stop(); bank_data = new Array(); sudah = new Array(); sudah2 = new Array(); for (i=0; i<27; i++) { bank_data[i] = ("koleksi/pokemon"+i+".jpg"); sudah[i] = 0; sudah2[i] = 0; } gambar_terpilih = new Array(); gambar_terpilih2 = new Array(); for (i=0; i<16; i++) { gambar_terpilih[i] = 0; gambar_terpilih2[i] = 0; } function acak_gambar() { for (i=0; i<16; i++) { belum = 0;
Universitas Sumatera Utara
while (belum == 0) { item = random(27); if (sudah[item] == 0) { belum = 1; sudah[item] = 1; gambar_terpilih[i] = bank_data[item]; } } } for (i=0; i<16; i++) { belum2 = 0; while (belum2 == 0) { item2 = random(16); if (sudah2[item2] == 0) { belum2 = 1; sudah2[item2] = 1; gambar_terpilih2[i] = gambar_terpilih[item2]; } } } } acak_gambar(); nama_wadah = new Array(); nama_cocok = new Array(); nama_tombolw = new Array(); nama_tombolc = new Array(); for (i=0; i<16; i++) { nama_tombolw[i] = "tbl_wadah"+i; nama_tombolc[i] = "tbl_cocok"+i; nama_wadah[i] = "wadah"+i; loadMovie(gambar_terpilih[i], nama_wadah[i]); nama_cocok[i] = "cocok"+i; loadMovie(gambar_terpilih2[i], nama_cocok[i]); setProperty(nama_cocok[i], _alpha, 0); setProperty(nama_wadah[i], _alpha, 0); } klik = 0; pilih1 = ""; pilih_tombol1 = ""; pilih_kotak1 = ""; pilih2 = ""; pilih_tombol2 = ""; pilih_kotak2 = ""; goplay = 0; nGambar = 0; function cekWadah() { informasi._alpha=0 klik += 1;
Universitas Sumatera Utara
setProperty(nama_wadah[n1], _alpha, 100); if (klik == 1) { pilih1 = gambar_terpilih[n1]; pilih_kotak1 = nama_wadah[n1]; pilih_tombol1 = nama_tombolw[n1]; } if (klik == 2) { goplay = 1; pilih2 = gambar_terpilih[n1]; pilih_kotak2 = nama_wadah[n1]; pilih_tombol2 = nama_tombolw[n1]; } setProperty(nama_tombolw[n1], _visible, 0); } function cekCocok() { informasi._alpha=0 klik += 1; setProperty(nama_cocok[n2], _alpha, 100); if (klik == 1) { pilih1 = gambar_terpilih2[n2]; pilih_kotak1 = nama_cocok[n2]; pilih_tombol1 = nama_tombolc[n2]; } if (klik == 2) { goplay = 1; pilih2 = gambar_terpilih2[n2]; pilih_kotak2 = nama_cocok[n2]; pilih_tombol2 = nama_tombolc[n2]; } setProperty(nama_tombolc[n2], _visible, 0); } nGambar = 0; function cekTotal() { if (goplay == 1 and klik == 1) { if (pilih1 != pilih2) { setProperty(pilih_kotak2, _alpha, 0); setProperty(pilih_tombol2, _visible, 1); klik = 1; } } if (klik == 2) { if (pilih1 != pilih2) { setProperty(pilih_kotak1, _alpha, 0); setProperty(pilih_tombol1, _visible, 1); klik = 0;
Universitas Sumatera Utara
} } if (pilih1 == pilih2) { nGambar +=1; setProperty(pilih_kotak1, _alpha, 100); setProperty(pilih_kotak2, _alpha, 100); setProperty(pilih_tombol1, _visible, 0); setProperty(pilih_tombol2, _visible, 0); if (nGambar == 16){ gotoAndStop("Menang16memo"); } goplay = 0; klik = 0; pilih1 = ""; pilih_tombol1 = ""; pilih_kotak1 = ""; pilih2 = ""; pilih_tombol2 = ""; pilih_kotak2 = "";
} }
Universitas Sumatera Utara
SURAT KETERANGAN Hasil Uji Program Tugas Akhir
Yang bertanda tangan di bawah ini, menerangkan bahwa Mahasiswa Tugas Akhir Program Diploma 3 Teknik Informatika:
Nama
: HAIDAR RIZALI FIKRI
NIM
: 092406212
Program Studi
: Teknik Informatika
Judul Tugas Akhir
: RANCANG BANGUN GAME MATCHMAKER BERBASIS MACROMEDIA FLASH 8
Telah melaksanakan test program Tugas Akhir Mahasiswa tersebut di atas pada tanggal
26 Mei 2012.
Dengan Hasil :
Sukses / Gagal
Demikian diterangkan untuk digunakan melengkapi syarat pendaftaran Ujian Meja Hijau Tugas Akhir Mahasiswa bersangkutan di Departemen Matematika FMIPA USU Medan.
Medan, 26 Mei 2012 Dosen Pembimbing/Kepala Lab. Komputer,
Dra. Normalina Napitupulu,M. Sc NIP. 19530418 198703 1 001
Universitas Sumatera Utara