البوست عبارة عن كود(2)

دالة خط.مقسم (س1، ص1، س2، ص2، ن، ل):
    دس = (س2 - س1)÷ ن 
    دص = (ص2 - ص1)÷ ن 
    لكل أ من 0 إلى ن - 1 :
        ارسم.خط (س1 + دس × أ، ص1 + دص × أ)- (س1 + دس × (أ + 1)، ص1 + دص × (أ + 1))، ل 
        ل = باقي.قسمة (ل + 1، 15)
    تابع 
    ارجع ب: ل 
نهاية 

دالة مستطيل.مقسم (س1، ص1، س2، ص2، ن، ل):
    ل = خط.مقسم (س1، ص1، س2، ص1، ن ÷ 4، ل)
    ل = خط.مقسم (س2، ص1، س2، ص2، ن ÷ 4، ل)
    ل = خط.مقسم (س2، ص2، س1، ص2، ن ÷ 4، ل)
    ل = خط.مقسم (س1، ص2، س1، ص1، ن ÷ 4، ل)
    ارجع ب: ل 
نهاية 

ل = 1 
كرر :
    م = مستطيل.مقسم (50، 50، 450، 450، 40، ل)
    ل = ل + 1 
    انتظر (50)
تابع