Convertion hex_bin

Télécharger le projet
Commenter

Description

Convertion d'un mot 32 bits en dec_hex_bin, pour mot simple ou double ou Flottant.
Je pense que'il est accès bien expliqué et bien optimisé.

Source / Exemple : 


'1 Octet = 2 Mots = 8 Bits = 1 Msb (4 bits) + 1 Lsb(4 Bits)
'Mot simple = -32767 à 32768, 16 bits signés
'Mot Long = -16 777 215 à 16 777 216, 24 bits signés
'Mot IEEE CF INTEL 8232,  32 bits signés
'***************************************************************************
Option Explicit
    Dim c, i, j, k As Integer
    
    Dim Octet(0 To 3) As Integer          'Octet provenant d'une trame de communication
    Dim Msb(0 To 3) As Integer            'Décomposition Msb de chaque octet
    Dim Lsb(0 To 3) As Integer             'Décomposition Lsb de chaque octet
    Dim w(0 To 8) As String                 'Décomposition Msb et Msb de chaque octet en binaire
    Dim Mot_Dec(0 To 7) As Integer     'Valeur de chaque Msb et Lsb en décimal
    Dim Poids_Binaire(0 To 8) As String 'Décompose en 4 bits chaque Msb et Lsb
    Dim Bits(0 To 32) As Integer            'Contient bit à bit les octets
    
    Dim Multiplicateur As Integer       'Variables utilisées pour la virgule flottante
    Dim Val_Expo(0 To 35) As Single     'Valeur de la mantisse
    Dim Exp(0 To 20) As Single          'Exposant virgule flottante
    Dim Verifie_Zero As Integer         'Vérifie integrité de la valeur du résultat virgule flottant
     
    Dim Bit_Simple(0 To 17) As Long     'Variables des bits de mot simple
    Dim Bit_Double(0 To 35) As Long     'Variables des bits de mot double
    Dim Offset As Long                  'Offset de la valeur du mot simple , offset=65535
                                        'Offset de la valeur du mot double , offset= 2 Exp 25
                                        
    Dim Valeur As Single                'Donne la valeur du mot à l'adresse lue

Conclusion :


SI vous avez des remarques je suis preneur ( :-).
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.