Cara Membuat Game 5 Menit Selesai

Cara Membuat Game 5 Menit Selesai

Dibawah ini adalah cara membuat Game menggunakan Notepad
1. Buka Notepad ( Start -> All Programs -> Accessories -> Notepad )
2. Masukkan Kode Berikut Ini

@echo off title Game Logika By Algi Fahri color 02 :menu cls echo Hai! Selamat Datang Di Game Logika! Selamat bermain dan belajar! echo Game Ini adalah karya saya sendiri. Nama saya ALGI FAHRI, jika suka dengan game saya silahkan hubungi saya di 089620014874 echo Game saya ini bertujuan untuk menguatkan Logika pemain dalam berfikir. echo Ingat!!, hak cipta dilindungi Undang-Undang!! echo ---------------------- echo M E N U echo ---------------------- echo 1. Mulai! echo 2. Cara-cara Bermain echo 3. Keluar echo ---------------------- set /p number= if %number% == 1 goto Mulai! if %number% == 2 goto cara-cara main if %number% == 3 goto keluar :Mulai! cls echo Masukkan Nama anda: set /p name= echo Halo %name%! echo siapkah %name% untuk mulai permainan? (yes/no) set /p start= if %start% == yes goto Pertanyaan1 if %start% == no goto menu goto Mulai! :cara-cara main cls echo Masukkan pilihan lalu ketik enter echo pergi ke menu? (yes/no) set /p menugoto= if %menugoto% == yes goto menu if %menugoto% == no goto exit goto cara main :keluar cls echo apakah %name% yakin ingin keluar game?(yes/no) set /p keluargoto= if %keluargoto% == yes goto exit if %keluargoto% == no goto menu goto keluar :Pertanyaan1 cls echo 1. Ahmad adalah pekerja. Ahmad menjadi buruh di sebuah pabrik. Banyak diantara buruh-buruhnya yang malas bekerja. Badrun adalah teman Ahmad. Jadi... echo a. Ahmad itu malas. echo b. Badrun itu malas. echo c. Badrun mungkin teman sekerja Ahmad. echo d. Teman-teman Badrun semuanya rajin. echo e. Semuanya benar. set /p answer1= if %answer1% == a goto Wrong1 if %answer1% == b goto Wrong1 if %answer1% == c goto correct1 if %answer1% == d goto Wrong1 if %answer1% == e goto Wrong1 goto level1 :correct1 echo %name% adalah orang yang pintar, jawabannya Betul mau lanjut ke Pertanyaan 2? (yes/no) set /p NL1= if %NL1% == yes goto Pertanyaan2 if %NL1% == no goto menu goto correct1 :Wrong1 Echo Maaf, jawaban %name% salah, silahkan coba sekali lagi. (yes/no) set /p WA1= if %WA1% == yes goto Pertanyaan1 if %WA1% == no goto menu goto wrong1 :Pertanyaan2 cls echo 2. Semua jenis burung bisa terbang. Semua ayam memiliki sayap. Tetapi ayam tidak bisa terbang. Jadi... echo a. Semua burung memiliki sayap. echo b. Semua ayam bisa terbang. echo c. Sebagian ayam bisa terbang. echo d. Sementara ayam termasuk jenis burung. echo e. Semua ayam bukan termasuk jenis burung. set /p aa= if %aa% == a goto wrong2 if %aa% == b goto wrong2 if %aa% == c goto wrong2 if %aa% == d goto wrong2 if %aa% == e goto Correct2 goto level2 :correct2 echo %name% memang hebat, sudah dua kali menjawab pertanyaan dengan benar mau Lanjut Pertanyaan 3?(yes/no) set /p NL1= if %NL1% == yes goto Pertanyaan3 if %NL1% == no goto menu goto correct2 :wrong2 cls echo Sayang sekali, jawaban %name% salah, Mau coba ulang lagi? (yes/no) set/p retry= if %retry% == yes goto Pertanyaan2 if %retry% == no goto exit goto wrong2 :Pertanyaan3 cls echo 3. ada seekor ayam jago sebesar lapangan bola kaki, sebesar apa telur ayam tersebut... echo a. Sebesar gawang echo b. Sebesar bola kaki echo c. Sebesar telur ayam biasa echo d. Sebesar buah kelapa echo e. Semua jawaban salah set /p answer3= if %answer3% == a goto wrong3 if %answer3% == b goto wrong3 if %answer3% == c goto wrong3 if %answer3% == d goto wrong3 if %answer3% == e goto correct3 goto level3 :correct3 echo Betul %name%, Ayam jago tidak punya telur. mau lanjut Pertanyaan 4?(yes/no) set /p NL1= if %NL1% == yes goto Pertanyaan4 if %NL1% == no goto menu goto correct3 :wrong3 cls echo maaf, jawaban %name% salah, mau ulang lagi?(yes/no) set/p retry= if %retry% == yes goto Pertanyaan3 if %retry% == no goto exit goto wrong3 :Pertanyaan4 cls echo 4. Rudi adiknya Maman. Hasan kakaknya Rudi dan usianya lebih tua daripada Maman. Yang usianya paling tua adalah... echo a. Rudi echo b. Hasan echo c. Maman echo d. Semua jawaban salah echo e. Semua jawaban benar set /p aa= if %aa% == a goto wrong4 if %aa% == b goto correct4 if %aa% == c goto wrong4 if %aa% == d goto wrong4 if %aa% == e goto wrong4 goto Pertanyaan4 :correct4 echo Wah, sungguh pintar %name% ini ya. mau lanjut lagi %name% ke Pertanyaan 5?(yes/no) set /p NL1= if %NL1% == yes goto Pertanyaan5 if %NL1% == no goto menu goto correct4 :wrong4 cls echo %name% salah, ayo coba lagi!! (yes/no) set/p retry= if %retry% == yes goto Pertanyaan4 if %retry% == no goto exit goto wrong4 :Pertanyaan5 cls echo 5. Kata orang, Wandi adalah anak yang bodoh. Namun, hasil ujiannya mengagumkan. echo a. Wandi sebenarnya tidaklah bodoh. echo b. Wandi sebenarnya tidaklah pintar. echo c. Walaupun Wandi bodoh, ia lulus ujian. echo d. Wandi tidak lulus ujian. echo e. Seseorang telah menolong Wandi agar lulus ujian set /p answer5= if %answer5% == a goto wrong5 if %answer5% == b goto wrong5 if %answer5% == c goto correct5 if %answer5% == d goto wrong5 if %answer5% == e goto wrong5 goto Pertanyaan5 :correct5 echo Nah, jawaban %name% tepat. mau lanjut Pertanyaan 6?(yes/no) set/p NL1= if %NL1% == yes goto Pertanyaan6 if %NL1% == no goto menu goto correct5 :wrong5 cls echo Jawaban %name% salah di coba lagi ya!!(yes/no) set/p retry= if %retry% == yes goto Pertanyaan5 if %retry% == no goto exit goto wrong5 :Pertanyaan6 cls echo 6. Fahri lebih cermat daripada Algi, tetapi dia lebih ceroboh daripada Nisa. Michael lebih cermat daripada Nisa. Kesimpulannya... echo a. Nisa secermat Algi. echo b. Fahri lebih cermat dari pada Michael. echo c. Fahri secermat Michael. echo d. Nisa lebih cermat dari pada Michael. echo e. Algi lebih ceroboh dari Nisa. set /p aa= if %aa% == a goto wrong6 if %aa% == b goto wrong6 if %aa% == c goto wrong6 if %aa% == d goto wrong6 if %aa% == e goto correct6 goto Pertanyaan6 :correct6 echo hebat.. jawaban %name% betul, mau lanjut Pertanyaan 7?(yes/no) set/p NL1= if %NL1% == yes goto Pertanyaan7 if %NL1% == no goto menu goto correct6 :wrong6 cls echo ckckck.. jawaban %name% Salah, coba aja diulang lagi ya!(yes/no) set/p retry= if %retry% == yes goto Pertanyaan6 if %retry% == no goto exit goto wrong6 :Pertanyaan7 cls echo 7. Anak wanita yang masih kecil selalu diberikan mainan boneka oleh ibunya. Wati punya banyak boneka di rumahnya. Kakak dan adik wati tidak suka boneka. Jadi... echo a. Kakak dan adiknya Wati adalah laki-laki semua. echo b. Kakak Wati tidak sering dibelikan boneka oleh ibunya. echo c. Semua boneka Wati adalah pemberian ibunya. echo d. Wati adalah anak yang paling disayang. echo e. Tidak ada kesimpulan yang benar. set/p answer7= if %answer7% == a goto wrong7 if %answer7% == b goto wrong7 if %answer7% == c goto wrong7 if %answer7% == d goto wrong7 if %answer7% == e goto correct7 goto Pertanyaan7 :correct7 echo Jawaban yang Tepat %name%, mau lanjut Pertanyaan 8? (yes/no) set/p NL1= if %NL1% == yes goto Pertanyaan8 if %NL1% == no goto menu goto correct7 :wrong7 cls echo Jawaban %name% Salah, mau ulang sekali lagi?(yes/no) set/p retry= if %retry% == yes goto Pertanyaan7 if %retry% == no goto exit goto wrong7 :Pertanyaan8 cls echo 8. Astri adalah anak pasangan pak Bambang dan bu Sinta, sedangkan Lydia adalah anak adiknya bu Sinta. Hubungan antara Lydia dan Astri adalah... echo a. Saudara ipar echo b. Saudara kandung echo c. Saudata misan echo d. Saudara sepupu echo e. Saudara tiri set /p aa= if %aa% == a goto wrong8 if %aa% == b goto wrong8 if %aa% == c goto wrong8 if %aa% == d goto correct8 if %aa% == e goto wrong8 :correct8 echo Betul sekali, jawaban %name% tepat, mau lanjut Pertanyaan 9?(yes/no) set/p NL1= if %NL1% == yes goto Pertanyaan9 if %NL1% == no goto menu goto correct8 :wrong8 cls echo Jawaban %name% Salah mau ulang sekali lagi?(yes/no) set/p retry= if %retry% == yes goto Pertanyaan8 if %retry% == no goto exit goto wrong8 :Pertanyaan9 echo 9. Maya selalu memberi hadiah barang-barang mahal. Andi diberi hadiah dasi oleh Maya. Kesimpulannya... echo a. Maya selalu memberi hadiah dasi echo b. Dasi adalah barang mahal echo c. Andi selalu diberikan hadiah barang-barang mahal echo d. Dasi pemberian Maya mahal echo e. Tak ada hadiah yang tak mahal set /p answer9= if %answer9% == a goto wrong9 if %answer9% == b goto wrong9 if %answer9% == c goto wrong9 if %answer9% == d goto correct9 if %answer9% == e goto wrong9 goto Pertanyaan9 :correct9 echo betul mau lanjut Pertanyaan 10?(yes/no) set/p NL1= if %NL1% == yes goto Pertanyaan10 if %NL1% == no goto menu goto correct9 :wrong9 cls echo jawaban %name% Salah mau ulang lagi?(yes/no) set/p retry= if %retry% == yes goto Pertanyaan9 if %retry% == no goto exit goto wrong9 :Pertanyaan10 cls echo 10. Pagi tadi Zakia jalan-jalan bersama Aira, ditengah jalan Zakia menemukan sebuah Telephon. Siapa penemu telephon? echo a. Zakia echo b. Aira echo c. Alexander Grahambell echo d. Galileo echo e. Anonymous set /p retry2= if %retry2% == a goto wrong10 if %retry2% == b goto wrong10 if %retry2% == c goto correct10 if %retry2% == d goto wrong10 if %retry2% == e goto wrong10 goto Pertanyaan10 :correct10 cls color A2 echo SELAMAT KAMU MENANG! echo KEEP VISIT my FB : http://www.facebook.com/algi.fahri2 echo Thanks to Buku TES CPNS yang di tulis M.Ridwan dan diterbitkan oleh Atma Media Press. echo Thanks to My friendship yg telah memberikan semangat kepada saya. goto correct10 :wrong10 cls echo KAMU KALAH, TERPAKSA %name% HARUS ULANG DARI AWAL, MAU ULANG GAME??(yes/no) set/p retry= if %retry% == yes goto Pertanyaan1 if %retry% == no goto exit goto wrong10

3. klik (File di pojok kiri atas->Save As...->  isi File Name dengan nama Game Logika.bat, ganti tulisan Text Documents (*.txt) menjadi All Files)

 4. Klik Save

Game anda telah selesai, selamat bermain!!