Aku gak rajin nulis sebenernya. Blog ini dibuat udah lama banget sejak SMP kalo gak salah, dan sekarang udah kuliah masih gak berkembang juga. Yaudah sih asal ada aja inimah, gak seru juga gak apa apa. Enjoy!!!

Cara Membuat Game Kuis Sederhana Menggunakan Note Pad

Cara Membuat Game Menggunakan Notepad

Mungkin biasanya game dibuat oleh para programer yang handal dan menggunakan software yang rumit.
Tapi sekarang saya akan mengajarkan anda bagaimana membuat game Dengan menggunakan Notepad.

Lets Go
  • Buka Note Pad
  • Copy  Code Di bawah Ini

 @echo off

color b4

:menu
cls
echo Hallo whats up bro and sis, Kumaha damang?
echo Wilujeng di game ngalilieur versi abi
echo Game Ini Di Buat oleh:Yaser Fahrizal Damar Utama
echo Link blog : www.menolakboloho.blogspot.com
echo 1) Mulai!
echo 2) cara main
echo 3) Keluar


echo Cara Mainnya adalah ketik pilihan (a/b/c/d/ya/tidak/1/2/3) lalu ketik enter
set /p number=

if %number% == 1 goto Mulai!
if %number% == 2 goto cara main
if %number% == 3 goto keluar

:Mulai!
cls
echo Siapa Nama Mu:
set /p name=
echo Oh ngaran maneh %name%!
echo Dek di lanjutkeun moal? (ya/tidak)
set /p start=
if %start% == ya goto level1
if %start% == tidak goto menu
goto Mulai!

:cara main
cls
echo pencet pilihan lalu ketik enter
echo pergi ke menu? (ya/tidak)
set /p menugoto=
if %menugoto% == ya goto menu
if %menugoto% == tidak goto exit
goto cara main

:keluar
cls
echo Cing baleg atuh, Rek kaluar wae ieu th? Moal nyobaan hela?(y/t)
set /p keluargoto=
if %keluargoto% == y goto exit
if %keluargoto% == t goto menu
goto keluar

:level1
cls
echo DER AHH !
echo Jika Jarak Jang Asep ka Neng esih sang mantan adalah 75km dan tinggi rumah neng esih adalah 30 meter. Maka tanggal Berapa Indonesia Merdeka?
echo a) 1 Syawal 1455 H
echo b) 17 Agustus 1945
echo c) 12 Rabiul awal

set /p answer1=
if %answer1% == a goto wrong1
if %answer1% == b goto correct1
if %answer1% == c goto wrong1
goto level1

:correct1
echo Jagoan maneh matematikana euy. lanjut ka level 2?(ya/tidak)
set /p NL1=

if %NL1% == ya goto level2
if %NL1% == tidak goto menu
goto correct1

:Wrong1
Echo BELEGUG, Balikan deui moal? (ya/tidak)
set /p WA1=
if %WA1% == ya goto level1
if %WA1% == tidak goto menu
goto wrong1

:level2

cls
echo Siapa nama Pembuat game ini?
echo a) Yaser Fahrizal Damar Utama
echo b) Yaser Fahrizal Damar Wulan
echo c) Yaser Aja
echo d) Yaser meureun
set /p aa=
if %aa% == a goto correct2
if %aa% == b goto wrong2
if %aa% == c goto wrong2
if %aa% == d goto wrong2
goto level2

:correct2
echo Apalan euy maneh. Lanjutkeun Ieu th ka level 3?(ya/tidak)
set /p NL1=
if %NL1% == ya goto level3
if %NL1% == tidak goto menu
goto correct2

:wrong2
cls
echo Salah atuh cuy!! Cik balikan deui lah! (ya/tidak)
set/p retry=
if %retry% == ya goto level1
if %retry% == tidak goto exit
goto wrong2

:level3
cls
echo Naon Ngaran Sakola Urang?
echo a) SMK Bhakti Kencana
echo b) SMA BAKOM
echo c) SMK Krija Bhakti Utama Nu Is The Best Tea Gening

set /p answer3=
if %answer3% == a goto wrong3
if %answer3% == b goto wrong3
if %answer3% == c goto correct3
goto level3

:correct3
echo Jagoan euy maneh. Lanjutkeun Ieu th ka level 4?(ya/tidak)
set /p NL1=
if %NL1% == ya goto level4
if %NL1% == tidak goto menu
goto correct3

:wrong3
cls
echo Salah atuh cuy!! Cik balikan deui lah!?(ya/tidak)
set/p retry=
if %retry% == ya goto level3
if %retry% == tidak goto exit
goto wrong3

:level4
cls
echo Siapa penemu tahu bulat?
echo a)Mang iyan
echo b)ceu emar
echo c)Jang Cemeng
echo d)Duka atuh da sanes abi
set /p aa=
if %aa% == a goto wrong4
if %aa% == b goto wrong4
if %aa% == c goto wrong4
if %aa% == d goto correct4
goto level4

:correct4
echo Jagoan euy maneh. Lanjutkeun Ieu th ka 5?(ya/tidak)
set /p NL1=
if %NL1% == ya goto level5
if %NL1% == tidak goto menu
goto correct4

:wrong4
cls
echo Salah atuh cuy!! Cik balikan deui lah!(ya/tidak)
set/p retry=
if %retry% == ya goto level4
if %retry% == tidak goto exit
goto wrong4

:level5
cls
echo berapa hasil -20:(-2)?
echo a)10
echo b)5
echo c)20

set /p answer5=
if %answer5% == a goto correct5
if %answer5% == b goto wrong5
if %answer5% == c goto wrong5
goto level5

:correct5
echo Jagoan euy maneh. Lanjutkeun Ieu th ka level 6?(ya/tidak)
set/p NL1=

if %NL1% == ya goto level6
if %NL1% == tidak goto menu
goto correct1

:wrong5
cls
echo Salah atuh cuy!! Cik balikan deui lah!(ya/tidak)
set/p retry=
if %retry% == ya goto level5
if %retry% == tidak goto exit
goto wrong5

:level6
cls
echo Siapa Penemu Bakteri?
echo a)Orang Gila
echo b)Alexander Fleming
echo c)Alexander Grahambell
echo d)Muhammad Faqih`
set /p aa=
if %aa% == a goto wrong6
if %aa% == b goto correct6
if %aa% == c goto wrong6
if %aa% == d goto wrong
goto level6

:correct6
echo Jagoan euy maneh. Lanjutkeun Ieu th ka level7?(ya/tidak)
set/p NL1=

if %NL1% == ya goto level7
if %NL1% == tidak goto menu
goto correct7

:wrong6
cls
echo Salah atuh cuy!! Cik balikan deui lah!(ya/tidak)
set/p retry=
if %retry% == ya goto level7
if %retry% == tidak goto exit
goto wrong7

:level7
cls
echo berapa hasil -40:2:(-4)?
echo a)13
echo b)20
echo c)5

set/p answer7=
if %answer7% == a goto wrong7
if %answer7% == b goto wrong7
if %answer7% == c goto correct7
goto level7

:correct7
echo Jagoan euy maneh. Lanjutkeun Ieu th ka level8? (ya/tidak)
set/p NL1=

if %NL1% == ya goto level8
if %NL1% == tidak goto menu
goto correct7

:wrong7
cls
echo Salah atuh cuy!! Cik balikan deui lah!(ya/tidak)
set/p retry=
if %retry% == ya goto level7
if %retry% == tidak goto exit
goto wrong7

:level8
cls
echo Siapa Presiden Amerika
echo a)Barrak Obama
echo b)SBY
echo c)Soekarano
echo d)Moh.Hatta
set /p aa=
if %aa% == a goto correct8
if %aa% == b goto wrong8
if %aa% == c goto wrong8
if %aa% == d goto wrong8

:correct8
echo Jagoan euy maneh. Lanjutkeun Ieu th ka level9?(ya/tidak)
set/p NL1=

if %NL1% == ya goto level9
if %NL1% == tidak goto menu
goto correct8

:wrong8
cls
echo Salah atuh cuy!! Cik balikan deui lah!(ya/tidak)
set/p retry=
if %retry% == ya goto level8
if %retry% == tidak goto exit
goto wrong8

:level9
echo berapa hasil 3x(-2)=
echo a)-100
echo b)400
echo c)-6

set /p answer9=
if %answer9% == a goto wrong9
if %answer9% == b goto wrong9
if %answer9% == c goto correct9
goto level9

:correct9
echo Jagoan euy maneh. Lanjutkeun Ieu th ka level 10?(ya/tidak)
set/p NL1=

if %NL1% == ya goto level10
if %NL1% == tidak goto menu
goto correct1

:wrong9
cls
echo Salah atuh cuy!! Cik balikan deui lah!(ya/tidak)
set/p retry=
if %retry% == ya goto level9
if %retry% == tidak goto exit
goto wrong9

:level10
cls
echo Siapa penemu telepon?
echo a)Orang Gembel
echo b)Muhammad Faqih
echo c)Alexander Grahambell
echo d)SBY
set /p aa=
if %aa% == a goto wrong10
if %aa% == b goto wrong10
if %aa% == c goto correct10
if %aa% == d goto wrong10
goto level10

:correct10
cls
echo SELAMAT KAMU MENANG!
echo KEEP VISIT : www.menolakboloho.blogspot.com
goto correct10

:wrong10
cls
echo Salah atuh cuy!! Cik balikan deui lah! Padahal sautik deui , balikan deui moal ?(y/n)
set/p retry=
if %retry% == y goto level1
if %retry% == n goto exit
goto wrong10

  • Paste ke Note Pad dan Save As Dengan Format .bat
     


    Setelah Itu akan muncul file seperti ini.
    Buka dan mainkan. Caranya cukup mudah dengan menekan Angka pilihan lalu enter
     




0 comments:

Post a Comment

Cara Membuat Game Kuis Sederhana Menggunakan Note Pad