Game Kuis
@echo off
color b3
:menu
cls
echo Hallo Selamat Bermain Di Game Sederhana Ini
echo Game Ini Di Buat oleh : alkitat
echo By Blog : http://alkitat.blogspot.com
echo 1) Mulai!
echo 2) Cara Main
echo 3) Credits
echo 4) Keluar
set /p number=
if %number% == 1 goto Mulai!
if %number% == 2 goto Cara Main
if %number% == 3 goto Credits
if %number% == 3 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 Kamu Hanya Akan Diberikan Jawaban Yang Mudah. Kamu Harus Menjawabnya Dengan Soal Ganda.
echo Soalnya Terbagi Jadi 4 Pilihan. Mau Ke Menu ? (y/n)
set /p menugoto=
if %menugoto% == y goto menu
if %menugoto% == n goto exit
goto cara main
:Credits
cls
echo Game Sederhana Yang Dibuat Oleh Dominique Fauzan Blog ( Fauzan Hibatullah Ashari ).
echo Semua Pembuatan Game Dikerjakan Oleh : Fauzan Hibatullah Ashari
echo Follow Twitter Me On : @kaisarcinta9
echo Facebook : https://www.facebook.com/kaisarcinta
echo FansPage Facebook : https://www.facebook.com/masteroftutorial
echo Site : http://alkitat.blogspot.com
echo Email : alkitat@yahoo.co.id
echo Kembali Ke Menu ? (y/n)
set /p Menugoto=
if %Menugoto% == y goto Menu
if %Menugoto% == n goto Credits
goto keluar
:keluar
cls
echo Apa Kamu Yakin Mau Keluar Dari Game Ini ? (y/n)
set /p keluargoto=
if %keluargoto% == y goto exit
if %keluargoto% == n goto menu
goto keluar
:level1
cls
echo Level 1.
echo Kenapa Ban Motor Bisa ( Meledak ) ?
echo a) Karna Digerogotin Tikus
echo b) Karna Nginjek Paku
echo c) Karna Nginjek Tai Lotok
echo d) Karna Lupa Pompa Ban
set /p answer1=
if %answer1% == a goto wrong1
if %answer1% == b goto correct1
if %answer1% == c goto wrong1
if %answer1% == d goto wrong1
goto level1
:correct1
echo Mau lanjut Ke Level Selanjutnya ? (y/n)
set /p NL1=
if %NL1% == y goto level2
if %NL1% == n goto menu
goto correct1
:Wrong1
Echo Hayo, Kamu Salah. Mau Ulang Game (y/n)
set /p WA1=
if %WA1% == y goto level1
if %WA1% == n goto menu
goto wrong1
:level2
cls
echo Level 2.
echo Siapa Pembuat Game Ini ?
echo a) Saya Barusan ( Dari NOTEPAD)
echo b) Bill Gate
echo c) Jin
echo d) Mbah Karuhun
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 Mau lanjut Ke Level Selanjutnya ? (y/n)
set /p NL1=
if %NL1% == y goto level3
if %NL1% == n goto menu
goto correct2
:wrong2
cls
echo Bego, Kamu Salah. Mau Ulang Game ? (y/n)
set/p retry=
if %retry% == y goto level1
if %retry% == n goto exit
goto wrong2
:level3
cls
echo Level 3.
echo Siapa Yang Sedang Main Game Ini ?
echo a) Saya
echo b) Virus Komputer
echo c) Alkitat
echo d) Justin Bieber
set /p aa=
if %aa% == a goto correct3
if %aa% == b goto wrong3
if %aa% == c goto wrong3
if %aa% == d goto wrong3
goto level3
:correct3
echo Beneran Mau Ke Level Selanjutnya ? (y/n)
set /p NL1=
if %NL1% == y goto level4
if %NL1% == n goto menu
goto correct4
:wrong3
cls
echo maaf, Kamu Salah. Mau Ulang Game ? (y/n)
set/p retry=
if %retry% == y goto level2
if %retry% == n goto exit
goto wrong3
:level4
cls
echo Level 4.
echo dari mana kamu dapat game ini?
echo a) alkitat.blogspot.com
echo b) yahoo.com
echo c) yaoutube.com
echo d) facebook.com
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 Beneran Mau Lanjut Ke level Selanjutnya ? (y/n)
set /p NL1=
if %NL1% == y goto level5
if %NL1% == n goto menu
goto correct4
:wrong4
cls
echo Maaf, Kamu Salah lagi. Mau Ulang ? (y/n)
set/p retry=
if %retry% == y goto level4
if %retry% == n goto exit
goto wrong4
:level5
cls
echo Level 5.
echo Apa Yang Sedang Kamu Lihat Sekarang?
echo a)Game
echo b)Minuman
echo c)Makanan
echo d)Sapi
set /p answer5=
if %answer5% == a goto correct5
if %answer5% == b goto wrong5
if %answer5% == c goto wrong5
if %answer5% == c goto wrong5
goto level5
:correct5
echo Cius Mau Lanjut Ke Level Selanjutnya ? (y/n)
set/p NL1=
if %NL1% == y goto level6
if %NL1% == n goto menu
goto correct1
:wrong5
cls
echo Bego, Kamu Salah. Mau Ulang Game ? (y/n)
set/p retry=
if %retry% == y goto level5
if %retry% == n goto exit
goto wrong5
:level6
cls
echo Level 6.
echo Berapa Hasil Dari 2573+9988 ?
echo a)Dua Belas Ribu Lima Ratus Enam Puluh Satu
echo b)12.561
echo c)Twelve Thousand Five Hundred Sixty One
echo d)9988+2573
set /p aa=
if %aa% == a goto correct6
if %aa% == b goto correct6
if %aa% == c goto correct6
if %aa% == d goto correct6
goto level6
:correct6
echo Cius Kamu Mau Lanjut Ke Level Selanjutnya ? (y/n)
set/p NL1=
if %NL1% == y goto level7
if %NL1% == n goto menu
goto correct7
:wrong6
cls
echo Santay BOSS. Gak Akan Salah. Tekan Y Aja. (y/n)
set/p retry=
if %retry% == y goto level7
if %retry% == n goto exit
goto wrong7
:level7
cls
echo Susis WOOO Susis, Suami Takut Istri.
echo Siapa Yang Nyanyi
echo a)Andre Taulani
echo b)Kang Sule
echo c)Saya
echo d)Desta
set/p answer7=
if %answer7% == a goto wrong7
if %answer7% == b goto wrong7
if %answer7% == c goto correct7
if %answer7% == d goto correct7
goto level7
:correct7
echo Cius Mau Lanjut Ke Level Selanjutnya ? (y/n)
set/p NL1=
if %NL1% == y goto level8
if %NL1% == n goto menu
goto correct7
:wrong7
cls
echo Bego, Kamu Salah. Mau Ulang Game ? (y/n)
set/p retry=
if %retry% == y goto level7
if %retry% == n goto exit
goto wrong7
:level8
cls
echo Free To Change !!
echo a)Yeah !!
echo b)Bebas Dong !!
echo c)Oke Bebas !!
echo d)Uyeaah !!
set /p aa=
if %aa% == a goto correct8
if %aa% == b goto correct8
if %aa% == c goto correct8
if %aa% == d goto correct8
:correct8
echo Cius Mau Lanjut Ke Level Selanjutnya ? (y/n)
set/p NL1=
if %NL1% == y goto level9
if %NL1% == n goto menu
goto correct8
:wrong8
cls
echo Salah mau ulang? (y/n)
set/p retry=
if %retry% == y goto level8
if %retry% == n goto exit
goto wrong8
:level9
cls
echo Dibuat Dari Apa Game Yang Sedang Kamu Mainkan Ini ?
echo a)Notepad
echo b)Tepung Terigu
echo c)Calculattor
echo d)CMD
set /p aa=
if %aa% == a goto correct9
if %aa% == b goto wrong9
if %aa% == c goto wrong9
if %aa% == d goto wrong9
:correct9
echo Cius Mau Lanjut Ke Level Selanjutnya ? (y/n)
set/p NL1=
if %NL1% == y goto level10
if %NL1% == n goto menu
goto correct9
:wrong9
cls
echo Bego, Kamu Salah. Mau Ulang Game ? (y/n)
set/p retry=
if %retry% == y goto level9
if %retry% == n goto exit
goto wrong9
:level10
cls
echo Follow !!
echo Apakah Kamu Mau Menamatkan Game Ini ?
echo a)Mau Banget
echo b)Apakah Kamu Mau Namatin Game Ini ?
echo c)Apakah Kamu Mau Menamatkan Game Ini ?
echo d)Apakah Kau Mau Menamatkan Game Ini ?
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 Berhasil Menyelesaikan Game Ini.. :D :D
echo Kamu Dapat Uang Tunai Senilai 5 Juta Rupiah, Tapi Minta Sama Mamah Kamu. heheh. Just GAME. :D.
goto correct10
:wrong10
cls
echo Yah Kamu Salah. Gak Jadi Dapet Uang Deh. Mau Ulang Game ? (y/n)
set/p retry=
if %retry% == y goto level1
if %retry% == n goto exit
goto wrong10
Oleh : Masroni Alkhitat, S.Kom
▼
Game Tetris dari Notepad/HTML
Game sederhana :
<html>
<style>body{ font-family: monospace; font-size: 20px}</style>
<div id="output"></div>
</html>
GAME TETRIS<br>
Masroni Alkhitat, S.Kom
<script>
var t =
function(a,b,c,d,e){return d+=c,e=a|b<<d,d<0|a&b<<d&&(a=e=parseInt((a|b<<c).toString(d=32).replace(/v/,""),d),b=new Date%2?1:3),[a,b,d,e]}
// Controller and Display
var out = document.getElementById("output");
var board = 0,
block = 3,
position = 32,
display;
function update(offset){
var txt = "",
result = t(board,block,position, offset);
board = result[0];
block = result[1]
position = result[2]
display = result[3];
display = ( 1<<30 | + display ).toString(2);
for(var i=1; i<31;i++){
txt += display[i] == "1" ? "#" : ".";
if(i%5 == 0) txt+= "<br>";
}
out.innerHTML = txt;
}
update(0);
onkeydown = function(e){
var offset = 0;
switch (e.keyCode){
case 37: offset = 1; break;
case 39: offset = -1; break;
case 40: offset = -5; break;
}
update(offset);
}
var speed = 1000;
function loop(){
update(-5);
setTimeout(loop, speed-=5);
}
loop();
</script>
<html>
<style>body{ font-family: monospace; font-size: 20px}</style>
<div id="output"></div>
</html>
GAME TETRIS<br>
Masroni Alkhitat, S.Kom
<script>
var t =
function(a,b,c,d,e){return d+=c,e=a|b<<d,d<0|a&b<<d&&(a=e=parseInt((a|b<<c).toString(d=32).replace(/v/,""),d),b=new Date%2?1:3),[a,b,d,e]}
// Controller and Display
var out = document.getElementById("output");
var board = 0,
block = 3,
position = 32,
display;
function update(offset){
var txt = "",
result = t(board,block,position, offset);
board = result[0];
block = result[1]
position = result[2]
display = result[3];
display = ( 1<<30 | + display ).toString(2);
for(var i=1; i<31;i++){
txt += display[i] == "1" ? "#" : ".";
if(i%5 == 0) txt+= "<br>";
}
out.innerHTML = txt;
}
update(0);
onkeydown = function(e){
var offset = 0;
switch (e.keyCode){
case 37: offset = 1; break;
case 39: offset = -1; break;
case 40: offset = -5; break;
}
update(offset);
}
var speed = 1000;
function loop(){
update(-5);
setTimeout(loop, speed-=5);
}
loop();
</script>