تعديل كود حماية التجميعة بحيث لا تعمل الا على جهاز المشترى فقط

[مسيو صالح على]

السلام عليكم

كنت قد قرأت منذ فترة عن موضوع للأستاذ ثامر أبو بلقيس بعنوان
كيف تجعل الاسطوانة التجميعية لا تعمل الا على جهاز المشترى فقط ؟
وهذا هو الكود المستخدم :
كود البائع
x = Input.GetText("Input1");
if x =="" then
Dialog.Message("Notice", "اكتب الرقم ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
x=x+0
y = x *12
d = y - 34
r = d +3
e = r *3
thameur = Math.Floor(e);
Input.SetText("Input2", thameur);
end


كود المشترى
x =x+0
y = x*12
d = y -34
r = d +3
e=r *3
thameur = Math.Floor(e);
belkiss = Input.GetText("Input3");
if belkiss == "" then
Dialog.Message("Notice", "خطأ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

belkiss =belkiss +0
if belkiss == thameur then
xButton.SetVisible("xButton1", true);
elseif belkiss ~= thameur then
Dialog.Message("Notice", "لاتحاول رجاء", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
end
اريد التعديل على الكود بإضافة كود اخر له بحيث ان لا يضطر المشترى أن يدخل كود الشراء
فى كل مرة يفتح فيها الاسطوانة
بمعنى ان يطلب منه ادخال الكود مره واحدة ويتم تسجيله فى الرجسترى إلا إذا قام بتغيير نسخة الوندوز بالطبع

[خادم المسلمين]

ان شاء الله يحضر الاستاذ ثامر وير على استفسارك

[مسيو صالح على]

ان شاء الله يحضر الاستاذ ثامر وير على استفسارك
اشكرك اخى الكريم خادم المسلمين واحب انتهاز هذه الفرصة لاخبرك انى من اشد المعجبين
بشغلك وأعمالك واتابع كل مشاركاتك واستفدت منك الكثير جعله الله فى موازين حسناتك

[خادم المسلمين]

اشكرك اخى الكريم خادم المسلمين واحب انتهاز هذه الفرصة لاخبرك انى من اشد المعجبين
بشغلك وأعمالك واتابع كل مشاركاتك واستفدت منك الكثير جعله الله فى موازين حسناتك


شكرا كلك ذوق اخويا الفاضل
نأمل حضور الاستاذ ثامر لان يتابع معك استفسارك
الرجاء تتابعه حتى يحضر ربنا ييسر له الحضور

[الهمام]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .