Войти
NeoBooker.ru
Добро пожаловать к нам в гости!
Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
  • Страница 1 из 1
  • 1
Модератор форума: Peter, DEMBEL, YURIY  
Как довести до ума тест?
levinДата: Пт, 26 Февраля 2010, 10:37 | Сообщение # 1
О, Великие Повелители НеоБук!
Нужна ваша помощь.
Сделал психологический тест по справке к НеоБук. Но возникла маленькая загвоздка: как сделать чтобы последняя переменная (в прикрепленном примере) V10 отображала не сумму баллов, а выводила полный результат для набравшего n-ое количество баллов. Например, пользователь набрал 17 баллов, а программа автоматически выводила текст:
"Вы знаете цену деньгам, а также то, на что и когда их потратить. Вам не свойственны ни расточительность, ни скупость. Такой гармоничный жизненный стиль обещает финансовое благополучие."
вместо:
"Менее 15 баллов. У вас широкая натура. Вы умеете радоваться жизни, любите тратить деньги... когда имеете для этого средства, а такое бывает далеко не всегда. В деловых начинаниях такой подход чреват излишним риском и недостаточной оценкой перспектив. Чуть больше осмотрительности вам не повредит. Формулу достатка вывел для вас Бенджамин Франклин: "Тратьте меньше, чем зарабатываете, - вот вам и философский камень".

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

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

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

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

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

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

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


Автор - levin
Дата добавления - 26 Февраля 2010 в 10:37
Alex3AДата: Пт, 26 Февраля 2010, 10:55 | Сообщение # 2
Друг клуба ММВ
Используй условные операторы if then.
 
СообщениеИспользуй условные операторы if then.

Автор - Alex3A
Дата добавления - 26 Февраля 2010 в 10:55
mishemДата: Пт, 26 Февраля 2010, 10:58 | Сообщение # 3
Эксперт форума
Если кол-во балов столько то, присвоить переменной такой то то-то и т.д.
Пример не смотрел, но думаю и так понятно.
Надеюсь что не ошибаюсь :)


Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



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

Автор - mishem
Дата добавления - 26 Февраля 2010 в 10:58
levinДата: Пт, 26 Февраля 2010, 11:14 | Сообщение # 4
Quote (Alex3A)
Используй условные операторы if then.

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

 
Сообщение
Quote (Alex3A)
Используй условные операторы if then.

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


Автор - levin
Дата добавления - 26 Февраля 2010 в 11:14
DEMBELДата: Пт, 26 Февраля 2010, 11:19 | Сообщение # 5
Наш дизайнер
Quote (levin)
Попробую про них в справке почитать...

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

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


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщение
Quote (levin)
Попробую про них в справке почитать...

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

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

Автор - DEMBEL
Дата добавления - 26 Февраля 2010 в 11:19
levinДата: Пт, 26 Февраля 2010, 11:27 | Сообщение # 6
Огромное спасибо за отнятое ваше время.
 
СообщениеОгромное спасибо за отнятое ваше время.

Автор - levin
Дата добавления - 26 Февраля 2010 в 11:27
СергейДата: Пт, 26 Февраля 2010, 11:41 | Сообщение # 7
Необукер
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 заменить только одну, где требуется двайная проверка



Сообщение отредактировано
Сергей - Пт, 26 Февраля 2010, 12:05
 
Сообщение
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 заменить только одну, где требуется двайная проверка


Автор - Сергей
Дата добавления - 26 Февраля 2010 в 11:41
mishemДата: Пт, 26 Февраля 2010, 12:02 | Сообщение # 8
Эксперт форума
Quote (DEMBEL)
а чего там читать-то...

Ну-ну, а потом в баню :D Подыскиваешь новых кандидатов? :D


Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.


Сообщение отредактировано
mishem - Пт, 26 Февраля 2010, 12:03
 
Сообщение
Quote (DEMBEL)
а чего там читать-то...

Ну-ну, а потом в баню :D Подыскиваешь новых кандидатов? :D

Автор - mishem
Дата добавления - 26 Февраля 2010 в 12:02
DEMBELДата: Пт, 26 Февраля 2010, 12:53 | Сообщение # 9
Наш дизайнер
ну я же просто шучу про баню

Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщениену я же просто шучу про баню

Автор - DEMBEL
Дата добавления - 26 Февраля 2010 в 12:53
mishemДата: Пт, 26 Февраля 2010, 13:00 | Сообщение # 10
Эксперт форума


Не хочешь читать хелп?

Если хелп и форум не помогли, тогда все ответы здесь



Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
 
Сообщение

Автор - mishem
Дата добавления - 26 Февраля 2010 в 13:00
  • Страница 1 из 1
  • 1
Поиск: