Çevrimdışı

Merhaba arkadaşlar wordlist oluşturmam lazim. Kendi yazdığım kod verimli olmadı.

a1 a1 a1
a1 a1 a2
a1 a1 a3
a1 a2 a1
a1 a2 a3
a1 a3 a1
a1 a3 a2

Yani her satırdaki bir rakam değişip diğerleri sabit kalacak. Benim yazdığım kodda kırmızı yerin işlemi bitince diğer kısıma geçmek için kodda değişilik yapmam gerekiyor. Bu kısım bittikten sonra diğer kısıma otomatik nasıl geçirebilirim. Yardımlarınızı bekliyorum.

Saygılar.

 

Hiçbir şey anlamadım, amacın nedir? Bu harf-rakamlar nedir? Ne yapmak istiyorsun? Yazdığın kod ne?

Biraz açarsan yardımcı olmaya çalışacağım.

 

Çevrimdışı

RaideR Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba arkadaşlar wordlist oluşturmam lazim. Kendi yazdığım kod verimli olmadı. a1 a1 a1 a1 a1 a2 a1 a1 a3 a1 a2 a1 a1 a2 a3 a1 a3 a1 a1 a3 a2 Yani her satırdaki bir rakam değişip diğerleri sabit kalacak. Benim yazdığım kodda kırmızı yerin işlemi bitince diğer kısıma geçmek için kodda değişilik yapmam gerekiyor. Bu kısım bittikten sonra diğer kısıma otomatik nasıl geçirebilirim. Yardımlarınızı bekliyorum. Saygılar.

yazdığın Kodu paylaşırsan yardımcı olmaya çalışırız?

 

Çevrimdışı

Wordlist derken neyi yapmayı planlıyorsun,Biraz daha net Anlatırsan yardımcı olabiliriz belki

 

Çevrimdışı

Şifre kırmak için hazırlanır wordlistler , tabi arkadaşın ne niyetle hazırlamak istediğini bilemem. Belli anahtar kelimeleri yazarsınız türetmeye başlar her olasılığı, genelde a yada 0 ile taramaya başladıklarından şifrelerinizin z harfi ile başlaması şifrenizin bu tarz tarama yollarıyla kırılmasını zorlaştıracaktır.

 

Çevrimdışı

Elimde 100 e yakın sayı var, bunları 6 lı 7 li kombinasyonlar halinde toplamak için lazım bu kod. Her sayı için a1=1 a2=2 a3= 8 a4=21 ... gibi devam ediyor.

Alıntı:

alias F12 { set %karakter $gettok(%deneme,%son,32) set %karaktersayi $len(%karakter) if (%karaktersayi == 3) { k3 } if (%karaktersayi == 4) { k4 } if (%karaktersayi == 5) { k5 } } else { .halt } ;::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::: alias k3 { set %degistir $gettok(%deneme,%son,32) set %karaktersayi $len(%degistir) set %artir $right(%degistir,1) inc %artir +1 set %yeniveri % $+ a $+ %artir set %deneme $puttok(%deneme,%yeniveri,17,32) write 1.txt %deneme .F12 } ;::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: alias k4 { set %degistir $gettok(%deneme,%son,32) set %artir $right(%degistir,2) inc %artir +1 set %yeniveri % $+ a $+ %artir set %deneme $puttok(%deneme,%yeniveri,17,32) write 1.txt %deneme .F12 } alias k5 { if (%artir < 111) { set %degistir $gettok(%deneme,%son,32) set %artir $right(%degistir,3) inc %artir +1 set %yeniveri % $+ a $+ %artir set %deneme $puttok(%deneme,%yeniveri,%son,32) write 1.txt %deneme .F12 } } %deneme a1 + a2 + a3 + a4 + a5 %son 9

Bu yazdiğım kodla %deneme verisindeki a6 kısmı a111 e kadar değişiyor. Sonra işlem bitiyor. Benim istediğim bu işlem bittikten sonra %deneme verisindeki a5 verisinin değişmesini sağlamak diğerleri sabit kalacak a6 ya yaptığım işlemin aynısını yani. Böyle böyle a1 e kadar değişimleri otomatik olarak yapmak.