Kendi Şifreleme Dilinizi Yaratın

NoboysSpyS

NoboysSpyS

Yeni üye
24 Eki 2015
31
0
antakya
Evet Arkadaşlar Konu Daha Önce Açıldımı Bilmiyorum Ama Yararlı Olacağı Kesin Çünkü Çoğu Üyenin Bilmediği Ama İlk Adımı Atabileceği Basit Bi Şifreleme Türü .



Yeni Bir Metin Belgesi Açıyoruz Ve Kodumuzu Yapıştırıyoruz

set x = WScript.CreateObject("WScript.Shell")
mySecret = inputbox("Şifrelenecek yazıyı girin")
mySecret = StrReverse(mySecret)

x.Run "%windir%\\notepad"
wscript.sleep 1000
x.sendkeys encode(mySecret)
function encode(s)
For i = 1 To Len(s)
newtxt = Mid(s, i, 1)
newtxt = Chr(Asc(newtxt)+3)
coded = coded & newtxt
Next
encode = coded
End Function


Kodumuzu Yapıştırdıktan Sonra Farklı Kaydet Diyoruz Ve Örneğin :

’’ Deneme.vbs ’’ vbs Dosyası Olması Önemlidir

Ben Algoritmamı Klavyemde bastığım her tuşun +3 kendisinden sonraki 3 harf ile anlatmasını yani şifrelemesini istediğim +3 olarak girdim texte.

Karşınızdaki kişinin Bu şifreyi çözecek olan şifreleme dilini yaratmak için

newtxt = Chr(Asc(newtxt)+3) >>>>>> Kısmında +3 olan kısmı -3 yapıp yeniden kodlaması gerekir

yani ;

yeni bir metin belgesi açıyoruz ve kodumuzu yapıştırıyoruz ;


set x = WScript.CreateObject("WScript.Shell")
mySecret = inputbox("Şifrelenecek yazıyı girin")
mySecret = StrReverse(mySecret)

x.Run "%windir%\\notepad"
wscript.sleep 1000
x.sendkeys encode(mySecret)
function encode(s)
For i = 1 To Len(s)
newtxt = Mid(s, i, 1)
newtxt = Chr(Asc(newtxt)-3)
coded = coded & newtxt
Next
encode = coded
End Function


Farklı Kaydet Dedikten Sonra örnek ;

denemeşifreçözücü.vbs olarak kaydediyoruz ve şifre çözücümüz hazır .

Anlatım Sıkıntılı Olabilir Yorum Veya Pm Atarsanız Yardımcı Olunacaktır .
 
K

kaleihan

Yeni üye
30 Ağu 2015
1
0
Şöyle bi sıkıntı var:
Mesela o +3 yaptığınız yeri ben +1 yaptım diyelim.
Şifrelemek istediğim yazının içinde z harfi geçerse, z harfinden sonra bir harf olmadığı için hata veriyor.
 
Cevap yazmak için giriş yap yada kayıt ol.
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.