Mythology Quiz (1).bat

@echo off

color e6

:menu
cls
echo Selamat datang di game yang sederhana ini
echo Game ini dibuat oleh seorang jones
echo yang juga berprofesi sebagai seorang freelancer (pengangguran) :3
echo 1) mulai
echo 2) cara bermain
echo 3) credit
echo 4) keluar
set /p number=

if %number% == 1 goto mulai
if %number% == 2 goto cara bermain
if %number% == 3 goto credit
if %number% == 4 goto keluar

:mulai
cls
echo Siapa nama kamu?
set /p name=
echo Halo %name%
echo Apakah kamu akan mulai game ini? (y/n)
set /p start=
if %start% == y goto level1
if %start% == n goto menu
goto mulai

:cara main
cls
echo Pertanyaan-pertanyaan yang ada disini saya ambil dari mythologi, baik itu Yunani, Greek, atau apapun itu.
echo Kamu hanya perlu menjawab pertanyaan yang diberikan
echo Soalnya terbagi menjadi 4 pilihan, kamu cukup pilih salah satu pilihan dan tekan enter.
echo Kembali ke menu? (y/n)
set /p keluargoto=
if %keluargoto% == y goto menu
if %keluargoto% == n goto keluar
goto cara main

:keluar
cls
echo Apa kamu yakin ingin keluar dari game? (y/n)
set /p keluargoto=
if %keluargoto% == y goto exit
if %keluargoto% == n goto menu
goto keluar

:credit
cls
echo Game ini dibuat oleh Feby Ardiansyah.
echo Special thanks to : kucing yang selalu setia menemaniku :3
echo Kembali ke menu? (y/n)
set /p menugoto=
if %menugoto% == y goto menu
if %menugoto% == n goto credit
goto keluar

:level1
cls
echo level 1
echo Siapakah nama dewa/i dalam mythology yang telah menebas kepala Medusa dan menyelamatkan Andromeda
echo a) Verethragna
echo b) Mithra
echo c) Prometheus
echo d) Perseus

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

:correct1
cls
echo Lanjut ke level selanjutnya? (y/n)
set /p NL1=

if %NL1% == y goto level2
if %NL1% == n goto menu
goto correct1

:wrong1
cls
echo Jawaban kamu salah. Mau coba lagi? (y/n)
set /p WA1=
if %WA1% == y goto level1
if %WA1% == n goto menu
goto wrong1

:level2
cls
echo Level 2
echo He was the sun born from darkness. The god who brought light and disaster
echo a) Athena
echo b) Epimetheus
echo c) Phoebus
echo d) Zeus

set /p answer2=
if %answer2% == a goto wrong2
if %answer2% == b goto wrong2
if %answer2% == c goto correct2
if %answer2% == d goto wrong2
goto level2

:correct2
cls
echo Ya, jawaban kamu benar~
echo Lanjut ke level 3? (y/n)
set /p NL2=

if %NL2% == y goto level3
if %NL2% == n goto menu
goto correct2

:wrong2
cls
echo Kacau! Jawaban kamu salah. Mau ulang game? (y/n)
set /p WA2=
if %WA2% == y goto level1
if %WA2% == n goto menu
goto wrong2

:level3
cls
echo Level 3
echo Who is "the god of victory" who have 10 forms? The 10 forms is
echo A gust of -Wind-, the -Bull-, the -White Stallion-, the -Camel-, the -Boar-,
echo the -Youth-, the -Raptor-, the -Ram-, the -Goat-, and the -Hero- (in that order/respectively)
echo a) Verethragna
echo b) Mithra
echo c) Prometheus
echo d) Perseus

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

:correct3
cls
echo Hebat! Kamu berhasil melewati level ini.
echo Lanjut ke level 4? (y/n)
set /p NL3=

if %NL3% == y goto level4
if %NL3% == n goto menu
goto correct3

:wrong3
cls
echo Selamat! Kamu salah!
echo Mau ulang game? (y/n)
set /p WA3=
if %WA3% == y goto level2
if %WA3% == n goto menu
goto wrong3

:level4
cls
echo Dewa ini memiliki nama yang berarti "The one who thinks ahead".
echo Dalam mythology, dia juga yang telah mencuri api dan memberikannya untuk pertama kali kepada manusia.
echo a) Prometheus
echo b) Epimetheus
echo c) Zeus
echo d) Odin

set /p answer4=
if %answer4% == a goto correct4
if %answer4% == b goto wrong4
if %answer4% == c goto wrong4
if %answer4% == d goto wrong4
goto level4

:correct4
cls
echo Yak! Anda benar-benar luar biasa!
echo Lanjut ke level 5? (y/n)
set /p NL4=
if %NL4% == y goto level5
if %NL4% == n goto menu
goto correct4

:wrong4
cls
echo Sial! Padahal sedikit lagi .... Jangan menyerah!
echo Mau lanjut dari level 3? (y/n)

set /p WA4=
if %WA4% == y goto level3
if %WA4% == n goto menu
goto wrong4

:level5
cls
echo Level 5
echo Dewa ini adalah salah 1 dari 2 dewa yang pernah menggunakan Kusanagi Blade.
echo Selain itu, dia berasal dari Jepang dan dia juga dikenal sebagai dewa badai.
echo Siapakah dia?
echo a) Yamata no Orochi
echo b) Susanoo
echo c) Yamato Takeda
echo d) Amaterasu

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

:correct5
cls
echo Keren~! yang berikutnya akan lebih sulit dari ini, tetap semangat!
echo Lanjut ke level 6? (y/n)
set /p NL5=
if %NL5% == y goto level6
if %NL5% == n goto menu
goto correct5

:wrong5
cls
echo Aaagh! Jangan khawatir, kuncinya adalah jangan putus asa!
echo Tetaplah berjuang sampai titik darah penghabisan~!
echo Ulangi dari level 4? (y/n)
set /p WA5=
if %WA5% == y goto level4
if %WA5% == n goto menu
goto wrong5

:level6
cls
echo Level 6
echo Dia adalah dewa egypt yang juga merupakan god of harvest.
echo Merupakan suami dari Isis. Dia pernah dibunuh oleh adik dari dewa gurun pasir.
echo Dan dia dihidupkan kembali sebagai penguasa dari dunia kematian
echo a) Anubis
echo b) Apollo
echo c) Nuadha
echo d) Osiris

set /p answer6=
if %answer6% == a goto wrong6
if %answer6% == b goto wrong6
if %answer6% == c goto wrong6
if %answer6% == d goto correct6
goto level6

:correct6
cls
echo Bagus! Terus pertahankan!
echo Level berikutnya adalah level terakhir.
echo Lanjut ke level 7? (y/n)
set /p NL6=
if %NL6% == y goto level7
if %NL6% == n goto menu
goto correct6

:wrong6
cls
echo Baiklah, aku tau mungkin pertanyaaan-pertanyaan yang aku buat tidak begitu masuk akal.
echo Tapi yaa itulah mythology :3
echo Ulangi dari level 5? (y/n)
set /p WA6=
if %WA6% == y goto level5
if %WA6% == n goto menu
goto wrong6

:level7
cls
echo Level 7 (Final)
echo Dia adalah dewi yang melahirkan kekacauan, bencana dan harapan.
echo Dia juga merupakan dewi yang menjadi istri dari epimetheus
echo a) Gorgon
echo b) Pandora
echo c) Eurayle
echo d) Medusa

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

:correct7
cls
echo Selamat! Kamu telah berhasil menyelesaikan game ini!
echo Dengan begini bisa dikatakan bahwa kamu telah satu langkah lebih dekat untuk menguasai mythology yang benar-benar tidak ada habisnya itu :3
echo Tetaplah menuntut ilmu, dan yakinlah apapun ilmu yang kamu pelajari suatu saat pasti ilmu itu akan berguna~
echo Thank you for playing~
echo Kembali ke menu? (y/n)
set /p bb=
if %bb% == y goto menu
if %bb% == n goto keluar
goto correct7

:wrong7
cls
echo Salah~! @_@
echo Ulangi dari level 6? (y/n)
set /p retry=
if %retry% == y goto level6
if %retry% == n goto menu
goto wrong7