pour rec :lo :la  
# trace un rectangle de longueur :lo et largeur :la  
repete 2[av :lo td 90 av :la td 90]  
fin  
 
pour carre :c  
# trace un carre de cote :c  
repete 4[av :c td 90]  
fin  
 
pour tri :c  
# trace un triangle equlateral de côté :c  
repete 3[av :c td 120]  
fin  
 
pour patte :c  
rec 2*:c 3*:c carre 2*:c  
fin  
 
pour antenne :c  
av 3*:c tg 90 av :c td 90 carre 2*:c  
lc re 3 *:c td 90 av :c tg 90 bc  
fin  
 
pour robot :c  
ve ct  
# Le corps  
rec 4*:c 28* :c  
# Les pattes  
td 90 av 2*:c patte :c av 4* :c patte :c av 14*:c patte :c av 4*:c patte :c  
# La queue  
lc tg 90 av 4* :c bc td 45 av 11*:c re 11 * :c tg 135  
# le cou et la tête  
av 18 *:c carre :c av 3*:c carre :c td 90 av :c tg 90 av 2*:c td 90 carre 8* :c  
# Oreilles  
av 4*:c tg 60 tri 3*:c lc td 150 av 8 *:c tg 90 bc tri 3*:c  
# Les antennes  
av 4 *:c tg 90 av 2*:c td 90 antenne :c tg 90 av 4*:c td 90 antenne :c  
# les yeux  
lc re 3 *:c bc carre :c td 90 lc av 3*:c bc tg 90 carre :c  
# La bouche  
lc re 3*:c tg 90 av 3*:c td 90 bc rec :c 4*:c  
fin

pour gre :c  
ve ct  
av 2 *:c td 90 av 5*:c tg 90 av 4*:c tg 90 av 7 *:c td 90 av 7*:c td 90  
av 21 *:c td 90 av 2*:c tg 90 av 2*:c td 90 av 9*:c td 90 av 2*:c tg 90  
av 2*:c td 90 av 9*:c td 90 av 2*:c td 90 av 7*:c re 5*:c tg 90 av 4*:c  
td 90 av 4*:c re 4*:c tg 90 re 2*:c tg 90 av 5*:c tg 90 av 4*:c td 90 av 7*:c  
td 90 lc av 9*:c bc repete 4[av 2*:c td 90]  
fin