Tombol

Beranda       Profil       Download

Selasa, 01 April 2014

Membuat game sederhana

untuk membuat game sederhana kita hanya menggunakan software notepad

caranya  adalah sebagai berikut :

  1. buka applikasi notepad
  2. masukan kode dibawah ini :
@echo off

color 0b

:menu
cls
echo Hai! Selamat Datang Di Game Somplak! Selamat bermain! Ingat Jika Anda bermain Game Somplak ini Maka anda akan Bertambah stress hahaha
echo Game Ini Di Buat oleh: Arip Rahman Nugraha
echo Link blog : j-rhiefzvanhahn.blogspot.com
echo 1) Mulai!
echo 2) cara main
echo 3) Keluar
echo 4) Kunci Jawaban
set /p number=

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

:Mulai!
cls
echo What's yor name, please ?:
set /p name=
echo Halo %name%!
echo Anjeun tos ready kangge ngawitan game kaula (y/t)
set /p start=
if %start% == y goto level1
if %start% == t goto menu
goto Mulai!

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

:keluar
cls
echo apakah anda yakin ingin keluar game?(y/t)
set /p keluargoto=
if %keluargoto% == y goto exit
if %keluargoto% == t goto menu
goto keluar

:kunci
cls
echo nomor 1. a
echo nomor 2. b
echo nomor 3. d
echo nomor 4. d
echo nomor 5. a (sabab mun tos munggah haji kedah wangsul deui ka indonesia jadi rukun islam na nambahan hiji)
echo nomor 6. b
echo nomor 7. c
echo nomor 8. b
echo nomor 9. a
echo nomor 10. b
echo pergi ke menu ?(y/t)
set /p kunci=
if %kunci% == y goto menu
if %kunci% == t goto exit

:level1
cls
echo ok cuang di awitan ayeuna.
echo berapa hasil 100 * 2000 / 54 - 56 * 0 +1?
echo a) 1
echo b) 20
echo c) 500

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

:correct1
echo Leres... anjeun kenging point 50 Bade di lajengkeun ka level 2 henteu ?(y/t)
set /p NL1=

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

:Wrong1
Echo anjeun lepat bade ngawitan ulang deui henteu ? (y/t)
set /p WA1=
if %WA1% == y goto level1
if %WA1% == t goto menu
goto wrong1

:level2

cls
echo Buah, buah naon anu aya buluan terus buleud warna na hideung ?
echo a) Durian
echo b) Rambutan Buruk
echo c) Jeruk
echo d) Apel
set /p aa=
if %aa% == a goto wrong2
if %aa% == b goto correct2
if %aa% == c goto wrong2
if %aa% == d goto wrong2
goto level2

:correct2
echo betull deui.. point anjeun janten 100...bade di lajengkeun ka level 3?(y/t)
set /p NL1=
if %NL1% == y goto level3
if %NL1% == t goto menu
goto correct2

:wrong2
cls
echo Anjen lepat kasep/geulis.. bade ngawitan ulang deui? (y/t)
set/p retry=
if %retry% == y goto level1
if %retry% == t goto exit
goto wrong2

:level3
cls
echo Lamun urang sadaya tunduh kedah ....?
echo a) Tuang
echo b) Neda
echo c) Mandi
echo d) Pereum

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

:correct3
echo betull deui.. point anjeun janten 150...bade di lajengkeun ka level 4?(y/t)
set /p NL1=
if %NL1% == y goto level4
if %NL1% == t goto menu
goto correct3

:wrong3
cls
echo Anjen lepat kasep/geulis.. bade ngawitan ulang deui? (y/t)
set/p retry=
if %retry% == y goto level1
if %retry% == t goto exit
goto wrong3

:level4
cls
echo Saha nu nimukeun awewe?
echo a)Bapak kaula
echo b)Asep Sunandar
echo c)Jelema
echo d)Nya nu nimukeun
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 betull deui.. point anjeun janten 200...bade di lajengkeun ka level 5?(y/t)
set /p NL1=
if %NL1% == y goto level5
if %NL1% == t goto menu
goto correct4

:wrong4
cls
echo Haruuh anjeun kurang beruntung euyy, bade ngawitan ulang?(y/t)
set/p retry=
if %retry% == y goto level4
if %retry% == t goto exit
goto wrong4

:level5
cls
echo sabaraha jumlah rukun islam ?
echo a)6
echo b)10
echo c)7
echo d)100

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

:correct5
echo betull deui.. point anjeun janten 250...bade di lajengkeun ka level 6?(y/t)
set/p NL1=

if %NL1% == y goto level6
if %NL1% == t goto menu
goto correct1

:wrong5
cls
echo Haruuh anjeun kurang beruntung euyy, bade ngawitan ulang?(y/t)
set/p retry=
if %retry% == y goto level5
if %retry% == t goto exit
goto wrong5

:level6
cls
echo naon arti tinu kalimat "i don't know"?
echo a)Orang Gila
echo b)Kaula teu terang euy
echo c)Situ gila ya
echo d)haruh taroskeun hela ka mbah ahh
set /p aa=
if %aa% == a goto wrong6
if %aa% == b goto correct6
if %aa% == c goto wrong6
if %aa% == d goto wrong6
goto level6

:correct6
echo betull deui.. point anjeun janten 250...bade di lajengkeun ka level 7?(y/t)
set/p NL1=

if %NL1% == y goto level7
if %NL1% == t goto menu
goto correct7

:wrong6
cls
echo Haruuh anjeun kurang beruntung euyy, bade ngawitan ulang?(y/t)
set/p retry=
if %retry% == y goto level7
if %retry% == t goto exit
goto wrong7

:level7
cls
echo Candi naon nu teu rengse-rengse padamelanana?
echo a)Candiparaban
echo b)Candikukumaha
echo c)Candijieun-jieun acan
echo d)Candiborobudur

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

:correct7
echo betull deui.. point anjeun janten 300...bade di lajengkeun ka level 8?(y/t)
set/p NL1=

if %NL1% == y goto level8
if %NL1% == t goto menu
goto correct7

:wrong7
cls
echo Haruuh anjeun kurang beruntung euyy, bade ngawitan ulang?(y/t)
set/p retry=
if %retry% == y goto level7
if %retry% == t goto exit
goto wrong7

:level8
cls
echo Saha Presiden Amerika tahun 1876
echo a)Barrak Obama
echo b)Teuing euyy
echo c)Soekarano
echo d)Moh.Hatta
set /p aa=
if %aa% == a goto wrong8
if %aa% == b goto correct8
if %aa% == c goto wrong8
if %aa% == d goto wrong8

:correct8
echo betull deui.. point anjeun janten 350...bade di lajengkeun ka level 9?(y/t)
set/p NL1=

if %NL1% == y goto level9
if %NL1% == t goto menu
goto correct8

:wrong8
cls
echo Haruuh anjeun kurang beruntung euyy, bade ngawitan ulang?(y/t)
set/p retry=
if %retry% == y goto level8
if %retry% == t goto exit
goto wrong8

:level9
echo Pa presiden soekarno lahir dimana ?
echo a)Kasur
echo b)Jakarta
echo c)Majalengka
echo d)Kumaha karep

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

:correct9
echo betull deui.. point anjeun janten 400..bade di lajengkeun ka level 10(special event)?(y/t)
set/p NL1=

if %NL1% == y goto level10
if %NL1% == t goto menu
goto correct1

:wrong9
cls
echo Haruuh anjeun kurang beruntung euyy, bade ngawitan ulang?(y/t)
set/p retry=
if %retry% == y goto level9
if %retry% == t goto exit
goto wrong9

:level10
cls
echo Saha wasta lengkap nu ngadamel game nu rada somplak ieu?
echo a)Orang Gembel
echo b)Arip Rahman Nugraha
echo c)Alexander Grahambell
echo d)Arman
set /p aa=
if %aa% == a goto wrong10
if %aa% == b goto correct10
if %aa% == c goto wrong10
if %aa% == d goto wrong10
goto level10

:correct10
cls
echo SELAMAT KAMU MENANG UANG TUNAI SEBESAR RP.5000.,-! MANGGA NUHUNKEUNA KA KOLOT SALIRA :D
echo KEEP VISIT : j-rhiefzvanhahn.blogspot.com
goto correct10

:wrong10
cls
echo KAMU KALAH MAU ULANG GAME!? (y/t)
set/p retry=
if %retry% == y goto level1
if %retry% == t goto exit
goto wrong10
3. Simpan file dengan format .bat  (contoh : gamesomplak.bat)4. Klik save

untuk menjalankannya cukup mudah, tinggal buka file tersebut.

Selamat Mencoba ... :*

Tidak ada komentar:

Posting Komentar