[lsr]

Каким образом можно прекратить/изменить выполнение RND() или выйти из цикла в случае некорректного значения Rnd ?

В общем есть 7 слоев фрагментов из 16 возможных, необходимо тиражировать по дуге  Fragment2  в случайном порядке. В некоторых случаях на одном шаге отображаютcя все слои,  вероятно RND принимает значение = 0, а такого слоя не существует, вот и клепает все слои.
Пробовал делать ограничение через Values - тоже не прокатило. Запарился что-то, не могу сообразить как устранить глюк. Конечно можно создать копию на плане и там рэндом примет корректные значения, но сие не есть кашерно.

Код: [Выделить]

FOR N=1 to NP
ADD2 0, RAD_out
IF  rnd(16) < EPS  THEN 7
FRAGMENT2 rnd(16),0
7:
DEL 1
  ROT2 ANG
  NEXT N
DEL NPЭлемент приложен.
Можно конечно ввести доп. переменную и сгенерировать новое значение напр.

Код: [Выделить]

RN=rnd(NC)
IF RN-EPS < rnd(2) THEN RN=1
FRAGMENT2 RN,1Опять же это лишь случайное устранение проблемы, как собственно и сама RND.
Есть ли другое решение?

[SABRUS]

м.б. rnd(15)+1 ?

[lsr]

Спасибо попробую по вашему

Только я пробовал делать почти так же.
Заводил ограничение в скрипт параметров VALUES "fr" range [1,15]

fr=fr+1
Fragment2 RND(fr),1

Не работал мой скрипт.

Upd
Ура, спасибо огромное! Сработал Ваш вариант. Только я не пойму в чем разница между моим приращением в единичку и Вашим.
fr=fr+1 и rnd(15)+1 на мой взгляд одно и то же.

В школе арифметику не уважал, да и давно это было.

[Valery W]

В справке написано:
RND (x) Возвращает случайное значение действительного типа между 0.0 и х. (х > 0.0)
Тут наверно надо было написать ни "между", а "от 0.0 и до х включительно". Т.е., и 0.0, и х включаются в эти значения.