JustPaste.it

Programsız Basit Oyun Yapımı .bat ile

Kurulum;
Not defterine yapıştır>farklı kaydet>ad: oyun.bat>dosya türü: tüm dosyalar
Oyunu açmak için bir metin belgesi (.txt) dosyasının içine kodları yazıp farklı kaydet diyerek .txt yazan yerin altında bulunan kutudan *Tüm dosyalar kısmını seçin ve .txt yerine .bat yazın. Örn: Oyun.txt olmayacak, Oyun.bat olacak.

 



@Echo off
msg * Sizin bir savas robotu gibi egittiginiz Albay Fear Kacti.
msg * Gorevin Onu Canli Bir Sekilde Yakalamak...Ama unutma onunda bir ordusu var.
pause
:m
cls
echo Dusman Size Saldirdi.
echo plan nedir.
echo 1.Sehri Savun
echo 2.Geri puskurt
echo 3.Saldir
echo Kac Numarali Plan:
set input=nothing
set/p input=Sec:
if %input%==1 goto bir
if %input%==2 goto iki
if %input%==3 goto üç
goto m
:bir
echo Basarisiz dusman kuvvetleri cok guclu...
pause
goto m
:üç
echo Saldırınız maglubiyetle sonuclandı.
echo asker sayınız
echo Atli suvari: 60 savaş sonucu 3 A.S kaybedildi.(57)
echo Er: 20
echo Albay: 9
echo Tank: 200
echo jet: 40
echo Zırhlı araç:600
pause
goto m
:iki
echo Verdiginiz gorev Basarili...Dusman geri puskurtuldu.
pausemsg * Albay Fear icin bir guvenlik sistemi kurulmustu...
msg *sistemin ismi Security Fear olarak Atanmisti.
pause
echo plan nedir.
echo 6.Security Fear'i calistir
echo 8.A.Fear'i yakalamak icin RoboFear uret
echo 4.Saldir
echo Kac Numarali Plan:
set input=nothing
set/p input=Sec:
if %input%==6 goto altı
if %input%==8 goto sekiz
if %input%==4 goto dört
goto m
:altı
echo efendim...Security Fear Sistemi çalıştırıldı ve bulduk.
echo Aşagıdaki isaret haritada Albay Fear in Yeri.
echo +---+
echo - + -
echo +---+

echo *********---******* *******************
echo * *** * * *
echo * * * *
echo * ****************** *
echo * +---+ *
echo * - + - *
echo * +---+ *
echo * *
echo * ****************************- *
echo * * ******************
echo * *
echo *******
pause
goto m
:sekiz
echo
echo Kac Robofear uretilsin.
echo 1."2"Robofear uret
echo 2."4"Robofear uret
echo 3."9"Robofear uret
echo Kac Numarali Plan:
set input=nothing
set/p input=Sec:
if %input%==1 goto bir
if %input%==2 goto iki
if %input%==3 goto üç
goto m
:bir
echo 2 RoboFear başarı ile uretildi.
pause
goto m
:iki
echo 4 RoboFear başarı ile uretildi.
pause
goto m
:üç
echo 9 RoboFear başarı ile uretildi.
pause
goto m
:dört
echo Hangisi ile saldirralim?
echo 1."3"Robofear ile saldir
echo 2."40"Atli Suvari ile saldir
echo 3."40"tank ile saldir
echo 4."30" tank savunmasi "9" RoboFear saldirisi
echo 5."40" a.suvari "180" tanklı saldırı
echo Kac Numarali Plan:
set input=nothing
set/p input=Sec:
if %input%==1 goto bir
if %input%==2 goto iki
if %input%==3 goto üç
if %input%==4 goto dört
if %input%==5 goto beş
goto m
:bir
msg *RoboFear uretilmediyse otomatik uretilir.
echo Saldiri Basarisiz...
pause
goto m
:iki
echo Saldiri Basarisiz...
pause
goto m
:üç
echo Saldırımızı Geri puskurttuler...
pause
goto m
:beş
echo"9" RoboFear başarı ile uretildi.
pause
goto m
:dört
echo Saldiri Başarili.Albay Fear Yakalandi...
msg * AlbayFear Projesi bilgiler alindiktan sonra imha edildi.
pause
msg *Bu zorlu gorevi basarili bir sekilde yerine getirdiginiz icin orgenerallige yukseldiniz TEBRIKLER...
echo Hazirlayan Chip>Xteam
pause
exit