Как довести до ума тест? - Вопросы и ответы по NB - Всё о программе Neo Book

Страница 1 из 1

Модератор форума: Peter

Форум MMB » Всё о программе Neo Book » Вопросы и ответы по NB » Как довести до ума тест?

Как довести до ума тест?

levin

Дата: Пятница, 26 Февраль 2010, 10:37 | Сообщение # 1

Новый участник

Группа: Пользователи

Сообщений: 9

Репутация: 0

Награды: 0

Статус: Offline

О, Великие Повелители НеоБук!
Нужна ваша помощь.
Сделал психологический тест по справке к НеоБук. Но возникла маленькая загвоздка: как сделать чтобы последняя переменная (в прикрепленном примере) V10 отображала не сумму баллов, а выводила полный результат для набравшего n-ое количество баллов. Например, пользователь набрал 17 баллов, а программа автоматически выводила текст:
"Вы знаете цену деньгам, а также то, на что и когда их потратить. Вам не свойственны ни расточительность, ни скупость. Такой гармоничный жизненный стиль обещает финансовое благополучие."
вместо:
"Менее 15 баллов. У вас широкая натура. Вы умеете радоваться жизни, любите тратить деньги... когда имеете для этого средства, а такое бывает далеко не всегда. В деловых начинаниях такой подход чреват излишним риском и недостаточной оценкой перспектив. Чуть больше осмотрительности вам не повредит. Формулу достатка вывел для вас Бенджамин Франклин: "Тратьте меньше, чем зарабатываете, - вот вам и философский камень".

15-20 баллов. Вы знаете цену деньгам, а также то, на что и когда их потратить. Вам не свойственны ни расточительность, ни скупость. Такой гармоничный жизненный стиль обещает финансовое благополучие.

Свыше 20 баллов. Вы расчетливы, экономны и даже, извините, скуповаты. Неохотно расстаетесь с деньгами, рискованных предприятий стараетесь избегать. Это оберегает вас от убытков, но, увы, не сулит большего удовольствия от вложений и приобретений."

Надеюсь на вашу помощь.

Прикрепления: test.rar(11Kb)

Alex3A

Дата: Пятница, 26 Февраль 2010, 10:55 | Сообщение # 2

Друг клуба ММВ

Группа: Проверенные

Сообщений: 2957

Репутация: 31

Награды: 10

Статус: Offline

Используй условные операторы if then.

mishem

Дата: Пятница, 26 Февраль 2010, 10:58 | Сообщение # 3

Ветеран форума

Группа: Проверенные

Сообщений: 751

Репутация: 6

Награды: 2

Статус: Offline

Если кол-во балов столько то, присвоить переменной такой то то-то и т.д.
Пример не смотрел, но думаю и так понятно.
Надеюсь что не ошибаюсь

Я люблю думать что умею рисовать

levin

Дата: Пятница, 26 Февраль 2010, 11:14 | Сообщение # 4

Новый участник

Группа: Пользователи

Сообщений: 9

Репутация: 0

Награды: 0

Статус: Offline

Quote (Alex3A)

Используй условные операторы if then.

Попробую про них в справке почитать...

DEMBEL

Дата: Пятница, 26 Февраль 2010, 11:19 | Сообщение # 5

Наш дизайнер

Группа: Модераторы

Сообщений: 2314

Репутация: 25

Награды: 12

Статус: Offline

Quote (levin)

Попробую про них в справке почитать...

а чего там читать-то...

Code

if "[v10]" "=" "17"
AlertBox "Результат" "Вы знаете цену деньгам..."
EndIf
if "[v10]" "<" "15"
AlertBox "Результат" "У вас широкая натура. Вы умеете ра..."
EndIf

и так далее...

levin

Дата: Пятница, 26 Февраль 2010, 11:27 | Сообщение # 6

Новый участник

Группа: Пользователи

Сообщений: 9

Репутация: 0

Награды: 0

Статус: Offline

Огромное спасибо за отнятое ваше время.

Сергей

Дата: Пятница, 26 Февраль 2010, 11:41 | Сообщение # 7

Необукер

Группа: Проверенные

Сообщений: 2236

Репутация: 23

Награды: 12

Статус: Offline

Quote (DEMBEL)

и так далее...

мона немного упростить с IFEX

Code

IfEx "[v10]<=15"
        SetVar "[out]" "лузер"
EndIf
IfEx "[v10]>15 AND [v10]<=20"
        SetVar "[out]" "так себе"
EndIf
IfEx "[v10]>20"
        SetVar "[out]" "реальный перец"
EndIf

как то так

Добавлено (26 Февраль 2010, 11:41)
---------------------------------------------
либо IFEX заменить только одну, где требуется двайная проверка