Fonction Optimiser(Invariant, NulAbsorbant) Unicode(Position : Nul Ou Entier) Retourner Nul Ou Entier;
Si le binaire est Nul ou si Position est Nul, alors le résultat est Nul.
Si Position est négatif, alors le résultat est -1.
Si Position est supérieur à la taille du binaire, alors le résultat est -1.
Principal
/*******/
Variable
/******/
	B1 : Binaire;
	E2 : Entier;
Debut
B1=Binaire("ABCDEF");
/* B1 contient A B C D E F. */ 
E2=B1.Unicode(2);
/* E2 contient 67, le code de C. */ 
Fin Principal
Traduction
 
- - - - - - - - -