pascalabcnet/InstallerSamples/WhatsNew/3_11_1/Lerp_Remap.pas

13 lines
674 B
ObjectPascal

begin
// Примеры использования Lerp:
var x := Lerp(10, 20, 0.5); // x = 15 (середина между 10 и 20)
var y := Lerp(0, 100, 0.25); // y = 25 (четверть пути от 0 до 100)
var z := Lerp(5, 15, 0.0); // z = 5 (начало отрезка)
Println(x,y,z);
// Примеры использования Remap:
var a := Remap(0.5, 0, 1, 0, 100); // a = 50 (0.5 → 50%)
var b := Remap(75, 0, 100, 0, 1); // b = 0.75 (75% → 0.75)
var c := Remap(15, 10, 20, 0, 200); // c = 100 (15 посередине между 10 и 20 → 100 посередине между 0 и 200)
Println(a,b,c);
end.