Thursday, June 11, 2015

Cara membuat game melalui notepad

  secatrik       Thursday, June 11, 2015
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

logoblog

Thanks for reading Cara membuat game melalui notepad

Previous
« Prev Post

No comments:

Post a Comment