DECIMAL CREATE BITS \ cr‚ation d'une table poids des bits d'un octet 1 C, \ poids octet b0 2 C, \ " " b1 4 C, \ " " b2 8 C, \ " " b3 16 C, \ " " b4 32 C, \ " " b5 64 C, \ " " b6 128 C, \ " " b7 : POIDS ( n1 --- n2) BITS \ adresse de base + \ ajout d‚placement C@ ; \ empilage octet de l'adresse calcul‚e