Discussion :

[davcaz]

Bonjour,

Je ne peux remonter d'un automatisme que des données 16 bits.
Dans la mémoire de l'automate, la valeur du réel %MF0 (32 bits) est codée en 2 entiers (16bits chacun) %MW0 et %MW1.

Je remonte bien les valeurs de %MW0 et %MW1 dans mon windev.

Quelle est la formule ou le codage pour reconstituer la valeur %MF0 dans mon windev à partir des %MW0 et %MW1 récupérés.
NB: la marque de l'automate n'a aucune signification; c'est surtout une question sur le codage des entiers et des réels.

Merci par avance de votre aide.

Pour info, j'avais réussi avec Labview et des blocs de retournements de bits et de conversion de données mais je n'arrive pas à l'appliquer avec windev.

[frenchsting]

Bonjour, tu ne nous dis pas à quoi doit ressembler ton nombre final par rapport à tes 2 entiers...

[Nicolas_Jeanneau]

Bonjour,

juste pour être sûr de bien comprendre, tu as la partie décimale d'un côté et la partie entière de l'autre ?

à bientôt,

Nicolas

[davcaz]

Bonjour, tu ne nous dis pas à quoi doit ressembler ton nombre final par rapport à tes 2 entiers...

à un réel

[davcaz]

Bonjour,

juste pour être sûr de bien comprendre, tu as la partie décimale d'un côté et la partie entière de l'autre ?

à bientôt,

Nicolas

Non.

Un réel est codé sur 32 bits. Il me semble que le bit de poids fort est le signe (+ ou -) ... etc

[davcaz]

En fait, ma question se résume à :

J'ai 32 bits, quelle est la valeur du réel qui en résulte.

[frenchsting]

Celle que tu veux...

Si tu ne sais pas sous quelle forme est codée ton réel, tu ne peux pas le convertir. Je ne connais pas labview, mais tu qd même lui dire quelque part ou se trouve la virgule dans ton nombre. (Format Mantisse + exposant pour être précis).

[davcaz]

C'est la norme IEEE.
J'avais oublié de le préciser mais cela me semblait évident en informatique pour coder entier, réel...etc en binaire.

Trouvé sur le net :

Ainsi le codage d'un réel en binaire se fait sous la forme suivante :

seeeeeeeemmmmmmmmmmmmmmmmmmmmmmm

le s représente le bit relatif au signe
les e représentent les bits relatifs à l'exposant
les m représentent les bits relatifs à la mantisse

Voila moi j'ai les 32 bits, ils faut que j'en tire la valeur du réel.
Les blocs Labview savent faire cette conversion mais en windev...

Merci pour vos aides.

[frenchsting]

Faut se le faire à l'os !!!

Tu peux t'en sortir avec le EtBinaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
// le signe
s est booleen = etbinaire(MW0, puissance(2,16)) = 1 // vrai ou faux
// L'exposant 
exp est entier = 0 
pour i = 15 a 8 pas -1
   exp += etbinaire(MW0, puissance(2,i))
fin
Partie0Decimal est entier = 0
pour i = 7 a 1 pas -1
   Partie0Decimal  += etbinaire(MW0, puissance(2,i))
fin
Partie0Decimal * puissance(2,16) // décalage à gauche pour remettre la bonne valeur
 
Partie1Decimal est entier = 0
pour i = 16 a 1 pas -1
   Partie1Decimal  += etbinaire(MW1, puissance(2,i))
fin
 
NombreEntier est entier = Partie0Decimal + Partie1Decimal
 
NombreReel est reel // ou monétaire
 
NombreReel = NombreEntier * puissance(1,exp)
 
si pas s alors NombreReel = NombreReel *-(1)

A valider par plein de tests, bien sûr...

[davcaz]

Faut se le faire à l'os !!!

Tu peux t'en sortir avec le EtBinaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
// le signe
s est booleen = etbinaire(MW0, puissance(2,16)) = 1 // vrai ou faux
// L'exposant 
exp est entier = 0 
pour i = 15 a 8 pas -1
   exp += etbinaire(MW0, puissance(2,i))
fin
Partie0Decimal est entier = 0
pour i = 7 a 1 pas -1
   Partie0Decimal  += etbinaire(MW0, puissance(2,i))
fin
Partie0Decimal * puissance(2,16) // décalage à gauche pour remettre la bonne valeur
 
Partie1Decimal est entier = 0
pour i = 16 a 1 pas -1
   Partie1Decimal  += etbinaire(MW1, puissance(2,i))
fin
 
NombreEntier est entier = Partie0Decimal + Partie1Decimal
 
NombreReel est reel // ou monétaire
 
NombreReel = NombreEntier * puissance(1,exp)
 
si pas s alors NombreReel = NombreReel *-(1)

A valider par plein de tests, bien sûr...

Merci frenchsting pour ton courage.
Je pensais qu'il existait une fonction ou alors comme pour Labview on pouvait s'en sortir avec 3 blocs de fonctions.

Apparemment Windev n'est pas sur le terrain scientifique ou automation.
Peut être que la version 20 ajoutera ce type de fonction de conversion de type de données...

J'essaierai de tester ton code pour marquer la discussion 'Résolue'.
Encore Merci.

[frenchsting]

Si il y a "lab" dans labview, c'est à mon avis parce que c'est orienté labo. Windev est généraliste...

et encore, imagine sans EtBianire, il faudrait utiliser et comparer toutes les puissances de 2

Mon code est un peu "sauvage" :
Pour le signe, on doit pouvoir faire mieux.
Pour l'exposant, remplace ma boucle des 8 puissances de 2 par la "vraie" valeur de cette somme...

Par contre, j'ai un doute pour l'exposant, s'il peur être négatif ou pas...

[davcaz]

Je vais quand même essayé de regarder avec la fonction Transfer

Cette fonction marche avec des octets, mais ça doit être faisable en décomposant mes mots 16 bits en 2 octets...

[frenchsting]

Pas sûr que ça marche avec transfert. Cette fonction va juste te "coller" les 2 variables.

[OnePoint]

Bonjour à tous,

C'est la norme IEEE.
J'avais oublié de le préciser mais cela me semblait évident en informatique pour coder entier, réel...etc en binaire.

Trouvé sur le net :

Ainsi le codage d'un réel en binaire se fait sous la forme suivante :

seeeeeeeemmmmmmmmmmmmmmmmmmmmmmm

le s représente le bit relatif au signe
les e représentent les bits relatifs à l'exposant
les m représentent les bits relatifs à la mantisse

Voila moi j'ai les 32 bits, ils faut que j'en tire la valeur du réel.
Les blocs Labview savent faire cette conversion mais en windev...

N'oublie pas d'être précis, car si tu regardes le site web IEEE Xplore, tu constateras qu'il y actuellement 1137 normes en vigueur publiées par l'IEEE
http://ieeexplore.ieee.org/xpl/stand...sp?reload=true

D'après ce que tu décris, il s'agit de la représentation d'un nombre à virgule flottante en binaire, en simple précision, décrit par la norme IEEE 754.

C'est aussi cette norme qui est utilisée pour coder les réels (flottants) dans WinDev.

Je vais quand même essayé de regarder avec la fonction Transfer

Cette fonction marche avec des octets, mais ça doit être faisable en décomposant mes mots 16 bits en 2 octets...

Pas sûr que ça marche avec transfert. Cette fonction va juste te "coller" les 2 variables.

Ici le nombre flottant est codé sur 4 octets.
Et tu récupère 2 mots de 2 octets
Supposons que %MW0 et %MW1 soient respectivement le mot de poids faible et le mot de poids fort.
Le transfert vers une variable de type réel sur 4 octets, en se câlant sur le bon mot à écrire, devrait faire l'affaire.

[davcaz]

Bravo OnePoint.

Rendons à César... voila un bout de code de Pat Biker qui donne à partir de 4 octets la valeur du réel associé:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
str4 est une structure
octet4 est un entier sans signe sur 1 octet
octet3 est un entier sans signe sur 1 octet
octet2 est un entier sans signe sur 1 octet
octet1 est un entier sans signe sur 1 octet
FIN
 
R est un réel sur 4 octets
 
vstr4 est un str4
 
vstr4:octet4 = 0x00
vstr4:octet3 = 0x00
vstr4:octet2 = 0xE8
vstr4:octet1 = 0x41
 
Transfer(&R, &vstr4, 4)
 
Info(R, "CQFD") // Affiche 29

Merci à OnePoint et Pat Biker, la discussion est résolue.

[DelphiManiac]

Je me permets de répondre même si la discussion est résolue ^^

La solution proposé est bonne, mais me semble un peu complexe. La suivante est à priori équivalente, mais plus concise. Cette solution ne change pas grand chose par rapport à la précédente, si ce n'est en performance. Sur un grand nombre de transformation l'impact doit être sensible. Par contre, il faudrait tout de même tester un peu plus que sur une valeur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Info(GetRealFromInt(0x0000, 0x41e8))

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
PROCEDURE GetRealFromInt(i1 est un entier sur 2 octets sans signe, i2 est un entier sur 2 octets sans signe) : réel sur 4 octets
r est un réel sur 4 octets
 
Transfer(&r, &i1, 2)
Transfer(&r+2, &i2, 2)
 
RENVOYER r

[frenchsting]

Effectivement, l'utilisation de Transfer bat tous les records...

[davcaz]

Merci DelphiManiac pour ce dernier code.