Originally posted by mograr
تابعنا مع الجديد
ملف مفتوح ...تصميم اسطوانة للقران الكريم ...بحث و استعراض
AutoPlay Media Studio and Generate All In One Tutorials
-
شكرا الشيخ مغرار ........ارجو ان توفق في فهم الاكواد و انتاج موسوعة جميلة
تابعنا مع الجديدComment -
السلام عليكم ورحمة الله وبركاته
مواصلة للمشروع اليوم قمنا ببعض الاصلاحات في الاكواد السابقة و الاخطاء
و اضفنا خاصية جميلة جدا وهي
التفسير الميسر المختصر لبعض كلمات القران
انوه بمشاركة الاستاذ السعيد الجزائري في توفير نسخة التفسير المختصر
ونذكر بطلبنا للتفاسير الاخرى بصيغة csv او اكسل
المشروع بعد اضافة كود البحث في التفسير
الملف المعدل للمشروع
*
بالتوفيقComment -
السلام عليكم ورحمة الله وبركاته
من اجل ايجاد احصائيات حول عدد كلمات و عدد حروف و ايات القران
نضع هذا الكود في زر و انبوت متعدد الاسطر او بارغارف او ديلبوج لاظهار النتائج و نتحصل على التالي
-----------------
عدد الايات 6204
عدد الكلمات 77384
عدد الحروف 605646
----------------------
شكرا على المتابعةPHP Code:db = SQLite.Open("AutoPlay\\Docs\\coran.db");
s= SQLite.QueryToTable(db, "select * from coran");
Progress.SetRange("Progress1", 0, #s.Data);
x=0; y=0; g=0;
for i,v in pairs(s.Data) do
m = s.Data[i]["Aya_text"];
for wo in string.gmatch(m, "%S+") do
x=x+1;
if wo ~= " " then y = y + #wo ; end
end
g=i;
Progress.SetCurrentPos("Progress1", i);
end
Dial ="ÚÏÏ ÇáÇíÇÊ "..g .."\r\n".."ÚÏÏ ÇáßáãÇÊ "..x.."\r\n".."ÚÏÏ ÇáÍÑæÝ "..y ;
Input.SetText("Input1", Dial)
Comment -
السلام عليكم ورحمة الله وبركاته
اما اذا اردنا احصاء تكرار كل حرف لوحده في القران
- حسب قاعدة بيانات-
نضع هذا الكود
الحروف الغير ظاهرة خي احرف العربيةCode:db = SQLite.Open("AutoPlay\\Docs\\coran.db"); s= SQLite.QueryToTable(db, "select * from coran"); let = {"Ã", "È", "Ê","Ë", "Ì" ,"Í","Î","Ï","Ð","Ñ","Ò","Ó"," Õ","Ö","Ø","Ù","Ú","Û","Ý","Þ","ß","á","ä","åÜ","æ","í"}; Progress.SetRange("Progress1", 0, #s.Data); res=""; for i,v in pairs(s.Data) do m = s.Data[i]["Aya_text"]; w=0; for p,lettre in pairs(let) do x=1; repeat find = String.Find(m, lettre, x); if find ~= -1 then w=w+1;end x=x+1; until find ==-1 res = res .."Nombre "..lettre .." is " ..w .."\r\n" end Progress.SetCurrentPos("Progress1", i); end Dialog.Message("",res);Comment -
ماشاء الله
واصل ابداعاتك
كان لي فكرة قديمة لا أدري هل يمكن عملها أم لا
الفكرة كانت من سؤال ما هي أكبر كلمة في القرآن
فتمنيت أن يكون هناك برنامج يبحث بعدد الحروف مثلا 12حرف فتظهر الكلمات التي بهذا العدد
نسأل الله لك التوفيق والسدادComment -
Error: Plugin "Capture\Capture.lmd" is not licensed for re-distribution
مع أنه تم نسخ المجلد في مجلد الاضافات
ما الحلComment -
السلام عليكم ورحمة الله وبركاته
اليوم مع اخر جديد مشروعنا وفيه خاصيات جديدة
الترجمة الى لغات كثيرة
اضافة عرض بواسطة الغريد
تسريع عملية البحث
حساب عدد كلمات الاية و حروفها
اضافة نوع السورة و ترتيب نزولها
اضافة موقع الاية و جزئها و حزبها و ربعها
اضافة تفسير المختصر و الجلالين و معاني و كلمات
استعرض السور و الايات و قراءة ما تريد ه
اكتشفوها انتم
من خلال الملف المفتوح
*
طبعا ننتظر تعديلاتكم و افكاركمComment -
و الله فكرة رائعة ........ سنعمل عليهاOriginally posted by م/عامر View Post
حاليا تابع جديد الملف و اخبرنا افكارك الممتعةComment -
-
السلام عليكم
بارك الله فيك على هذا البرنامج الرائع ولي فيه بعض التحسينات أرجو أن تتقبلها بطيب خاطر
- زر الاغلاق متغير من شاشة الى أخرى فلو يتم تثبيته في مكان ثابت في جميع الواجهات
- عمل أيقونة المصحف للبرنامج لتظهر الأيقونة في شريط المهام
- قراءة متزامنه مع العرض غير موجودة في استعراض الآيات
- الآيات لو يتم عرضها بالخط العثماني أو اختيار ثلاثة أو أربعة خطوط للعرض
- تصدير الايات كصورة تغيير الخط فيه مشكلة ورقم الايه والسورة يحتاج ضبط
-عند الرجوع من تصدير الايات كصورة يظهر خطأ برمجي وتتعطل معظم خصائص البرنامج
- نسخ النتائج لا يظهر سوى السطر الأول فقط
في الاخير أنا جديد على البرنامج ولو أن لدي الخبرة لقمت باصلاحها ورفعها بملف مفتوح
Comment -
ربي ينوركم على الملاحظات الهادفة و سنصلحها ان شاء اللهOriginally posted by م/عامر View Post
لم اراعي مطلقا الاخراج لانه يهمني فقط الاكواد و كيفية العمل
القراءة المتزامنة لن تعمل الا اذا وضعت ملف quran فيه الايات في ملف audio
التصدير ممكن تكون فيه مشكل لانه في كل مرة اهمل ما سبق و اغير في كود البحث لكن سنعالجها وهو نفسه مشكل الرجوع
لقد تغير ملف النسخ و نسيته تماما سنرى ما يمكنه
انا الان مركز على صفحة الاحصائيات لعدد الرحوغ و الكلمات
وقد وجدت خللا في قاعدة البيانات القران لانه فيه الكثير من النسخ
Comment -
موجود وشغال في نافذة البحث لكن الخيار غير موجود في نافذة استعراض الآياتOriginally posted by عبد الهادي بهاب View PostComment -
السلام عليكمOriginally posted by م/عامر View Post
ساعيد معالجة المشكل
و ساعيد رفع الملف من جديد
مع التحديثات الجديدة
الاحصائيات و المتعلقة بالسور
ثم سنلحق بها الخاصة بالايات
Comment -
منتظرينComment