Скачать: CL | DM;

RandomRange   Найти похожие ветки 

← →
ElectriC ©   (2007-05-04 16:57) [0]

Как переписать функцию RandomRange для чисел типа Single (Extended)?

---

← →
{RASkov} ©   (2007-05-04 17:03) [1]

> [0] ElectriC ©   (04.05.07 16:57)

Во загнул.... Для чего тебе? Приведи пример твоего хотения.

---

← →
Desdechado ©   (2007-05-04 17:15) [2]

Нормировать к требуемому диапазону.
x=(x_сгенерир - x_min)/(x_max - x_min)

---

← →
ElectriC ©   (2007-05-06 02:41) [3]

> Во загнул.... Для чего тебе? Приведи пример твоего хотения.

Случайный позиции, расположения, скорость и т.д.(x,y,z) спрайтов(в Direct3D).

---

← →
ElectriC ©   (2007-05-06 02:42) [4]

> x=(x_сгенерир - x_min)/(x_max - x_min)

Спасибо, посмотрим(если будет работать)!

---

← →
Германн ©   (2007-05-06 02:53) [5]

> ElectriC ©   (06.05.07 02:41) [3]
>
>
> > Во загнул.... Для чего тебе? Приведи пример твоего хотения.
>
>
> Случайный позиции, расположения, скорость и т.д.(x,y,z)
> спрайтов(в Direct3D).
>

Лучше сначала подучить "матчасть". Имхо.

---

← →
Зюзя   (2007-05-06 08:27) [6]

Лучше сначала подучить "матчасть". Имхо.

Не, ну ты че, в натуре?! Какая матчасть? Ему бы игру до понедельника дописать! Помог бы лучше человеку спрайты рисовать!

---

← →
palva ©   (2007-05-06 10:03) [7]

> x=(x_сгенерир - x_min)/(x_max - x_min)

x=x_сгенерир*(x_max - x_min) + x_min

---

← →
{RASkov} ©   (2007-05-06 16:26) [8]

Вот два варианта, один(первый) уже предложенный выше:

function RandomRangeExt1(const FromV, ToV: Double): Double;
begin
 Result:=Random*(ToV - FromV) + FromV;
end;

function RandomRangeExt2(const FromV, ToV: Double): Double;
begin
 Result:=RandomRange(Trunc(FromV), Trunc(ToV-1))+Random
end;
Какой быстрее будет фик знает.... но думаю первый..

---

← →
{RASkov} ©   (2007-05-06 16:27) [9]

> Какой быстрее будет фик знает.... но думаю первый..

Да... и второй походу еще и не правильный :( Вообщем первый :)

---

← →
ElectriC ©   (2007-05-07 01:22) [10]

> function RandomRangeExt1(const FromV, ToV: Double): Double;
> begin  Result:=Random*(ToV - FromV) + FromV;end;

Работает, спасибо)))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.055 c