أبو عاصم المصري

قبائل.docxأماكن.docx هاتان قائمتان: (للقبائل والفرق والجماعات) و(الأماكن والبقاع)، يمكن أن تستخدما للفهرسة، بحيث يتم تحديد كل هذه الكلمات في الملف: الأماكن بلون، والقبائل بلون آخر، على أن يراجع المفهرس المواضع المحددة للتأكد من عدم اشتراكها مع كلمات أخرى لا تدخل في باب الفهرسة، مثل كلمة (أحد)، حيث إنها تحدد على أنها (مكان)، وتحدد أيضا على أنها (غزوة)، وقد لا تدخل في أي من الفهرسين، فالمفهرس يمر عليها في الملف للتأكد من دخولها في الفهرسة، ثم تقوم أداة البيان بعمل الفهرس بالطريقة المعتادة، وبهذا نكون قد فهرسنا الأماكن والقبائل، فإن لقي هذا القبول، فمن الممكن أن أجمع لك أيضا قائمة (بالغزوات والوقائع التاريخية) لإدراجها ضمن الفهارس. وللعلم: إضافة البحث في ملفات الورد أفادتني كثيرا، فجزاك الله عنا خير الجزاء.

ما شاء الله، سلمت يمينك أخانا الحبيب👍

ما شاء الله، اطلعت على الإضافة الجديدة، وهي جميلة ومفيدة، بارك الله فيك أساذ شحادة.

وهنا نقوم بطريقة يدوية بنقل البيت الذي آخره (برهانا) إلى موضعه في حرف النون، و(ناهيا) إلى موضعه في حرف الياء، وهكذا.

هذه صورة الجدول قبل الترتيب: رُبَّ مَنْ أنضَجتُ غيظًا قلبَهُ قد تمنَّى لي موتًا لم يُطَعْ رُبَّما تَكْرَهُ النُّفُوسُ من الأمْر ما لَهُ فَرْجةٌ كَحَلِّ العِقالِ سَراةُ بَني أبي بَكْرٍ تَسامَوْا عَلَى كانَ المُسَوَّمةِ العِرابِ عُمَيرةَ ودِّعْ إنْ تَجَهَّزْتَ غادِيا كَفَي الشّيْبُ والإسْلامُ لِلْمَرْءِ ناهِيا قلّدوها تمائمًا خوفَ عينٍ وحاسِدِ كُلُوا في بعضِ بطنِكمُ تَعِفُّوا فإنّ زمانَكمْ زمنٌ خميصُ لا تَحْظُرِ العَفْوَ إنْ كنتَ امْرَءًا حَرِجًا فإنّ حَظْرَكهُ للدِّينِ إزْراءُ لا يَسْألُونَ أخاهُمْ حِينَ يَنْدُبُهُمْ للنّائِباتِ عَلَى ما قالَ بُرْهانا لِسانُ الفَتى نِصْفٌ ونِصفٌ فُؤادُه فَلَمْ يَبْقَ إلّا صُورةُ اللّحمِ والدّمِ مَساميحُ الفِعالِ ذَوُو أناةٍ مراجيحٌ وأوجُهُهُمْ وِضاءُ مَنطِق صائب وتلحَن أحْيانًا وخيْرُ الكَلامِ ما كانَ لحنَا وإنْ تَسْألونِي بالنِّساءِ فإنَّني خبيرٌ بأدْواءِ النِّساءِ طَبِيبُ وإنّ لسانَ المرءِ ما لم تكنْ له حصاةٌ على عَوراتهِ لَدَليلُ وإنّ لِسانَ المَرْء ما لَمْ يَكُنْ لَه حَصاةٌ عَلى عَوْراتِه لَدَلِيلُ وإنِّي وإن أوْعَدْتُه أو وعَدْتُهُ لمنجزُ إيعادي ومُخْلِفُ مَوْعِدي وهذه صورته بعد الترتيب: لا تَحْظُرِ العَفْوَ إنْ كنتَ امْرَءًا حَرِجًا فإنّ حَظْرَكهُ للدِّينِ إزْراءُ مَساميحُ الفِعالِ ذَوُو أناةٍ مراجيحٌ وأوجُهُهُمْ وِضاءُ لا يَسْألُونَ أخاهُمْ حِينَ يَنْدُبُهُمْ للنّائِباتِ عَلَى ما قالَ بُرْهانا مَنطِق صائب وتلحَن أحْيانًا وخيْرُ الكَلامِ ما كانَ لحنَا عُمَيرةَ ودِّعْ إنْ تَجَهَّزْتَ غادِيا كَفَي الشّيْبُ والإسْلامُ لِلْمَرْءِ ناهِيا سَراةُ بَني أبي بَكْرٍ تَسامَوْا عَلَى كانَ المُسَوَّمةِ العِرابِ وإنْ تَسْألونِي بالنِّساءِ فإنَّني خبيرٌ بأدْواءِ النِّساءِ طَبِيبُ قلّدوها تمائمًا خوفَ عينٍ وحاسِدِ كُلُوا في بعضِ بطنِكمُ تَعِفُّوا فإنّ زمانَكمْ زمنٌ خميصُ رُبَّ مَنْ أنضَجتُ غيظًا قلبَهُ قد تمنَّى لي موتًا لم يُطَعْ رُبَّما تَكْرَهُ النُّفُوسُ من الأمْر ما لَهُ فَرْجةٌ كَحَلِّ العِقالِ وإنّ لسانَ المرءِ ما لم تكنْ له حصاةٌ على عَوراتهِ لَدَليلُ وإنّ لِسانَ المَرْء ما لَمْ يَكُنْ لَه حَصاةٌ عَلى عَوْراتِه لَدَلِيلُ لِسانُ الفَتى نِصْفٌ ونِصفٌ فُؤادُه فَلَمْ يَبْقَ إلّا صُورةُ اللّحمِ والدّمِ وإنِّي وإن أوْعَدْتُه أو وعَدْتُهُ لمنجزُ إيعادي ومُخْلِفُ مَوْعِدي

أحبائي الكرام، كنت أعمل في ملف فيه مئات من الأبيات الشعرية المأخوذة من الملف بغرض فهرستها، ومن المعلوم أن ترتيب الشعر يكون حسب القافية، فيكون الترتيب على حسب الحرف الأخير (القافية) من الكلمة التي تحتوي على القافية، وكان هذا الأمر يحتاج وقتا وجهدا كبيرين، لأن الفرز (الترتيب) في الورد ليس فيه هذه الخاصية، فأعددت ماكرو بصورة بسيطة يقوم بترتيب الأبيات الشعرية على الحرفين الأخيرين من القافية، بغض النظر عن (الألف والواو والياء والهاء) لأنها ربما تكون في في آخر الكلمة وليست هي القافية، فتركتها كما هي، وعلى الباحث أن يضعها في ترتيبها بطريقة يدوية، وهذه المواضع غالبا ما تكون قليلة، علما بأني من الهواة، لكن لما نفعت الفكرة وساعدتني كثيرا أحببت مشاركة إخواني، عسى أن يعم نفعها. * ويشترط أن تكون الأبيات ضمن جدول، وأن يوجد الشطران، وألا يكون في الصفحة إلا جدول الشعر فقط، بمعنى أنه لا يوجد عنوان مثلا قبل الفهرس، مثل: فهرس الشعر، ويمكن أن تضيفة بعد الترتيب الآلي واليدوي: وهذا هو الماكرو: ' ' شعرعماد Macro 'ماكرو ترتيب أبيات شعرية في جدول، ولا بد أن يكون هناك جدول فقط 'ويشترط وجود الشطرين Selection.Tables(1).Select Selection.Font.Color = wdColorAutomatic Selection.HomeKey Unit:=wdStory Selection.MoveRight Unit:=wdCell Selection.MoveRight Unit:=wdCell Selection.SelectColumn Selection.Font.Color = wdColorRed Selection.HomeKey Unit:=wdStory Selection.Find.ClearFormatting Selection.Find.Font.Color = wdColorRed Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "<[! ]@>[! :.،؛\؟\!]" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With For i = 1 To 1000 Selection.Find.Execute Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend Selection.Copy If Selection.Find.Found = False Then Selection.HomeKey Unit:=wdStory Exit For MsgBox "لا توجد كلمات حمراء" End If Selection.Font.Color = wdColorAutomatic Selection.HomeKey Unit:=wdRow, Extend:=True Selection.MoveLeft Unit:=wdCharacter, Count:=1 Selection.PasteAndFormat (wdPasteDefault) Selection.MoveLeft Unit:=wdCharacter, Count:=1 Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend Selection.Font.Color = 12611584 Selection.HomeKey Unit:=wdLine Selection.GoTo What:=wdGoToLine, Which:=wdGoToNext, Count:=1, name:="" Selection.Find.ClearFormatting Selection.Find.Font.Color = wdColorRed With Selection.Find .Text = "<[! ]@>[! :.،؛\؟\!]" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Next i Selection.Find.ClearFormatting Selection.Find.Font.Color = 12611584 Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "[ًٌٍَُِّْ]" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Selection.Find.Execute replace:=wdReplaceAll Selection.Find.ClearFormatting Selection.Find.Font.Color = 12611584 Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "[ًٌٍَُِّْ]" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Selection.Find.ClearFormatting Selection.Find.Font.Color = 12611584 Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "<[! ]@>" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With For i = 1 To 1000 Selection.Find.Execute If Selection.Find.Found = False Then Selection.HomeKey Unit:=wdStory Exit For MsgBox "لا توجد كلمات زرقاء" End If Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.MoveLeft Unit:=wdCharacter, Count:=2 Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend Selection.Delete Unit:=wdCharacter, Count:=1 Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend Selection.Cut Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.PasteAndFormat (wdPasteDefault) Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend Selection.Font.Color = 5287936 Next i Selection.HomeKey Unit:=wdLine Selection.Sort ExcludeHeader:=False, FieldNumber:="عمود 1", SortFieldType _ :=wdSortFieldAlphanumeric, SortOrder:=wdSortOrderAscending, FieldNumber2 _ :="", SortFieldType2:=wdSortFieldAlphanumeric, SortOrder2:= _ wdSortOrderAscending, FieldNumber3:="", SortFieldType3:= _ wdSortFieldAlphanumeric, SortOrder3:=wdSortOrderAscending, Separator:= _ wdSortSeparateByCommas, SortColumn:=False, CaseSensitive:=False, _ LanguageID:=wdArabic, SubFieldNumber:="فقرات", SubFieldNumber2:="فقرات", _ SubFieldNumber3:="فقرات" Selection.Sort BidiSort:=False, IgnoreThe:=True, IgnoreKashida:=False, _ IgnoreDiacritics:=False, IgnoreHe:=False Selection.HomeKey Unit:=wdStory Selection.Find.ClearFormatting Selection.Find.Font.Color = 5287936 Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "<[! ]@>" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Selection.Find.Execute replace:=wdReplaceAll Selection.Tables(1).Select Selection.Font.Color = wdColorAutomatic Selection.HomeKey Unit:=wdStory End Sub

في رأيي: أن تيسير إجراء العملية من الأشياء المفيدة، وخصوصا إذا كان الباحث يحتاجها كثيرا. صحيح أن هناك كثيرا من العمليات يقوم بها الورد، لكنها تأخذ وقتا، وربما تأخذ أكثر من مرحلة، مما قد ينتج عنه خطأ، إضافة إلى الجهد والوقت. فمن المفيد جدا تيسير هذه العمليات إذا تمت إضافتها للإضافة بالطريقة الجميلة المعهودة. خصوصا أن الخطأ في الترقيم يعد من الأخطاء الشنيعة، لذا فمن المستحسن أن يكون بطريقة آلية. ولا يخفى عليكم أن العمل في الأرقام -على وجه التحديد- لفترة طويلة لا بد أن يؤدي إلى خطأ. فلا ملامة عليك أخي الحبيب في إضافة هذه الخاصية بطريقتك الجميلة البسيطة. * وهذا يأخذنا إلى فكرة أخرى يمكن أن تضاف (للإضافة)، وهي عملية (اختبارات) ويمكن أن يشمل التالي: 1- اختيارات الإملاء. 2- اختبارات الضبط (التشكيل). 3- اختبارات الترقيم. ومن الممكن أن يكون هناك اختبارات أخرى يمكن أن تجرى على الملف.

تمام، بارك الله فيك أستاذ شحادة.

أستاذنا هذا نموذج لما أريده: يوجد كتاب - باب - حديث، وكل منها أمامه رمز مختلف عن الآخر. وهذه المواضع تحتاج ترقيما، وكل ترقيم منفصل عن الآخر، فهناك ترقيم خاص بالكتب، وآخر خاص بالأبواب، وترقيم خاص بالأحاديث. والفكرة هي: إضافة زر الترقيم على [= $ * @ %] مثلا، بحيث يختار الباحث الرمز الذي يرقم عليه. فإذا اختار [=] مثلا، فهذا يعني أنه يريد ترقيم الأحاديث إلى آخر الكتاب. وإذا كان الكتاب مقسما إلى عدة ملفات، فيمكن أن نضيف بداية الترقيم. @كتاب السنة الْحَمْدُ لِلَّهِ وَصَلَوَاتُهُ عَلَى سَيِّدِنَا مُحَمَّدٍ وَآلِهِ قُرِئَ عَلَى الشَّيْخِ الصَّالِحِ أَبِى زُرْعَةَ طَاهِرِ بْنِ مُحَمَّدِ بْنِ طَاهِرٍ الْمَقْدِسِىِّ وَأَنَا أَسْمَعُ قِيلَ لَهُ أَخْبَرَكُمُ الشَّيْخُ الْعَالِمُ أَبُو مَنْصُورٍ مُحَمَّدُ بْنُ الْحُسَيْنِ بْنِ أَحْمَدَ بْنِ الْهَيْثَمِ الْمُقَوِّمِىُّ الْقَزْوِينِىُّ إِجَازَةً إِنْ لَمْ يَكُنْ سَمَاعًا قَالَ أَخْبَرَنَا أَبُو طَلْحَةَ الْقَاسِمُ بْنُ أَبِى الْمُنْذِرِ الْخَطِيبُ قَالَ أَخْبَرَنَا أَبُو الْحَسَنِ عَلِىُّ بْنُ إِبْرَاهِيمَ بْنِ سَلَمَةَ بْنِ بَحْرٍ الْقَطَّانُ قَالَ أَخْبَرَنَا أَبُو عَبْدِ اللَّهِ مُحَمَّدُ بْنُ يَزِيدَ بْنِ مَاجَهْ قَالَ : $ باب اتِّبَاعِ سُنَّةِ رَسُولِ اللَّهِ صلى الله عليه وسلم = حَدَّثَنَا أَبُو بَكْرِ بْنُ أَبِى شَيْبَةَ حَدَّثَنَا شَرِيكٌ عَنِ الأَعْمَشِ عَنْ أَبِى صَالِحٍ عَنْ أَبِى هُرَيْرَةَ قَالَ قَالَ رَسُولُ اللَّهِ صلى الله عليه وسلم « مَا أَمَرْتُكُمْ بِهِ فَخُذُوهُ وَمَا نَهَيْتُكُمْ عَنْهُ فَانْتَهُوا » . = حَدَّثَنَا مُحَمَّدُ بْنُ الصَّبَّاحِ أَخْبَرَنَا جَرِيرٌ عَنِ الأَعْمَشِ عَنْ أَبِى صَالِحٍ عَنْ أَبِى هُرَيْرَةَ قَالَ قَالَ رَسُولُ اللَّهِ صلى الله عليه وسلم « ذَرُونِى مَا تَرَكْتُكُمْ فَإِنَّمَا هَلَكَ مَنْ كَانَ قَبْلَكُمْ بِسُؤَالِهِمْ وَاخْتِلاَفِهِمْ عَلَى أَنْبِيَائِهِمْ فَإِذَا أَمَرْتُكُمْ بِشَىْءٍ فَخُذُوا مِنْهُ مَا اسْتَطَعْتُمْ وَإِذَا نَهَيْتُكُمْ عَنْ شَىْءٍ فَانْتَهُوا » . = حَدَّثَنَا أَبُو بَكْرِ بْنُ أَبِى شَيْبَةَ حَدَّثَنَا أَبُو مُعَاوِيَةَ وَوَكِيعٌ عَنِ الأَعْمَشِ عَنْ أَبِى صَالِحٍ عَنْ أَبِى هُرَيْرَةَ قَالَ قَالَ رَسُولُ اللَّهِ صلى الله عليه وسلم « مَنْ أَطَاعَنِى فَقَدْ أَطَاعَ اللَّهَ وَمَنْ عَصَانِى فَقَدْ عَصَى اللَّهَ عَزَّ وَجَلَّ » .

أعلم أن هذه الإمكانية موجودة في الورد، لكن طريقتها غير مباشرة، وتحتاج بعض الخبرة في الورد. لكن إضافتها للإضافة بشكل مباشر، مثل: اختر العلامة التي ترقم عليها، يكون أيسر. - أما كتابة رقم في موضع معين، فهذا يكون عند نسخ المخطوطات مثلا، فأحتاج عند كلمة معينة -التي هي بداية صفحة في المخطوط- كتابة رقم صفحة المخطوط، ويكون بين معقوفين بهذه الصورة [10 س/أ] ثم [10 س/ب]، ثم [11 س/أ] ثم [11 س/ب] وهكذا. س : رمز المخطوط، ويمكن أن تكون رمزا آخر، ويمكن أن يكون هناك أكثر من مخطوط، فيكون هناك أكثر من رمز. 10، 11 : رقم اللوحة. أ ، ب : يمين اللوحة وشمالها، أو الوجه والظهر. عند كتابة الرقم بشكل يدوي أحيانا يحدث خطأ، لكن لو كتب بطريقة آلية يكون أضبط. والصورة: يكون هناك زر لإضافة رقم مثلا بين معقوفين بهذه الصورة [1 س/أ] ويتلوه بشكل آلي [ا س/ب]، ثم [2 س/أ] ثم [2 س/ب]، وهكذا، فيتغير الرقم [1، 2، 3، 4] وهكذا، ويتغير الرمز [س/أ] مرة، [س /ب] مرة، هكذا. مع إمكانية كتابة الرقم بشكل يدوي إذا تطلب الأمر، مع إمكانية تغيير الرموز. وهذا مفيد جدا للباحثين، خصواصا عند العزو إلى أرقام صفحات المخطوط، وأحيانا المطبوع، خصوصا أن الطبعات القديمة لم يكن فيها ترقيم إلا أرقام الصفحات فقط.

رأيتها الآن، ما شاء الله، لا قوة إلا بالله، ممتاز، بارك الله فيك. وعندي اقتراح آخر: وهو ترقيم الكتب والأبواب والأحاديث، أو الفقرات، أو ما إلى ذلك. والطريقة هي: - يجعل الباحث علامة أمام الكتاب، ولتكن مثلا * - وكذلك علامة أمام الباب، ولتكن مثلا @ - وعلامة أما الحديث، ولتكن مثلا = أو أي علامة يختارها، بحيث لا تتكرر في الملف إلا في المواضع المطلوب ترقيمها. - يقوم البرنامج بالترقيم على هذه المواضع المحددة. - كما يضاف إلى البرنامج شكل الرقم، بحيث يوضع مثلا بين []، أو {}، أو ()، أو يترك بلا أقواس، ويوضع بعده شرطة - أو لا يوضع. - ويستحسن إضافة خاصية التلوين للأرقام، فهذه تساعد في حالة المراجعة. ويا حبذا لو أضفت خاصية كتابة رقم في موضع معين، كأرقام المخطوطات مثلا، فنضغط على زر معين فيضيف رقم [1/1]، ثم [1/2]، ثم [1/3]، وهكذا، مع إمكانية إضافة رمز للترقيم، مثل [10 أ]، أو [10 ب]، أو [10 ج]. مع إمكانية إعادة بدء الترقيم، بحيث لو سقط رقم من المخطوط يتم تداركه يدويا.

أحيانا يكون عندي جدول للشعر جاهز يحتاج ترتيب، فإضافة هذه الخاصية تكون مفيدة.

حبيبنا الأستاذ شحادة.. نظرت في الإصدار الجديد من الإضافة، ما شاء الله، جميل. عندي اقتراح: ممكن مع خاصية ترتيب الأعلام، تضيف خاصية ترتيب الشعر، ولا يخفى عليك أنه يرتب على القافية. وهناك صورة جدول فيه البيت كامل، مثل: ما نَوالُ الغَمامِ وَقْتَ رَبِيعٍ كنَوالِ الأمِيرِ يَومَ سَخاءِ 291 أَأُحِبُّهُ وَأُحِبُّ فِيهِ مَلامةً؟ إنّ المَلامةَ فِيهِ مِن أعْدائِهِ 350 ومثل: القافية البحر الشاعر الصفحة داءُ الوافر الجَعْدُ بن مِهْجَع أبو المُسْهر 131 كَدَاءُ الوافر حسّان بن ثابت 700 سَوْداءُ الكامل أبو أبو الطيب المتنبي 699

تمام

تمام، ومن المهم أن يكون هناك ترتيب حسب الموضوعات، يعني مثلا: التفسير وعلومه، كتب الحديث، كتب الفقه، كتب اللغة، كتب الأدب، المعاجم، كتب النحو والصرف والعروض، ... إلخ. وبالتوفيق دائما.

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

ما شاء الله، تمام، وسوف أذكر لك تباعا المشاكل التي يقابلها الباحث أثناء عمله في الكتاب، بداية من كونه مخطوطا، حتى تحويله إلى بي دي إف، مع المراجعات الفنية المطلوبة، مثل (الترويسة، والترقيم، والتصاق التشكيل) وغير ذلك. حتى تكون الإضافة شاملة لكل شيء إن شاء الله. * يعني مثلا: = كيف أرقم كتابا كاملا بصورة كاملة: (ترقيم الكتب، والأبواب، والأحاديث) مثلا. = كيف أميز الكتب عن الأبواب عن الأحاديث برمز معين حتى يتم الترقيم عليه. * إذا كان التشكيل فيه مخاطرة، فإن اختبار النص - مشكولا وغير مشكول- أمر ميسور، يمكن أن نوقف الباحث على مواضع الإشكال للنظر فيها. * وهناك أشياء كثيرة من هذا القبيل، يسعدني كثيرا أن أذكرها لك، من باب نشر الفائدة. شكر الله لك صنيعك، وجعله في ميزان حسناتك.

أعلم ذلك، لكن وجود مثل هذه القائمة بصورة سليمة يتيح للباحث النسخ منها مباشرة، أو استبدال البيانات، مع كتابتها بصورة صحيحة، لأنه من الملحوظات على قائمة المراجع أن الباحث كثيرا ما لا يلتزم بصورة واحدة لكتابة بيانات المرجع، من اسمه، واسم مؤلفه، ودار النشر، وسنة الطبع، وغير ذلك. ففي رأيي أن وجودها هنا ستكون إضافة مفيدة لإضافة البيان. الباحث يدرك أن هناك طبعات للكتاب، علما بأن تعدد الطبعات ليس هو الغالب، بل الغالب وجود طبعة واحدة، خصوصا في المصادر الكبيرة. وأقل ما يمكن أن يستفيد منه كتابة المصدر، مع اسم مؤلفه، بصورة سليمة. تحياتي لك، وصبحك الله بالخير.

عندي اقتراح لإضافة قائمة مراجع للإضافة، بحيث يستفيد منها الباحث، بحيث تعرض على الباحث، فيختارها كلها، أو يختار منها ما اعتمد عليه في تحقيقه، وذلك عن طريق تحديد قائمة المراجع الخاصة به، ثم مقابلتها على قائمة البرنامج، فنستفيد الدقائمة مصادر التحقيق.rarقة مع السرعة:

للأسف كان هذا منذ زمن بعيد، وكانت الملفات بلغة (فيجوال بيزك)، لكن أذكر أنني عندي قائمة فيها كثير من الجمل، إن شاء الله أبحث عنها وأرسلها لك. لكن مبدئيا أذكر الطريقة أنه كان يجمع مثلا قائمة خماسية الكلمات، ثم رباعية، ثم ثلاثية، ثم ثنائية، ثم أحادية. - ثم ينشئ قائمة موحدة لكل مجموعة (الخماسية، والرباعية، ...). - ثم يستبعد الجمل المكررة اعتمادا على اختلاف الضبط. - فينتج عن ذلك قوائم موحدة تأخذ ضبطا واحدا في جميع الأحوال. - وكان يجمع القوائم عن طريق نسخ (أول وثاني، وثالث، ورابع، وخامس) كلمة، ثم (ثاني، وثالث، ورابع، وخامس، وسادس) كلمة، وهكذا حتى يكون قوائم خماسية الكلمات، ثم يقوم بحذف المكرر، فينتج عنه قائمة تأخذ ضبطا واحدا في كل المواضع. - وهكذا في الرباعية والثلاثية والثنائية والأحادية.

تمام أخي الحبيب، وأحب أن أخبرك أني سعيد جدا بالحوار الممتع معك. وبخصوص التشكيل، ممكن تجرب على نص حديثي، بعد الاعتماد مثلا على نسخة (مسند الإمام أحمد) فهي مشكولة بالشكل الكامل، وهي دقيقة جدا، والمسند قد حوى كل أحاديث الكتب الستة، باستثناء حديث أبي زرع، فلو جعلته مصدرا، وأتيت بكتاب من كتب السنة مثلا، مع إجراء عملية التشكيل فسيكون هذا مفيدا جدا. ومن الممكن أن تجعلها تجريبية، فإن لاقت القبول، فبها ونعمت، وإلا حذفتها. علما بأن هناك جملا كثيرة تأخذ ضبطا واحدا لا يتغير، مثل: (عَنْ أَبِي هُرَيْرَةَ)، (عَنِ ابْنِ عُمَرَ)، وغير ذلك آلاف الجمل ذات الكلمات الثلاثة والأربعة، بل والخمسة أيضا، وفي أوائل التسعينات كنت قد طلبت من أحد المهندسين أن يستخرج قائمة من كتب السنة الستة، مع مسند الإمام أحمد، وموطأ الإمام مالك قائمة بذلك، وكان في ذلك الوقت لغة البرمجة ضعيفة، ومع ذلك استخرج آلاف الجمل، مما ساعد في إخراج النص مضبوطا بالشكل الكامل.

الأستاذ شحادة، السلام عليكم ورحمة الله وبركاته. هل هناك طريقة لإيقاف عملية معينة أو إلغائها؟ وذلك أني طلبت تغيير آيان في ملف كبير للخط العثماني، وكان أغلب الآيات محولة بالفعل، وكلما مر على ما بين القوسين {} أخرج رسالة [موافق - تجاهل]؟ وهذا كان من باب الاختبار فقط، بقصد تطوير هذه الإضافة الجميلة. أرجو المعذرة، فهذا العمل رائع، وإن شاء الله بعد فترة من التطوير الذي تقوم به، سيكون من أفضل ما يقدم للباحثين.

تجربتي مع التشكيل الآلي: يعتبر التصحيح من أكثر مراحل العمل العلمي التي تأخذ وقتا وجهدا كبيرا، وخصوصا إذا كان تشكيلا شاملا لكل الكلمات. وكنت قد لجأت لطريقة بدائية اعتمدت عليها في ضبط كثير من المجلدات بالشكل الكامل، وكانت النتيجة مرضية بشكل كبير، ولا يعني هذا عدم تدخل المصحح، بل لا بد أن يقوم بعملية التصحيح المعروفة، وقد وفر هذا جهدا كبيرا، مع دقة عالية. عملت الماكرو كالتالي: 1- أحضرت ملفا مشكولا بصورة كاملة، جمعت فيه كتابا لغويا (مثل تاج العروس، أو لسان العرب)، وكتابا حديثيا (مثل مسند الإمام أحمد)، وكتابا في التفسير (مثل تفسير الطبري)، وكتابا فقهيا (مثل المغني لابن قدامة)، وكتابا أصوليا (مثل البرهان للجويني)، وكتاب تاريخيا، وكتابا أدبيا، ويمكن أن يضاف كتب أخرى. 2- فتحت الملف المراد تصحيحه، ونسخت أول أربع كلمات، وبحثت عنها في الملف المشكول، فإذا وجدها نسخها، وقمت باستبدالها في الملف كله ولونتها باللون الأحمر لتمييزها. 3- نسخت الكلمة الثانية إلى الخامسة، ثم الثالثة إلى السادسة، وهكذا، فما وجده في الملف المشكول، نسخته في الملف المراد تصحيحه في كل المواضع. 4- وكانت النتيجة عالية جدا. * جمعت قائمة بحروف لا تجتمع أبدا، وإذا حدث ذلك علمت على الكلمة. * جمعت قائمة أخرى بتشكيل لا يتوالى أبدا مثل (سكون، بعده سكون)، (شده بعدها سكون). * فما كان كذلك ظللته ليراجعه المصحح. فلو رأيت أن تضيف مثل هذا (لإضافة البيان الرائعة) كان في هذا خير عظيم، وفائدة كبيرة. ويمكن أن تجعلها تحت التجربة، للاستفادة من آراء الإخوة. بارك الله فيك أخانا الحبيب، وأرجو ألا أكون قد أثقلت عليك.

تمام، تم الأمر بنجاح، أغلقت الورد وفتحته، وفعلا حدد كل المواضع.🌹