Распределение случайностей Опции

[d`ArcZeal]

Доброго времени суток.

Стоит задача:
При клике на предмет выдается что-то одно из:
С 15% случайное оружее
С 20% случайная часть доспеха
С 20% случайный реагент
С 25% случайное зелье
Если ничего из этого не выпало, то выдается 1 Bandage

Код

LOCAL.HELL_QUEST_CHEST_GEN=<R100>
IF (15 > <DLOCAL.HELL_QUEST_CHEST_GEN>)
SERV.NEWITEM=I_RANDOM_WEAPON
ELIF (35 > <DLOCAL.HELL_QUEST_CHEST_GEN>)
SERV.NEWITEM=I_RANDOM_ARMOR
ELIF (55 > <DLOCAL.HELL_QUEST_CHEST_GEN>)
SERV.NEWITEM=I_RANDOM_REAGENT
ELIF (80 > <DLOCAL.HELL_QUEST_CHEST_GEN>)
SERV.NEWITEM=I_RANDOM_BOTTLE
ELSE
SERV.NEWITEM=I_BANDAGE
ENDIF

Если все верно логике, то как-то иначе, понятнее, расписать алгоритм рандома есть предложения?

[d`ArcZeal]

Неудобно. В этом часть сути вопроса.

А что, если при выпадении вероятности будет давать
DORAND 2
SERV.NEWITEM=I_RANDOM_WEAPON_1
SERV.NEWITEM=I_RANDOM_WEAPON_2
ENDDO

то local.item = вариант не подходит. Хочется универсальный, читабельный вариант.




------------------------------------
Если такой вариант:

Код

if rand(100) < 15

Код

IF (15 > <R100>)
SERV.NEWITEM=I_RANDOM_WEAPON
ELIF (20 > <R100>)
SERV.NEWITEM=I_RANDOM_ARMOR
ELIF (20 > <R100>)
SERV.NEWITEM=I_RANDOM_REAGENT
ELIF (25 > <R100>)
SERV.NEWITEM=I_RANDOM_BOTTLE
ELSE
SERV.NEWITEM=I_BANDAGE
ENDIF

Он логически не верен. Шанс выпадения I_RANDOM_BOTTLE будет не 25%