; Piirtää neliön

to nelio
 repeat 4[fd 50  lt 90]
 ; fd 50 = eteenpäin 50 askelta. lt 90 = 90-asteen käännös vasemmalla
 ; fd:n tilalla voidaan käyttää myös foward  lt:n tilalla voi käyttää myös left
 ; repeatissa toistetaan hakasuluissa olevat komennot 4 kertaa
end

; Piirtää kolmion

to kolmio :sivu
 fd :sivu  rt 120 ; rt 120 = 120 käännös oikealle. rt:n tilalla voi käyttää right
 fd :sivu  rt 120
 fd :sivu
 ; :sivu on muuttuja jonka avo annetaan ohjelman suorituksessa
 ; jos ohjelman suorittaa näin "kolmio 60" sivun pituus on 60
end

; Main joka suorittaa edellämainitut ohjelmat

to main :kolmion_sivu
 repeat 2[kolmio :kolmion_sivu nelio]
 ; tässä suoritetaan kolmio ja nelio ja annetaan kolmion sivun pituus
 ; eli kolmio ja nelio tulevat aliohjelmiksi
 ; jos kirjoitat kaikki rivit tulkkiin/kääntäjään niin voi suorittaa sen "main 50"
 ; silloin kolmion sivun pituudeksi tulee 50
end