Et si on la voyait en négatif??

Pour changer une image en négaitf, même procédé sauf qu'au lieu de moyenner les nombres r g b, on les remplace par leur complément à 255. Ex: Un pixel a pour couleur [2 100 200], on remplace sa couleur par: [253 155 55]

Seul la procédure li change par rapport à tout de suite:

pour niveaudegris :c
si :y=-100 [stop]
si :c=100 [donne "c 0 donne "y  :y-1] 
fcc li tc liste :c :y
point liste :c :y
niveaudegris :c+1
fin

pour transfo
# Vous devez changer le chemin vers l'image transfo.png 
# Ex: chargeimage [c:\mes_images\transfo.png] 
ct ve ci [/home/loic/tortue1.png] donne "y 0 niveaudegris 0
fin

pour li :liste
donne "r premier :liste
donne "liste sp :liste
donne "g premier :liste
donne "liste sp :liste
donne "b premier :liste
retourne ph liste 255-:r 255-:g 255-:b  
fin

Figure 7: XLOGO se prend pour LE GIMP ...(prétentieux o:))