function GetStrings takes nothing returns nothing
player p = Quest_Player
integer pid = GetPlayerId(p)
LoadQuestDate(QuestData)
integer qn = quest_num
integer q_rang = quest_rang
integer quest_cond_num = quest_cond
LoadQuestDate(NpcData)
integer npctype = quest_npc_type
integer pos_in_quest = quest_pos
integer Handle = GetHandleId(p)
integer queststat = LoadInteger(udg_QuestStat, Handle, qn)
integer cond_queststat = LoadInteger(udg_QuestStat, Handle, quest_cond_num)
integer stage = LoadInteger(udg_Quest_Stage, Handle, qn) + 2
integer p_rang = udg_Player_rang[pid]
integer i = 9
if D_Condition_1() {
s[1] = 1;strings[1] = "О Местности"
s[2] = 1;strings[2] = "О себе"
s[3] = 1;strings[3] = "Квест"
}
if quest_selected[pid] {
if queststat == ready and npctype == npc_start_quest {s[4] = 1} // сдать
if queststat == started and stage == pos_in_quest and npctype == npc_sub_quest {s[5] = 1}
if queststat != faled {s[6] = 1}
if GetReput() > BAD and npctype == npc_start_quest and QuestStatus() == false{
if queststat == unstarted and p_rang == q_rang {
if quest_cond_num != 0 {
if cond_queststat == complited {s[7] = 1}
}
else {s[7] = 1}
}
}
if queststat == started {s[8] = 1}
s[14] = 1; strings[14] = "Назад"
}
if get_quest[pid] and quest_selected[pid] == false{
LoadNpcDate(QuestListData)
GetData = QuestData
loop
exitwhen i == 13
if trgact[i] != null {TriggerExecute(trgact[i]); trgact[i] = null}
s[i] = 1; strings[i] = quest_name ; quest_name = null
i++
endloop
if quest_selected[pid] == false{s[13] = 1; strings[13] = "Назад"}
}
if GetReput() > GOOD { LoadNpcDate(ClanData)
if D_Condition_1() and clan_leader{s[15] = 1;strings[15]="Рассказать о клане"}
elseif clan_selected[pid]{
if D_Condition_2() {
s[16] = 1;strings[16] = "Вступить в клан"
s[17] = 1;strings[17] = "Покинуть клан"
}
s[18] = 1;strings[18]="Назад"
}
LoadNpcDate(SkillData)
if D_Condition_1() and can_teach {s[19] = 1;strings[19] = "Попросить обучить"}
elseif skill_selected[pid] {
if D_Condition_2() {
s[20] = 1;strings[20] = "Попросить рассказать о способности"
s[21] = 1;strings[21] = "Обучится"
}
s[22] = 1; strings[22] = "Назад"
}
}
s[23] = 1; strings[23] = "Выход"
endfunction