; Program "Piramidy w Gizie" ;program rysuje Piramidy w Gize ( na podstawie planu z lotu ptaka) , a pies jest Sfinksem ; trójkąt jest procedurą rysującą boki piramidy oto trójkąt :a np :a lw 135 góra 45 np :a dół 45 pw 135 pw 90 pw 45 dół 45 np :a góra 45 lw 135 już ; to samo co trójkat ale z pokolorowaniem oto trójkąt_pełny :a wielokąt np :a lw 135 góra 45 np :a dół 45 pw 135 pw 90 pw 45 dół 45 np :a góra 45 lw 135 gotowy już ; procedura na kwadrat potrzebna do narysowania dołu piramidy oto kwadrat :a powtórz 4 [np :a lw 90] już ; procedura na pustą piramidę z kresek oto piramida :a kwadrat :a powtórz 4 [trójkąt :a pod np :a lw 90 opu] już ;procedura na piramidę pokolorowaną oto piramida_pełna :a wielokąt kwadrat :a gotowy powtórz 4 [ wielokąt trójkąt :a gotowy pod np :a lw 90 opu] już ; procedura na piramidę w Gizie rysujemy zamalowaną piramidę i odrobinę większą pustą piramidę ( żeby kontury nie zlewały się z kolorem). ; lepiej widać boki i ładnie wygląda oto giza :a kolor szafranowy piramida_pełna :a kolor czarny piramida :a+0.5 już cs giza 300 ; rysujemy pierwszą piramidę pod lw 90 np 350 lw 90 np 500 lw 180 ; przesuwamy się do drugiej piramidy opu giza 300 ; rysujemy drugą piramidę pod lw 90 np 250 lw 90 np 200 lw 180 ; przesuwamy się do trzeciej mniejszej piramidy opu giza 100 ; rysujemy trzecią pod np 550 pw 90 np 750 lw 90 ; przesuwamy się do trzech małych piramid obok pierwszej powtórz 3 [pod np 90 opu giza 60] ; rysujemy trzy małe piramidy pod pw 90 np 300 lw 90 np 300 lw 90 ; przesuwamy się do górnego rogu kolor miodowy opu wielokąt kwadrat 1500 gotowy ; rysujemy ziemię na której stoją piramidy kolor czarny kwadrat 1501 pod lw 90 np 1000 pw 90 np 300 lw 180 ; przsuwamy psa, na miejsce Sfinksa