Procedury:
Jedenm:
oto jedenm
kwadrat 50 kwadrat 25
pw 90 np 25 lw 90 kwadrat_zam 25/2
lw 90 np 25 lw 90 np 25 pw 180
kwadrat_zam 25/2 ws 25 pw 45
np 25*pkw 8 ws 25*pkw 8/4
pw 90 np 25*pkw 4/2 lw 135
już
Jedenś:
oto jedenś
kwadrat 100 kwadrat 50
pw 90 np 50 lw 90 kwadrat_zam 25
lw 90 np 50 lw 90 np 50 pw 180
kwadrat_zam 25 ws 50 pw 45
np 100*pkw 2 ws 100*pkw 2/4
pw 90 np 100*pkw 2/4 lw 135
już
Jedenw:
oto jedenw
kwadrat 200 kwadrat 100
pw 90 np 100 lw 90 kwadrat_zam 50
lw 90 np 100 lw 90 np 100 pw 180
kwadrat_zam 50 ws 100 pw 45
np 200*pkw 2 ws 200*pkw 2/4
pw 90 np 200*pkw 2/4 lw 135
już
Kwadrat:
oto kwadrat :a
powtórz 4 [pw 90 np :a]
już
Kwadrat_zam:
oto kwadrat_zam :a
ukm "fioletowy
wielokąt [
powtórz 4 [pw 90 np :a]]
już
Latawiec:
oto LATAWIEC
pod np 200 lw 90 np 200 pw 90 opu
jedenw
jedenś
jedenm
już
Przepraszam za brak niektorych polskich znakow.