Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!

Gönderen Konu: Program lisansı  (Okunma sayısı 1757 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı cakirr42

  • Global Moderatör
  • *****
  • İleti: 951
  • Rep: +5/-2
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • ÜYELİK.TK
Program lisansı
« : 28 Şubat 2010 14:27:34 »
Mernabalar forumda çok sorulan bir soru olduğu için teker teker yazıp vermektense bi konu altında yazıyım dedim...
ekten örneği indirip inceleyebilirsiniz.
gerekli açıklamayı pas dosyasının başında yaptım.

lisans alınca veya alamayınca çalıştırmak istediğiniz kodları bitbtn1 in onclikine yazacaksınız
orjinali böyle;
Kod: Delphi
  1. procedure Tlisans.BitBtn1Click(Sender: TObject);
  2. begin
  3. if code.Text = inttostr(sayi*25+9) then
  4.   begin
  5.   Application.MessageBox('Program lisansı Alındı', 'Tebrikler!', MB_OK );
  6.   end
  7.   else
  8.   begin
  9.   Application.MessageBox('Program lisansı Alınamadı Hata: Yanlış Kod', 'Hata!', MB_OK or MB_ICONERROR)
  10.   end
  11. end;
  12.  
buda sizin düzenleyeceğiniz şekil;
Kod: Delphi
  1. procedure Tlisans.BitBtn1Click(Sender: TObject);
  2. begin
  3. if code.Text = inttostr(sayi*25+9) then
  4.   begin
  5.   //buraya lisans alınca çalışacak olan kod
  6.   end
  7.   else
  8.   begin
  9.   //buraya lisans almayınca(hata) calışacak olan kod
  10.   end
  11. end;
  12.  

bi sorunuz olursa burda sorun cevaplarım...
« Son Düzenleme: 24 Mayıs 2010 12:32:58 by cakirr42 »
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı mert_can

  • Üye
  • ***
  • İleti: 39
  • Rep: +0/-0
Ynt: Program lisansı
« Yanıtla #1 : 28 Şubat 2010 19:08:50 »
evet bunun mantığını az çok anladım peki peki programı kopyalamaya karşı nasıl bir önlem alabiliriz.Mesela HDD Fabrika seri no yu vt ye kaydedip 2. bilgisayarda çaışma gibi bişey nasıl deriz..

Çevrimdışı SsEeRrCcAaNn

  • Kıdemli Üye
  • *****
  • İleti: 703
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Delphi and JALv2 programmer
Ynt: Program lisansı
« Yanıtla #2 : 28 Şubat 2010 23:15:46 »
Programın üreteceği ve kullanıcının sana vereceği şifrede makinaya ait bir işlem yaptır örneğin hdd seri noyu bir kaç işlemden geçir sonra bir şifre türet kullanıcı sana verecek bunu sende başka bir program hazırlayacaksın onunla üretilen kodu girip yeni bir lisans key oluşturacaksın sonra tabi o ayrı exedeki algoritma asıl programda olacak ve senin bulduğun değeri asıl program bulup karşılaştıracak ve buna göre kısıtlamalar kalkacak.. o şifre tek o makinada işlem görecek başka bir bilgisayara taşındığında işlem görmez.. mantığı inşallah anlamışındır mert_can gerisi sana kalmış..

Kolay gelsin...
Artık bir insanın önüne bir bilgisayar koyarak onu daha üretici yapamıyoruz. O günler geride

Çevrimdışı mert_can

  • Üye
  • ***
  • İleti: 39
  • Rep: +0/-0
Ynt: Program lisansı
« Yanıtla #3 : 01 Mart 2010 11:31:57 »
evet anladım nedemek istediğini tşk ederim verdiğin bilgiler için...

Çevrimdışı cakirr42

  • Global Moderatör
  • *****
  • İleti: 951
  • Rep: +5/-2
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • ÜYELİK.TK
Ynt: Program lisansı
« Yanıtla #4 : 01 Mart 2010 12:54:49 »
benimkininde pek kopyalanacağını sanmıyorum sadece formülü biliyorlarsa yapabilirler ben örnek olarak *25+9 kullandım ama tabikide daha karışık bi formül kullancaksınız.. o zaman biri lisansı aldığında ancak aynı şifre isabet edecekki lisans alabilsinler... bu zaten küçük boyuttaki projeleriniz için orta ve büyük boyuttaki projelerinize önermem...
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı ciocity

  • Yeni Üye
  • *
  • İleti: 6
  • Rep: +0/-0
Ynt: Program lisansı
« Yanıtla #5 : 23 Mayıs 2010 17:28:35 »
Usta programın linki bozu :-\

Çevrimdışı cakirr42

  • Global Moderatör
  • *****
  • İleti: 951
  • Rep: +5/-2
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • ÜYELİK.TK
Ynt: Program lisansı
« Yanıtla #6 : 24 Mayıs 2010 12:29:05 »
:) forum bakım sırasında epey bi hasara uğramış dosya ekleri fln silinmiş yeniden upload ediyorum...
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı cakirr42

  • Global Moderatör
  • *****
  • İleti: 951
  • Rep: +5/-2
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • ÜYELİK.TK
Ynt: Program lisansı
« Yanıtla #7 : 24 Mayıs 2010 12:33:45 »
eki yeniden upload ettim arkadaşlar...
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı lazanya

  • Kıdemli Üye
  • *****
  • İleti: 169
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: Program lisansı
« Yanıtla #8 : 13 Ağustos 2010 01:55:53 »
hocam örnek için teşekkürler. bir sorum olacak. HDD nosunu alıp çarpıp bölüyoruz falan. peki bunları nasıl kırıyorlar. programı exe haline soktuğumuzda nasıl olupta crackleyebiliyorlar, exe de yazan atıyorum HHDno*25+9 u nasıl tespit ediyorlar. özel bir programlarımı var hackerların HHDno*25+9 ayne bu şekilde görebiliyorlar, ya da....?

Çevrimdışı redcoder

  • Kıdemli Üye
  • *****
  • İleti: 253
  • Rep: +2/-0
  • Coder
Ynt: Program lisansı
« Yanıtla #9 : 13 Ağustos 2010 07:42:35 »
Softice - Olydbg - Wdasm gibi programlara bir göz atarsan senin söylediğin konulara giriş yapmış olursun.
Application.MessageBox('Zor yapılabilir?','Imkansız sadece zaman alır',0+32+0);

Çevrimdışı lazanya

  • Kıdemli Üye
  • *****
  • İleti: 169
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: Program lisansı
« Yanıtla #10 : 14 Ağustos 2010 10:52:58 »
anladım teşekkürler.

Çevrimdışı orhanc

  • Kıdemli Üye
  • *****
  • İleti: 314
  • Rep: +1/-0
  • Cinsiyet: Bay
  • Giddy Up
    • Kişisel Sitem
Ynt: Program lisansı
« Yanıtla #11 : 23 Ağustos 2010 23:28:00 »
benimkininde pek kopyalanacağını sanmıyorum sadece formülü biliyorlarsa yapabilirler ben örnek olarak *25+9 kullandım ama tabikide daha karışık bi formül kullancaksınız.. o zaman biri lisansı aldığında ancak aynı şifre isabet edecekki lisans alabilsinler... bu zaten küçük boyuttaki projeleriniz için orta ve büyük boyuttaki projelerinize önermem...

Verdiğin örnek tek komutun değiştirilmesi ile etkisiz hale getirilebilir. Biraz assembler bilgisi yeterli olacaktır

Kod: [Seç]

procedure Tlisans.BitBtn1Click(Sender: TObject);
begin
if code.Text = inttostr(sayi*25+9) then  // buradaki değer 0F84'e eşit olacaktır ve biz bunu 0F85 yaparsak if ters işleyecek ve yanlış değer geldiğinde lisanslanmış sanacaktır.
  begin
  Application.MessageBox('Program lisansı Alındı', 'Tebrikler!', MB_OK );
  end
  else
  begin
  Application.MessageBox('Program lisansı Alınamadı Hata: Yanlış Kod', 'Hata!', MB_OK or MB_ICONERROR)
  end
end;

« Son Düzenleme: 23 Ağustos 2010 23:31:16 by orhanc »

Çevrimdışı xozcanx

  • Yeni Üye
  • *
  • İleti: 1
  • Rep: +0/-0
Ynt: Program lisansı
« Yanıtla #12 : 20 Haziran 2011 15:11:39 »
Bir Tavsiyede benden gelsin lisans numarası girildikten sonra hatalı ise hata mesajı verilmesin bunlar kırılma aşamasındaki ilk kontroller :)

Çevrimdışı bawa

  • Yeni Üye
  • *
  • İleti: 2
  • Rep: +0/-0
Ynt: Program lisansı
« Yanıtla #13 : 04 Ocak 2012 17:44:42 »
hocam örnek için teşekkürler. bir sorum olacak. HDD nosunu alıp çarpıp bölüyoruz falan. peki bunları nasıl kırıyorlar. programı exe haline soktuğumuzda nasıl olupta crackleyebiliyorlar, exe de yazan atıyorum HHDno*25+9 u nasıl tespit ediyorlar. özel bir programlarımı var hackerların HHDno*25+9 ayne bu şekilde görebiliyorlar, ya da....?


Şimdi Aşağıdaki uygulamayı ollyDBG,IDA  ile Debug/Diasm Edildiğinde (Gerekli programlar PC'de kurulu olmadığından dolayı Gerçekte Yapmadım ama olabildiğince Simüle etmek istiyorum)
Kod: Text
  1. mov esi,dword ptr ds:[004FBA32] ;Girdiğimiz sayi burada
  2.  
  3. mov eax,dword ptr ds:[004FA332]      ; HDDno degiskeni burda EAX'a alindi
  4.  
  5. mov ebx,9         ;9 sayısını ebx'e atadik
  6.  
  7. mov ecx,25        ; 25 sayisini ECX'e atadik
  8.  
  9. add ebx,ecx         ;ecx'i ebx ile topladık sonuc EBX'DE (25+9)
  10.  
  11. imul eax,ebx           ; EAX ile EBX'i çarptık Sonuç EAX'DA (HDDNO*34)
  12.  
  13. cmp eax,esi      ; girdiğimiz sayi ile Algoritma sonucu cikan sonuc karsilastiriliyor
  14.  
  15. JNE License.004FA4A3        ; Eşit değilse  004FA4A3 satirina gidecek eşit olursa aşağı satira kayacak
  16.  
  17. PUSH License.004F24B3         ; Tebrik mesajı
  18.  
  19. 004FA4A3:               ; HATA MESAJI VEREN KOMUT SATIR NUMARASI
  20.  
  21. PUSH License.004FA325       ; hata mesajı ekrana geldi
  22.  
Asm kodlarinda
Kod: Text
  1. JNE License.004FA4A3    ; JUMP NOT EQUAL =EŞİT DEĞİL İSE ;
bu satiri aşağdaki gibi yapar isek
Kod: Text
  1. JE License.004FA4A3    ; JUMP EQUAL =EŞİT İSE ;
Doğru sayi dışında ne yazarsak yazalim daima tebrik mesajı ekrana gelecek, Doğru sayi yazarsan hata mesajı gösterecek
umarım anlatabilmişim daha komplike sistemlerde mevcut bu en basiti

« Son Düzenleme: 04 Ocak 2012 19:21:19 by bawa »