Équivalent de la fonction MAP du C

Bonjour,

Me revoilou avec mes questions bizares :lol:

En C, on utilise MAP pour calibrer une valeur :

Code:

---

int axeay = map(ay, -17000, 17000, 0, 180);

---

Mais...en Pascal ? Une équivalence ?

Merci de m'avoir lu.
J'oubliais, c'est pour convertir en degrés des valeurs de capteur d'angle.

Code:

---

1 2 3 4 5 6 7 8 9

function map(const X: double; const fromLow, fromHigh, toLow, toHigh: double): double; var a,b: double; begin a := (toHigh - toLow) / (fromHigh - fromLow) ; b := -fromLow * a; Result := a * x + b; end;

---

Salut

Code:

---

1 2 3 4

long map(long x, long in_min, long in_max, long out_min, long out_max) { return (x - in_min) * (out_max - out_min) / (in_max - in_min) + out_min; }

---

ce qui donne

Code:

---

1 2 3 4 5

Function map(x,in_min,in_max,out_min,out_max : Longint) : Longint; Begin Result := (x - in_min) * (out_max - out_min) div (in_max - in_min) + out_min; End;

---

Merci beaucoup à tous les deux, je regarde ça lundi :)

Bonjour,

Pour donner un peu plus de sécurité, j'ajouterais deux tests :

Code:

---

1 2 3 4 5 6

function map(x, xmin, xmax, ymin, ymax : Longint) : Longint; begin if x <= xmin then exit(ymin); if x >= xmax then exit(ymax); Result := ((x - xmin) * (ymax - ymin) + (xmax - xmin) div 2) div (xmax - xmin) + ymin; end;

---

D'une part, si xmin = xmax, on sort avant la division fatale par 0 avec une valeur relativement pertinente et, d'autre part, la sortie reste strictement dans [ymin..ymax] même si l'entrée x est hors jeu.

J'ai ajouté un arrondi pour faire joli : (xmax - xmin) div 2.

Salutations