cara membuat game dengan notepad

oke tanpa basa basi langsung aja ke TKP










Bagikan ke Teman! : digg


Game Seru Di Notepad

@echo off



color b4



:menu


cls


echo Hai! Selamat Datang Di Game! Selamat bermain!

echo Game Ini Di Buat oleh:Rizky Aditya Putra Hermawan

echo Link blog : http://aditmadzs.blogspot.com

echo 1) Mulai!

echo 2) cara main

echo 3) Keluar

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 Halo %name%!

echo Apakah Kamu akan mulai quiz? (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 apakah anda yaking ingin keluar game?(y/t)

set /p keluargoto=

if %keluargoto% == y goto exit

if %keluargoto% == t goto menu

goto keluar


:level1

cls

echo ok sekarang mulai.

echo berapa hasil 10 + 10?

echo a) 1

echo b) 20

echo c) 500


set /p answer1=

if %answer1% == a goto wrong1

if %answer1% == b goto correct1

if %answer1% == c goto wrong1

goto level1


:correct1

echo betul mau lanjut level 2?(ya/tidak)

set /p NL1=


if %NL1% == ya goto level2

if %NL1% == tidak goto menu

goto correct1


:Wrong1

Echo salah mau ulang? (ya/tidak)

set /p WA1=

if %WA1% == ya goto level1

if %WA1% == tidak goto menu

goto wrong1


:level2


cls

echo Siapa yang ada di uang 100 dollar?

echo a) Ben Franklin

echo b) Tommy King

echo c) Thomas Train

echo d) Jeff Dunham

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 Kamu betul mau Lanjut level 3?(ya/tidak)

set /p NL1=

if %NL1% == ya goto level3

if %NL1% == tidak goto menu

goto correct2


:wrong2

cls

echo SALAH!Mau ulang? (ya/tidak)

set/p retry=

if %retry% == ya goto level1

if %retry% == tidak goto exit

goto wrong2


:level3

cls

echo berapa 5x5?

echo a) 30

echo b) 89

echo c) 25


set /p answer3=

if %answer3% == a goto wrong3

if %answer3% == b goto wrong3

if %answer3% == c goto correct3

goto level3


:correct3

echo betul mau lanjut level 4?(ya/tidak)

set /p NL1=

if %NL1% == ya goto level4

if %NL1% == tidak goto menu

goto correct3


:wrong3

cls

echo salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto level3

if %retry% == tidak goto exit

goto wrong3


:level4

cls

echo siapa penemu lampu?

echo a)Thomas Alvadison

echo b)Johan Edvard

echo c)John Shore

echo d)Samuel Miller

set /p aa=

if %aa% == a goto correct4

if %aa% == b goto wrong4

if %aa% == c goto wrong4

if %aa% == d goto wrong4

goto level4


:correct4

echo betul mau lanjut level 5?(ya/tidak)

set /p NL1=

if %NL1% == ya goto level5

if %NL1% == tidak goto menu

goto correct4


:wrong4

cls

echo salah mau ulang?(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 betul mau lanjut level 6?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level6

if %NL1% == tidak goto menu

goto correct1


:wrong5

cls

echo Salah mau ulang?(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 betul mau lanjut level7?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level7

if %NL1% == tidak goto menu

goto correct7


:wrong6

cls

echo Salah mau ulang?(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 betul mau lanjut level8? (ya/tidak)

set/p NL1=


if %NL1% == ya goto level8

if %NL1% == tidak goto menu

goto correct7


:wrong7

cls

echo Salah mau ulang?(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 betul mau lanjut level9?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level9

if %NL1% == tidak goto menu

goto correct8


:wrong8

cls

echo Salah mau ulang?(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 betul mau lanjut level 10?(ya/tidak)

set/p NL1=


if %NL1% == ya goto level10

if %NL1% == tidak goto menu

goto correct1


:wrong9

cls

echo Salah mau ulang?(ya/tidak)

set/p retry=

if %retry% == ya goto

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.rolandjak23.blogspot.com

goto correct10


:wrong10

cls

echo KAMU KALAH MAU ULANG GAME!?(y/n)

set/p retry=

if %retry% == y goto level1

if %retry% == n goto exit

goto wrong10


Save Dengan Format Bat , Dan Jadinya Seperti Ini










Game Taruhan

@echo off

title Super Taruhan!

set mny=0

set nbg=0

set asli=100000

set not=0


set jwl=5000

set bli=10000

taskkill /im nopengine_touched.exe>>hidden

taskkill /im "Cheat Engine.exe">>hidden

:awal

cls

if %not%==0 echo Please don't be cheat!

if %not%==1 echo You're using my cheat! You're lazy! :'(

echo Cash mu adalah %mny%

echo Tabunganmu adalah %nbg%

echo Uangmu adalah Rp %asli%

set var=%random%

set/p "cho=Pilih menu? (1=Main 2=Buy Cash M=Nabung A=Ambil tabungan J=Jual Cash G=Give Friends Cash Y=Give Friends Money E=Exit)"

if %cho%==1 goto chk

if %cho%==2 goto bli

if %cho%==m goto nbg

if %cho%==M goto nbg

if %cho%==A goto anb

if %cho%==a goto anb

if %cho%==J goto sll

if %cho%==j goto sll

if %cho%==G goto gfc

if %cho%==g goto gfc

if %cho%==y goto gfm

if %cho%==Y goto gfm

if %cho%==E goto exit

if %cho%==e goto exit

if %cho%==iamrichman goto cit1

if %cho%==youmustgivememuchmoney goto cit2

if %cho%==noloseman goto cit3

if %cho%==iamstingkyman goto cit4

if %cho%==loseallmycash goto cit5

if %cho%==ifyouareapoorman goto cit6

if %cho%==ilikehackingatm goto cit7

echo Wrong input!

pause

goto exit

:chk

cls

if %mny%==0 goto fail

echo Taruhan berapa (1 sampai %mny%)?

set/p "inp=>"

cls

if %inp% gtr %mny% goto fail

set /a mny=%mny%-%inp%

echo %var%!

set aaa=0

set bbb=0

set ccc=0

set ddd=0

set eee=0

set fff=0

if %var%==32767 set /a aaa=%inp%*10>>hidden

if %var% gtr 30000 set /a bbb=%inp%*7>>hidden

if %var% gtr 25000 set /a ccc=%inp%*5>>hidden

if %var% gtr 20000 set /a ddd=%inp%*3>>hidden

if %var% gtr 15000 set /a eee=%inp%*2>>hidden

if %var% gtr 10000 set /a fff=%inp%*1>>hidden

if %var% LEQ 10000 goto raw

set /a law=%aaa%+%bbb%+%ccc%+%ddd%+%eee%+%fff%>>hidden

set /a mny=%mny%+%law%>>hidden

echo Selamat kamu mendapatkan cash sebesar %law%!

echo Now your cash is %mny%!

pause

goto awal

:raw

cls

echo %var%!

echo Maaf, anda belum beruntung.

pause

goto awal

:fail

cls

echo You don't have enough cash!

echo Buy cash press enter, exit if not.

pause

goto bai

:bai

cls

echo Beli berapa? (1 Cash= Rp10000)

echo Your money is Rp %asli%

echo 1 Cash

echo 2 Cash

echo 3 Cash

echo 4 Cash

echo 5 Cash

echo 6 Cash

echo 7 Cash

echo 8 Cash

echo 9 Cash

echo 10 Cash


set/p "inp=Or more"

set /a sem=%inp%*%bli%

if %sem% gtr %asli% goto nomo

set /a asli=%asli%-%sem%

set /a mny=%mny%+%inp%

echo Now, your cash is %mny%.

set/p "cho=Beli lagi? (1=Yes 2=No M=Nabung A=Ambil tabngan)"

if %cho%==1 goto bai

if %cho%==2 goto awal

if %cho%==m goto nbg

if %cho%==M goto nbg

if %cho%==A goto anb

if %cho%==a goto anb

echo Wrong input!

goto exit

:nbg

cls

set/p "tab=Nabung berapa?"

set /a nbg=%nbg%+%tab%>>hidden

set /a mny=%mny%-%tab%>>hidden

echo Tabungan selesai

goto awal

:anb

set/p "tab=Ambil berapa?"

set /a nbg=%nbg%-%tab%>>hidden

set /a mny=%mny%+%tab%>>hidden

:nomo

echo Sorry, you don't have enough money!

echo Current money Rp %asli%

echo Tabungan selesai

goto awal

:sll

cls

echo Current money Rp %asli%

set/p "inp=Jual berapa?"

if %inp% gtr %mny% goto fail

set /a temp=%inp%*%jwl%

set /a asli=%asli%+%temp%

set /a mny=%mny%-%inp%

goto awal

:gfc

cls

set/p "tab=Beri berapa?"

set /a mny=%mny%-%tab%>>hidden

goto awal

:gfm

cls

set/p "tab=Beri berapa?"

set /a asli=%asli%-%tab%>>hidden

goto awal

:bli

if not %asli%==0 goto bai

echo You don't have money!!! You lose.

echo Current money Rp %asli%

set/p "cho=Solution? (1. Sell more cash 2. Exit)"

if %cho%==1 goto sll

if %cho%==2 goto exit

:exit

echo %mny%>>cashlog.sts

echo %asli%>>moneylog.sts

echo %nbg%>>savedcashlog.sts

echo ----------------------------------------------------------

echo All player cash

type cashlog.sts

echo ----------------------------------------------------------

echo All player MOney

type moneylog.sts

echo ----------------------------------------------------------

echo All Player Savings Money

type savedcashlog.sts

echo ----------------------------------------------------------

pause

exit

:cit1

set not=1

set /a mny=%mny%+250000

echo Cheat actived!

goto awal

:cit2

set not=1

set jwl=50000

echo Cheat actived!

goto awal

:cit3

set not=1

set random=32767

echo Cheat actived!

:cit4

set not=1

set bli=0

echo Cheat actived!

goto awal

:cit5

set not=1

set mny=0

echo Cheat actived!

goto awal

:cit6

set not=1

set /a asli=%asli%+%random%

echo Here is my money! So, I don't have more money again!

pause

goto awal

:cit7

set not=1

set /a nbg=%nbg%+2500000

echo Cheat actived!

goto awal

Simpan Dengan .bat Dan Jadinya Seperti Ini


Attacker


@echo off

set darah=300

set a=100

set b=25

set c=10

set d=5

goto train

:train

set musuh=50

goto mudah

:mudah

cls

IF %darah% lss 1 goto lose

echo Level 1

echo Nyawa Musuh %musuh%

echo Nyawa karakter anda %darah%

echo 1. Attack (%a%) 2. Deep atack (%b%) 3. Killing Death (%c%) 4. Super deep killing death (%d%)

set/p "cho=>"

if %cho%==1 goto a

if %cho%==2 goto b

if %cho%==3 goto c

if %cho%==4 goto d

echo Kau terlewatkan!

goto lawan

:a

cls

if %a%==0 goto lawan

set /a musuh=%musuh%-5

set /a a=%a%-1

echo You damage me in 5!

pause

goto lawan

:b

cls

if %b%==0 goto lawan

set /a musuh=%musuh%-15

set /a b=%b%-1

echo You damage me in 15!

pause

goto lawan

:c

cls

if %c%==0 goto lawan

set /a musuh=%musuh%-25

set /a c=%c%-1

echo You damage me in 25!

pause

goto lawan

:d

cls

if %d%==0 goto lawan

set /a d=%d%-1

set /a musuh=%musuh%-50

echo You damage me in 50!

pause

goto lawan

:lawanIF %musuh% lss 1 goto duax

set /a tmp=32767/10

set /a sem=%random%/%tmp%

set /a darah=%darah%-%sem%

echo I damage you in %sem%!

pause

goto mudah


:duax

set musuh=75

set /a darah=%darah%+25

goto sedang

:sedang

cls

IF %darah% lss 1 goto lose

echo Level 2

echo Nyawa Musuh %musuh%

echo Nyawa karakter anda %darah%

echo 1. Attack (%a%) 2. Deep atack (%b%) 3. Killing Death (%c%) 4. Super deep killing death (%d%)

set/p "cho=>"

if %cho%==1 goto e

if %cho%==2 goto f

if %cho%==3 goto g

if %cho%==4 goto h

echo Kau terlewatkan!

goto etek

:e

cls

if %a%==0 goto lawan

set /a musuh=%musuh%-5

set /a a=%a%-1

echo You damage me in 5!

pause

goto etek

:f

cls

if %b%==0 goto lawan

set /a b=%b%-1

set /a musuh=%musuh%-15

echo You damage me in 15!

pause

goto etek

:g

cls

if %c%==0 goto lawan

set /a musuh=%musuh%-25

set /a c=%c%-1

echo You damage me in 25!

pause

goto etek

:h

cls

if %d%==0 goto lawan

set /a musuh=%musuh%-50

set /a d=%d%-1

echo You damage me in 50!

pause

goto etek

:etek

IF %musuh% lss 1 goto tigax

set /a tmp=32767/25

set /a sem=%random%/%tmp%

set /a darah=%darah%-%sem%

echo I damage you in %sem%!

pause

goto sedang


:tigax

set /a darah=%darah%+50

set musuh=100

goto above

:above

cls

IF %darah% lss 1 goto lose

echo Level 3

echo Nyawa Musuh %musuh%

echo Nyawa karakter anda %darah%

echo 1. Attack (%a%) 2. Deep atack (%b%) 3. Killing Death (%c%) 4. Super deep killing death (%d%)

set/p "cho=>"

if %cho%==1 goto i

if %cho%==2 goto j

if %cho%==3 goto k

if %cho%==4 goto l

echo Kau terlewatkan!

goto demek

:i

cls

if %a%==0 goto lawan

set /a musuh=%musuh%-5

set /a a=%a%-1

echo You damage me in 5!

pause

goto demek

:j

cls

if %b%==0 goto lawan

set /a b=%b%-1

set /a musuh=%musuh%-15

echo You damage me in 15!

pause

goto demek

:k

cls

if %c%==0 goto lawan

set /a c=%c%-1

set /a musuh=%musuh%-25

echo You damage me in 25!

pause

goto demek

:l

cls

if %d%==0 goto lawan

set /a d=%d%-1

set /a musuh=%musuh%-50

echo You damage me in 50!

pause

goto demek

:demek

IF %musuh% lss 1 goto empat

set /a tmp=32767/30

set /a sem=%random%/%tmp%

set /a darah=%darah%-%sem%

echo I damage you in %sem%!

pause

goto above


:empat

set /a darah=%darah%+50

set musuh=125

goto susah

:susah

cls

IF %darah% lss 1 goto lose

echo Level 4

echo Nyawa Musuh %musuh%

echo Nyawa karakter anda %darah%

echo 1. Attack (%a%) 2. Deep atack (%b%) 3. Killing Death (%c%) 4. Super deep killing death (%d%)

set/p "cho=>"

if %cho%==1 goto m

if %cho%==2 goto n

if %cho%==3 goto o

if %cho%==4 goto p

echo Kau terlewatkan!

goto ancur

:m

cls

if %a%==0 goto lawan

set /a c=%c%-1

set /a musuh=%musuh%-5

echo You damage me in 5!

pause

goto ancur

:n

cls

if %b%==0 goto lawan

set /a b=%b%-1

set /a musuh=%musuh%-15

echo You damage me in 15!

pause

goto ancur

:o

cls

if %c%==0 goto lawan

set /a c=%c%-1

set /a musuh=%musuh%-25

echo You damage me in 25!

pause

goto ancur

:p

cls

if %d%==0 goto lawan

set /a d=%d%-1

set /a musuh=%musuh%-50

echo You damage me in 50!

pause

goto ancur

:ancur

IF %musuh% lss 1 goto boss

set /a tmp=32767/35

set /a sem=%random%/%tmp%

set /a darah=%darah%-%sem%

echo I damage you in %sem%!

pause

goto susah


:boss

set /a darah=%darah%+100

set musuh=150

goto raja

:raja

cls

IF %darah% lss 1 goto lose

echo Boss Battle!

echo Nyawa Musuh %musuh%

echo Nyawa karakter anda %darah%

echo 1. Attack (%a%) 2. Deep atack (%b%) 3. Killing Death (%c%) 4. Super deep killing death (%d%)

set/p "cho=>"

if %cho%==1 goto q

if %cho%==2 goto r

if %cho%==3 goto s

if %cho%==4 goto t

echo Kau terlewatkan!

goto mati

:q

cls

if %a%==0 goto lawan

set /a musuh=%musuh%-5

set /a a=%a%-1

echo You damage me in 5!

pause

goto mati

:r

cls

if %b%==0 goto lawan

set /a b=%b%-1

set /a musuh=%musuh%-15

echo You damage me in 15!

pause

goto mati

:s

cls

if %c%==0 goto lawan

set /a c=%c%-1

set /a musuh=%musuh%-25

echo You damage me in 25!

pause

goto mati

:t

cls

if %d%==0 goto lawan

set /a d=%d%-1

set /a musuh=%musuh%-50

echo You damage me in 50!

pause

goto mati

:mati

IF %musuh% lss 1 goto win

set /a tmp=32767/50

set /a sem=%random%/%tmp%

set /a darah=%darah%-%sem%

echo I damage you in %sem%!

pause

goto raja

:lose

echo You has been defeated! You lose. Press enter to exit

pause

exit

:win

echo You win! Conguralations!

pause




exit