-- Specify the length of the trial period, in days
time_limit = 30;
 
-- Initialize days_left
days_left = 30;
 
-- Retrieve previous value stored
date_installed = Application.LoadValue("hassan_", "Date Installed");-- Convert loaded value into a number
date_installed = String.ToNumber(date_installed);
 
 
-- If there is no previous value (date_installed == 0), create a value
if date_installed == 0 then
    Application.SaveValue("hassan_", "Date Installed", System.GetDate(DATE_FMT_JULIAN));
    days_left = time_limit;
else
    days_left = (date_installed + time_limit) - System.GetDate(DATE_FMT_JULIAN);
end
 
 
-- Check if there is time left
if String.ToNumber(days_left) <= 0 then
result = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\hassan_");
    if not result then
    Dialog.Message("Trial Period Over", "This software has expired");
    registration = Dialog.Input("تسجيل البرنامج", " رقم التسجيلقم بأدخال ", "", MB_ICONQUESTION);
    serial = "hassan_"
            if  serial == registration then
      Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\hassan_", "serial", serial, REG_SZ);
      Dialog.Message("بتنبيه", "شكرا على تسجيلك.");
      else
      Dialog.Message("بتنبيه", "رقم التسجيل خطأ");
    Application.Exit();
    end
 end
 
else
    Dialog.Message("Trial Period", "You have "..days_left.." days left in your trial period.");
end

الفكره فكرة منتدى برامج نت وخذت شرحهم وطبقته ووسويت شرح مختصر