Bat dosyası ile oyun yapımı

Bat dosyası ile oyun yapımı

https://www.chip.com.tr/forum/bat-dosyasi-ile-oyun-yapimi_t221984.html


Kod: 
@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.
pause

msg * 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 üret
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

 

ve sonra farklı kaydet diyip 
kayıt türü: tüm dosyalar 
dosya adı: Savaş oyunu.bat 
diye masa üstüne kayedin 
üstüne tıklayıp oynayabilirsiniz.
oyunda yanlış komut seçerseniz başa atacak ve level atlayama yacaksınız.oyun 3 level den olusur.
iyi mi?
Kötü mü?
iyileştirilebilir mi?
lütfen mesajlarınızı bekliyorum.

@color 1f
@title=Albay Feari Yakala
@echo off
echo Sizin bir savas robotu gibi egittiginiz Albay Fear Kacti. 
echo 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.
pause
echo Albay Fear icin bir guvenlik sistemi kurulmustu...
echo sistemin ismi Security Fear olarak Atanmisti.
pause
echo plan nedir.
echo 6.Security Fear'i calistir
echo 8.A.Fear'i yakalamak icin RoboFear üret
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
echo 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...
echo  AlbayFear Projesi bilgiler alindiktan sonra imha edildi. 
pause
echo Bu zorlu gorevi basarili bir sekilde  yerine getirdiginiz icin orgenerallige yukseldiniz TEBRIKLER...
echo Hazirlayan arabsyn
pause
exit

bi Buna Bak Renk Felan Koydum Sen orayı İstediğin Renk Yap






İLKER BABA
 
Kankam
İLKER BABA
 
İLKER BABA
 
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol