Assalamualaikum.......
Oke kali ini saya akan membagikan cara membuat game kuis cinta lewat Notepad
Bahan-Bahan :
1. Notepad pastinya :D
2. Rumus nya
ini rumus yang saya buat sendiri :
@echo off
title kuis kovlo
color b4
:menu
cls
echo Hai! Selamat Datang Di kuis kovlo! Mari Dijawab!
echo 1) Mulai
echo 2) Cara menjawab
echo 3) Keluar
set /p number=
if %number% == 1 goto Mulai
if %number% == 2 goto Cara menjawab
if %number% == 3 goto Keluar
:Mulai
cls
echo Siapa Namamu:
set /p name=
echo Halo %name%!
echo Apakah kamu akan memulai kuis? (Y/N)
set /p start=
if %start% == Y goto Pertanyaan1
if %start% == N goto menu
goto Mulai
:Cara main
cls
echo Ketik pilihanmu lalu klik enter
echo Jawab sejujurnya
echo Bohong itu dosa
echo Pergi ke menu? (Y/N)
set /p menugoto=
if %menugoto% == Y goto menu
if %menugoto% == N goto exit
goto cara main
:Keluar
cls
echo Apakah ente yakin minggat?(Y/N)
set /p keluargoto=
if %keluargoto% == Y goto exit
if %keluargoto% == N goto menu
goto keluar
:Pertanyaan1
cls
echo Oke sekarang mulai.
echo Apakah ente jomblo?
echo a) Tidak
echo b) Iya
echo c) Sama sekali iya
set /p answer1=
if %answer1% == a goto wrong1
if %answer1% == b goto correct1
if %answer1% == c goto correct1
goto Pertanyaan1
:correct1
echo Pingin lanjut ke Pertanyaan 2?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan2
if %NL1% == N goto menu
goto correct1
:Wrong1
Echo ciyee yang salah! Mau ulang gak? (Y/N)
set /p WA1=
if %WA1% == Y goto Pertanyaan1
if %WA1% == N goto menu
goto wrong1
:Pertanyaan2
cls
echo Siapa orang yang paling jones?
echo a) Saya
echo b) Aku
echo c) Kula
echo d) Kamu
set /p aa=
if %aa% == a goto wrong2
if %aa% == b goto wrong2
if %aa% == c goto wrong2
if %aa% == d goto correct2
goto Pertanyaan2
:correct2
echo Kamu betul mau Lanjut Pertanyaan 3?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan3
if %NL1% == N goto menu
goto correct2
:wrong2
cls
echo kmvret :v gitu aja salah! Mau ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan2
if %retry% == N goto exit
goto wrong2
:Pertanyaan3
cls
echo bosen gak ngejomblo?
echo a) Iya
echo b) Sudah asik sendiri
echo c) Aku tuh jones sejati
set /p answer3=
if %answer3% == a goto correct3
if %answer3% == b goto wrong3
if %answer3% == c goto wrong3
goto Pertanyaan3
:correct3
echo Betul mau lanjut Pertanyaan 4?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan4
if %NL1% == N goto menu
goto correct3
:wrong3
cls
echo ciyee yang salah mulu! Mau ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan3
if %retry% == N goto exit
goto wrong3
:Pertanyaan4
cls
echo Kalo gitu kamu maunya ava?
echo a)Mending jones
echo b)Di PHP
echo c)Punya pacar
echo d)Mau makan
set /p aa=
if %aa% == a goto wrong4
if %aa% == b goto wrong4
if %aa% == c goto correct4
if %aa% == d goto wrong4
goto Pertanyaan4
:correct4
echo Betul mau lanjut Pertanyaan 5?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan5
if %NL1% == N goto menu
goto correct4
:wrong4
cls
echo Ah dasar gak peka! Mau ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan4
if %retry% == N goto exit
goto wrong4
:Pertanyaan5
cls
echo Jadian aja yuk?
echo a)Ayuk
echo b)Mau vanget
echo c)Emoh
set /p answer5=
if %answer5% == a goto correct5
if %answer5% == b goto correct5
if %answer5% == c goto wrong5
goto Pertanyaan5
:correct5
cls
echo Selamat kita udah jadian! ciyee yang udah kagak jones :v!
goto correct5
:wrong5
cls
echo ciyee yang emoh! Mau difikirin ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan5
if %retry% == N goto exit
goto wrong5
cls
echo Selamat kita udah jadian! ciyee yang udah kagak jones!
Kalo udah save terus ganti nama menjadi .bat
Selamat mencoba.... :v
Terimakasih sudah berkunjung , kalo berhasil komen bro ... :v
Oke kali ini saya akan membagikan cara membuat game kuis cinta lewat Notepad
Bahan-Bahan :
1. Notepad pastinya :D
2. Rumus nya
ini rumus yang saya buat sendiri :
@echo off
title kuis kovlo
color b4
:menu
cls
echo Hai! Selamat Datang Di kuis kovlo! Mari Dijawab!
echo 1) Mulai
echo 2) Cara menjawab
echo 3) Keluar
set /p number=
if %number% == 1 goto Mulai
if %number% == 2 goto Cara menjawab
if %number% == 3 goto Keluar
:Mulai
cls
echo Siapa Namamu:
set /p name=
echo Halo %name%!
echo Apakah kamu akan memulai kuis? (Y/N)
set /p start=
if %start% == Y goto Pertanyaan1
if %start% == N goto menu
goto Mulai
:Cara main
cls
echo Ketik pilihanmu lalu klik enter
echo Jawab sejujurnya
echo Bohong itu dosa
echo Pergi ke menu? (Y/N)
set /p menugoto=
if %menugoto% == Y goto menu
if %menugoto% == N goto exit
goto cara main
:Keluar
cls
echo Apakah ente yakin minggat?(Y/N)
set /p keluargoto=
if %keluargoto% == Y goto exit
if %keluargoto% == N goto menu
goto keluar
:Pertanyaan1
cls
echo Oke sekarang mulai.
echo Apakah ente jomblo?
echo a) Tidak
echo b) Iya
echo c) Sama sekali iya
set /p answer1=
if %answer1% == a goto wrong1
if %answer1% == b goto correct1
if %answer1% == c goto correct1
goto Pertanyaan1
:correct1
echo Pingin lanjut ke Pertanyaan 2?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan2
if %NL1% == N goto menu
goto correct1
:Wrong1
Echo ciyee yang salah! Mau ulang gak? (Y/N)
set /p WA1=
if %WA1% == Y goto Pertanyaan1
if %WA1% == N goto menu
goto wrong1
:Pertanyaan2
cls
echo Siapa orang yang paling jones?
echo a) Saya
echo b) Aku
echo c) Kula
echo d) Kamu
set /p aa=
if %aa% == a goto wrong2
if %aa% == b goto wrong2
if %aa% == c goto wrong2
if %aa% == d goto correct2
goto Pertanyaan2
:correct2
echo Kamu betul mau Lanjut Pertanyaan 3?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan3
if %NL1% == N goto menu
goto correct2
:wrong2
cls
echo kmvret :v gitu aja salah! Mau ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan2
if %retry% == N goto exit
goto wrong2
:Pertanyaan3
cls
echo bosen gak ngejomblo?
echo a) Iya
echo b) Sudah asik sendiri
echo c) Aku tuh jones sejati
set /p answer3=
if %answer3% == a goto correct3
if %answer3% == b goto wrong3
if %answer3% == c goto wrong3
goto Pertanyaan3
:correct3
echo Betul mau lanjut Pertanyaan 4?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan4
if %NL1% == N goto menu
goto correct3
:wrong3
cls
echo ciyee yang salah mulu! Mau ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan3
if %retry% == N goto exit
goto wrong3
:Pertanyaan4
cls
echo Kalo gitu kamu maunya ava?
echo a)Mending jones
echo b)Di PHP
echo c)Punya pacar
echo d)Mau makan
set /p aa=
if %aa% == a goto wrong4
if %aa% == b goto wrong4
if %aa% == c goto correct4
if %aa% == d goto wrong4
goto Pertanyaan4
:correct4
echo Betul mau lanjut Pertanyaan 5?(Y/N)
set /p NL1=
if %NL1% == Y goto Pertanyaan5
if %NL1% == N goto menu
goto correct4
:wrong4
cls
echo Ah dasar gak peka! Mau ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan4
if %retry% == N goto exit
goto wrong4
:Pertanyaan5
cls
echo Jadian aja yuk?
echo a)Ayuk
echo b)Mau vanget
echo c)Emoh
set /p answer5=
if %answer5% == a goto correct5
if %answer5% == b goto correct5
if %answer5% == c goto wrong5
goto Pertanyaan5
:correct5
cls
echo Selamat kita udah jadian! ciyee yang udah kagak jones :v!
goto correct5
:wrong5
cls
echo ciyee yang emoh! Mau difikirin ulang gak? (Y/N)
set/p retry=
if %retry% == Y goto Pertanyaan5
if %retry% == N goto exit
goto wrong5
cls
echo Selamat kita udah jadian! ciyee yang udah kagak jones!
Kalo udah save terus ganti nama menjadi .bat
Selamat mencoba.... :v
Terimakasih sudah berkunjung , kalo berhasil komen bro ... :v
No comments:
Post a Comment