font = "AutoPlay\\Docs\\FS_DIWANY.TTF"
System.RegisterFont(font, "FS Diwany", true);
Dialog.Message("Notice", "Done", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

-- معرفة اوضاع التشيك بوكس
ar_selected = CheckBox.GetChecked("ar");
en_selected = CheckBox.GetChecked("en");
os = System.GetOSName();
Fpath = Shell.GetFolder(SHF_FONTS);
-- جميع حالات الاختيارات
-- First Case if User wants to setup en & ar fonts
if ar_selected == true and en_selected == true then
    Dialog.Message("Notice", "two selected", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
-- Second Case if User Wants To Setup ar fonts only
elseif ar_selected == true and en_selected == false then
    fonts = File.Find("AutoPlay\\Docs\\Fonts\\Arabic", "*.ttf", false, false, nil, nil);
    
    count = Table.Count(fonts);
    Label.SetText("all", count);
    total_size = 0
    for i,y in pairs (fonts) do
        get_size = File.GetSize(y);
        total_size = total_size + get_size
        end
        total_size = String.GetFormattedSize(total_size, FMTSIZE_AUTOMATIC, true);
        Label.SetText("sz", total_size);
    ------------------------------------------------------
    for i,y in pairs (fonts) do
        File.Copy(y, Fpath, false, false, false, true);
        split = String.SplitPath(y);
        System.RegisterFont(Shell.GetFolder(SHF_FONTS), split.Filename..split.Extension, true);
        Label.SetText("current_num", i);
        Progress.SetCurrentPos("Progress1", i * 100 / count);
        end

-- Third Case if User wants to Setup en fonts only
elseif ar_selected == false and en_selected == true then
    Dialog.Message("Notice", "en only selected", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
-- Last Case if User didn't Choose any font to install
elseif ar_selected == false and en_selected == false then
    Dialog.Message("Notice", "no selected", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end