(29-11-2019, 07:31 PM)farfes كتب : خصوصا كيفية جمع ترتيب السريال لكل جزء وجعل باقي القسمة
لو شرحت كل تفصيلة في الخوارزمية أظن أن الشرح سيطول لساعات خصوصا في جمع ترتيب المحارف لأن هناك عذة حلقات تخص هذا الأمر
بخصوص باقي القسمة
مثلا إذا كان باقي القسمة 3 وجزء من السريال مكون من هذه المحارف التالية 2YOP6
والسلسلة التي يجب أن يكون محارف السريال منها هكذا
2YOPB3AQCVUXMNRS97WE0IZD4KLFGHJ8165T
فاختار أي محرف من جزء السريال و ليكن مثلا 6 و انظر أين موقعه داخل ترتيب السلسلة و بما أن العد من صفر
فاعتبر أن 6 ذو الترتيب 3 ثم المحرف الذي قبله ترتيبه 2 حتى تصل إلى المحرف الذي يساوي 0 تأخذه و تحطه مكان المحرف 6 وهكذا.....
05-12-2019, 03:24 PM (آخر تعديل لهذه المشاركة : 09-12-2019, 07:40 PM بواسطة M!X0R.)
بارك الله فيك أخي.....
{IDM_6.x_Keygen_SRC(2018-11-21)....By Radixx11}
function IDM_GenerateSerial: String;
const
Charset = '2YOPB3AQCVUXMNRS97WE0IZD4KLFGHJ8165T';
var
S: String;
I, J, K, L, Value: Integer;
begin
Result := '';
L := 0;
SetLength(S, 5);
while True do
begin
K := 0;
for I := 1 to 5 do
begin
J := Random(Length(Charset)) + 1;
S[I] := Charset[J];
Inc(K, (J - 1) + 36 * K);
end;
case L of
1: Value := 23;
2: Value := 17;
3: Value := 53;
else
Value := 43;
end;
if (K mod Value) = 0 then
begin
Inc(L);
Result := Result + S;
if L < 4 then
Result := Result + '-'
else
Break;
end;
end;
end;
15-06-2020, 07:19 PM (آخر تعديل لهذه المشاركة : 15-06-2020, 07:21 PM بواسطة fantazma.)
(15-06-2020, 08:19 AM)hesham كتب : هناك درس لعمل باتش لهذا الاصدار هل يختلف كثيرا عن اصدار 6.23 شكرا لك
شاهدت دروسا لإصدارات لعمل باتش لها هنا على أما أتذكر لكن كما قال الأخ [b]EarthMan123[/b] قد تتغير الحماية في إصدارات لاحقة
ابحث و ستجدها أو أبدأ انت في اكتشافها
(15-06-2020, 10:19 AM)EarthMan123 كتب : الإصدار 6.37 مختلف عن هذا
لم أجرب ربما سأحاول مستقبلا معرفة خوارزمية التسجيل هذا إن لم تكن صعبة على مستوايا
17-12-2020, 01:37 PM (آخر تعديل لهذه المشاركة : 17-12-2020, 01:48 PM بواسطة DarkDeath.)
شكرا لك على الشرح و الدرس
لكن المبرمج ذكي يتاكد من السيريال المدخل من خلال اتصاله بسيرفر البرنامج
وشرحك الذي قمت فيه النت مفصول ؟
لا ينفع مع هذا العنيد الا حقن سيريال و باتش وتجاوز الاتصال بالسيرفر
و الاصدارات الحالية اصعب من الاصدارات القديمه
كانت لي صولات و جولات في كسر البرنامج لسنوات طوال لكن
توقفت أنا منذ سنتين عن كسر البرنامج لظروفي الخاصه
لدي نسخة قديمة خاصة معدلة تعمل حتى الآن بكل كفاءة