Compresser : Booleen Virtuel;
Principal /*******/ Variable /******/ I : Nul Ou ImagePcx; Debut ... Si I.Compresser Alors /* L'image est compressée. */ ... Fin Si ... Fin Principal