girvel, ну уже выше я говорил о троице. Ну или есть стих, в котором говорится, что воздержание от употребления пищи и вступления в брак - учение демонов. ВНЕЗАПНО, что бы быть Патриархом, обязательным требованием является отказ от вступления в брак. Согласно этому Патриарх служитель демонов :nate:

Ну уж если прям совсем прагматично рассуждать, то любая христианская церковь, у которой "дипломатические отношения" с другими церквями являются сами не ложной церковью, по той простой причине, что в библии ясно сказано, что будет только 1 истинная церковь, следовательно если верна одна, то все остальные не верные. Так же в библии даются указания, скажем так "не дружить" с ложными церквями по понятным причинам.

Используя эту "установку" можно отсеять ~95% христианских церквей разного толка. Далее идет 2-я установка. Любая церковь которая имеет заимствования из других религий ложная. В целом этот метод не принесет никаких результатов после использования 1-й установки, но если использовать отдельно, то тоже будет недурной результат... Ну и добить можно отсеяв церкви, которые используют в учении литературу, которая не опирается на библию, или кто отрицает какие либо главы библии, проще говоря пытаются исказить содержание библии. После всего этого останется не более 10-ка претендентов(ориентировочно 2-3).
И последней валидацией на истинность будет анализ деятельности церкви. Истинная церковь должна заниматься массовой проповедью и донести истину до каждого человека. Полистав баш, посмотрев некоторые попсовые фильмы можно прийти к выводу, что самая активная организация это Свидетели Иеговы(думаю практически нет людей к которым они не приходили). Ну и что бы быть реально прагматичным и объективным, можно подтвердить что они самая активная организация тем, что их журналы публикуются самым большим тиражом в мире(яндекс показывает следующее - Тираж:
выпуск для распространения — 42 182 000, выпуск для изучения — 14 500 000) и переводится практически на все языки мира(если память не изменяет на ~200 языков). Для сравнения, ридерз дайджест выпускается тиражом ~20млн, и переводится на 21 язык. Исходя из этих данных и вышеописанных критериев, могу сказать что данная церковь наиболее вероятный кандидат на роль истинной христианской церкви.

Ссылаясь на оценку западных работодателей(которые более прагматичны, когда дело касается бизнеса), то они часто отдают предпочтение людям которые являются СИ, по той простой причине, что они имеют белоснежную репутацию(Выигранные судебные дела и экспертизы подтверждают это).

Информация выше лишь мое имхо и результат анализа и наблюдения, так же это не какая то исследовательская работа, по этому я могут содержаться ошибки и неточности. Отдельно для интеллектуального большинства подчеркну, что не являюсь СИ, хотя некоторых представителей это конфессии знаю лично и отношусь к ним положительно, хотя честно говоря есть определенные личности, с которыми я так же лично знаком и которым я бы не дал положительной характеристики. В целом же мой столь пристальный интерес мотивирован тем, что это весьма актуальный вопрос, ну и я сам ярый адепт истины в любом виде. к примеру сейчас я озабочен нашей истинной историей, которую, могу с уверенностью сказать, весьма наглым способом переписали, тем самым украв прошлое нашей страны. К сожалению вопрос не такой простой, так как большинство исторических документов целенаправленно были уничтожены(к примеру когда сгорела Александрийская библиотека, в мире сгорело еще несколько крупных библиотек, и это не единичный случай, когда массового горели главные библиотеки человечества) и ответ не лежит прямо на поверхности, как в случае с христианством :\

scope LoseGroop initializer Init

StartQuest
QuestHead
quest_single = true
quest_repeat = false
quest_num = 89
quest_name = "Пропавшая группа"
quest_req_rep = 50
quest_rang = D
quest_for_clan = konoha_shinobi
quest_vs_clan = none
quest_cond = 0
quest_cond_other = false
quest_cond_status = unstarted
quest_stages = 32
quest_rew = 'I00G'
quest_exp = 0
quest_money = 100
quest_npc[0] = Npc_Unit[161]
adv
quest_npc[2] = Npc_Unit[286]
quest_npc[3] = Npc_Unit[117]
quest_npc[4] = Npc_Unit[117]
trap
quest_npc[6] = Npc_Unit[158]
quest_npc[7] = Npc_Unit[158]
escort
quest_npc[9] = Npc_Unit[158]
quest_npc[10] = Npc_Unit[158]
quest_npc[11] = Npc_Unit[158]
trap
quest_npc[13] = Npc_Unit[159]
quest_npc[14] = Npc_Unit[159] goto 21
escort
quest_npc[16] = Npc_Unit[159]
quest_npc[17] = Npc_Unit[159] goto 21
find items
quest_npc[19] = Npc_Unit[159]
quest_npc[20] = Npc_Unit[159]
trap
quest_npc[22] = Npc_Unit[160] goto 27
quest_npc[23] = Npc_Unit[160] mob-killing
quest_npc[24] = Npc_Unit[160]
quest_npc[25] = Npc_Unit[160]

quest_npc[27] = Npc_Unit[160]
quest_npc[28] = Npc_Unit[160]
escort
quest_npc[30] = Npc_Unit[160]
quest_npc[31] = Npc_Unit[160] Pursuit
quest_npc[32] = Npc_Unit[161]
EndQuestHead

IsNpcIdAndStage(161, 1)

Replicas
npc_ask = "Группа шиноби которых я направил в разведку на юг страны давно не выходит на связь. Возможно с ними что то произошло."
quest_tips = "Узнайте что случилось с группой шиноби которая патрулировала Юг страны Огня."
strHELP = "Детали миссии"
strMEAN = "Принять миссию"
strEXIT = "Отказатся от миссии"
qweHELP = "Какова моя задача?"
qweMEAN = "Что ж, я постараюсь что нить разузнать о твоей группе."
qweEXIT = "Я слишком занят"
ansHELP = "Нужно добыть любые сведения о группе. Если что то с ними произошло, то нужно спасти их."
ansMEAN = "Рядом с местом в которое я отправил есть небольшая деревушка. Лучше всего начать поиск с нее."
ansEXIT = "Всеравно спасибо"
EndReplicas

QuestActions
MeanAction
CreateQuestAdventure(12000.,-24200., 600., "Вы добрались до деревушки. Вам стоит поспрашивать у местных о судьбе шиноби, быть может они что то знают...", "");
EndAction
EndQuestActions


IsNpcIdAndStage(286, 3)

Replicas
npc_ask = "Чего нужно?"
quest_tips = "Найдите шиноби о котором говорил стражник"
strMEAN = "Спросить о группе"
qweMEAN = "Я ищу группу шиноби из селения Листа которую недавно направили в этот регион. Они должны были остановиться здесь. Ты что нибудь знаешь?"
ansMEAN = "Хм, я особо не вкурсе, но вроде бы один из группы сейчас в деревне."
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(117, 4)

Replicas
npc_ask = "*Не реагирует на ваше присутствие*"
strMEAN = "Спросить о группе"
qweMEAN = "Эй! Ты же из группы шиноби которую послали на миссию в этот регион?"
ansMEAN = "*Никак не реагирует*"
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(117, 5)

Replicas
quest_tips = "По всей видимости от шиноби не получиться добиться ответа.\n Отправляйтесь в разведку, быть может найдутся какие нить зацепки."
strMEAN = "Спросить еще раз"
qweMEAN = "Эй! Я с тобой разговариваю, ты слышишь?"
ansMEAN = "*Никак не реагирует*"
EndReplicas

QuestActions
MeanAction
CreateQuestAdventureWithTrap(11000., -27000., 600., Bandit, 5, "Судя по этой засаде вас явно ждали. Разберитесь с бандитами и постарайтесь что нить узнать о судьбе остальных шиноби")
EndAction
EndQuestActions

IsNpcIdAndStage(158, 7)

Replicas
npc_ask = "Тебя послали за мной?"
strMEAN = "Говорить"
qweMEAN = "Ты один из тех шиноби которых послали в этот регион с миссией?"
ansMEAN = "Да. Слушай, нам нужно торопиться. Что то произошло, и нападавшие бросили меня тут и куда то ушли. Но я боюсь они могут скоро вернутся."
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(158, 8)

Replicas
quest_tips = "Сопроводите спасенного шиноби в деревню"
strMEAN = "Говорить"
qweMEAN = "Хорошо, ты сможешь идти сам?"
ansMEAN = "Да, поторопимся."
EndReplicas

QuestActions
MeanAction
Escort(Npc_Unit[158], 12600.0 , -24300.0 , "Вы успешно добрались до деревни", "Вы не смогли спасти шиноби, миссия провалена", "Шиноби",Bandit)
EndAction
EndQuestActions

IsNpcIdAndStage(158, 10)

Replicas
npc_ask = "Спасибо тебе за помощь."
strMEAN = "Говорить"
qweMEAN = "Не думаю, что они нападут в открытую на нас здесь, по этому мне кажется что тебе стоило бы рассказать что же произошло с вашей группой."
ansMEAN = "Нашей целью была разведка. Когда мы начали исследовать регион, мы обнаружили большое количество шиноби отступников и прочей нечисти. Передвигаться группой стало опасно и мы решили разделится. Вскоре меня обнаружили, что с остальными я не в курсе. Возможно их тоже поймали..."
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(158, 11)

Replicas
strMEAN = "Говорить"
qweMEAN = "Что ж, спасибо за сведения. Кстати один из вашей группы в деревне. Но... как бы это сказать... он странно себя вел. Я пытался задавать ему вопросы о произошедшем, но он как будто меня не замечал"
ansMEAN = "Тогда я отправлюсь к нему, быть может когда он увидит меня ему станет лучше."
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(158, 12)

Replicas
quest_tips = "Отправляйтесь в поиски сведений об остальных членах группы"
strMEAN = "Говорить"
qweMEAN = "Хорошо, удачи, я постараюсь найти зацепки об остальных"
ansMEAN = "Будь осторожен."
EndReplicas

QuestActions
MeanAction
UnitOrderMoveToPoint(Npc_Unit[158], 13170.0, -24100.0, 320.0)
CreateQuestAdventureWithTrap(16000., -28300., 1000., Bandit, 5, "Судя по этой засаде вас явно ждали. Разберитесь с бандитами и постарайтесь найти зацепки о других шиноби")
EndAction
EndQuestActions

IsNpcIdAndStage(159, 14)

Replicas
npc_ask = "Эй, ты шиноби селения листа? Помоги мне отсюда выбраться..."
strMEAN = "Говорить"
qweMEAN = "Ты шиноби из группы которую послали в этот регион с миссией?"
ansMEAN = "Нет, но если ты мне поможешь мне спастись, я поделюсь ценными сведениями"
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(159, 15)

Replicas
strGOOD = "Спасти"
qweGOOD = "Хорошо, я помогу тебе, ты как, *вы замечаете легкие ранения* сам сможешь идти?"
ansGOOD = "Думаю да, это лишь царапины..."

strEVIL = "Бросить"
qweEVIL = "В мою миссию не входит спасение посторонних, пускай даже ты шиноби нашей деревни. Прощай"
ansEVIL = "Черт... если я выберусь, я тебе это припомню..."
EndReplicas

QuestActions
GoodAction
Escort(Npc_Unit[159], 12600.0 , -24300.0 , "Вы успешно добрались до деревни", "Вы не смогли спасти шиноби, миссия провалена", "Шиноби",Bandit)
EndAction
EvilAction
GoToStage(21);
CreateQuestAdventureWithTrap(18800., -28300., 600., Bandit, 5, "Судя по этой засаде вас явно ждали. Разберитесь с бандитами и постарайтесь найти зацепки о других шиноби")
EndAction
EndQuestActions

ветка квеста в котором игрок играет роль хорошего шиноби

IsNpcIdAndStage(159, 17)

Replicas
quest_tips = "Отправляйтесь в поиски сведений об остальных членах группы"
npc_ask = "Мы добрались... *теряет сознание*"
strMEAN = "Говорить"
qweMEAN = "Эй! Эй! Что с тобой? *шиноби не реагирует*. *Вы быстро осматриваете его раны и замечаете что раны были не простыми, они были нанесены ядовитым оружием*"
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(159, 18)

Replicas
strGOOD = "Спасти"
qweGOOD = "Держись, сейчас я соберу травы и сделаю противоядие!"

strEVIL = "Оставить умирать"
qweEVIL = "Что ж, видимо такова твоя судьба..."
EndReplicas

QuestActions
GoodAction
CreateNItemInRange('I01W', 5, "Лечебные травы","Вы собрали достаточно лечебных трав", 11500., -24600., 1000., false, onGRASS)
EndAction
EvilAction
GoToStage(21);
CreateQuestAdventureWithTrap(18800., -28300., 600., Bandit, 5, "Судя по этой засаде вас явно ждали. Разберитесь с бандитами и постарайтесь найти зацепки о других шиноби")
EndAction
EndQuestActions

IsNpcIdAndStage(159, 20)

Replicas
npc_ask = "*Шиноби выглядит плохо и у него бред*"
strMEAN = "Использовать травы"
qweMEAN = "*Из собранных трав вы сделали противоядие, остается только ждать*"
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(159, 21)

Replicas
npc_ask = "*Шиноби пришел в себя* Спасибо тебе дружище... если бы не ты... я бы точно погиб. Я обязан тебе жизнью дважды"
strMEAN = "Спросить про сведения"
qweMEAN = "Ты сказал, что у тебя есть какие то ценные сведения"
ansMEAN = "На самом деле я соврал. Прости. Но за то что ты спас меня аж дважды, я не могу тебя не отблагодарить."
EndReplicas

QuestActions
MeanAction
AddRewardItem('I01V', "Получено: Взрывные кунаи х3")
CreateQuestAdventureWithTrap(18800., -28300., 600., Bandit, 5, "Судя по этой засаде вас явно ждали. Разберитесь с бандитами и постарайтесь найти зацепки о других шиноби")
EndAction
EndQuestActions

IsNpcIdAndStage(160, 23)

Replicas
npc_ask = "Эй, тише! Тут вокруг полно врагов!"
strGOOD = "Помолчать"
qweGOOD = "*Вы избежали обнаружения*"
ansGOOD = "Отлично. Опасность миновала."

strMEAN = "Говорить"
qweMEAN = "*Вы выдали себя*"
ansMEAN = "Черт! Я же говорил"
EndReplicas

QuestActions
GoodAction
EndAction
MeanAction
GoToStage(26);
SpawnQuestMob(Bandit,4, 19300. , -26700. , 45. , 500., null, "Вы убили бандитов", "Бандиты скрылись и выдали ваше месторасположение. Миссия провалена.")
EndAction
EndQuestActions

IsNpcIdAndStage(160, 24)

Replicas
strMEAN = "Говорить"
qweMEAN = "Ты шиноби из группы которую послали на разведку в этот регион?"
ansMEAN = "Да. Я из этой группы, тебя послали к нам на помощь?"
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(160, 25)

Replicas
strMEAN = "Говорить"
qweMEAN = "Не совсем. Меня основная задача узнать о вашей судьбе."
ansMEAN = "Понятно, но знаешь, помощь мне бы не помешала. Нашей группе пришлось разделиться. Судя по всему некоторые попали в плен. Я пытаюсь узнать их месторасположение и попытаться спасти товарищей"
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(160, 26)

Replicas
strMEAN = "Говорить"
qweMEAN = "Не стоит беспокоиться, я уже выручил твоих товарищей, они в целости и сохранности в деревушке неподалеку"
ansMEAN = "Так значит все спасены? Со всеми все в порядке?"
EndReplicas

QuestActions
MeanAction
GoToStage(26);
EndAction
EndQuestActions

27 точка пересечения

IsNpcIdAndStage(160, 28)

Replicas
npc_ask = "Эй! Ты! Ублюдок! Ты хоть понимаешь что я из за тебя теперь не смогу спасти своих товарищей?!"
strMEAN = "Говорить"
qweMEAN = "Успокойся, я уже выручил твоих товарищей, они в целости и сохранности в деревушке неподалеку"
ansMEAN = "Так значит все спасены? Со всеми все в порядке? Тогда мне больше нечего здесь делать."
EndReplicas

QuestActions
EndQuestActions

IsNpcIdAndStage(160, 29)

Replicas
quest_tips = "Вернитесь с последним шиноби в деревню"
strMEAN = "Говорить"
qweMEAN = "Да. Давай возвращаться."
ansMEAN = "Хорошо, думаю действительно лучше будет встретиться с остальными."
EndReplicas

QuestActions
MeanAction
Escort(Npc_Unit[160], 12600.0 , -24300.0 , "Вы успешно добрались до деревни", "Вы не смогли спасти шиноби, миссия провалена", "Шиноби",Bandit)
EndAction
EndQuestActions

IsNpcIdAndStage(160, 31)

Replicas
npc_ask = "Спасибо за то что помог мне и моим товарищам, я перед тобой в долгу"
strMEAN = "Попрощаться"
qweMEAN = "Что ж, на этом моя миссия тут завершена, мне нужно вернуться в селение Листа и сообщить о том что вы живы."
ansMEAN = "Я понимаю, что это эгоистично, но не мог бы ты помочь еще кое чем? Доставь пожалуйста в селение Листа этот отчет. Он очень важен."
EndReplicas

QuestActions
EndQuestActions


IsNpcIdAndStage(160, 32)

Replicas
quest_tips = "Вернитесь в селение Листа"
strMEAN = "Взять отчет"
qweMEAN = "Хорошо, я доставлю твой отчет в селение Листа."
ansMEAN = "Будь осторожен по дороге обратно."
EndReplicas

QuestActions
MeanAction
CreatePursuit(Bandit)
EndAction
EndQuestActions

IsNpcIdAndStage(161, 33)

Replicas
npc_ask = "Я смотрю ты вернулся. Ты смог узнать что случилось с отправленной группой?"
strMEAN = "Говорить"
qweMEAN = "Да. Группа которую вы отправили в южный регион с разведкой был атакована превосходящими силами. Мне удалось их спасти. Потерь среди группы нет. Так же они попросили передать этот отчет."
ansMEAN = "Значит все целы? Что ж отлично. *Читает отчет* Спасибо за работу. Можешь идти."
EndReplicas

QuestActions
SetUnitPositionOnStartPosition(Npc_Unit[158])
SetUnitPositionOnStartPosition(Npc_Unit[159])
SetUnitPositionOnStartPosition(Npc_Unit[160])
EndQuestActions

EndQuest
endscope