قوائم متسلسلة في كلمات

تريد أن تحل مسألة ACM بكلمات؟ سوف تحتاج بضعة أشياء، منها القوائم المتسلسلة Linked lists. هيا نبدأ في عملها - أول ما نحتاجه هو فصيلة class يعبر عن حلقة في السلسلة. ما يكافيء node في لغات البرمجة الأجنبية :)

فصيلة حلقة :
    له بيان
    له سابق، تالي
نهاية

هنا لا نعرف methods في فصيلتنا، فقط نعرف مجالات للبيانات data fields.
بالمرة هيا نعرف فصيلة القائمة:

فصيلة قائمة :
    له أول ، آخر
نهاية

قبل أن نتابع علينا أن نعرف بعض المعلومات عن الكائنات في لغة كلمات:

• لإنشاء كائن object من فصيلة معينة نكتب اسم الفصيلة يليه كلمة جديد مثل م = موظف جديد
  
• للوصول إلى field نكتب اسمه قبل الكائن، أي أن س مركز النقطة في كلمات يكافيء point.center.x في اللغات التقليدية
• الثابت لاشيء يعادل null في اللغات المماثلة للJava أو #C.

الآن نريد أن نضيف إمكانيات الإضافة والمسح من القائمة. هنا ستكون الفصيلة قائمة أكثر من مجرد حاوٍ للبيانات، سوف نضيف إليها methods. قبل أن نضيفها يجب أولاً أن نعرف كيف نستدعيها!

تخيل أن فصيلة القائمة لديها method اسمها اضف(...)، سوف نستدعيها هكذا:

ق : اضف(12)

هذا يكافيء lst.add(12) //add to list في اللغات الأخرى. وهو في كلمات اسمه إرسال رسالة إلى الكائن، والكود التي ستتفذ ستكون استجابة لهذه الرسالة. مثل ال++C لابد أن نعرف الاستجابة على جزئين: نعلن عنها داخل الفصيلة ونكتب تفاصيلها خارج الفصيلة.

أولاً الإعلان:

فصيلة قائمة :
    له أول ، آخر
    -- هنا أعلننا عن الاستجابة
    يستجيب ل: اضف ( عنصر )
نهاية

ثانياً التفصيل:

استجابة قائمة ق ل: اضف ( عنصر ) :
    -- سوف نكتب التنفيذ هنا
 نهاية

هنا نعرف method جديدة عن طريق كلمة استجابة. لابد أن نعطي اسماً للكائن متلقي الرسالة هو هنا ق (في اللغات التقليدية يكون الاسم اوتوماتيكيا this ، لكن هنا لابد من إعطاء اسم).

لاحظ كيف أن الكلام يبدو طبيعياً جداً... استجابة قائمة ق لـ"أضف عنصر" هو افعل كذا كذا..نهاية. هذا لأن كلمات لغة برمجة تستمد جمالها من جمال اللغة العربية™

الآن يمككنا أن نكتب الكود أخيراً:

استجابة قائمة ق ل: اضف ( العنصر ) :
    ح = حلقة جديد
    بيان ح = العنصر

    إذا أول ق = لاشيء :
        أول ق = ح

        آخر ق = ح

    وإلا :
        تالي آخر ق = ح

        سابق ح = آخر ق

        آخر ق = ح

    تم
نهاية

أنظروا! استطيع كتابة كود الإضافة إلى قائمة!! سنترك كود المسح كتمرين للطالب :)

كلمة استجابة في كلمات، مثل كلمة إجراء، تعبر عن void function, void method. ماذا لو أردنا عمل شيء يعود بقيمة؟ هنا بدلاً من استخدام كلمة استجابة سوف نستخدم كلمة رد.

فصيلة قائمة :
    له أول ، آخر
    يستجيب ل: اضف ( عنصر )
    -- هنا عرفنا رداً جديداً
    يرد على عددهم ( )
نهاية

ثم نكتب تنفيذ الرد:

رد قائمة ق على عددهم ( ) :
    إذا أول ق = لاشيء :
       ارجع ب: 0

    وإلا :
      النتيجة = 0

       أ = أول ق
       طالما ليس أ = لاشيء :
          النتيجة = النتيجة + 1

           أ = تالي أ

       تابع
      ارجع ب: النتيجة

    تم
نهاية

الآن..نستطيع اختبار البرنامج:

الوجبات = قائمة جديد
الوجبات : اضف ( "شاورمة" )
الوجبات : اضف ( "مجبوس" )
الوجبات : اضف ( "فول وطعمية" )

اطبع الوجبات : عددهم ( )

قد يهم محبي النحو سبب تسميتنا للرد بإسم عددهم ؛ هذا يجعل التعبير كله يأخذ صورة بدل الجزء من الكل/بدل الاشتمال في اللغة العربية. هل تذكر في المدرسة "أعجبني الخروف صوفه"؟ نحن هنا نقول "اطبع الوجبات عددهم" :)

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

فصيلة حلقة :
    له بيان
    له تالي ، سابق
نهاية

فصيلة قائمة :
    له أول ، آخر
    يستجيب ل: اضف ( عنصر )
    يرد على عددهم ( )
نهاية

رد قائمة ق على عددهم ( ) :
إذا أول ق = لاشيء :
    ارجع ب: 0
وإلا :
    النتيجة = 0
    أ = أول ق
    طالما ليس أ = لاشيء :
        النتيجة = النتيجة + 1
        أ = تالي أ
    تابع
    ارجع ب: النتيجة
تم
نهاية

استجابة قائمة ق ل: اضف ( العنصر ) :
ح = حلقة جديد
بيان ح = العنصر

إذا أول ق = لاشيء :
    أول ق = ح
    آخر ق = ح
وإلا :
    تالي آخر ق = ح
    سابق ح = آخر ق
    آخر ق = ح
تم
نهاية

الوجبات = قائمة جديد
الوجبات : اضف ( "شاورمة" )
الوجبات : اضف ( "مجبوس" )
الوجبات : اضف ( "فول وطعمية" )

اطبع الوجبات : عددهم ( )