Şaka Virüsü Kodlama

                                         !Şaka Virüsleri!

   İlk olarak şaka virüsleri bilgisayara veya başka bilgisayara zarar vermez , yani sadece arkadaşlarınızı şakalamak için kullanabilirsizin (zaten zarar verenler kullanılmamalı).İsterseniz yapılışına geçelim.

Gerekli Bilgiler:

   Uyarı:İlk olarak bir not defteri oluşturmanız lazım kodlar buraya girilecek.Sonra farklı kaydet    seçeneğiyle (bat-vbs) olarak keydetmeniz gerekiyor.

⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓⇓

1-Sonsuz Döngü Kodu:(BAT)

   :a

   Kod(şakada kullanacağınız kodu yazıcaksınız)

   goto a

2-CMD Rengini Değiştiren Kod:(BAT)

   color a = Yazıları Yeşil Yapar

   color a1 = Yazı ve Arkaplan Rengini Beraber Değiştirir

    ⇒0=Siyah
    ⇒1=Mavi
    ⇒2=Yeşil
    ⇒3=Deniz Mavisi
    ⇒4=Kırmızı
    ⇒5=Mor
    ⇒6=Sarı
    ⇒7=Beyaz(görünsün diye direk beyaz yapmadım)
    ⇒8=Gri
    ⇒9=Açık Mavi(bu kadar açık olmasa da :D)

    ⇒A=Açık Yeşil
    ⇒B=Açık Deniz Mavisi
    ⇒C=Açık Kırmızı
    ⇒D=Açık Mor
    ⇒E=Açık Sarı
    ⇒F=Parlak Beyaz(görünsün diye direk beyaz yapmadım)

 ⇒3-PC Kapatan ve Yeniden Başlatan Kod:(BAT)

   shutdown -s -t 00 = Bilgisayarı Kapatır

   shutdown -r -t 00 = Bilgisayarı Yeniden Başlatır

 ⇒4-Explorer.exe Kapatan ve Açan Kod:(BAT)

   start explorer.exe = explorer.exe açar

   taskkill -f -im explorer.exe = explorer.exe kapatır

 ⇒5-Klasör Oluşturan Kod:(BAT)

   md Klasörismi = Klasörismi diye bir klasör oluşturur

 ⇒6-Klasör Silen Kod:(BAT)

   RD /S /Q Klasörismi = Klasörismi olan klasörü siler

 ⇒7-Dosya Silen Kod:(BAT)

   del /f /q /s DOSYAYOLU+ADI = Dosyayolundaki dosyayı siler

 ⇒8-Dosya Çalıştıran Kod:(BAT)

   start DOSYAYOLU+ADI = Dosyayolundaki dosyayı açar

 ⇒9-Dosya veya Program Kapatan Kod:(BAT)

   taskkill -f -im DosyanınGörevYöneticisindekiAdı = Görev Yöneticisindeki Çalışan İşlemi Sonlandırır

 ⇒10-Site Açan Kod:(BAT)

   start link : Linkteki siteyi açar

 ⇒11-Mesaj Gösteren Kod: (VBS)

   MsgBox "Mesajın İçinde Yazanlar", 16 + 0, "Mesajın Başlığı"

    ⇒0 = Sadece Tamam Butonu

    ⇒1 = Tamam & İptal Butonları

    ⇒2 = Durdur & Yeniden dene & Yoksay Butonları

    ⇒3 = Evet & Hayır & İptal Butonları

    ⇒4 = Evet & Hayır Butonları

    ⇒5 = Yeniden Dene & İptal Butonları

    ⇒16 = Hata Mesajı

    ⇒32 = Yardım Mesajı

    ⇒48 = Uyarı Mesajı

    ⇒64 = Bilgi Mesajı

 ⇒12-Sürekli CD Açıp Kapatan Kod: (VBS)

    Set oWMP = CreateObject("WMPlayer.OCX.7")

    Set colCDROMs = oWMP.cdromCollection

    if colCDROMs.Count >=1 then

    do

    For i=0 to colCDROMs.COunt -1

    colCDROMs.Item(i).Eject

    Next ' cdrom

    For i=0 to colCDROMs.COunt -1

    colCDROMs.Item(i).Eject

    Next ' cdrom

    loop

    End If

Not:Sorularınızı lütfen yorumlara yazınız bildiğim kadarıyla yardımcı olmaya çalışıcağım.

Not:Yazıların bir kısımı (youtube)'daki birkaç kanaldan alıntıdır.

Not:Bu ilk blogum olduğu için acemiliklerimi yorum olarak atın ben de elimden geldiğince kendimi düzenleyim iyi bloglar...

Not:Evet arkadaşlar yıllar önce yapmış olduğum bu paylaşım beklemediğim kadar fazla ilgi gördü ve bu durum beni çok memnun etti hepinize bunun için teşekkür ederim. Aradan yıllar geçti ve bu şekilde başlayan serüvenim şuan bilgisayar mühendisi öğrencisi olarak devam ediyor. Güncel yayınlarımı ingilizce yapmaktayım dilerseniz buradan takip edebilirsiniz. Tekrardan hepinize çok teşekkürler :)