[{"id":1,"text":"   Автор: theuRay<s>n<s>n   Перед любым человеком стоит три предназначения: <s>"сын, дом, дерево<s>". Но для Квестописца есть и четвёртое предназначение: написание квеста. Выполни все четыре предназначения, которые стоят перед тобой, чтобы пройти эту виртуальную жизнь.<s>n<s>n   В квесте есть:<s>n— свой кабинет автора, и инстументы для управления в нём;<s>n— свои номера и названия квестов, которые можно изменить на желаемые;<s>n— у каждого квеста свои лайки и дизлайки, и возможность их продвижения через рубрику <s>"воскресный спойлер<s>";<s>n— свой Кворум Квестописцев и возможность стать в нём модератором;<s>n— пачка компьютерных игр, которые можно проходить, тем самым поднимая настроение;<s>n— своя MMORPG с выбором класса и прокачкой на локациях;<s>n— свои авторы, которые пишут свои квесты, пока ты играешь в этот квест сам;<s>n— свой рейтинг авторов, в котором можно занять заслуженное первое место, но другие авторы тоже не ждут;<s>n— пять различных мелодий, которые можно переключать (с ресурса: www.bensound.com).","answers":[{"id":2,"text":"Начать симуляцию","lua_do":"function lua_do()<s>ng.start = g.start or 1<s>ng.image_part_of_screen = 0.2<s>nend","var_str_set":["global bg_music","musicC"]},{"id":1,"text":"","bgImg":"","system":true},{"initSounds":["musicA","http://188.120.236.127/SimKvestopisca/musicA.mp3"],"super_calculate":false,"id":1,"calculate":true,"text":"Новый ответ. введите текст"},{"initSounds":["musicB","http://188.120.236.127/SimKvestopisca/musicB.mp3"],"super_calculate":false,"id":1,"calculate":true,"text":"Новый ответ. введите текст"},{"initSounds":["musicC","http://188.120.236.127/SimKvestopisca/musicC.mp3"],"super_calculate":false,"id":1,"calculate":true,"text":"Новый ответ. введите текст"},{"initSounds":["musicD","http://188.120.236.127/SimKvestopisca/musicD.mp3"],"super_calculate":false,"id":1,"calculate":true,"text":"Новый ответ. введите текст"},{"initSounds":["musicE","http://188.120.236.127/SimKvestopisca/musicE.mp3"],"super_calculate":false,"id":1,"calculate":true,"text":"Новый ответ. введите текст"}]},{"id":2,"text":"   Выберите имя из предложенных или впишите своё (от 2 до 30 букв).","answers":[{"id":2,"text":"nemo","url":"http://188.120.236.127/SimKvestopisca/Back.png"},{"lua_text":"function lua_text()<s>nlocal text = utf8.len(inputText.text)<s>nreturn <s>"Введено символов: <s>" .. text<s>nend","id":2,"text":"  значение ч =","update":[0.5],"comment":true},{"id":2,"text":"Начать с этим именем","lua_do":"function lua_do()<s>ntext55 = inputText.text or <s>"noname<s>"<s>nif utf8.len(text55) < 2 or utf8.len(text55) > 30 then <s>n   message(<s>"Для имени необходимо от 2 до 30 символов.<s>")<s>nelse<s>n   showPage {id = 3}<s>n   display.remove(inputText)<s>nend<s>nend","no_transition":true},{"super_calculate":false,"lua_do":"function lua_do()<s>nrname = { <s>"Ленивый<s>", <s>"Самоотверженный<s>", <s>"Любопытный<s>", <s>"Обворожительный<s>", <s>"Гутаперчевый<s>", <s>"Романтичный<s>", <s>"Экстравагантный<s>", <s>"Потерянный<s>", <s>"Сонный<s>", <s>"Неуверенный<s>", <s>"Лютый<s>", <s>"Неистовый<s>", <s>"Неунывающий<s>", <s>"Непоколебимый<s>", <s>"Деятельный<s>", <s>"Великолепный<s>", <s>"Восхитительный<s>", <s>"Потрясающий<s>", <s>"Бесподобный<s>", <s>"Изысканный<s>", <s>"Замечательный<s>", <s>"Чудесный<s>", <s>"Чудный<s>", <s>"Чудной<s>", <s>"Милый<s>", <s>"Счастливый<s>", <s>"Славный<s>" }<s>nname = { <s>"Геймер<s>", <s>"Зевака<s>",<s>"Авантюрист<s>", <s>"Герой<s>", <s>"Самозванец<s>", <s>"Писатель<s>", <s>"Автор<s>", <s>"Бог<s>", <s>"Зазнайка<s>", <s>"Кудесник<s>", <s>"Неудачник<s>", <s>"Долгописец<s>", <s>"Индеец<s>", <s>"Кузнец<s>", <s>"Скрипач<s>", <s>"Мышь<s>", <s>"Ленивец<s>",  <s>"Гений<s>", <s>"Прозаик<s>", <s>"Драматург<s>", <s>"Поэт<s>", <s>"Романист<s>", <s>"Литературовед<s>", <s>"Эссеист<s>", <s>"Новеллист<s>", <s>"Литератор<s>", <s>"Публицист<s>", <s>"Историк<s>", <s>"Критик<s>", <s>"Беллетрист<s>", <s>"Сатирик<s>", <s>"Очеркист<s>", <s>"Фантаст<s>", <s>"Сочинитель<s>", <s>"Стихотворец<s>", <s>"Фельетонист<s>", <s>"Графоман<s>", <s>"Сказочник<s>", <s>"Деятель<s>" }<s>n<s>narg = 0<s>nfor k in pairs(name) do<s>nif name[k] then<s>narg = arg <plus> 1<s>nend end<s>n<s>nrarg = 0<s>nfor k in pairs(rname) do<s>nif rname[k] then<s>nrarg = rarg <plus> 1<s>nend end<s>nend","calculate":true,"text":"   ","id":2},{"super_calculate":true,"lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.2<s>nimages.nemo.isVisible = false<s>ninputText = native.newTextBox(canvas.width / 2, canvas.height / 1.3, canvas.width / 1.3, canvas.height / 2.2)<s>ncanvasGroup:insert (inputText)<s>ninputText.isEditable = true<s>ninputText.placeholder = <s>"<s><s>nВведите имя...<s>"<s>ninputText.text = rname [math.random (rarg)] .. <s>" <s>" .. name [math.random (arg)]<s>nend","calculate":false,"text":"Новый ответ. введите текст","id":2},{"id":2,"text":"   ","comment":true},{"id":2,"text":"Другое случайное имя","comment":false,"instant":true}]},{"id":3,"text":"   Псевдоним выбран! Осталось дело за малым, чтобы стать известным всему миру — скачать Текстовые квесты и написать квест.","answers":[{"comment":false,"var_equal":["скач",0],"id":3,"instant":true,"text":"Скачать Приложение из ГуглПлэй","var_set":["скач",1,"do1",0]},{"var_show":["do1","%"],"var_add":["do1","a"],"id":3,"text":"Загрузка:","update":[0.2],"var_equal":["скач",1],"var_random_from":["a",3,4,5],"middle_answer":true,"comment":true,"var_less":["do1",100]},{"text":"Начать писать квест!","id":4,"var_need":["do1",100],"lua_do":"function lua_do()<s>nquest = { }<s>nnumber = { }<s>nsize = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0}<s>nsizeNow = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0}<s>nquestName = { }<s>nquality = { }<s>ngame = { }<s>ngame1 = { <s>"Crysis<s>", <s>"Fallout2<s>", <s>"Fallout3<s>", <s>"GTA San Andreas<s>", <s>"StarWars: knight of the old republic<s>", <s>"MaxPayne2: the fall of Max Payne<s>", <s>"HalfLife2<s>", <s>"S.T.A.L.K.E.R<s>", <s>"Quack3<s>", <s>"DarkSoul3<s>", <s>"Unreal Tournament<s>", <s>"Might and Magic 3<s>", <s>"MassEffect<s>", <s>"Mafia<s>", <s>"TES: Oblivion<s>", <s>"TES: Skyrim<s>", <s>"StarCraft2<s>", <s>"Left 4 Dead<s>", <s>"WarCraft3<s>", <s>"Gothic2<s>" }<s>nfun = 5<s>nn = math.random(190000,191000)<s>nm = math.random(191001,192000)<s>ng1, g2, g3, g4, g5, g6, g7, g8, g9, g10, g11, g12, g13, g14, g15, g16, g17, g18, g19, g20 = 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0<s>nlike1, like2, like3, like4, like5, like6, like7, like8, like9, like10, dis1, dis2, dis3, dis4, dis5, dis6, dis7, dis8, dis9, dis10 = 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0<s>n<s>ntechnicalQuest = { 1, 1, 1, 1, 1,   1, 1, 1, 1, 1 }<s>nlanguageQuest = { 1, 1, 1, 1, 1,   1, 1, 1, 1, 1 }<s>nprogrammingQuest = { 1, 1, 1, 1, 1,   1, 1, 1, 1, 1 }<s>nend","var_set":["ttt",1]},{"comment":true,"var_equal":["скач",1],"id":3,"text":"У тебя уже наверняка появилась идея для первого квеста! Это будет просто бомба... Но это не точно.","middle_answer":false}]},{"id":4,"text":"Выберите жанр:","answers":[{"id":5,"text":"Фэнтези","lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"фэнтези<s>"<s>n   number[i] = nn end<s>nend<s>nend","left_answer":true},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"апокалипсис<s>"<s>n   number[i] = nn end<s>nend<s>nend","right_answer":true,"text":"Апокалипсис","id":5},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"ужасы<s>"<s>n   number[i] = nn end<s>nend<s>nend","text":"Ужасы","id":5,"left_answer":true},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"фантастика<s>"<s>n   number[i] = nn end<s>nend<s>nend","right_answer":true,"text":"Фантастика","id":5},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"романтика<s>"<s>n   number[i] = nn end<s>nend<s>nend","text":"Романтика","id":5,"left_answer":true},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"боевик<s>"<s>n   number[i] = nn end<s>nend<s>nend","right_answer":true,"text":"Боевик","id":5},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"юмор<s>"<s>n   number[i] = nn end<s>nend<s>nend","text":"Юмор","id":5,"left_answer":true},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"детектив<s>"<s>n   number[i] = nn end<s>nend<s>nend","right_answer":true,"text":"Детектив","id":5},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"хардкор<s>"<s>n   number[i] = nn end<s>nend<s>nend","text":"Хардкор","id":5,"left_answer":true},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"безумие<s>"<s>n   number[i] = nn end<s>nend<s>nend","right_answer":true,"text":"Безумие","id":5},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"рпг-шка<s>"<s>n   number[i] = nn end<s>nend<s>nend","text":"РПГ-шка","id":5,"left_answer":true},{"lua_do":"function lua_do()<s>nnn = math.random(n,m)<s>nn = m<s>nm = m <plus> math.random(99)<s>nlocal a = 1<s>nfor i = 1, 10 do<s>n   if a == 1 and not quest[i] then<s>n   a = 0<s>n   quest[i] = <s>"сказка<s>"<s>n   number[i] = nn end<s>nend<s>nend","right_answer":true,"text":"Сказка","id":5},{"id":4,"text":"  ","comment":true},{"id":17,"text":"Отказаться от этой идеи","need":[17]},{"super_calculate":false,"id":4,"text":"Новый ответ. введите текст","calculate":true,"lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.2<s>nend"}]},{"id":5,"text":"Выберите масштаб задумки.","answers":[{"id":6,"text":"Мелкий (~30-70 стр.)","lua_do":"function lua_do()<s>n   size[#quest] = math.random(30,70)<s>n   quality[#quest] = 1<s>nend"},{"id":6,"text":"Хороший (~80-200 стр.)","lua_do":"function lua_do()<s>n   size[#quest] = math.random(80,200)<s>n   quality[#quest] = 3<s>nend"},{"id":6,"text":"Основательный! (~250-500 стр.)","lua_do":"function lua_do()<s>n   size[#quest] = math.random(250,500)<s>n   quality[#quest] = 6<s>nend"},{"id":6,"text":"Грандиозный!!! (~600-1000 стр.)","lua_do":"function lua_do()<s>n   size[#quest] = math.random(600,1000)<s>n   quality[#quest] = 9<s>nend"}]},{"id":6,"text":"<s>n   Введите название квеста (от 2 до 60 знаков).","answers":[{"id":6,"text":"nemo","url":"http://188.120.236.127/SimKvestopisca/Back.png"},{"lua_text":"function lua_text()<s>nlocal text = utf8.len(inputText.text)<s>nreturn <s>"Введено символов: <s>" .. text<s>nend","id":2,"text":"  значение ч =","update":[0.5],"comment":true},{"id":6,"text":"Сохранить","lua_do":"function lua_do()<s>nlocal a = 1<s>ntext56 = inputText.text<s>nif utf8.len(text56) < 2 or utf8.len(text56) > 60 then<s>n   message(<s>"Для названия квеста необходимо от 2 до 50 символов.<s>")<s>nelse<s>n   for i = 1, 10 do<s>n   if a == 1 and not questName[i] then<s>n      a = 0<s>n      questName[i] = text56<s>n      display.remove(inputText)<s>n         if g.start == 0 then<s>n         showPage { id = 17 }<s>n         else <s>n         g.start = 0<s>n         showPage { id = 16 } end<s>n   end end<s>nend<s>nend","no_transition":true},{"super_calculate":true,"lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.2<s>nimages.nemo.isVisible = false<s>ninputText = native.newTextBox(canvas.width / 2, canvas.height / 1.3, canvas.width / 1.3, canvas.height / 1.4)<s>ncanvasGroup:insert (inputText)<s>ninputText.isEditable = true<s>ninputText.placeholder = <s>"Введите название квеста...<s>"<s>nend","text":"Новый ответ. введите текст","id":6,"calculate":false},{"id":6,"text":"  ","comment":true},{"comment":false,"id":6,"text":"Случайное название","lua_do":"function lua_do()<s>n   local a1<s>n   local a2<s>n   a1 = { <s>"Неистовый<s>", <s>"Король и<s>", <s>"Я и<s>", <s>"Инопланетный<s>", <s>"Золотой<s>", <s>"Великий<s>", <s>"Судный<s>", <s>"Астральный<s>", <s>"Мария и<s>", <s>"Инквизиция и<s>", <s>"Кролик и<s>", <s>"Меня убьёт<s>", <s>"Проклятый<s>", <s>"Благородный<s>", <s>"Печальный<s>", <s>"Искомый мной<s>", <s>"Я учился играть на гитаре, но мне помешал<s>", <s>"Отряд, который уничтожил<s>", <s>"Предел мечты:<s>", <s>"Жажда к свободе и<s>", <s>"Отверженные:<s>", <s>"Под фонарём твоего дома<s>", <s>"Стук сердца:<s>" } <s>n   a2 = { <s>"кролик<s>", <s>"маг<s>", <s>"яростный зверь<s>", <s>"отряд убийц<s>", <s>"последний день<s>", <s>"святой поход<s>", <s>"перекрёсток Судеб<s>", <s>"воин эпохи мечей<s>", <s>"путь к звёздам<s>", <s>"рассказ о семи морях<s>", math.random(33,9999).. <s>" год<s>", <s>"монастырь<s>", <s>"проклятый медальон<s>", <s>"Дракон<s>", <s>"адепт света<s>", <s>"некромант<s>", <s>"судьбоносный день<s>", <s>"уравнитель<s>", <s>"пистолет из будущего<s>", <s>"наследник Империи<s>", <s>"город проклятых<s>", <s>"Разрушитель миров<s>", <s>"поход за хлебушком<s>", <s>"факультет магии<s>" } <s>n   inputText.text = a1[math.random(#a1)] .. <s>" <s>".. a2[math.random(#a2)] <s>nend","no_transition":true}]},{"id":7,"text":"Редактор списка квестов.","answers":[{"lua_if":"function lua_if()<s>nreturn quest[1]<s>nend","id":8,"text":"1","lua_do":"function lua_do()<s>njk = 1<s>nend","lua_text":"function lua_text()<s>nk = 1<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend"},{"lua_if":"function lua_if()<s>nreturn quest[2]<s>nend","lua_do":"function lua_do()<s>njk = 2<s>nend","text":"2","lua_text":"function lua_text()<s>nk = 2<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[3]<s>nend","lua_do":"function lua_do()<s>njk = 3<s>nend","text":"3","lua_text":"function lua_text()<s>nk = 3<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[4]<s>nend","lua_do":"function lua_do()<s>njk = 4<s>nend","text":"4","lua_text":"function lua_text()<s>nk = 4<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[5]<s>nend","lua_do":"function lua_do()<s>njk = 5<s>nend","text":"5","lua_text":"function lua_text()<s>nk = 5<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[6]<s>nend","lua_do":"function lua_do()<s>njk = 6<s>nend","text":"6","lua_text":"function lua_text()<s>nk = 6<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[7]<s>nend","lua_do":"function lua_do()<s>njk = 7<s>nend","text":"7","lua_text":"function lua_text()<s>nk = 7<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[8]<s>nend","lua_do":"function lua_do()<s>njk = 8<s>nend","text":"8","lua_text":"function lua_text()<s>nk = 8<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[9]<s>nend","lua_do":"function lua_do()<s>njk = 9<s>nend","text":"9","lua_text":"function lua_text()<s>nk = 9<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"lua_if":"function lua_if()<s>nreturn quest[10]<s>nend","lua_do":"function lua_do()<s>njk = 10<s>nend","text":"10","lua_text":"function lua_text()<s>nk = 10<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":8},{"id":7,"text":"  ","comment":true},{"id":17,"text":"В Кабинет Автора","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":8,"text":"Что хотите сделать? ","answers":[{"id":8,"text":"  ","lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[jk] .. <s>"<s><s>nНомер квеста: <s>" .. number[jk] .. <s>"<s><s>nЖанр: <s>" .. quest[jk]<s>nend","comment":true},{"id":11,"text":"Сменить название"},{"id":9,"text":"Сменить номер"},{"id":10,"text":"Сменить жанр"},{"id":12,"text":"Удалить квест"},{"id":8,"text":"  ","comment":true},{"id":7,"text":"Назад","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]},{"super_calculate":false,"lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.2<s>nend","text":"Новый ответ. введите текст","id":8,"calculate":true}]},{"id":9,"text":"    Введите от 1 до 6 цифр.","answers":[{"id":9,"text":"nemo","url":"http://188.120.236.127/SimKvestopisca/Back.png"},{"lua_text":"function lua_text()<s>nlocal text = utf8.len(inputText.text)<s>nreturn <s>"Введено цифр: <s>" .. text<s>nend","id":2,"text":"  значение ч =","update":[0.5],"comment":true},{"super_calculate":true,"id":9,"calculate":false,"lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.2<s>nimages.nemo.isVisible = false<s>ninputText = native.newTextBox(canvas.width / 2, canvas.height / 1.3, canvas.width / 1.5, canvas.height / 2.2)<s>ncanvasGroup:insert (inputText)<s>ninputText.isEditable = true<s>ninputText.placeholder = <s>"Введите номер квеста...<s>"<s>nend","text":"Новый ответ. введите текст"},{"id":9,"text":"Готово ","lua_do":"function lua_do()<s>ntext57 = inputText.text<s>nif type(tonumber(text57)) ~= 'number' or string.len(text57) < 1 or string.len(text57) > 6 then<s>n   message(<s>"Для номера квеста допустимо от 1 до 6 цифр.<s>")<s>nelse<s>n      display.remove(inputText)<s>n      showPage { id = 14 }<s>n   end<s>nend","no_transition":true},{"comment":true,"backstepCount":1,"text":"   ","id":9,"isBack":true},{"isBack":true,"text":"Назад","id":9,"backstepCount":1}]},{"id":10,"text":"Выберите жанр:","answers":[{"paid_answer":["замена жанра квеста",1],"id":7,"text":"Фэнтези","lua_do":"function lua_do()<s>nquest[jk] = <s>"фэнтези<s>"<s>nend","left_answer":true},{"right_answer":true,"paid_answer":["замена жанра квеста",1],"id":7,"text":"Апокалипсис","lua_do":"function lua_do()<s>nquest[jk] = <s>"апокалипсис<s>"<s>nend"},{"paid_answer":["замена жанра квеста",1],"lua_do":"function lua_do()<s>nquest[jk] = <s>"ужасы<s>"<s>nend","text":"Ужасы","id":7,"left_answer":true},{"right_answer":true,"paid_answer":["замена жанра квеста",1],"id":7,"text":"Фантастика","lua_do":"function lua_do()<s>nquest[jk] = <s>"фантастика<s>"<s>nend"},{"paid_answer":["замена жанра квеста",1],"lua_do":"function lua_do()<s>nquest[jk] = <s>"романтика<s>"<s>nend","text":"Романтика","id":7,"left_answer":true},{"right_answer":true,"paid_answer":["замена жанра квеста",1],"id":7,"text":"Боевик","lua_do":"function lua_do()<s>nquest[jk] = <s>"боевик<s>"<s>nend"},{"paid_answer":["замена жанра квеста",1],"lua_do":"function lua_do()<s>nquest[jk] = <s>"юмор<s>"<s>nend","text":"Юмор","id":7,"left_answer":true},{"right_answer":true,"paid_answer":["замена жанра квеста",1],"id":7,"text":"Детектив","lua_do":"function lua_do()<s>nquest[jk] = <s>"детектив<s>"<s>nend"},{"paid_answer":["замена жанра квеста",1],"lua_do":"function lua_do()<s>nquest[jk] = <s>"хардкор<s>"<s>nend","text":"Хардкор","id":7,"left_answer":true},{"right_answer":true,"paid_answer":["замена жанра квеста",1],"id":7,"text":"Безумие","lua_do":"function lua_do()<s>nquest[jk] = <s>"безумие<s>"<s>nend"},{"paid_answer":["замена жанра квеста",1],"lua_do":"function lua_do()<s>nquest[jk] = <s>"рпг-шка<s>"<s>nend","text":"РПГ-шка","id":7,"left_answer":true},{"right_answer":true,"paid_answer":["замена жанра квеста",1],"id":7,"text":"Сказка","lua_do":"function lua_do()<s>nquest[jk] = <s>"сказка<s>"<s>nend"},{"id":10,"text":"  ","comment":true},{"id":7,"text":"Назад"}]},{"id":11,"text":"    Введите название квеста (от 2 до 50 знаков).","answers":[{"id":11,"text":"nemo","url":"http://188.120.236.127/SimKvestopisca/Back.png"},{"lua_text":"function lua_text()<s>nlocal text = utf8.len(inputText.text)<s>nreturn <s>"Введено символов: <s>" .. text<s>nend","id":2,"text":"  значение ч =","update":[0.5],"comment":true},{"super_calculate":true,"id":11,"text":"Новый ответ. введите текст","calculate":false,"lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.2<s>nimages.nemo.isVisible = false<s>ninputText = native.newTextBox(canvas.width / 2, canvas.height / 1.3, canvas.width / 1.3, canvas.height / 1.4)<s>ncanvasGroup:insert (inputText)<s>ninputText.isEditable = true<s>ninputText.placeholder = <s>"<s><s>nВведите название квеста...<s>"<s>nend"},{"id":11,"text":"Готово","lua_do":"function lua_do()<s>nlocal a = 1<s>ntext57 = inputText.text<s>nif utf8.len(text57) < 2 or utf8.len(text57) > 50 then<s>n   message(<s>"Для названия квеста необходимо от 2 до 50 символов.<s>")<s>nelse<s>n      display.remove(inputText)<s>n      showPage { id = 13 }<s>n   end<s>nend","no_transition":true},{"comment":true,"isBack":true,"text":"   ","backstepCount":1,"id":9},{"isBack":true,"text":"Назад","id":11,"backstepCount":1}]},{"id":12,"text":"Вы уверенны, что хотите удалить квест?<s>nВосстановить его будет невозможно.","answers":[{"id":12,"text":"  ","comment":true},{"id":7,"text":"Уверен!","paid_answer":["удаление квеста",1],"lua_do":"function lua_do()<s>nquestName[jk] = nil<s>nquest[jk] = nil<s>nnumber[jk] = nil<s>nquality[jk] = nil<s>nsize[jk] = nil<s>nsizeNow[jk] = 0<s>nif jk == 1 then setQuest1 = 0<s>n   elseif jk == 2 then setQuest2 = 0<s>n   elseif jk == 3 then setQuest3 = 0<s>n   elseif jk == 4 then setQuest4 = 0<s>n   elseif jk == 5 then setQuest5 = 0<s>n   elseif jk == 6 then setQuest6 = 0<s>n   elseif jk == 7 then setQuest7 = 0<s>n   elseif jk == 8 then setQuest8 = 0<s>n   elseif jk == 9 then setQuest9 = 0<s>n   elseif jk == 10 then setQuest10 = 0<s>n   end<s>nlanguageQuest [jk] = 1<s>ntechnicalQuest [jk] = 1<s>nprogrammingQuest [jk] = 1<s>nend"},{"id":12,"text":"  ","comment":true},{"id":8,"text":"Назад","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":13,"text":"   Вы уверены, что хотите сменить название квеста? ","answers":[{"id":13,"text":"   ","comment":true},{"lua_do":"function lua_do()<s>nquestName[jk] = text57<s>nend","text":"Согласиться","paid_answer":["замена названия квеста",1],"id":7},{"id":13,"text":"  ","comment":true},{"id":7,"text":"Отказаться","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":14,"text":"   Вы уверены, что хотите сменить номер квеста? ","answers":[{"id":13,"text":"   ","comment":true},{"lua_do":"function lua_do()<s>nnumber[jk] = text57<s>nend","text":"Согласиться","paid_answer":["замена номера квеста",1],"id":7},{"id":13,"text":"  ","comment":true},{"id":7,"text":"Отказаться","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":15,"text":"Список игр:","answers":[{"super_calculate":false,"id":15,"calculate":true,"lua_do":"function lua_do()<s>nko1 = 0<s>nfor k in pairs(game) do<s>nif game[k] == 1 then <s>nko1 = ko1 <plus> 1 end <s>nend<s>nend","text":"  "},{"lua_if":"function lua_if()<s>nreturn not game[1]<s>nend","id":21,"text":"  ","lua_do":"function lua_do()<s>ngame[1] = 1<s>nend","lua_text":"function lua_text()<s>nreturn game1[1]<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[2]<s>nend","lua_do":"function lua_do()<s>ngame[2] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[2]<s>nend","id":21},{"lua_if":"function lua_if()<s>nreturn not game[3]<s>nend","lua_do":"function lua_do()<s>ngame[3] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[3]<s>nend","id":21},{"lua_if":"function lua_if()<s>nreturn not game[4]<s>nend","lua_do":"function lua_do()<s>ngame[4] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[4]<s>nend","id":21},{"lua_if":"function lua_if()<s>nreturn not game[5]<s>nend","lua_do":"function lua_do()<s>ngame[5] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[5]<s>nend","id":21},{"lua_text":"function lua_text()<s>nreturn game1[6]<s>nend","lua_do":"function lua_do()<s>ngame[6] = 1<s>nend","text":"  ","id":21,"lua_if":"function lua_if()<s>nreturn not game[6] and ko1 > 0<s>nend"},{"lua_text":"function lua_text()<s>nreturn game1[7]<s>nend","id":21,"text":"  ","lua_if":"function lua_if()<s>nreturn not game[7] and ko1 > 1<s>nend","lua_do":"function lua_do()<s>ngame[7] = 1<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[8] and ko1 > 2<s>nend","id":21,"text":"  ","lua_do":"function lua_do()<s>ngame[8] = 1<s>nend","lua_text":"function lua_text()<s>nreturn game1[8]<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[9] and ko1 > 3<s>nend","lua_do":"function lua_do()<s>ngame[9] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[9]<s>nend","id":21},{"lua_text":"function lua_text()<s>nreturn game1[10]<s>nend","lua_do":"function lua_do()<s>ngame[10] = 1<s>nend","text":"  ","id":21,"lua_if":"function lua_if()<s>nreturn not game[10] and ko1 > 4<s>nend"},{"lua_text":"function lua_text()<s>nreturn game1[11]<s>nend","id":21,"text":"  ","lua_if":"function lua_if()<s>nreturn not game[11] and ko1 > 5<s>nend","lua_do":"function lua_do()<s>ngame[11] = 1<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[12] and ko1 > 6<s>nend","id":21,"text":"  ","lua_do":"function lua_do()<s>ngame[12] = 1<s>nend","lua_text":"function lua_text()<s>nreturn game1[12]<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[13] and ko1 > 7<s>nend","lua_do":"function lua_do()<s>ngame[13] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[13]<s>nend","id":21},{"lua_text":"function lua_text()<s>nreturn game1[14]<s>nend","lua_do":"function lua_do()<s>ngame[14] = 1<s>nend","text":"  ","id":21,"lua_if":"function lua_if()<s>nreturn not game[14] and ko1 > 8<s>nend"},{"lua_text":"function lua_text()<s>nreturn game1[15]<s>nend","id":21,"text":"  ","lua_if":"function lua_if()<s>nreturn not game[15] and ko1 > 9<s>nend","lua_do":"function lua_do()<s>ngame[15] = 1<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[16] and ko1 > 10<s>nend","id":21,"text":"  ","lua_do":"function lua_do()<s>ngame[16] = 1<s>nend","lua_text":"function lua_text()<s>nreturn game1[16]<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[17] and ko1 > 11<s>nend","lua_do":"function lua_do()<s>ngame[17] = 1<s>nend","text":"  ","lua_text":"function lua_text()<s>nreturn game1[17]<s>nend","id":21},{"lua_text":"function lua_text()<s>nreturn game1[18]<s>nend","lua_do":"function lua_do()<s>ngame[18] = 1<s>nend","text":"  ","id":21,"lua_if":"function lua_if()<s>nreturn not game[18] and ko1 > 12<s>nend"},{"lua_text":"function lua_text()<s>nreturn game1[19]<s>nend","id":21,"text":"  ","lua_if":"function lua_if()<s>nreturn not game[19] and ko1 > 13<s>nend","lua_do":"function lua_do()<s>ngame[19] = 1<s>nend"},{"lua_if":"function lua_if()<s>nreturn not game[20] and ko1 > 14<s>nend","id":21,"text":"  ","lua_do":"function lua_do()<s>ngame[20] = 1<s>nend","lua_text":"function lua_text()<s>nreturn game1[20]<s>nend"},{"id":15,"text":"  ","comment":true},{"id":21,"text":"Назад ","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":16,"text":"   Тут собрана и разбита по пунктам вся полезная информация, которая поможет Вам разобраться с игрой. Если ознакомление не требуется, то нажмите кнопку <s>"Покинуть инструкцию<s>".","answers":[{"id":33,"text":"Основные понятия"},{"id":34,"text":"Личное пространство - что это и зачем оно вообще нужно? "},{"id":35,"text":"Игровые цели и задачи"},{"id":36,"text":"Написание квестов и их улучшение"},{"id":37,"text":"Рейтинг и как занять первое место"},{"id":38,"text":"Случайные события и их влияния"},{"id":16,"text":"   ","comment":true},{"id":17,"text":"Покинуть инструкцию"}]},{"id":17,"text":"Текстовые квесты. Кабинет Автора.<s>nПсевдоним: ","answers":[{"super_calculate":false,"lua_do":"function lua_do()<s>nnavykTech = navykTech or 1<s>nnavykLang = navykLang or 1<s>nnavykWrite = navykWrite or 1<s>nnavykProg = navykProg or 1<s>nend","calculate":true,"text":"   ","id":17},{"comment":false,"id":17,"instant":true,"no_transition":true,"var_not":["setQuest1",1],"lua_if":"function lua_if()<s>nreturn quest[1]<s>nend","text":"1","lua_do":"function lua_do()<s>nk = 1<s>nperegrine  = 20<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a1 >= b1 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest1, like1, dis1 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","lua_text":"function lua_text()<s>na1 = sizeNow[1]<s>nb1 = size[1]<s>nif a1 > b1 then a1 = b1 end<s>nlocal c1 = math.floor((a1 / b1) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[1] .. <s>"<s><s>nНомер квеста: <s>" .. number[1] .. <s>"<s><s>nЖанр: <s>" .. quest[1] .. <s>"<s><s>nНаписано страниц: <s>" .. a1 .. <s>"<s><s>nЗавершено: <s>" .. c1 .. <s>"%<s>"<s>nend"},{"lua_text":"function lua_text()<s>na1 = sizeNow[1]<s>nreturn <s>"Название: <s>" .. questName[1] .. <s>"<s><s>nНомер квеста: <s>" .. number[1] .. <s>"<s><s>nЖанр: <s>" .. quest[1] .. <s>" / Страниц: <s>" .. a1 .. <s>"<s><s>nЛайки: <s>" .. like1 .. <s>" / Дизлайки: <s>" .. dis1<s>nend","id":17,"text":"1","comment":true,"lua_if":"function lua_if()<s>nreturn setQuest1 == 1<s>nend"},{"comment":false,"id":17,"text":"2","no_transition":true,"var_not":["setQuest2",1],"lua_text":"function lua_text()<s>na2 = sizeNow[2] or 0<s>nb2 = size[2] or 0<s>nif a2 > b2 then a2 = b2 end<s>nc2 = math.floor((a2 / b2) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[2] .. <s>"<s><s>nНомер квеста: <s>" .. number[2] .. <s>"<s><s>nЖанр: <s>" .. quest[2] .. <s>"<s><s>nНаписано страниц: <s>" .. a2 .. <s>"<s><s>nЗавершено: <s>" .. c2 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nreturn quest[2] <s>nend","lua_do":"function lua_do()<s>nk = 2<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a2 >= b2 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest2, like2, dis2 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true},{"lua_if":"function lua_if()<s>nreturn setQuest2 == 1<s>nend","id":17,"text":"2","lua_text":"function lua_text()<s>na2 = sizeNow[2]<s>nreturn <s>"Название: <s>" .. questName[2] .. <s>"<s><s>nНомер квеста: <s>" .. number[2] .. <s>"<s><s>nЖанр: <s>" .. quest[2] .. <s>" / Страниц: <s>" .. a2 .. <s>"<s><s>nЛайки: <s>" .. like2 .. <s>" / Дизлайки: <s>" .. dis2<s>nend","comment":true},{"comment":false,"lua_do":"function lua_do()<s>nk = 3<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a3 >= b3 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest3, like3, dis3 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest3",1],"lua_if":"function lua_if()<s>nreturn quest[3] <s>nend","lua_text":"function lua_text()<s>na3 = sizeNow[3]<s>nb3 = size[3]<s>nif a3 > b3 then a3 = b3 end<s>nc3 = math.floor((a3 / b3) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[3] .. <s>"<s><s>nНомер квеста: <s>" .. number[3] .. <s>"<s><s>nЖанр: <s>" .. quest[3] .. <s>"<s><s>nНаписано страниц: <s>" .. a3 .. <s>"<s><s>nЗавершено: <s>" .. c3 .. <s>"%<s>"<s>nend","id":17,"text":"3"},{"comment":true,"id":17,"text":"3","lua_if":"function lua_if()<s>nreturn setQuest3 == 1<s>nend","lua_text":"function lua_text()<s>na3 = sizeNow[3]<s>nreturn <s>"Название: <s>" .. questName[3] .. <s>"<s><s>nНомер квеста: <s>" .. number[3] .. <s>"<s><s>nЖанр: <s>" .. quest[3] .. <s>" / Страниц: <s>" .. a3 .. <s>"<s><s>nЛайки: <s>" .. like3 .. <s>" / Дизлайки: <s>" .. dis3<s>nend"},{"comment":false,"lua_do":"function lua_do()<s>nk = 4<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a4 >= b4 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest4, like4, dis4 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest4",1],"lua_if":"function lua_if()<s>nreturn quest[4] <s>nend","lua_text":"function lua_text()<s>na4 = sizeNow[4]<s>nb4 = size[4]<s>nif a4 > b4 then a4 = b4 end<s>nc4 = math.floor((a4 / b4) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[4] .. <s>"<s><s>nНомер квеста: <s>" .. number[4] .. <s>"<s><s>nЖанр: <s>" .. quest[4] .. <s>"<s><s>nНаписано страниц: <s>" .. a4 .. <s>"<s><s>nЗавершено: <s>" .. c4 .. <s>"%<s>"<s>nend","id":17,"text":"4"},{"lua_text":"function lua_text()<s>na4 = sizeNow[4]<s>nreturn <s>"Название: <s>" .. questName[4] .. <s>"<s><s>nНомер квеста: <s>" .. number[4] .. <s>"<s><s>nЖанр: <s>" .. quest[4] .. <s>" / Страниц: <s>" .. a4 .. <s>"<s><s>nЛайки: <s>" .. like4 .. <s>" / Дизлайки: <s>" .. dis4<s>nend","id":17,"text":"4","comment":true,"lua_if":"function lua_if()<s>nreturn setQuest4 == 1<s>nend"},{"comment":false,"lua_do":"function lua_do()<s>nk = 5<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a5 >= b5 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest5, like5, dis5 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest5",1],"lua_if":"function lua_if()<s>nreturn quest[5] <s>nend","lua_text":"function lua_text()<s>na5 = sizeNow[5]<s>nb5 = size[5]<s>nif a5 > b5 then a5 = b5 end<s>nc5 = math.floor((a5 / b5) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[5] .. <s>"<s><s>nНомер квеста: <s>" .. number[5] .. <s>"<s><s>nЖанр: <s>" .. quest[5] .. <s>"<s><s>nНаписано страниц: <s>" .. a5 .. <s>"<s><s>nЗавершено: <s>" .. c5 .. <s>"%<s>"<s>nend","id":17,"text":"5"},{"lua_if":"function lua_if()<s>nreturn setQuest5 == 1<s>nend","id":17,"text":"5","lua_text":"function lua_text()<s>na5 = sizeNow[5]<s>nreturn <s>"Название: <s>" .. questName[5] .. <s>"<s><s>nНомер квеста: <s>" .. number[5] .. <s>"<s><s>nЖанр: <s>" .. quest[5] .. <s>" / Страниц: <s>" .. a5 .. <s>"<s><s>nЛайки: <s>" .. like5 .. <s>" / Дизлайки: <s>" .. dis5<s>nend","comment":true},{"comment":false,"lua_do":"function lua_do()<s>nk = 6<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a6 >= b6 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest6, like6, dis6 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest6",1],"lua_if":"function lua_if()<s>nreturn quest[6] <s>nend","lua_text":"function lua_text()<s>na6 = sizeNow[6]<s>nb6 = size[6]<s>nif a6 > b6 then a6 = b6 end<s>nc6 = math.floor((a6 / b6) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[6] .. <s>"<s><s>nНомер квеста: <s>" .. number[6] .. <s>"<s><s>nЖанр: <s>" .. quest[6] .. <s>"<s><s>nНаписано страниц: <s>" .. a6 .. <s>"<s><s>nЗавершено: <s>" .. c6 .. <s>"%<s>"<s>nend","id":17,"text":"6"},{"comment":true,"id":17,"text":"6","lua_if":"function lua_if()<s>nreturn setQuest6 == 1<s>nend","lua_text":"function lua_text()<s>na6 = sizeNow[6]<s>nreturn <s>"Название: <s>" .. questName[6] .. <s>"<s><s>nНомер квеста: <s>" .. number[6] .. <s>"<s><s>nЖанр: <s>" .. quest[6] .. <s>" / Страниц: <s>" .. a6 .. <s>"<s><s>nЛайки: <s>" .. like6 .. <s>" / Дизлайки: <s>" .. dis6<s>nend"},{"comment":false,"lua_do":"function lua_do()<s>nk = 7<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a7 >= b7 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest7, like7, dis7 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest7",1],"lua_if":"function lua_if()<s>nreturn quest[7] <s>nend","lua_text":"function lua_text()<s>na7 = sizeNow[7]<s>nb7 = size[7]<s>nif a7 > b7 then a7 = b7 end<s>nc7 = math.floor((a7 / b7) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[7] .. <s>"<s><s>nНомер квеста: <s>" .. number[7] .. <s>"<s><s>nЖанр: <s>" .. quest[7] .. <s>"<s><s>nНаписано страниц: <s>" .. a7 .. <s>"<s><s>nЗавершено: <s>" .. c7 .. <s>"%<s>"<s>nend","id":17,"text":"7"},{"lua_text":"function lua_text()<s>na7 = sizeNow[7]<s>nreturn <s>"Название: <s>" .. questName[7] .. <s>"<s><s>nНомер квеста: <s>" .. number[7] .. <s>"<s><s>nЖанр: <s>" .. quest[7] .. <s>" / Страниц: <s>" .. a7 .. <s>"<s><s>nЛайки: <s>" .. like7 .. <s>" / Дизлайки: <s>" .. dis7<s>nend","id":17,"text":"7","comment":true,"lua_if":"function lua_if()<s>nreturn setQuest7 == 1<s>nend"},{"comment":false,"lua_do":"function lua_do()<s>nk = 8<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a8 >= b8 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest8, like8, dis8 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest8",1],"lua_if":"function lua_if()<s>nreturn quest[8] <s>nend","lua_text":"function lua_text()<s>na8 = sizeNow[8]<s>nb8 = size[8]<s>nif a8 > b8 then a8 = b8  end<s>nc8 = math.floor((a8 / b8) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[8] .. <s>"<s><s>nНомер квеста: <s>" .. number[8] .. <s>"<s><s>nЖанр: <s>" .. quest[8] .. <s>"<s><s>nНаписано страниц: <s>" .. a8 .. <s>"<s><s>nЗавершено: <s>" .. c8 .. <s>"%<s>"<s>nend","id":17,"text":"8"},{"lua_if":"function lua_if()<s>nreturn setQuest8 == 1<s>nend","id":17,"text":"8","lua_text":"function lua_text()<s>na8 = sizeNow[8]<s>nreturn <s>"Название: <s>" .. questName[8] .. <s>"<s><s>nНомер квеста: <s>" .. number[8] .. <s>"<s><s>nЖанр: <s>" .. quest[8] .. <s>" / Страниц: <s>" .. a8 .. <s>"<s><s>nЛайки: <s>" .. like8 .. <s>" / Дизлайки: <s>" .. dis8<s>nend","comment":true},{"comment":false,"lua_do":"function lua_do()<s>nk = 9<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a9 >= b9 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest9, like9, dis9 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest9",1],"lua_if":"function lua_if()<s>nreturn quest[9] <s>nend","lua_text":"function lua_text()<s>na9 = sizeNow[9]<s>nb9 = size[9]<s>nif a9 > b9 then a9 = b9 end<s>nc9 = math.floor((a9 / b9) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[9] .. <s>"<s><s>nНомер квеста: <s>" .. number[9] .. <s>"<s><s>nЖанр: <s>" .. quest[9] .. <s>"<s><s>nНаписано страниц: <s>" .. a9 .. <s>"<s><s>nЗавершено: <s>" .. c9 .. <s>"%<s>"<s>nend","id":17,"text":"9"},{"comment":true,"id":17,"text":"9","lua_if":"function lua_if()<s>nreturn setQuest9 == 1<s>nend","lua_text":"function lua_text()<s>na9 = sizeNow[9]<s>nreturn <s>"Название: <s>" .. questName[9] .. <s>"<s><s>nНомер квеста: <s>" .. number[9] .. <s>"<s><s>nЖанр: <s>" .. quest[9] .. <s>" / Страниц: <s>" .. a9 .. <s>"<s><s>nЛайки: <s>" .. like9 .. <s>" / Дизлайки: <s>" .. dis9<s>nend"},{"comment":false,"lua_do":"function lua_do()<s>nk = 10<s>n<s>nif navykWrite < 10 then<s>n   wr1 = 1<s>n   if math.random(3) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 10 and navykWrite < 20 then<s>n   wr1 = 4<s>n   if math.random(10) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 20 and navykWrite < 35 then<s>n   wr1 = 7<s>n   if math.random(15) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nelseif navykWrite >= 35 and navykWrite < 50 then<s>n   wr1 = 10<s>n   if math.random(20) == 1 then<s>n      message(<s>"Навык написания увеличен на 1.<s>")<s>n      navykWrite = navykWrite <plus> 1 end<s>nend<s>n<s>n<s>nif fun > 0 then<s>nlocal zz = math.random(10) <s>n<s>n   if zz == 1 and sizeNow[k] > 20 then<s>n      dialog ({header = <s>"Механика квеста<s>",<s>n      text = <s>"Появилась идея для создания технической части в квесте. Это улучшит его механику и интерес читателей, но тогда количество страниц может сократиться.<s>",<s>n      answers = {{text = <s>"Реализовать задумку<s>",<s>n      pressListener = function()<s>n      fun = fun - 1<s>n      technicalQuest[k] = technicalQuest[k] <plus> navykTech<s>n      sizeNow[k] = sizeNow[k] - math.random(wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 3 and fun >= 5 then<s>n      dialog ({header = <s>"Грамматика и пунктуация<s>",<s>n      text = <s>"Появилась возможность исправить допущенные ранее грамматические и пунктуационные ошибки. Это улучшит его качество и интерес читателей, но хорошо ударит по настроению.<s>",<s>n      answers = {{text = <s>"Исправлять ошибки<s>",<s>n      pressListener = function()<s>n      fun = fun - 5<s>n      languageQuest[k] = languageQuest[k] <plus> navykLang<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Продолжить писать<s>",<s>n      pressListener = function()<s>nfun = fun - 1<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1,navykWrite)<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>n<s>nelseif zz == 7 and fun > 9 then<s>n      dialog ({header = <s>"Программирование<s>",<s>n      text = <s>"Появилась идея для написания кода в квесте. Это позволит написать больше страниц, но потребует колосальное количество сил на его написание и проверку, что отразится на общем настроение.<s>",<s>n      answers = {{text = <s>"Писать код и текст<s>",<s>n      pressListener = function()<s>n      fun = fun - 10<s>n      sizeNow[k] = sizeNow[k] <plus> (navykProg * 2)<s>n      programmingQuest[k] = programmingQuest[k] <plus> navykProg<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end },<s>n      {text = <s>"Отказаться и просто писать<s>",<s>n      pressListener = function()<s>n      sizeNow[k] = sizeNow[k] <plus> math.random (wr1, navykWrite)<s>n      fun = fun - 1<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n      hideDialog() end }}})<s>nelse <s>n   fun = fun - 1<s>n   sizeNow[k] = sizeNow[k] <plus> math.random(wr1, navykWrite)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend end<s>n<s>nif fun < 1 then<s>n   message (<s>"Недостаточно настроения для написания квеста.<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>n<s>nif a10 >= b10 then<s>n   dialog ({header = questName[k], <s>n   text = <s>"Вы завершили написание квеста, и теперь его можно опубликовать. Время от времени будут появляться идеи для его улучшения, так что квест можно будет дорабатывать.<s>", <s>n   answers = {{text = <s>"Опубликовать<s>",<s>n   pressListener = function()<s>n      setQuest10, like10, dis10 = 1, 0, 0<s>n      showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end }}}) end<s>nend","instant":true,"no_transition":true,"var_not":["setQuest10",1],"lua_if":"function lua_if()<s>nreturn quest[10] <s>nend","lua_text":"function lua_text()<s>na10 = sizeNow[10]<s>nb10 = size[10]<s>nif a10 > b10 then a10 = b10 end<s>nc10 = math.floor((a10 / b10) * 100)<s>n<s>nreturn <s>"Название: <s>" .. questName[10] .. <s>"<s><s>nНомер квеста: <s>" .. number[10] .. <s>"<s><s>nЖанр: <s>" .. quest[10] .. <s>"<s><s>nНаписано страниц: <s>" .. a10 .. <s>"<s><s>nЗавершено: <s>" .. c10 .. <s>"%<s>"<s>nend","id":17,"text":"10"},{"lua_text":"function lua_text()<s>na10 = sizeNow[10]<s>nreturn <s>"Название: <s>" .. questName[10] .. <s>"<s><s>nНомер квеста: <s>" .. number[10] .. <s>"<s><s>nЖанр: <s>" .. quest[10] .. <s>" / Страниц: <s>" .. a10 .. <s>"<s><s>nЛайки: <s>" .. like10 .. <s>" / Дизлайки: <s>" .. dis10<s>nend","id":17,"text":"10","comment":true,"lua_if":"function lua_if()<s>nreturn setQuest10 == 1<s>nend"},{"id":17,"text":"-   -   -","comment":true,"middle_answer":true},{"lua_if":"function lua_if()<s>nlocal a = 0<s>nfor i = 1, 10 do<s>n   if not quest[i] then<s>n   a = 1 end end<s>nreturn a == 1<s>nend","id":4,"middle_answer":false,"text":"Начать новый квест","comment":false,"answerImage":["http://188.120.236.127/SimKvestopisca/CreateNewQuest.png"]},{"lua_if":"function lua_if()<s>nlocal a = setQuest1 <plus>  setQuest2 <plus>  setQuest3 <plus>  setQuest4 <plus>  setQuest5 <plus> setQuest6 <plus>  setQuest7 <plus>  setQuest8 <plus>  setQuest9 <plus>  setQuest10<s>nreturn a > 0<s>nend","id":30,"text":"Провести улучшение написанного квеста","var_need":["fun",5],"answerImage":["http://188.120.236.127/SimKvestopisca/UpgradeQuest.png"]},{"id":7,"text":"Сменить название, жанр, номер квеста","answerImage":["http://188.120.236.127/SimKvestopisca/ChangeQuest.png"]},{"var_set":["back","global current_id"],"middle_answer":false,"comment":false,"var_need":["ghat",1],"id":29,"text":"Проверить Рейтинг","lua_if":"function lua_if()<s>npageOn = pageOn or 0<s>nreturn pageOn > 300<s>nend","answerImage":["http://188.120.236.127/SimKvestopisca/RatingQuest.png"]},{"lua_if":"function lua_if()<s>nlocal a = setQuest1 <plus>  setQuest2 <plus>  setQuest3 <plus>  setQuest4 <plus>  setQuest5 <plus> setQuest6 <plus>  setQuest7 <plus>  setQuest8 <plus>  setQuest9 <plus>  setQuest10<s>nreturn a > 0<s>nend","id":31,"text":"   ","lua_text":"function lua_text()<s>nlocal text = <s>"<s>"<s>nlocal a = setQuest1 <plus>  setQuest2 <plus>  setQuest3 <plus>  setQuest4 <plus>  setQuest5 <plus> setQuest6 <plus>  setQuest7 <plus>  setQuest8 <plus>  setQuest9 <plus>  setQuest10<s>n   if a == 1 then text = <s>"Читать отзывы о своём квесте<s>"<s>n   elseif a > 1 then text = <s>"Читать отзывы о своих квестах<s>" end<s>nreturn text<s>nend","answerImage":["http://188.120.236.127/SimKvestopisca/CommentQuest.png"]},{"id":17,"text":"-   -   -","comment":true,"middle_answer":true},{"id":20,"text":"Заняться другими делами","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]},{"lua_do":"function lua_do()<s>nif fun < 1 then<s>n   feel = <s>"Нет настроения.<s>"<s>nelseif fun > 0 and fun < 6 then<s>n   feel = <s>"Есть настроение писать.<s>"<s>nelseif fun > 5 and fun < 50 then<s>n   feel = <s>"Хочется писать квест!<s>"<s>nelseif fun >= 50 then<s>n   feel = <s>"Вдохновение!<s>"<s>nend<s>nend","super_calculate":false,"id":17,"text":"  ","calculate":true,"merge":false},{"id":17,"text":"  ","lua_text":"function lua_text()<s>nreturn text55 .. <s>"<s><s>n<s>" .. feel<s>nend","merge":true},{"id":22,"text":"... задания ...","run":[22]},{"id":23,"text":"...счётчик дней ...","run":[23]},{"id":24,"text":"... события с девушкой...","run":[24],"var_less":["wife",1]},{"id":28,"text":"... события жена ...","run":[28],"var_less":["toUniver",1]},{"id":41,"text":"... ребенок в универе... ","comment":false,"run":[41]},{"id":17,"text":"  ","comment":true},{"id":17,"text":"  ","comment":true},{"comment":true,"var_equal":["global disableMusicSetting",0],"middle_answer":true,"text":"Управление музыкой","id":20},{"var_str_set":["global bg_music","0"],"comment":false,"var_equal":["global disableMusicSetting",0],"id":17,"text":"Выключить","instant":true,"left_answer":true},{"text":"Вкл./Следующая","right_answer":true,"comment":false,"var_equal":["global disableMusicSetting",0],"id":17,"instant":true,"lua_do":"function lua_do()<s>nlastM = lastM or 0<s>ntabMusic = { <s>"musicA<s>", <s>"musicB<s>", <s>"musicC<s>", <s>"musicD<s>", <s>"musicE<s>" }<s>n<s>n   if lastM == 0 then<s>n      lastM = 1<s>n      g.bg_music = tabMusic[1]<s>n   elseif lastM == 1 then<s>n      lastM = 2<s>n      g.bg_music = tabMusic[2]<s>n   elseif lastM == 2 then<s>n      lastM = 3<s>n      g.bg_music = tabMusic[3]<s>n   elseif lastM == 3 then<s>n      lastM = 4<s>n      g.bg_music = tabMusic[4]<s>n   elseif lastM == 4 then<s>n      lastM = 5<s>n      g.bg_music = tabMusic[5]<s>n   elseif lastM == 5 then<s>n      lastM = 1<s>n      g.bg_music = tabMusic[1]<s>n   end<s>nend","no_transition":false},{"id":17,"text":"  ","comment":true},{"id":16,"text":"Инструкция"},{"super_calculate":false,"id":17,"text":"   ","lua_do":"function lua_do()<s>ng.image_part_of_screen = 0.1<s>nend","calculate":true}]},{"id":18,"text":"   ","answers":[{"super_calculate":false,"id":18,"text":"Новый ответ. введите текст","calculate":true,"lua_do":"function lua_do()<s>nkworum = kworum or 0<s>nkw = math.random(9)<s>n<s>nif kworum == 50 then<s>n   kworum = 51<s>n   local expNum = native.showAlert(<s>"Назначение<s>", <s>"Вас назначили модератором чата Квестописцев. Теперь вам не сможет выдать бан другой модератор, а значит общение станет регулярным.<s>", {<s>"Отлично!<s>"})<s>nend<s>nend"},{"super_calculate":false,"var_equal":["kw",9],"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Выпрашивание функционала<s>"<s>ntext1 = <s>"Вы придумали очень забубёную фишку для своего квеста, но реализовать её просто так не получится, поэтому вы два часа донимал разработчиков своими идеями.<s>"<s>nend","text":"  "},{"text":"  ","super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Оживленное общение<s>"<s>ntext1 = <s>"Один из квестописцев спровоцировал обсуждение квеста. Вы с удовольствием провёли время в обсуждении.<s>"<s>nend","var_equal":["kw",8]},{"text":"  ","super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Разбор<s>"<s>ntext1 = <s>"Один из модераторов согласился помочь вам в улучшении квеста. Теперь остаётся только выбрать какой именно квест нужно вам улучшить...<s>"<s>nend","var_equal":["kw",7]},{"text":"  ","super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nkworum = kworum or 0<s>nhead1 = <s>"Бан!<s>"<s>n   if kworum < 50 then text1 = <s>"Вы хотели развлечься беседой с модератором, но у того не было настроения и он временно выписал вам !бан.<s>"<s>n   else text1 = <s>"Вы поймали и наказали злостного нарушителя правил чата. Вам стало спокойнее от того, что правосудие восторжествовало, а его свершителем были вы.<s>" end<s>nend","var_equal":["kw",6]},{"text":"  ","super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Простая беседа<s>"<s>ntext1 = <s>"Немного попереписывалимь с квестописцами и слегка подняли общее настроение.<s>"<s>nend","var_equal":["kw",5]},{"text":"  ","super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Простая беседа<s>"<s>ntext1 = <s>"Вы немного пообщались на тему квестов с другими квестописцами.<s>"<s>nend","var_equal":["kw",4]},{"var_equal":["kw",3],"super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Флуд<s>"<s>nkworum = kworum or 0<s>n   if kworum < 50 then text1 = <s>"Поднятая вами тема развела чрезмерно оживленную обсуждение в Кворуме, и за это вы получили предупреждение от модератора.<s>"<s>n   else text1 = <s>" Поднятая вами тема развела флуд в Кворуме, и за это некоторые участники получили !пред от администратора чата.<s>" end<s>nend","text":"   "},{"var_equal":["kw",2],"super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Откровение модератора<s>"<s>nkworum = kworum or 0<s>n   if kworum < 50 then text1 = <s>"Один из модераторов устроил ''время откровения'' и долго писал рекомендации и вдохновляющие сообщения.<s>"<s>n   else text = <s>"Вы устроил ''время откровения'' и долго писали рекомендации и вдохновляющие сообщения для другие участников чата.<s>" end<s>nend","text":"   "},{"var_equal":["kw",1],"super_calculate":false,"id":18,"calculate":true,"lua_do":"function lua_do()<s>nhead1 = <s>"Простая беседа<s>"<s>ntext1 = <s>"Немного попереписывались с квестописцами и слегка подняли себе настроение.<s>"<s>nend","text":"  "},{"super_calculate":false,"id":18,"text":"   ","calculate":true,"lua_do":"function lua_do()<s>nactivate = activate or 0<s>nkworum = kworum or 0<s>n<s>nif activate == 1 then<s>nfun = fun <plus> math.random(2)<s>nmessage(<s>"   <plus><plus> к настроению.<s>")<s>nactivate = 0<s>n<s>nelseif activate == 2 then<s>nfun = fun <plus> math.random(4,5)<s>nmessage(<s>"   <plus><plus><plus><plus><plus> к настроению.<s>")<s>nactivate = 0<s>n<s>nelseif activate == 3 then<s>nfun = fun - math.random(2)<s>nmessage(<s>"   - - от настроения.<s>")<s>nactivate = 0<s>n<s>nelseif activate == (4 or 5) then<s>nfun = fun <plus> math.random(2)<s>nmessage(<s>"   <plus><plus> к настроению.<s>")<s>nactivate = 0<s>n<s>nelseif activate == 6 then<s>n   if kworum < 50 then<s>n   fun = fun - math.random(3,5)<s>n   message(<s>"   - - - - - от настроения.<s>")<s>n   ban = 1<s>n   else fun = fun <plus> 5<s>n   message(<s>"   <plus><plus><plus><plus><plus> к настроению.<s>")<s>n   end<s>nactivate = 0<s>n<s>nelseif activate == 7 then<s>nfun = fun <plus> 1<s>nmessage(<s>"   Доступен разбор квеста.<s>")<s>nzarbor = 1<s>nactivate = 0<s>n<s>nelseif activate == 8 then<s>nfun = fun <plus> 2<s>nmessage(<s>"   <plus><plus> к настроению<s>")<s>nactivate = 0<s>n<s>nend<s>nend"},{"id":18,"text":"Можно оплатить закладкой просмотр любимого фильма и значительно поднять настроение.","comment":true,"var_equal":["kw",1]},{"comment":true,"var_equal":["kw",5],"id":18,"text":"Местный коллекционер менят редкие книжные закладки на большие суммы денег. Деньги будут переведены в банк в счёт гашения ипотеки.","var_need":["ipoteka",80000]},{"comment":false,"middle_answer":true,"instant":true,"paid_answer":["повышение настроения",1],"var_equal":["kw",1],"text":"Смотреть фильм","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(50,75)<s>nban = 0<s>nend","id":20,"answerImage":["https://b.radikal.ru/b04/2002/4c/9a41df8974db.png"]},{"comment":false,"lua_do":"function lua_do()<s>nipoteka = ipoteka - math.random(50000,80000)<s>nban = 0<s>nend","text":"Обменять закладку на <s>nгашение ипотеки","instant":true,"paid_answer":["гашение ипотеки",1],"var_equal":["kw",5],"middle_answer":true,"id":20,"var_need":["ipoteka",80000],"answerImage":["https://b.radikal.ru/b04/2002/4c/9a41df8974db.png"]},{"super_calculate":false,"lua_do":"function lua_do()<s>ntekst1 = { <s>"Ничего особенного и интересного нет.<s>", <s>"Было несколько интересных постов про котят и щенков.<s>", <s>"Вы пытались посчитать сколько дней осталось до нового года, но после цифры 'два' вам стало скучно.<s>", <s>"Опять очередное научное открытие, которое должно в корне поменят взгляд на обыденную жизнь... Что-то кушать хочется.<s>", <s>"Хотелось найти хорошую старую песню, а нашлись новые рэперы...<s>", <s>"Искали красивую картинку на фон телефона, и кажется нашли.<s>", <s>"А вы знали, что спелые мандарины плавают?<s>", <s>"Что-то всё так хорошо, аж плохо.<s>", <s>"Стоило больше внимания уделять заряду батареи, а то сейчас неудобно сидеть возле розетки.<s>", <s>"О, новые спойлеры про Войну Бесконечности!<s>", <s>"Иногда кажется, что всеми людьми кто-то управляет...<s>", <s>"Интересно, кто наш Создатель?<s>", <s>"Ну-ка, спрошу Гугл...<s>", <s>"Прокрастинация - это...<s>", <s>"Любите откладывать важные дела на потом?<s>", <s>"О, новый сериал!<s>", <s>"Стоит больше времени уделять своему любимому делу.<s>", <s>"Дважды два - это не только четыре, но и телеканал такой.<s>", <s>"Квантовое туннелирование частиц...<s>", <s>"Тёмная материя и тёмная энергия - это не из Звёздных Войн.<s>", <s>"Очередное обновление Текстовых Квестов.<s>", <s>"Снова мем про Лютика и чеканную монету...<s>", <s>"Быть драконорожденным! Наверное круто...<s>", <s>"Если смешать краски: серый, бурый и малиновый, то не выйдет серо-буро-малиновый цвет!<s>", <s>"Очередной звездопад, но не в нашей стране.<s>", <s>"Выпустили новый стикер-пак. Хороший!<s>", <s>"Выпустили новый стикер-пак. Ужасный!<s>", <s>"Выпустили новый стикер-пак. Не интересный!<s>", <s>"Всё что-то ищете, и ищете...<s>", <s>"А может уже пора писать квест?<s>", <s>"Интересно, что там в Кворуме сейчас обсуждают?<s>", <s>"Опять реклама от мегафона...<s>", <s>"Неинтересные новости про политику...<s>", <s>"Неинтересные новости про экономику...<s>", <s>"Реклама ипотеки в интернете...<s>" }<s>ntekst = tekst1[math.random(#tekst1)]<s>nend","calculate":true,"text":"тексты для ленты","id":18},{"comment":false,"super_calculate":false,"id":18,"calculate":true,"text":"Новый ответ. введите текст","var_random":["rekla1",1,30]},{"comment":true,"var_equal":["rekla1",7],"id":18,"text":"В интернете проходят видеоуроки по грамматике. Можно увеличить свой уровень грамотности (<plus>3).","var_less":["navykLang",48]},{"comment":true,"var_equal":["rekla1",17],"id":18,"text":"В интернете проходит стрим по квестовым механикам. Можно увеличить свой навык владения квестовыми механиками (<plus>3).","var_less":["navykTech",48]},{"comment":true,"var_equal":["rekla1",27],"id":18,"text":"В интернете проходят бесплатные курсы по языку Lua. Можно увеличить свой навык программирования (<plus>3).","var_less":["navykProg",48]},{"comment":false,"id":20,"text":"Улучшение навыка","instant":true,"paid_answer":["улучшение навыка",1],"var_equal":["rekla1",7],"var_add":["navykLang",3],"var_less":["navykLang",48],"middle_answer":true,"answerImage":["https://b.radikal.ru/b04/2002/4c/9a41df8974db.png"]},{"comment":false,"id":20,"text":"Улучшение навыка","instant":true,"paid_answer":["улучшение навыка",1],"var_equal":["rekla1",17],"var_add":["navykTech",3],"var_less":["navykTech",48],"middle_answer":true,"answerImage":["https://b.radikal.ru/b04/2002/4c/9a41df8974db.png"]},{"comment":false,"id":20,"text":"Улучшение навыка","instant":true,"paid_answer":["улучшение навыка",1],"var_equal":["rekla1",27],"var_add":["navykProg",3],"var_less":["navykProg",48],"middle_answer":true,"answerImage":["https://b.radikal.ru/b04/2002/4c/9a41df8974db.png"]},{"id":20,"text":"В кабинет автора","lua_if":"function lua_if()<s>nreturn g.current_id == 18<s>nend","instant":true}]},{"id":19,"text":"Заметки писателя.","answers":[{"id":19,"text":"  ","comment":true,"lua_text":"function lua_text()<s>nnavik = { <s>"никакой<s>", <s>"незначительный<s>", <s>"незначительный<s>", <s>"незначительный<s>", <s>"незначительный<s>", <s>"низкий<s>", <s>"низкий<s>", <s>"низкий<s>", <s>"низкий<s>", <s>"низкий<s>", <s>"совсем слабый<s>", <s>"совсем слабый<s>", <s>"совсем слабый<s>", <s>"совсем слабый<s>", <s>"совсем слабый<s>", <s>"слабый<s>", <s>"слабый<s>", <s>"слабый<s>", <s>"слабый<s>", <s>"слабый<s>", <s>"удовлетворительный<s>", <s>"удовлетворительный<s>", <s>"удовлетворительный<s>", <s>"удовлетворительный<s>", <s>"удовлетворительный<s>", <s>"нормальный<s>", <s>"нормальный<s>", <s>"нормальный<s>", <s>"нормальный<s>", <s>"нормальный<s>", <s>"хороший<s>", <s>"хороший<s>", <s>"хороший<s>", <s>"хороший<s>", <s>"хороший<s>", <s>"очень хороший<s>", <s>"очень хороший<s>", <s>"очень хороший<s>", <s>"очень хороший<s>", <s>"очень хороший<s>", <s>"сильный<s>", <s>"сильный<s>", <s>"сильный<s>", <s>"сильный<s>", <s>"сильный<s>", <s>"превосходный<s>", <s>"превосходный<s>", <s>"превосходный<s>", <s>"превосходный<s>", <s>"превосходный<s>", <s>"превосходный<s>" }<s>n<s>nnavykTech = navykTech or 1<s>nnavykProg = navykProg or 1<s>nnavykWrite = navykWrite or 1<s>nnavykLang = navykLang or 1<s>n<s>nif navykLang > 50 then navykLang = 50 end<s>nif navykTech > 50 then navykTech = 50 end<s>nif navykProg > 50 then navykProg = 50 end<s>n<s>nlocal text = <s>"Навык писателя: <s>"<s>ntext = text .. navik[navykWrite] .. <s>" (<s>" .. navykWrite .. <s>")<s>" .. <s>"<s><s>nНавык грамотности: <s>" .. navik[navykLang] ..<s>" (<s>" .. navykLang .. <s>")<s>" .. <s>"<s><s>nНавык сложных механик: <s>" .. navik[navykTech] .. <s>" (<s>" .. navykTech .. <s>")<s>" .. <s>"<s><s>nНавык программирования: <s>" .. navik[navykProg] .. <s>" (<s>" .. navykProg .. <s>")<s>"<s>nreturn text<s>nend"},{"id":19,"text":"  ","comment":true},{"id":19,"text":"Вы выполнили все предназначения, тем самым завершили основные цели игры. Но события на этом не останавливаются, так что продолжайте играть!","comment":true,"super_calculate":false,"var_less":["toUniver",1],"calculate":false,"var_need":["drevo",50],"var_equal":["Complete",1]},{"var_less":["Complete",1],"comment":true,"super_calculate":false,"id":19,"var_need":["drevo",50],"text":"Остаётся последнее предназначение: написать квест на 10.000 страниц.","calculate":false},{"comment":true,"super_calculate":false,"id":19,"var_need":["kid",1,"drevo",50],"text":"Вы посадили и вырастили дерево.","calculate":false},{"var_less":["drevo",50],"comment":true,"super_calculate":false,"id":19,"calculate":false,"text":"Вы должны посадить и вырастить дерево.","var_need":["kid",1]},{"comment":true,"id":19,"var_need":["ttt",6],"lua_text":"function lua_text()<s>nlocal aa = 2<s>nif not love then love = 0 end<s>nif not wife then wife = 0 end<s>nif not kid then kid = 0 end<s>ngodovschina = godovschina or 0<s>nif love < 1 then status = <s>"одинокий.<s>"<s>nelse status = <s>"есть девушка.<s>" end<s>nif wife == 1 then status = <s>"женат.<s>" end<s>nif kid == 1 then <s>n   status = status .. <s>"<s><s>nРебёнок: сын.<s>"<s>nelseif kid == 2 then <s>n   status = status .. <s>"<s><s>nРебёнок: дочь.<s>" end<s>n<s>nif godovschina >= 2 and godovschina < 7 then<s>n   status = status .. <s>", возраст: <s>" .. godovschina - 1 .. <s>".<s>"<s>nend<s>n<s>ntoUniver = toUniver or 0 <s>nif toUniver > 0 then<s>n   if kidFun < 5 then aa = 1<s>n   elseif kidFun < 15 then aa = 2<s>n   elseif kidFun < 25 then aa = 3<s>n   elseif kidFun < 35 then aa = 4<s>n   else aa = 5 end<s>n   status = status .. <s>"<s><s>nОтношение: <s>".. ({<s>"негативное<s>", <s>"плохое<s>", <s>"нормальное<s>", <s>"хорошее<s>", <s>"положительное<s>"}) [aa]<s>nend<s>n<s>nreturn <s>"Статус: <s>" .. status<s>nend","text":"Статус:"},{"lua_text":"function lua_text()<s>nlocal text<s>nlocal aa = 1<s>nkidAdapted = kidAdapted or 0<s>nif kidAdapted >= 50 and kidAdapted < 100 then <s>n  aa = 2<s>nelseif kidAdapted >= 100 then<s>n   aa = 3<s>nend<s>ninSchool = inSchool or 0<s>nif inSchool < 1 then<s>n   text = <s>"Уровень ребёнка: <s>" .. ({<s>"неподготовленный.<s>", <s>"уверенный.<s>", <s>"полностью готов.<s>"}) [aa] <s>nelse<s>n   text = <s>"Уровень ребёнка: <s>" .. ({<s>"учится плохо.<s>", <s>"учится уверенно.<s>", <s>"учится хорошо.<s>"}) [aa]  <s>nend<s>n<s>ntoUniver = toUniver or 0 <s>nif toUniver == 1 then <s>n   text = <s>"Ребёнок учится в Университете.<s>" <s>nelseif toUniver == 2 then<s>n   text = <s>"Ребёнок учится в Техникуме.<s>" <s>nend<s>n<s>nreturn text<s>nend","id":19,"var_need":["Complete",1],"text":"   ","comment":true},{"calculate":false,"comment":true,"super_calculate":false,"id":19,"var_need":["home",1],"text":"Стоит жениться, но для этого нужна любимая девушка. Ухаживайте и уделяйте ей время, и тогда рано или поздно достигнете этой цели.","var_less":["wife",1,"ipoteka",1]},{"comment":true,"var_less":["wife",1],"var_need":["ttt",6,"love",1],"text":"Теперь у вас есть девушка. Стоит уделять ей время и баловать подарками.","id":19},{"comment":true,"id":19,"var_need":["home",1],"text":"У вас собственная квартира.","var_less":["ipoteka",1]},{"lua_text":"function lua_text()<s>nreturn <s>"Диплом о высшем образовании с оценкой: <s>" .. diplom .. <s>".<s>"<s>nend","id":19,"text":"   ","var_need":["diplom",3],"comment":true},{"comment":true,"id":19,"lua_text":"function lua_text()<s>nlocal text = <s>"Питомец: <s>"<s>nif pet == 1 then text = text .. <s>"собака.<s>"<s>nelseif pet == 2 then text = text .. <s>"кошка.<s>"<s>nelseif pet == 3 then text = text .. <s>"хомяк.<s>"<s>nelseif pet == 4 then text = text .. <s>"попугай.<s>"<s>nend<s>nreturn text<s>nend","super_calculate":false,"var_less":["pet",5],"var_need":["pet",1],"calculate":false,"text":"   "},{"lua_text":"function lua_text()<s>nreturn <s>"Вами прочитано 50 и более квестов.<s>" <s>nend","id":19,"text":"Вами прочитано 50 и более квестов. ","comment":true,"var_need":["readQuest",50]},{"id":19,"text":"Пройдены все игры на ПК из имеющихся.","comment":true,"var_need":["gamer",1]},{"id":20,"text":"Вы модератор в чате Квестописцев.","comment":true,"var_need":["kworum",50]},{"comment":true,"var_less":["toUniver",1],"text":"Деньги теперь будут прибывать сами собой, и чем больше опубликованных страниц, тем больше денег будешь получать. ","id":19,"var_need":["ttt",5]},{"id":19,"text":"С вами связался менеджер издательства NarrativePress и попросил выпустить квест на 300<plus> страниц.","comment":true,"var_equal":["ttt",3]},{"id":19,"text":"Стоит для начала опубликовать хоть какой-то квест и набрать пару десятков лайков, чтобы тебя заметили.","comment":true,"var_equal":["ttt",1]},{"id":19,"text":"  ","comment":true},{"id":20,"text":"Назад","instant":true,"answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":20,"text":"Личное пространство. <s>n","answers":[{"lua_text":"function lua_text()<s>nif fun < 1 then<s>n   feel = <s>"Нет настроения.<s>"<s>nelseif fun > 0 and fun < 6 then<s>n   feel = <s>"Есть настроение писать.<s>"<s>nelseif fun > 5 and fun < 50 then<s>n   feel = <s>"Хочется писать квест!<s>"<s>nelseif fun >= 50 then<s>n   feel = <s>"Вдохновение!<s>"<s>nend<s>nreturn feel<s>nend","super_calculate":false,"id":20,"text":"  ","calculate":false,"merge":true},{"answerImage":["http://188.120.236.127/SimKvestopisca/CabinetPlace.png"],"var_less":["server",1],"id":17,"text":"Открыть Кабинет Автора","instant":true,"var_set":["ban",0,"petBan",0]},{"id":20,"comment":false,"instant":true,"lua_do":"function lua_do()<s>nlocal expNum = native.showAlert(<s>"Сервер не отвечает<s>", <s>"На данный момент сервер приложения перегружен. Повторите подключение немного позже.<s>", {<s>"Ок<s>"} )<s>nend","text":"Открыть Кабинет Автора","var_need":["server",1],"answerImage":["http://188.120.236.127/SimKvestopisca/CabinetPlace.png"]},{"id":20,"text":"   ","comment":true},{"answerImage":["http://188.120.236.127/SimKvestopisca/ReadPlace.png"],"lua_do":"function lua_do()<s>nserver = server or 0<s>nif server > 0 then<s>nlocal expNum = native.showAlert(<s>"Сервер не отвечает<s>", <s>"На данный момент сервер приложения перегружен. Повторите подключение немного позже.<s>", {<s>"Ок<s>"}) <s>nelse<s>n   dialog ({header = head3, text = text3, <s>n   answers = {{text = <s>"Ок<s>",<s>n   pressListener = function()<s>nnavykTech = navykTech or 1<s>nnavykProg = navykProg or 1<s>nnavykWrite = navykWrite or 1<s>nnavykLang = navykLang or 1<s>nlocal a = math.random(15)<s>nlocal b = math.random(4)<s>n   if a == 1 then fun = fun <plus> 2<s>n   elseif a == 3 then fun = fun <plus> 5<s>n   elseif a == 5 then<s>n      if b == 1 and navykWrite < 46 then<s>n         navykWrite = navykWrite <plus> 1<s>n         message(<s>"Повышен навык писателя.<s>")<s>n      elseif b == 2 and navykTech < 46 then<s>n         navykTech = navykTech <plus> 1<s>n         message(<s>"Повышен навык написания сложных механик.<s>")<s>n      elseif b == 3 and navykProg < 46 then<s>n         navykProg = navykProg <plus> 1<s>n         message(<s>"Повышен навык программирования.<s>")<s>n      elseif b == 4 and navykLang < 46 then<s>n         navykLang = navykLang <plus> 1<s>n         message(<s>"Повышена грамотность.<s>")<s>n      end<s>n   else fun = fun <plus> 1<s>n   end<s>n   showPage {id = g.current_id, transition= <s>"instant<s>" }<s>n   hideDialog() end}}}) end end","comment":false,"instant":true,"id":20,"text":"Читать Текстовые Квесты","var_add":["readQuest",1],"no_transition":true},{"var_add":["kworum",1],"lua_do":"function lua_do()<s>n   activate = kw<s>n   if kw == 7 then razbor = 1 end<s>n   dialog ({header = head1, <s>n   text = text1, <s>n   answers = {{text = <s>"Окей<s>",<s>n   pressListener = function()<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end}}})<s>n   end","instant":true,"no_transition":true,"var_not":["ban",1],"id":20,"text":"Общаться на Форуме Квестописцев","comment":false,"answerImage":["http://188.120.236.127/SimKvestopisca/KworumPlace.png"]},{"answerImage":["http://188.120.236.127/SimKvestopisca/RazborPlace.png"],"var_equal":["razbor",1],"id":27,"text":"Улучшить квест вместе с модератором","instant":true,"var_set":["razbor",0]},{"comment":false,"text":"Развлекаться в соц.сети","lua_do":"function lua_do()<s>nfun = fun <plus> 1<s>nif math.random(2) == 1 then<s>n   message(tekst)<s>nend<s>nend","instant":true,"id":20,"answerImage":["http://188.120.236.127/SimKvestopisca/SocialPlace.png"]},{"answerImage":["http://188.120.236.127/SimKvestopisca/PlayPlace.png"],"id":21,"lua_do":"function lua_do()<s>nhide = hide or 0<s>nend","text":"Поиграть в компьютер","instant":true,"var_set":["ban",0,"click",1]},{"comment":false,"id":20,"instant":true,"answerImage":["http://188.120.236.127/SimKvestopisca/PetPlace.png"],"var_add":["fun",10],"var_equal":["petBan",0],"var_need":["pet",1],"var_less":["pet",5],"text":"Играть с питомцем","var_set":["petBan",1]},{"text":"Рекламировать один квест в <s>nВоскресном Спойлере (бесплатно)","comment":false,"var_equal":["vosk",0],"id":26,"instant":true,"lua_if":"function lua_if()<s>nif not setQuest1 then setQuest1 = 0 end<s>nif not setQuest2 then setQuest2 = 0 end<s>nif not setQuest3 then setQuest3 = 0 end<s>nif not setQuest4 then setQuest4 = 0 end<s>nif not setQuest5 then setQuest5 = 0 end<s>nif not setQuest6 then setQuest6 = 0 end<s>nif not setQuest7 then setQuest7 = 0 end<s>nif not setQuest8 then setQuest8 = 0 end<s>nif not setQuest9 then setQuest9 = 0 end<s>nif not setQuest10 then setQuest10 = 0 end<s>nreturn setQuest1 == 1 or setQuest2 == 1 or setQuest3 == 1 or setQuest4 == 1 or setQuest5 == 1 or setQuest6 == 1 or setQuest7 == 1 or setQuest8 == 1 or setQuest9 == 1 or setQuest10 == 1<s>nend","answerImage":["http://188.120.236.127/SimKvestopisca/SpoilerPlace.png"]},{"comment":false,"id":20,"instant":true,"lua_if":"function lua_if()<s>nif not setQuest1 then setQuest1 = 0 end<s>nif not setQuest2 then setQuest2 = 0 end<s>nif not setQuest3 then setQuest3 = 0 end<s>nif not setQuest4 then setQuest4 = 0 end<s>nif not setQuest5 then setQuest5 = 0 end<s>nif not setQuest6 then setQuest6 = 0 end<s>nif not setQuest7 then setQuest7 = 0 end<s>nif not setQuest8 then setQuest8 = 0 end<s>nif not setQuest9 then setQuest9 = 0 end<s>nif not setQuest10 then setQuest10 = 0 end<s>nlocal s = 0 <plus> setQuest1 <plus> setQuest2 <plus> setQuest3 <plus> setQuest4 <plus> setQuest5 <plus> setQuest6 <plus> setQuest7 <plus> setQuest8 <plus> setQuest9 <plus> setQuest10<s>nreturn s > 1<s>nend","var_equal":["vosk",0],"text":"Рекламировать ВСЕ квесты в <s>nВоскресном Спойлере (за 1 закладку)","lua_do":"function lua_do()<s>nif setQuest1 == 1 then rek1 = 15 end<s>nif setQuest2 == 1 then rek2 = 15 end<s>nif setQuest3 == 1 then rek3 = 15 end<s>nif setQuest4 == 1 then rek4 = 15 end<s>nif setQuest5 == 1 then rek5 = 15 end<s>nif setQuest6 == 1 then rek6 = 15 end<s>nif setQuest7 == 1 then rek7 = 15 end<s>nif setQuest8 == 1 then rek8 = 15 end<s>nif setQuest9 == 1 then rek9 = 15 end<s>nif setQuest10 == 1 then rek10 = 15 end<s>nvosk = 1<s>nday_vosk = 0<s>nend","paid_answer":["Реклама в Воскресном Спойлере всех квестов",1],"answerImage":["http://188.120.236.127/SimKvestopisca/SpoilerPlace.png"]},{"id":20,"text":"  ","comment":true},{"var_not":["ocenka",2,"diplom",2,"diplom",3,"diplom",4,"diplom",5],"var_need":["teaching",1],"id":25,"instant":true,"text":"Обучение в Универе","answerImage":["http://188.120.236.127/SimKvestopisca/StudyPlace.png"]},{"comment":false,"lua_do":"function lua_do()<s>ndrevo = drevo or 0<s>n   if drevo == 0 then<s>n      drevo = drevo <plus> 1<s>n      drevoT = 5<s>n      local expNum = native.showAlert(<s>"Событие<s>", <s>"Вы посадили росток дерева, но на этом цель еще не выполнена - нужно не дать ему погибнуть, чтобы оно выросло в большое могучее древо.<s>", {<s>"Понял<s>"})<s>n   elseif drevo > 0 and drevo < 49 then<s>n      drevo = drevo <plus> 1<s>n      drevoT = 5<s>n   elseif drevo == 49 then<s>n      drevo = 50<s>n      local expNum = native.showAlert(<s>"Достижение<s>", <s>"Ты выполнил третье предназначение из четырёх. Осталось совсем немного до выполнения всех поставленных целей.<s>", {<s>"Отлично!<s>"})<s>n   end<s>nend","text":"_ дерево _","lua_if":"function lua_if()<s>ndrevo = drevo or 0<s>nkid = kid or 0<s>nreturn kid >= 1 and drevo < 50<s>nend","var_less":["drevoT",1],"lua_text":"function lua_text()<s>nlocal text = <s>"<s>"<s>n   if drevo == 0 then text = <s>"Купить росток дерева и посадить его во дворе.<s>"<s>n   elseif drevo > 0 and drevo < 10 then text = <s>"Взять кружку воды и полить саженец<s>"<s>n   elseif drevo >= 10 and drevo < 25 then text = <s>"Взять ковшик воды и полить деревце<s>"<s>n   elseif drevo >= 25 and drevo < 40 then text = <s>"Взять кастрюлю воды и полить древо<s>"<s>n   elseif drevo >= 40 then text = <s>"Взять ведро и полить дерево<s>"<s>n   end<s>nreturn text<s>nend","id":20,"instant":true,"answerImage":["http://188.120.236.127/SimKvestopisca/TreePlace.png"]},{"var_less":["kidTime",1,"toSchool",1,"kidAdapted",100],"var_need":["inSchool",1,"money",2500],"comment":false,"var_equal":["kid",1],"id":39,"instant":true,"text":"Вести ребёнка на подготовительные <s>nзанятия","answerImage":["http://188.120.236.127/SimKvestopisca/KidMalePlace.png"]},{"var_less":["kidTime",1,"toSchool",1,"kidAdapted",100],"var_need":["inSchool",1,"money",2500],"comment":false,"var_equal":["kid",2],"id":39,"instant":true,"text":"Вести ребёнка на подготовительные <s>nзанятия","answerImage":["http://188.120.236.127/SimKvestopisca/KidFemalePlace.png"]},{"var_add":["kidAdapted",1],"id":20,"instant":true,"var_need":["toSchool",1],"var_less":["kidTime",1,"timeToSchool",1300],"var_equal":["kid",1],"text":"Помогать сыну в учёбе ","lua_do":"function lua_do()<s>ntoSchool = toSchool <plus> 10<s>nkidTime = 3<s>nend","comment":false,"answerImage":["http://188.120.236.127/SimKvestopisca/KidMalePlace.png"]},{"var_add":["kidAdapted",1],"id":20,"instant":true,"var_need":["toSchool",1],"var_less":["kidTime",1,"timeToSchool",1300],"var_equal":["kid",2],"text":"Помогать дочери в учёбе","lua_do":"function lua_do()<s>ntoSchool = toSchool <plus> 10<s>nkidTime = 3<s>nend","comment":false,"answerImage":["http://188.120.236.127/SimKvestopisca/KidFemalePlace.png"]},{"var_need":["toSchool",1,"schoolDay",30],"instant":true,"id":40,"text":"Дневник ребёнка","var_less":["timeToSchool",1300],"answerImage":["http://188.120.236.127/SimKvestopisca/NotePlace.png"]},{"id":19,"text":"Заметки писателя","instant":true,"answerImage":["http://188.120.236.127/SimKvestopisca/NotePlace.png"]},{"id":22,"text":"... задания ...","run":[22]},{"id":20,"text":"  ","comment":true},{"lua_text":"function lua_text()<s>nlocal text = <s>"<s>"<s>nif navykLang <= 10 then<s>n   text = <s>"Изучать учебники русского языка <s><s>nза 2-3 класс<s>"<s>nelseif navykLang > 10 and navykLang <= 20 then<s>n   text = <s>"Изучать учебники русского языка <s><s>nза 5-7 класс<s>"<s>nelseif navykLang > 20 and navykLang <= 30 then<s>n   text = <s>"Изучать учебники русского языка <s><s>nза 8-9 класс<s>"<s>nelseif navykLang > 30 and navykLang <= 40 then<s>n   text = <s>"Изучать учебники русского языка <s><s>nза 10-11 класс<s>"<s>nelseif navykLang > 40 then<s>n   text = <s>"Изучать учебники русского языка <s><s>nдля ВУЗов<s>"<s>nend<s>nreturn text<s>nend","lua_do":"function lua_do()<s>nif navykLang <= 10 then<s>n   if math.random(3) == 1 then<s>n   navykLang = navykLang <plus> 1<s>n   message(<s>"Навык грамотности повышен <plus>1.<s>")<s>n   end<s>nelseif navykLang > 10 and navykLang <= 20 then<s>n   if math.random(6) == 1 then<s>n   navykLang = navykLang <plus> 1<s>n   message(<s>"Навык грамотности повышен <plus>1.<s>")<s>n   end<s>nelseif navykLang > 20 and navykLang <= 30 then<s>n   if math.random(9) == 1 then<s>n   navykLang = navykLang <plus> 1<s>n   message(<s>"Навык грамотности повышен <plus>1.<s>")<s>n   end<s>nelseif navykLang > 30 and navykLang <= 40 then<s>n   if math.random(12) == 1 then<s>n   navykLang = navykLang <plus> 1<s>n   message(<s>"Навык грамотности повышен<plus>1.<s>")<s>n   end<s>nelseif navykLang > 40 then<s>n   if math.random(15) == 1 then<s>n   navykLang = navykLang <plus> 1<s>n   message(<s>"Навык грамотности повышен <plus>1.<s>")<s>n   end<s>nend<s>nif math.random(3) == 1 then fun = fun <plus> 1 end<s>nend","comment":false,"text":"изучать  грамматики","var_less":["navykLang",50],"instant":true,"id":20,"answerImage":["http://188.120.236.127/SimKvestopisca/BookGramPlace.png"]},{"lua_text":"function lua_text()<s>nlocal text = <s>"<s>"<s>nif navykTech <= 10 then<s>n   text = <s>"Изучать учебник ''Как написать <s><s>nпервый квест''<s>"<s>nelseif navykTech > 10 and navykTech <= 20 then<s>n   text = <s>"Изучать ''Советы для тех, кто <s><s>nсобирается писать первый квест''<s>"<s>nelseif navykTech > 20 and navykTech <= 30 then<s>n   text = <s>"Изучать ''Учебник по операторам <s><s>nпеременных''<s>"<s>nelseif navykTech > 30 and navykTech <= 40 then<s>n   text = <s>"Изучать учебник ''Операторы для <s><s>nсложных квестов''<s>"<s>nelseif navykTech > 40 then<s>n   text = <s>"Изучать учебник ''Обложки, картинки, <s><s>nанимации, музыка''<s>"<s>nend<s>nreturn text<s>nend","id":20,"comment":false,"text":"изучать операторы","lua_do":"function lua_do()<s>nif navykTech <= 10 then<s>n   if math.random(3) == 1 then<s>n   navykTech = navykTech <plus> 1<s>n   message(<s>"Навык написания механик повышен <plus>1.<s>")<s>n   end<s>nelseif navykTech > 10 and navykTech <= 20 then<s>n   if math.random(6) == 1 then<s>n   navykTech = navykTech <plus> 1<s>n   message(<s>"Навык написания механик повышен <plus>1.<s>")<s>n   end<s>nelseif navykTech > 20 and navykTech <= 30 then<s>n   if math.random(9) == 1 then<s>n   navykTech = navykTech <plus> 1<s>n   message(<s>"Навык написания механик повышен <plus>1.<s>")<s>n   end<s>nelseif navykTech > 30 and navykTech <= 40 then<s>n   if math.random(12) == 1 then<s>n   navykTech = navykTech <plus> 1<s>n   message(<s>"Навык написания механик повышен<plus>1.<s>")<s>n   end<s>nelseif navykTech > 40 then<s>n   if math.random(15) == 1 then<s>n   navykTech = navykTech <plus> 1<s>n   message(<s>"Навык написания механик повышен <plus>1.<s>")<s>n   end<s>nend<s>nif math.random(3) == 1 then fun = fun <plus> 1 end<s>nend","instant":true,"var_less":["navykTech",50],"answerImage":["http://188.120.236.127/SimKvestopisca/BookTechPlace.png"]},{"lua_text":"function lua_text()<s>nlocal text = <s>"<s>"<s>nif navykProg <= 10 then<s>n   text = <s>"Изучать уроки по Lua в группе ВК<s>"<s>nelseif navykProg > 10 and navykProg <= 20 then<s>n   text = <s>"Изучать учебник Lua в Приложении<s>"<s>nelseif navykProg > 20 and navykProg <= 30 then<s>n   text = <s>"Изучать примеры кода Lua в <s><s>nинтернете<s>"<s>nelseif navykProg > 30 and navykProg <= 40 then<s>n   text = <s>"Изучать материал по Lua от <s><s>nразработчиков<s>"<s>nelseif navykProg > 40 then<s>n   text = <s>"Изучать Lua на официальном форуме<s>"<s>nend<s>nreturn text<s>nend","id":20,"comment":false,"instant":true,"lua_do":"function lua_do()<s>nif navykProg <= 10 then<s>n   if math.random(3) == 1 then<s>n   navykProg = navykProg <plus> 1<s>n   message(<s>"Навык программирования <plus>1.<s>")<s>n   end<s>nelseif navykProg > 10 and navykProg <= 20 then<s>n   if math.random(6) == 1 then<s>n   navykProg = navykProg <plus> 1<s>n   message(<s>"Навык программирования <plus>1.<s>")<s>n   end<s>nelseif navykProg > 20 and navykProg <= 30 then<s>n   if math.random(9) == 1 then<s>n   navykProg = navykProg <plus> 1<s>n   message(<s>"Навык программирования <plus>1.<s>")<s>n   end<s>nelseif navykProg > 30 and navykProg <= 40 then<s>n   if math.random(12) == 1 then<s>n   navykProg = navykProg <plus> 1<s>n   message(<s>"Навык программирования <plus>1.<s>")<s>n   end<s>nelseif navykProg > 40 then<s>n   if math.random(15) == 1 then<s>n   navykProg = navykProg <plus> 1<s>n   message(<s>"Навык программирования <plus>1.<s>")<s>n   end<s>nend<s>nif math.random(3) == 1 then fun = fun <plus> 1 end<s>nend","text":"изучать Луа","var_less":["navykProg",50],"answerImage":["http://188.120.236.127/SimKvestopisca/BookProgPlace.png"]},{"id":18,"text":"... диалоги кворума ...","run":[18]},{"id":20,"text":"   ","comment":true,"var_need":["money",110000,"otpusk",30]},{"var_add":["fun",50],"text":"Отправиться в отпуск (- 100.000 денег, <plus> вдохновение к настроению)","comment":false,"var_need":["money",110000,"otpusk",30],"id":20,"var_sub":["money",100000],"instant":true,"var_set":["otpusk",0]},{"id":20,"text":"   ","comment":true,"var_need":["money",110000,"otpusk",30]},{"var_show":["money"],"comment":true,"var_equal":["contract",1],"id":20,"text":"Денег:"},{"var_show":["ipoteka"],"comment":true,"id":20,"text":"Остаток по ипотеке:","var_need":["ipoteka",1]},{"lua_do":"function lua_do()<s>nipoteka = 0<s>nmessage (<s>"Ты справился с великой задачей... Одной из четырёх. Да-да, это ещё не всё.<s>")<s>nend","comment":false,"text":"Закрыть ипотеку","id":20,"var_need":["ipoteka",1,"money","ipoteka"],"var_sub":["money","ipoteka"],"instant":true},{"super_calculate":false,"lua_do":"function lua_do()<s>nserver = server or 0<s>nif server <= 0 then<s>n   if math.random(50) == 23 then <s>n   server = 3 end <s>nend<s>nif server > 1 then <s>n   server = server - 1<s>nelseif server == 1 then <s>n   server = 0 end<s>nend","calculate":true,"text":"   ","id":20},{"id":23,"text":"...счётчик дней ...","run":[23]},{"id":24,"text":"... события с девушкой...","run":[24],"var_less":["wife",1]},{"id":28,"text":"... события жена ...","run":[28],"var_less":["toUniver",1]},{"id":41,"text":"... ребенок в универе... ","comment":false,"run":[41]},{"id":20,"text":"  ","comment":true},{"comment":true,"var_equal":["global disableMusicSetting",0],"middle_answer":true,"text":"Управление музыкой","id":20},{"var_str_set":["global bg_music","0"],"comment":false,"var_equal":["global disableMusicSetting",0],"id":20,"text":"Выключить","instant":true,"left_answer":true},{"text":"Следующая","right_answer":true,"comment":false,"var_equal":["global disableMusicSetting",0],"id":20,"instant":true,"lua_do":"function lua_do()<s>nlastM = lastM or 0<s>ntabMusic = { <s>"musicA<s>", <s>"musicB<s>", <s>"musicC<s>", <s>"musicD<s>", <s>"musicE<s>" }<s>n<s>n   if lastM == 0 then<s>n      lastM = 1<s>n      g.bg_music = tabMusic[1]<s>n   elseif lastM == 1 then<s>n      lastM = 2<s>n      g.bg_music = tabMusic[2]<s>n   elseif lastM == 2 then<s>n      lastM = 3<s>n      g.bg_music = tabMusic[3]<s>n   elseif lastM == 3 then<s>n      lastM = 4<s>n      g.bg_music = tabMusic[4]<s>n   elseif lastM == 4 then<s>n      lastM = 5<s>n      g.bg_music = tabMusic[5]<s>n   elseif lastM == 5 then<s>n      lastM = 1<s>n      g.bg_music = tabMusic[1]<s>n   end<s>nend","no_transition":false}]},{"id":21,"text":"Вы за компьютером. Играя в игры и ведя стримы можно набраться настроения для написания квеста.","answers":[{"comment":false,"var_equal":["automa",0],"id":21,"instant":true,"lua_do":"function lua_do()<s>nprogress = progress or 0<s>nexp = exp or 0<s>nmin_exp = min_exp or 0<s>nmax_exp = max_exp or 0<s>nweapon = weapon or 1<s>narmor = armor or 1<s>nlvl = lvl or 1<s>nclick = click <plus> 1<s>n<s>nif progress == 0 then<s>n   progress = 1<s>n   dialog ({header = <s>"Выберите персонажа!<s>", <s>n   text = <s>"Выбор влияет на незначительный коэффециент к получаемому опыту. У Рыцаря и Целителя он выше, так как на сервере мало игроков с данными классами, а у Убийцы и Лучника этот коэффициент ниже, так как сервер переполнен игроками с данными классами.<s>", <s>n   answers = <s>n{{text = <s>"Рыцарь<s>",<s>n   pressListener = function () <s>n   he = 1<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}, <s>n{text = <s>"Воин<s>",<s>n   pressListener = function () <s>n   he = 2<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}, <s>n{text = <s>"Убийца<s>",<s>n   pressListener = function () <s>n   he = 3<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}, <s>n{text = <s>"Лучник<s>",<s>n   pressListener = function () <s>n   he = 4<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}, <s>n{text = <s>"Волшебник<s>",<s>n   pressListener = function () <s>n   he = 5<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}, <s>n{text = <s>"Целитель<s>", <s>n   pressListener = function ()<s>n   he = 6<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}}})<s>nend<s>n<s>nlocal K = progress <plus> 1<s>nif he == 1 or he == 6 then koef = 1.2<s>nelseif he == 3 or he == 4 then koef = 0.8<s>nelse koef = 1 end<s>ntableP = { }<s>nlocal u = 50<s>n   for i = 1, 52 do<s>n      table.insert (tableP, u)<s>n      u = u <plus> 50<s>n   end<s>nfun = fun <plus> math.random(3)<s>n<s>n   if progress >= 1 and lvl < 250 then<s>n      exp = exp <plus> math.round (math.random(tableP[progress], tableP[K]) * koef)   end<s>n<s>nlvl = lvl or 1<s>nlocal loca = math.floor (lvl / 5)<s>nlocal random = math.random(progress)<s>n   if progress < 21 and loca >= progress and random == 1 then<s>n      progress = progress <plus> 1 <s>n      message(<s>"Вы перешли на другую локацию!<s>") end<s>n<s>n<s>nif progress >= 4 then <s>n   local rand = math.random(15)<s>n<s>n   if rand == 10 then<s>n   dialog ({header = <s>"Ивент в игре!<s>", <s>n   text = <s>"Ты поучаствовал в ивенте, проводимом разработчиками игры. Всё прошло увлекательно и весело.<s>", <s>n   answers = {{text = <s>"Отлично!<s>", <s>n   pressListener = function ()<s>n   fun = fun <plus> 5<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}}}) end<s>n  <s>n   if rand == 7 and lvl < 250 then<s>n   dialog ({header = <s>"Прокачка в команде!<s>", <s>n   text = <s>"Тебе удалось собрать команду и отправиться на массовую зачистку. Ты получаешь дополнительный опыт.<s>", <s>n   answers = {{text = <s>"Опыт<plus><s>", <s>n   pressListener = function ()<s>n   exp = exp <plus> (tableP[progress] * 7)<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog () end}}}) end<s>n<s>n   if rand == 1 then<s>n   if weapon < 8 or armor < 8 then<s>n   dialog ({header = <s>"Рейд на босса!<s>", <s>n   text = <s>"Ты вступил в отряд для уничтожения босса. Есть шанс получить хорошее снаряжение, но он довольно низкий.<s>", <s>n   answers = {{text = <s>"Удача<plus><s>", <s>n   pressListener = function ()<s>n       if weapon < 8 or armor < 8 then<s>n           if math.random(3) == 1 then<s>n               if math.random(2) == 1 then<s>n               weapon = weapon <plus> 1<s>n               else armor = armor <plus> 1 end<s>n           end<s>n       end<s>n   if weapon > 7 then weapon = 8 end<s>n   if armor > 7 then armor = 8 end<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"} hideDialog() end}}})<s>n   end<s>nend end<s>nend","text":"Играть в MMORPG"},{"id":21,"var_need":["click",10],"comment":false,"var_equal":["automa",0],"var_less":["lvl",250],"instant":true,"text":"Автоматическая прокачка (не будет случайных событий, но будет накапливаться опыт)","var_set":["automa",1]},{"comment":false,"instant":true,"id":21,"text":"Выключить автоматическую прокачку","var_need":["automa",1],"var_set":["automa",0,"click",0]},{"lua_if":"function lua_if()<s>nreturn he<s>nend","var_equal":["automa",0],"id":21,"text":"  ","lua_text":"function lua_text()<s>nprogress = progress or 0<s>nexp = exp or 0<s>nmin_exp = min_exp or 0<s>nmax_exp = max_exp or 100<s>nshag = shag or 100<s>nlvl = lvl or 1<s>n   hero = { <s>"Рыцарь<s>", <s>"Воин<s>", <s>"Убийца<s>", <s>"Лучник<s>", <s>"Волшебник<s>", <s>"Целитель<s>" }<s>n   map = { <s>"Окрестности тренировочного лагеря<s>", <s>"Окрестности деревни Киар<s>", <s>"Окрестности городка Лиадоран<s>", <s>"Руины первых правителей<s>", <s>"Лабиринт Минотавров<s>", <s>"Развалины старого города<s>", <s>"Окрестности города Далан<s>", <s>"Болото ящеролюдов<s>", <s>"Равнины крепости Саян<s>", <s>"Лес Эларинас<s>", <s>"Окрестности города Хорлеон<s>", <s>"Подземелье Ниярхатэ<s>", <s>"Ущелье Звездопада<s>", <s>"Болото Ядовитого Глаза<s>", <s>"Окрестности военного лагеря<s>", <s>"Подземелье Валакарта<s>", <s>"Горы Маторги<s>", <s>"Ущелье Древнего Бога<s>", <s>"Руины Некроманта<s>", <s>"Драконья Долина<s>", <s>"Лабиринт Заххака<s>" }<s>n   class = { <s>"D<s>", <s>"C<s>", <s>"B<s>", <s>"A<s>", <s>"S<s>", <s>"SS<s>", <s>"SSS<s>", <s>"Epic<s>" }<s>n   weapon = weapon or 1<s>n   armor = armor or 1<s>n<s>nif progress < 21 then<s>n   progressO = progress<s>nelseif progress >= 21 then<s>n   if math.random(5) == 1 then<s>n   progressO = math.random(11,21)<s>n   message(<s>"Вы сменили место прокачки.<s>")<s>n   end<s>nend<s>n<s>n   if exp >= max_exp then <s>n      lvl = lvl <plus> 1<s>n      min_exp = max_exp<s>n      max_exp = max_exp <plus> shag<s>n      shag = shag <plus> 100<s>n   end<s>n<s>n   local proc = 0<s>n   if exp > 0 then proc = math.floor ((exp - min_exp) / (max_exp - min_exp) * 1000) / 10 end<s>n   local text = <s>"<s>"<s>n   if lvl < 250 then <s>n   text = <s>"Персонаж: <s>" .. hero[he] .. <s>", <s>" .. lvl .. <s>" ур.<s><s>nОпыт: <s>" .. exp .. <s>"/<s>" .. max_exp .. <s>" (<s>" .. proc .. <s>"%)<s><s>nОружие: <s>" .. class[weapon] .. <s>", снаряжение: <s>" .. class[armor] ..  <s>"<s><s>nЛокация: <s>" .. map[progressO]<s>n   elseif lvl >= 250 then <s>n   text = <s>"Персонаж: <s>" .. hero[he] .. <s>", 250 ур. (макс.ур.)<s><s>nОружие: <s>" .. class[weapon] .. <s>", снаряжение: <s>" .. class[armor] .. <s>"<s><s>nЛокация: <s>" .. map[progressO] <s>n   end<s>nreturn text<s>nend","comment":true},{"comment":true,"lua_text":"function lua_text()<s>nprogress = progress or 0<s>nexp = exp or 0<s>nmin_exp = min_exp or 0<s>nmax_exp = max_exp or 100<s>nshag = shag or 100<s>nlvl = lvl or 1<s>n   hero = { <s>"Рыцарь<s>", <s>"Воин<s>", <s>"Убийца<s>", <s>"Лучник<s>", <s>"Волшебник<s>", <s>"Целитель<s>" }<s>n   map = { <s>"Окрестности тренировочного лагеря<s>", <s>"Окрестности деревни Киар<s>", <s>"Окрестности городка Лиадоран<s>", <s>"Руины первых правителей<s>", <s>"Лабиринт Минотавров<s>", <s>"Развалины старого города<s>", <s>"Окрестности города Далан<s>", <s>"Болото ящеролюдов<s>", <s>"Равнины крепости Саян<s>", <s>"Лес Эларинас<s>", <s>"Окрестности города Хорлеон<s>", <s>"Подземелье Ниярхатэ<s>", <s>"Ущелье Звездопада<s>", <s>"Болото Ядовитого Глаза<s>", <s>"Окрестности военного лагеря<s>", <s>"Подземелье Валакарта<s>", <s>"Горы Маторги<s>", <s>"Ущелье Древнего Бога<s>", <s>"Руины Некроманта<s>", <s>"Драконья Долина<s>", <s>"Лабиринт Заххака<s>" }<s>n   class = { <s>"D<s>", <s>"C<s>", <s>"B<s>", <s>"A<s>", <s>"S<s>", <s>"SS<s>", <s>"SSS<s>", <s>"Epic<s>" }<s>n   weapon = weapon or 1<s>n   armor = armor or 1<s>n<s>n<s>n<s>nlocal K = progress <plus> 1<s>nif he == 1 or he == 6 then koef = 1.2<s>nelseif he == 3 or he == 4 then koef = 0.8<s>nelse koef = 1 end<s>ntableP = { }<s>nlocal u = 50<s>n   for i = 1, 52 do<s>n      table.insert (tableP, u)<s>n      u = u <plus> 50  end<s>nfun = fun <plus> math.random(0,2)<s>n<s>nif progress >= 1 and lvl < 250 then<s>n      exp = exp <plus> math.round (math.random(tableP[progress], tableP[K]) * koef)   end<s>n<s>nlvl = lvl or 1<s>nlocal loca = math.floor (lvl / 5)<s>nlocal random = math.random(progress)<s>n   if progress < 21 and loca >= progress and random == 1 then<s>n      progress = progress <plus> 1 <s>n      message(<s>"Вы перешли на другую локацию!<s>") end<s>n<s>nif progress < 21 then<s>n   progressO = progress<s>nelseif progress >= 21 then<s>n   if math.random(7) == 1 then<s>n   progressO = math.random(11,21)<s>n   message(<s>"Вы сменили место прокачки.<s>")<s>n   end<s>nend<s>n<s>n   if exp >= max_exp then <s>n      lvl = lvl <plus> 1<s>n      min_exp = max_exp<s>n      max_exp = max_exp <plus> shag<s>n      shag = shag <plus> 100<s>n   end<s>n<s>nif lvl >= 250 then<s>nautoma = 0<s>nshowPage {id = g.current_id, transition = <s>"instant<s>"}<s>nend<s>n<s>n   local proc = 0<s>n   if exp > 0 then proc = math.floor ((exp - min_exp) / (max_exp - min_exp) * 1000) / 10 end<s>n<s>n   local text = <s>"<s>"<s>n   if lvl < 250 then <s>n   text = <s>"Персонаж: <s>" .. hero[he] .. <s>", <s>" .. lvl .. <s>" ур.<s><s>nОпыт: <s>" .. exp .. <s>"/<s>" .. max_exp .. <s>" (<s>" .. proc .. <s>"%)<s><s>nОружие: <s>" .. class[weapon] .. <s>", снаряжение: <s>" .. class[armor] ..  <s>"<s><s>nЛокация: <s>" .. map[progressO]<s>n   elseif lvl >= 250 then <s>n   text = <s>"Персонаж: <s>" .. hero[he] .. <s>", 250 ур. (макс.ур.)<s><s>nОружие: <s>" .. class[weapon] .. <s>", снаряжение: <s>" .. class[armor] .. <s>"<s><s>nЛокация: <s>" .. map[progressO] <s>n   end<s>nreturn text<s>nend","var_equal":["automa",1],"id":21,"text":"  ","update":[1],"lua_if":"function lua_if()<s>nreturn he<s>nend"},{"lua_if":"function lua_if()<s>nweapon = weapon or 1<s>narmor = armor or 1<s>nreturn weapon < 8 or armor < 8<s>nend","paid_answer":["получить оружие или снаряжение",1],"comment":false,"lua_do":"function lua_do()<s>nweapon = weapon or 1<s>narmor = armor or 1<s>nif weapon <= armor then<s>n   weapon = weapon <plus> 1<s>nelse <s>n   armor = armor <plus> 1<s>nend<s>nend","var_need":["lvl",50],"text":"Получить оружие или снаряжение в обмен на закладку","id":21},{"id":21,"text":"  ","comment":true},{"var_add":["repStreem",1],"comment":false,"var_equal":["streem",0],"id":21,"instant":true,"text":"Начать стрим","var_set":["streem",1]},{"lua_do":"function lua_do()<s>nmaxRepStreem = maxRepStreem or 1<s>nif maxRepStreem < repStreem then<s>n   maxRepStreem = repStreem <s>n   repStreem = math.ceil (repStreem * 0.6) <s>nend<s>nend","comment":false,"var_equal":["streem",1],"id":21,"text":"Завершить стрим","instant":true,"var_set":["streem",0]},{"comment":true,"var_equal":["streem",1],"id":21,"text":"  ","update":[1],"lua_text":"function lua_text()<s>nrepStreem = repStreem or 1<s>nmaxRepStreem = maxRepStreem or 1<s>nif math.random (3) == 1 then<s>n   repStreem = repStreem <plus> math.random ( math. ceil( repStreem / 50 ) ) <s>nend<s>nreturn <s>"Идёт стрим-вещание.<s><s>nЗрителей: <s>" .. repStreem .. <s>"<s><s>nБывший максимум: <s>" .. maxRepStreem<s>nend"},{"id":21,"text":"  ","comment":true},{"comment":false,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng1 = g1 or 0<s>nif game[1] == 1 then<s>n   if hide == 1 and g1 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","instant":true,"id":21,"text":"Играть в ","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g1 then<s>ng1 = math.random(3,7)<s>nelse g1 = g1 <plus> math.random(3,7)<s>nend<s>nif g1 > 100 then g1 = 100 end<s>nend","lua_text":"function lua_text()<s>nif not g1 then g1 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[1] .. <s>"<s><s>nПройдена на <s>" .. g1 .. <s>"%<s>"<s>nend"},{"comment":false,"lua_text":"function lua_text()<s>nif not g2 then g2 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[2] .. <s>"<s><s>nПройдена на <s>" .. g2 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nlocal op = 0<s>ng2 = g2 or 0<s>nif game[2] == 1 then<s>n   if hide == 1 and g2 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"text":"Играть в ","instant":true,"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g2 then<s>ng2 = math.random(3,7)<s>nelse g2 = g2 <plus> math.random(3,7)<s>nend<s>nif g2 > 100 then g2 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g3 then<s>ng3 = math.random(3,7)<s>nelse g3 = g3 <plus> math.random(3,7)<s>nend<s>nif g3 > 100 then g3 = 100 end<s>nend","comment":false,"instant":true,"id":21,"text":"Играть в ","lua_if":"function lua_if()<s>nlocal op = 0<s>ng3 = g3 or 0<s>nif game[3] == 1 then<s>n   if hide == 1 and g3 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","lua_text":"function lua_text()<s>nif not g3 then g3 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[3] .. <s>"<s><s>nПройдена на <s>" .. g3 .. <s>"%<s>"<s>nend"},{"lua_text":"function lua_text()<s>nif not g4 then g4 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[4] .. <s>"<s><s>nПройдена на <s>" .. g4 .. <s>"%<s>"<s>nend","comment":false,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng4 = g4 or 0<s>nif game[4] == 1 then<s>n   if hide == 1 and g4 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"instant":true,"text":"Играть в ","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g4 then<s>ng4 = math.random(3,7)<s>nelse g4 = g4 <plus> math.random(3,7)<s>nend<s>nif g4 > 100 then g4 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g5 then<s>ng5 = math.random(3,7)<s>nelse g5 = g5 <plus> math.random(3,7)<s>nend<s>nif g5 > 100 then g5 = 100 end<s>nend","lua_text":"function lua_text()<s>nif not g5 then g5 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[5] .. <s>"<s><s>nПройдена на <s>" .. g5 .. <s>"%<s>"<s>nend","text":"Играть в ","id":21,"instant":true,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng5 = g5 or 0<s>nif game[5] == 1 then<s>n   if hide == 1 and g5 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","comment":false},{"comment":false,"lua_text":"function lua_text()<s>nif not g6 then g6 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[6] .. <s>"<s><s>nПройдена на <s>" .. g6 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nlocal op = 0<s>ng6 = g6 or 0<s>nif game[6] == 1 then<s>n   if hide == 1 and g6 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"text":"Играть в ","instant":true,"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g6 then<s>ng6 = math.random(3,7)<s>nelse g6 = g6 <plus> math.random(3,7)<s>nend<s>nif g6 > 100 then g6 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g7 then<s>ng7 = math.random(3,7)<s>nelse g7 = g7 <plus> math.random(3,7)<s>nend<s>nif g7 > 100 then g7 = 100 end<s>nend","comment":false,"instant":true,"id":21,"text":"Играть в ","lua_if":"function lua_if()<s>nlocal op = 0<s>ng7 = g7 or 0<s>nif game[7] == 1 then<s>n   if hide == 1 and g7 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","lua_text":"function lua_text()<s>nif not g7 then g7 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[7] .. <s>"<s><s>nПройдена на <s>" .. g7 .. <s>"%<s>"<s>nend"},{"lua_text":"function lua_text()<s>nif not g8 then g8 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[8] .. <s>"<s><s>nПройдена на <s>" .. g8 .. <s>"%<s>"<s>nend","comment":false,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng8 = g8 or 0<s>nif game[8] == 1 then<s>n   if hide == 1 and g8 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"instant":true,"text":"Играть в ","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g8 then<s>ng8 = math.random(3,7)<s>nelse g8 = g8 <plus> math.random(3,7)<s>nend<s>nif g8 > 100 then g8 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g9 then<s>ng9 = math.random(3,7)<s>nelse g9 = g9 <plus> math.random(3,7)<s>nend<s>nif g9 > 100 then g9 = 100 end<s>nend","lua_text":"function lua_text()<s>nif not g9 then g9 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[9] .. <s>"<s><s>nПройдена на <s>" .. g9 .. <s>"%<s>"<s>nend","text":"Играть в ","id":21,"instant":true,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng9 = g9 or 0<s>nif game[9] == 1 then<s>n   if hide == 1 and g9 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","comment":false},{"comment":false,"lua_text":"function lua_text()<s>nif not g10 then g10 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[10] .. <s>"<s><s>nПройдена на <s>" .. g10 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nlocal op = 0<s>ng10 = g10 or 0<s>nif game[10] == 1 then<s>n   if hide == 1 and g10 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"text":"Играть в ","instant":true,"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g10 then<s>ng10 = math.random(3,7)<s>nelse g10 = g10 <plus> math.random(3,7)<s>nend<s>nif g10 > 100 then g10 = 100 end<s>nend"},{"comment":false,"lua_text":"function lua_text()<s>nif not g11 then g11 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[11] .. <s>"<s><s>nПройдена на <s>" .. g11 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nlocal op = 0<s>ng11 = g11 or 0<s>nif game[11] == 1 then<s>n   if hide == 1 and g11 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"text":"Играть в ","instant":true,"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g11 then<s>ng11 = math.random(3,7)<s>nelse g11 = g11 <plus> math.random(3,7)<s>nend<s>nif g11 > 100 then g11 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g12 then<s>ng12 = math.random(3,7)<s>nelse g12 = g12 <plus> math.random(3,7)<s>nend<s>nif g12 > 100 then g12 = 100 end<s>nend","comment":false,"instant":true,"id":21,"text":"Играть в ","lua_if":"function lua_if()<s>nlocal op = 0<s>ng12 = g12 or 0<s>nif game[12] == 1 then<s>n   if hide == 1 and g12 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","lua_text":"function lua_text()<s>nif not g12 then g12 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[12] .. <s>"<s><s>nПройдена на <s>" .. g12 .. <s>"%<s>"<s>nend"},{"lua_text":"function lua_text()<s>nif not g13 then g13 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[13] .. <s>"<s><s>nПройдена на <s>" .. g13 .. <s>"%<s>"<s>nend","comment":false,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng13 = g13 or 0<s>nif game[13] == 1 then<s>n   if hide == 1 and g13 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"instant":true,"text":"Играть в ","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g13 then<s>ng13 = math.random(3,7)<s>nelse g13 = g13 <plus> math.random(3,7)<s>nend<s>nif g13 > 100 then g13 = 100 end<s>nend"},{"lua_text":"function lua_text()<s>nif not g14 then g14 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[14] .. <s>"<s><s>nПройдена на <s>" .. g14 .. <s>"%<s>"<s>nend","comment":false,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng14 = g14 or 0<s>nif game[14] == 1 then<s>n   if hide == 1 and g14 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"instant":true,"text":"Играть в ","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g14 then<s>ng14 = math.random(3,7)<s>nelse g14 = g14 <plus> math.random(3,7)<s>nend<s>nif g14 > 100 then g14 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g15 then<s>ng15 = math.random(3,7)<s>nelse g15 = g15 <plus> math.random(3,7)<s>nend<s>nif g15 > 100 then g15 = 100 end<s>nend","lua_text":"function lua_text()<s>nif not g15 then g15 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[15] .. <s>"<s><s>nПройдена на <s>" .. g15 .. <s>"%<s>"<s>nend","text":"Играть в ","id":21,"instant":true,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng15 = g15 or 0<s>nif game[15] == 1 then<s>n   if hide == 1 and g15 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","comment":false},{"comment":false,"lua_text":"function lua_text()<s>nif not g16 then g16 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[16] .. <s>"<s><s>nПройдена на <s>" .. g16 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nlocal op = 0<s>ng16 = g16 or 0<s>nif game[16] == 1 then<s>n   if hide == 1 and g16 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"text":"Играть в ","instant":true,"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g16 then<s>ng16 = math.random(3,7)<s>nelse g16 = g16 <plus> math.random(3,7)<s>nend<s>nif g16 > 100 then g16 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g17 then<s>ng17 = math.random(3,7)<s>nelse g17 = g17 <plus> math.random(3,7)<s>nend<s>nif g17 > 100 then g17 = 100 end<s>nend","comment":false,"instant":true,"id":21,"text":"Играть в ","lua_if":"function lua_if()<s>nlocal op = 0<s>ng17 = g17 or 0<s>nif game[17] == 1 then<s>n   if hide == 1 and g17 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","lua_text":"function lua_text()<s>nif not g17 then g17 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[17] .. <s>"<s><s>nПройдена на <s>" .. g17 .. <s>"%<s>"<s>nend"},{"lua_text":"function lua_text()<s>nif not g18 then g18 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[18] .. <s>"<s><s>nПройдена на <s>" .. g18 .. <s>"%<s>"<s>nend","comment":false,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng18 = g18 or 0<s>nif game[18] == 1 then<s>n   if hide == 1 and g18 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"instant":true,"text":"Играть в ","lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g18 then<s>ng18 = math.random(3,7)<s>nelse g18 = g18 <plus> math.random(3,7)<s>nend<s>nif g18 > 100 then g18 = 100 end<s>nend"},{"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g19 then<s>ng19 = math.random(3,7)<s>nelse g19 = g19 <plus> math.random(3,7)<s>nend<s>nif g19 > 100 then g19 = 100 end<s>nend","lua_text":"function lua_text()<s>nif not g19 then g19 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[19] .. <s>"<s><s>nПройдена на <s>" .. g19 .. <s>"%<s>"<s>nend","text":"Играть в ","id":21,"instant":true,"lua_if":"function lua_if()<s>nlocal op = 0<s>ng19 = g19 or 0<s>nif game[19] == 1 then<s>n   if hide == 1 and g19 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","comment":false},{"comment":false,"lua_text":"function lua_text()<s>nif not g20 then g20 = 0 end<s>nreturn <s>"Играть в <s>" .. game1[20] .. <s>"<s><s>nПройдена на <s>" .. g20 .. <s>"%<s>"<s>nend","lua_if":"function lua_if()<s>nlocal op = 0<s>ng20 = g20 or 0<s>nif game[20] == 1 then<s>n   if hide == 1 and g20 > 99 then op = 0 <s>n   else op = 1 end end<s>nreturn op == 1<s>nend","id":21,"text":"Играть в ","instant":true,"lua_do":"function lua_do()<s>nfun = fun <plus> math.random(2)<s>nif not g20 then<s>ng20 = math.random(3,7)<s>nelse g20 = g20 <plus> math.random(3,7)<s>nend<s>nif g20 > 100 then g20 = 100 end<s>nend"},{"id":21,"text":"   ","comment":true,"var_less":["gamer",1]},{"var_less":["gamer",1],"super_calculate":false,"lua_do":"function lua_do()<s>ng21 = g1 <plus> g2 <plus> g3 <plus> g4 <plus> g5 <plus> g6 <plus> g7 <plus> g8 <plus> g9 <plus> g10 <plus> g11 <plus> g12 <plus> g13 <plus> g14 <plus> g15 <plus> g16 <plus> g17 <plus> g18 <plus> g19 <plus> g20<s>nif g21 >= 2000 then gamer = 1<s>nmessage(<s>"Разблокировано достижение 'Игрок'<s>") end<s>nend","calculate":true,"id":21,"text":"   "},{"id":15,"text":"Выбрать игру для установки","lua_if":"function lua_if()<s>nko1 = 0<s>nfor k in pairs(game) do<s>nif game[k] == 1 then <s>nko1 = ko1 <plus> 1 end <s>nend<s>nreturn ko1 < 20<s>nend"},{"id":21,"text":"-   -   -","comment":true,"middle_answer":true},{"var_set":["automa",0,"streem",0,"hide",1],"id":20,"text":"Назад","lua_do":"function lua_do()<s>nmaxRepStreem = maxRepStreem or 1<s>nrepStreem = repStreem or 0<s>nif maxRepStreem < repStreem then<s>n   maxRepStreem = repStreem <s>n   repStreem = math.ceil (repStreem * 0.3) <s>nend<s>nend","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]},{"id":22,"text":"... задания ...","run":[22]},{"id":23,"text":"...счётчик дней ...","run":[23]},{"id":24,"text":"... события с девушкой...","run":[24],"var_less":["wife",1]},{"id":28,"text":"... события жена ...","run":[28],"var_less":["toUniver",1]},{"id":41,"text":"... ребенок в универе... ","comment":false,"run":[41]},{"id":21,"text":"   ","comment":true},{"id":21,"text":"   ","comment":true},{"lua_text":"function lua_text()<s>nhide = hide or 0<s>nlocal text = <s>"<s>"<s>nif hide == 1 then text = <s>"Показать скрытые пройденные игры<s>"<s>nelse text = <s>"Скрыть все пройденные игры<s>" end<s>nreturn text<s>nend","lua_do":"function lua_do()<s>nif hide == 0 then hide = 1<s>nelse hide = 0 end<s>nend","text":"Скрыть","comment":false,"id":21}]},{"id":22,"text":"... задания ... ","answers":[{"calculate":true,"var_need":["drevo",50],"var_add":["drevo_sec",1],"super_calculate":false,"id":22,"text":"   ","var_less":["Complete",1],"lua_do":"function lua_do()<s>nCompleteQ = CompleteQ or 0<s>nif drevo_sec > 6 and CompleteQ >= 10000 then <s>n   dialog ({header = <s>"Финал.<s>", <s>n   text = <s>"Вы выполнили все предназначения, тем самым завершили основные цели игры. Но события на этом не останавливаются, так что продолжайте играть!<s>", <s>n   answers = {{text = <s>"Ура!<s>",<s>n   pressListener = function()<s>n   Complete = 1<s>n   hideDialog() end}}})<s>nend<s>n   end"},{"text":"   ","lua_do":"function lua_do()<s>n   dialog ({header = <s>"Последнее предназначение.<s>", <s>n   text = <s>"Три из четырёх Великих предназначений выполнены. Последним же будет написать квест на 10000 страниц.<s>", <s>n   answers = {{text = <s>"Пора!<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end","var_need":["drevo",50],"super_calculate":false,"id":22,"calculate":true,"var_less":["Complete",1],"var_equal":["drevo_sec",5]},{"var_need":["ttt",5,"home",1,"money",20000],"calculate":true,"super_calculate":false,"lua_do":"function lua_do()<s>nif not pet then pet = 0 end<s>nif pet == 0 then<s>n   if math.random(30) == 1 then<s>n   dialog ({header = <s>"Домашнее животное<s>", <s>n   text = <s>"Вы еще с детства мечтали завести домашнюю животинку, и наконец-то вам выдался шанс сделать это в своей квартире. Питомцы помогают снять стресс и поднять настроение. Вы выберете...<s>", <s>n   answers = {{text = <s>"Собаку<s>",<s>n   pressListener = function()<s>n   pet = 1<s>n   hideDialog() end},<s>n   {text = <s>"Кошку<s>",<s>n   pressListener = function()<s>n   pet = 2<s>n   hideDialog() end},<s>n{text = <s>"Хомяк<s>",<s>n   pressListener = function()<s>n   pet = 3<s>n   hideDialog() end},<s>n   {text = <s>"Попугай<s>",<s>n   pressListener = function()<s>n   pet = 4<s>n   hideDialog() end},<s>n{text = <s>"Отказаться (навсегда)<s>",<s>n   pressListener = function()<s>n   pet = 5<s>n   hideDialog() end},<s>n   {text = <s>"В другой раз выберу...<s>",<s>n   pressListener = function()<s>n   pet = 0<s>n   hideDialog() end}}})<s>nend end end","text":"   ","id":22,"var_less":["ipoteka",1,"pet",1]},{"id":22,"text":"   ","calculate":true,"super_calculate":false},{"lua_do":"function lua_do()<s>ndialog ({header = <s>"Ипотека.<s>", <s>n   text = <s>"С родителями жить вольно не выходит, а в общаге ваши запасы из холодильника съедают соседи по комнате. Значит стоит подумать о собственном жилье!<s>", <s>n   answers = {{text = <s>"Взять ипотеку!<s>",<s>n   pressListener = function()<s>n   money = money - 200000<s>n   ipoteka = 1800000<s>n   home = 1<s>n   platej = 0<s>n   dolg = 0<s>n   hideDialog() end}}})<s>nend","calculate":true,"super_calculate":false,"id":22,"text":"   ","var_need":["money",210000],"var_equal":["home",0]},{"id":22,"text":"   ","calculate":true,"super_calculate":false},{"var_need":["ocenka",3,"teach",20],"text":"   ","super_calculate":false,"var_less":["diplom",1],"calculate":true,"id":22,"lua_do":"function lua_do()<s>nif teaching1 < 100 then diplom = 2<s>nelse diplom = ocenka<s>nend<s>n<s>nif diplom > 2 then<s>n   dialog ({header = <s>"Защита диплома.<s>", <s>n   text = <s>"Вы всё успели подготовить к сдаче, и в нужный день смогли защитить диплом. Отныне у вас есть диплом о высшем образовании. <s>", <s>n   answers = {{text = <s>"Шикарно!<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>nend<s>n<s>nif diplom == 2 then<s>n   dialog ({header = <s>"Защита диплома.<s>", <s>n   text = <s>"Вы не успели за отведённое время подготовить дипломную работу и, как следствие, были оставлены на переобучение.<s>", <s>n   answers = {{text = <s>"Полный провал!<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end<s>nend"},{"lua_do":"function lua_do()<s>nif teaching < 50 then ocenka = 2<s>nelseif teaching >= 50 and teaching < 65 then<s>n           ocenka = 3<s>nelseif teaching >= 65 and teaching < 90 then<s>n           ocenka = 4<s>nelseif teaching >= 90 then ocenka = 5<s>nend<s>n<s>nif ocenka > 2 then<s>n   dialog ({header = <s>"Экзамены.<s>", <s>n   text = <s>"Наступает тот самый момент истины, который покажет насколько усердно ты учился... Ваша полученная оценка: <s>" .. ocenka .. <s>".<s>", <s>n   answers = {{text = <s>"Писать диплом!<s>",<s>n   pressListener = function()<s>n   teaching1 = 1<s>n   showPage {id = 25, transition = <s>"instant<s>"}<s>n   hideDialog() end}}})<s>nend<s>n<s>nif ocenka == 2 then<s>n   dialog ({header = <s>"Экзамены.<s>", <s>n   text = <s>"Наступает тот самый момент истины, который покажет насколько усердно ты учился... Ваша полученная оценка: <s>" .. ocenka .. <s>".<s>", <s>n   answers = {{text = <s>"Полный провал!<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end<s>nend","id":22,"super_calculate":false,"var_less":["ocenka",1],"text":"   ","calculate":true,"var_need":["ttt",5,"teach",13]},{"lua_do":"function lua_do()<s>n   dialog ({header = <s>"Началась учёба.<s>", <s>n   text = <s>"Вот и настало время учёбы выпускного курса. Нужно не забывать посещать учёбу, иначе могут отчислить из Универа, а высшее образование обязательно, если хочешь стать успешным.<s>", <s>n   answers = {{text = <s>"Пора!<s>",<s>n   pressListener = function()<s>n   teaching = 1<s>n   showPage {id = 25, transition = <s>"instant<s>"}<s>n   hideDialog() end}}})<s>n   end","id":22,"super_calculate":false,"var_less":["teaching",1],"text":"   ","calculate":true,"var_need":["ttt",5,"teach",5]},{"id":22,"var_need":["money",40000],"super_calculate":false,"lua_do":"function lua_do()<s>n   dialog ({header = <s>"Знакомство<s>", <s>n   text = <s>"Вы выходили в кафе, где вам удалось познакомиться с хорошей девушкой. После кафе вы еще шесть часов гуляли вместе в парке, после чего решили начать встречаться как пара.<s>", <s>n   answers = {{text = <s>"Отлично!<s>",<s>n   pressListener = function()<s>n   ttt = 6<s>n   love = 20<s>n   money = money - math.random(2500,3000)<s>n   hideDialog() end}}})<s>n   end","text":"   ","calculate":true,"var_equal":["ttt",5]},{"id":22,"super_calculate":false,"lua_do":"function lua_do()<s>n   ttt = 5<s>n   dialog ({header = <s>"Электронная почта.<s>", <s>n   text = <s>"Вас вновь беспокоит менеджер издательства NarrativePress. Мы ознакомились с Вашей работой и готовы заключить контракт. Первоначально мы платим Вам 30.000 за правообладанием этого сюжета, чтобы пустить его в широкую печать. Еженедельно вы будете получать по 5.000 по контракту, и по 5 за каждую страницу опубликованных квестов. Постарайтесь!<s>", <s>n   answers = {{text = <s>"Понеслась!<s>",<s>n   pressListener = function()<s>n   money = 30000<s>n   contract = 1<s>n   hideDialog() end}}})<s>n   end","text":"   ","calculate":true,"var_equal":["ttt",4]},{"super_calculate":false,"var_equal":["ttt",3],"id":22,"calculate":true,"lua_do":"function lua_do()<s>nif a1 and setQuest1 == 1 then<s>n   if a1 > 300 then ttt = 4 end<s>nend<s>n<s>nif a2 and setQuest2 == 1 then<s>n   if a2 > 300 then ttt = 4 end<s>nend<s>n<s>nif a3 and setQuest3 == 1 then<s>n   if a3 > 300 then ttt = 4 end<s>nend<s>n<s>nif a4 and setQuest4 == 1 then<s>n   if a4 > 300 then ttt = 4 end<s>nend<s>n<s>nif a5 and setQuest5 == 1 then<s>n   if a5 > 300 then ttt = 4 end<s>nend<s>n<s>nif a6 and setQuest6 == 1 then<s>n   if a6 > 300 then ttt = 4 end<s>nend<s>n<s>nif a7 and setQuest7 == 1 then<s>n   if a7 > 300 then ttt = 4 end<s>nend<s>n<s>nif a8 and setQuest8 == 1 then<s>n   if a8 > 300 then ttt = 4 end<s>nend<s>n<s>nif a9 and setQuest9 == 1 then<s>n   if a9 > 300 then ttt = 4 end<s>nend<s>n<s>nif a10 and setQuest10 == 1 then<s>n   if a10 > 300 then ttt = 4 end<s>nend<s>nend","text":"  "},{"super_calculate":false,"var_equal":["ttt",2],"lua_do":"function lua_do()<s>n   ttt = 3<s>n   dialog ({header = <s>"Электронная почта.<s>", <s>n   text = <s>"Доброго дня! Я менеджер издательства NarrativePress. Мы заметили ваш квест среди кучи других, и хотели бы предложить для Вас пробу. Если захотите поучаствовать, то необходимо написать новый квест на триста страниц и более, и опубликовать его. Позднее после этого Мы с Вами свяжемся.<s>", <s>n   answers = {{text = <s>"Вот и пришла известность!<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end","text":"Новый ответ. введите текст","calculate":true,"id":22},{"lua_do":"function lua_do()<s>nif like1 then<s>n   if like1 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like2 then<s>n   if like2 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like3 then<s>n   if like3 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like4 then<s>n   if like4 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like5 then<s>n   if like5 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like6 then<s>n   if like6 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like7 then<s>n   if like7 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like8 then<s>n   if like8 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like9 then<s>n   if like9 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>n<s>nif like10 then<s>n   if like10 > 20 then<s>n   ttt = 2<s>n   end<s>nend<s>nend<s>n","lua_if":"function lua_if()<s>nreturn (setQuest1 == 1 or setQuest2 == 1 or setQuest3 == 1 or setQuest4 == 1 or setQuest5 == 1 or setQuest6 == 1 or setQuest7 == 1 or setQuest8 == 1 or setQuest9 == 1 or setQuest10 == 1)<s>nend","super_calculate":false,"id":22,"text":"   ","var_equal":["ttt",1],"calculate":true},{"super_calculate":false,"lua_do":"function lua_do()<s>nif not diplom then diplom = 0 end<s>nif not ocenka then ocenka = 0 end<s>nif not reteach then reteach = 0 end<s>nif not teach then teach = 0 end<s>nif ocenka < 3 and teach > 30 then<s>n   reteach = 1<s>nend<s>nif diplom == 2 and teach > 30 then<s>n   reteach = 1<s>nend<s>nif reteach == 1 and teach > 30 then<s>n   reteach = 0<s>n   diplom = 0<s>n   ocenka = 0<s>n   teaching = 0<s>n   teaching1 = 0<s>n   teach = 0<s>nend <s>nend","calculate":true,"text":"   ","id":22}]},{"id":23,"text":"...счётчик дней ... ","answers":[{"super_calculate":false,"lua_do":"function lua_do()<s>npageOn = 0<s>nif setQuest1 then <s>npageOn = pageOn <plus> sizeNow[1] end<s>nif setQuest2 then <s>npageOn = pageOn <plus> sizeNow[2] end<s>nif setQuest3 then <s>npageOn = pageOn <plus> sizeNow[3] end<s>nif setQuest4 then <s>npageOn = pageOn <plus> sizeNow[4] end<s>nif setQuest5 then <s>npageOn = pageOn <plus> sizeNow[5] end<s>nif setQuest6 then <s>npageOn = pageOn <plus> sizeNow[6] end<s>nif setQuest7 then <s>npageOn = pageOn <plus> sizeNow[7] end<s>nif setQuest8 then <s>npageOn = pageOn <plus> sizeNow[8] end<s>nif setQuest9 then <s>npageOn = pageOn <plus> sizeNow[9] end<s>nif setQuest10 then <s>npageOn = pageOn <plus> sizeNow[10] end<s>nend","text":"  ","id":23,"calculate":true},{"lua_if":"function lua_if()<s>nreturn contract == 1<s>nend","super_calculate":false,"lua_do":"function lua_do()<s>nif not day then day = 0 end<s>nif not teach then teach = 0 end<s>nif not money then money = 0 end<s>nif not day_vosk then day_vosk = 0 end<s>n<s>nday = day <plus> 1<s>nday_vosk = day_vosk <plus> 1<s>n<s>nif day >= 20 then<s>nday = 0<s>nteach = teach <plus> 1<s>nmoney = money <plus> 5000 <plus> (pageOn*5)<s>nend<s>n<s>nif not vosk then vosk = 0 end<s>nif vosk == 1 and day_vosk > 30 then<s>nvosk = 0<s>nend<s>n<s>nend","calculate":true,"id":23,"text":"Новый ответ. введите текст"},{"super_calculate":false,"id":23,"calculate":true,"text":"Новый ответ. введите текст","lua_do":"function lua_do()<s>nif not ipoteka then<s>nhome = 0<s>nipoteka = 0<s>nplatej = 0<s>ndolg = 0 end<s>nif not money then money = 0 end<s>n<s>nif ipoteka > 0 then<s>nplatej = platej <plus> 1<s>n   if platej > 30 then<s>n   platej = 0<s>n      if money >= 10000 then<s>n      plata = math.floor(money/2)<s>n      elseif money < 10000 and money >= 5000 then<s>n      plata = 5000<s>n      elseif money < 5000 then<s>n      dolg = dolg <plus> 1<s>n      plata = money<s>n      end<s>n   money = money - plata<s>n   ipoteka = ipoteka - plata<s>n   message(<s>"Оплачено по ипотеке: <s>" .. plata)<s>n   end<s>nend<s>n<s>nif dolg >= 10 then<s>nhome = 0<s>nipoteka = 0<s>ndolg = 0<s>nplatej = 0<s>nmessage(<s>"Вы потеряли свою квартиру, так как имели большое количество просрочек и неплатежей. Жизнь отныне опять будет в общаге.<s>")<s>nend<s>n<s>nkv_plata = kv_plata or 0<s>nif ipoteka < 1 and home >= 1 then<s>nkv_plata = kv_plata <plus> 1 end<s>nif kv_plata >= 20 then<s>nkv_plata = 0<s>nkv_oplata = math.random(4500,5500)<s>nmoney = money - kv_oplata<s>n   if money < 0 then money = 0 end<s>nmessage(<s>"Кварт.плата составила <s>" .. kv_oplata .. <s>" денег.<s>") end<s>nend"},{"super_calculate":false,"id":17,"calculate":true,"lua_do":"function lua_do()<s>nif not setQuest1 then setQuest1 = 0 end<s>nif not setQuest2 then setQuest2 = 0 end<s>nif not setQuest3 then setQuest3 = 0 end<s>nif not setQuest4 then setQuest4 = 0 end<s>nif not setQuest5 then setQuest5 = 0 end<s>nif not setQuest6 then setQuest6 = 0 end<s>nif not setQuest7 then setQuest7 = 0 end<s>nif not setQuest8 then setQuest8 = 0 end<s>nif not setQuest9 then setQuest9 = 0 end<s>nif not setQuest10 then setQuest10 = 0 end<s>n<s>nif setQuest1 == 1 then<s>nrand1 = math.random(4)<s>n   if rand1 == 1 then<s>n   like1 = like1 <plus> math.random(quality[1])<s>n   elseif rand1 == 2 then<s>n   like1 = like1 <plus> 1<s>n   elseif rand1 == 4 then<s>n   dis1 = dis1 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest2 == 1 then<s>nrand2 = math.random(4)<s>n   if rand2 == 1 then<s>n   like2 = like2 <plus> math.random(quality[2])<s>n   elseif rand2 == 2 then<s>n   like2 = like2 <plus> 1<s>n   elseif rand2 == 4 then<s>n   dis2 = dis2 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest3 == 1 then<s>nrand3 = math.random(4)<s>n   if rand3 == 1 then<s>n   like3 = like3 <plus> math.random(quality[3])<s>n   elseif rand3 == 2 then<s>n   like3 = like3 <plus> 1<s>n   elseif rand3 == 4 then<s>n   dis3 = dis3 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest4 == 1 then<s>nrand4 = math.random(4)<s>n   if rand4 == 1 then<s>n   like4 = like4 <plus> math.random(quality[4])<s>n   elseif rand4 == 2 then<s>n   like4 = like4 <plus> 1<s>n   elseif rand4 == 4 then<s>n   dis4 = dis4 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest5 == 1 then<s>nrand5 = math.random(4)<s>n   if rand5 == 1 then<s>n   like5 = like5 <plus> math.random(quality[5])<s>n   elseif rand5 == 2 then<s>n   like5 = like5 <plus> 1<s>n   elseif rand5 == 4 then<s>n   dis5 = dis5 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest6 == 1 then<s>nrand6 = math.random(4)<s>n   if rand6 == 1 then<s>n   like6 = like6 <plus> math.random(quality[6])<s>n   elseif rand6 == 2 then<s>n   like6 = like6 <plus> 1<s>n   elseif rand6 == 4 then<s>n   dis6 = dis6 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest7 == 1 then<s>nrand7 = math.random(4)<s>n   if rand7 == 1 then<s>n   like7 = like7 <plus> math.random(quality[7])<s>n   elseif rand7 == 2 then<s>n   like7 = like7 <plus> 1<s>n   elseif rand7 == 4 then<s>n   dis7 = dis7 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest8 == 1 then<s>nrand8 = math.random(4)<s>n   if rand8 == 1 then<s>n   like8 = like8 <plus> math.random(quality[8])<s>n   elseif rand8 == 2 then<s>n   like8 = like8 <plus> 1<s>n   elseif rand8 == 4 then<s>n   dis8 = dis8 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest9 == 1 then<s>nrand9 = math.random(4)<s>n   if rand9 == 1 then<s>n   like9 = like9 <plus> math.random(quality[9])<s>n   elseif rand9 == 2 then<s>n   like9 = like9 <plus> 1<s>n   elseif rand9 == 4 then<s>n   dis9 = dis9 <plus> 1<s>n   end<s>nend<s>n<s>nif setQuest10 == 1 then<s>nrand10 = math.random(4)<s>n   if rand10 == 1 then<s>n   like10 = like10 <plus> math.random(quality[10])<s>n   elseif rand10 == 2 then<s>n   like10 = like10 <plus> 1<s>n   elseif rand10 == 4 then<s>n   dis10 = dis10 <plus> 1<s>n   end<s>nend<s>n<s>nif not rek1 then rek1 = 0 end<s>nif not rek2 then rek2 = 0 end<s>nif not rek3 then rek3 = 0 end<s>nif not rek4 then rek4 = 0 end<s>nif not rek5 then rek5 = 0 end<s>nif not rek6 then rek6 = 0 end<s>nif not rek7 then rek7 = 0 end<s>nif not rek8 then rek8 = 0 end<s>nif not rek9 then rek9 = 0 end<s>nif not rek10 then rek10 = 0 end<s>n<s>nif rek1 > 0 then rek1 = rek1 - 1<s>nlike1 = like1 <plus> math.random(7)<s>ndis1 = dis1 <plus> math.random(0,1) end<s>n<s>nif rek2 > 0 then rek2 = rek2 - 1<s>nlike2 = like2 <plus> math.random(7)<s>ndis2 = dis2 <plus> math.random(0,1) end<s>n<s>nif rek3 > 0 then rek3 = rek3 - 1<s>nlike3 = like3 <plus> math.random(7)<s>ndis3 = dis3 <plus> math.random(0,1) end<s>n<s>nif rek4 > 0 then rek4 = rek4 - 1<s>nlike4 = like4 <plus> math.random(7)<s>ndis4 = dis4 <plus> math.random(0,1) end<s>n<s>nif rek5 > 0 then rek5 = rek5 - 1<s>nlike5 = like5 <plus> math.random(7)<s>ndis5 = dis5 <plus> math.random(0,1) end<s>n<s>nif rek6 > 0 then rek6 = rek6 - 1<s>nlike6 = like6 <plus> math.random(7)<s>ndis6 = dis6 <plus> math.random(0,1) end<s>n<s>nif rek7 > 0 then rek7 = rek7 - 1<s>nlike7 = like7 <plus> math.random(7)<s>ndis7 = dis7 <plus> math.random(0,1) end<s>n<s>nif rek8 > 0 then rek8 = rek8 - 1<s>nlike8 = like8 <plus> math.random(7)<s>ndis8 = dis8 <plus> math.random(0,1) end<s>n<s>nif rek9 > 0 then rek9 = rek9 - 1<s>nlike9 = like9 <plus> math.random(7)<s>ndis9 = dis9 <plus> math.random(0,1) end<s>n<s>nif rek10 > 0 then rek10 = rek10 - 1<s>nlike10 = like10 <plus> math.random(7)<s>ndis10 = dis10 <plus> math.random(0,1) end<s>n<s>nend","text":"   "},{"super_calculate":false,"lua_do":"function lua_do()<s>nlikesMy = { }<s>ndisMy = { }<s>ntable.insert(likesMy, like1)<s>ntable.insert(likesMy, like2)<s>ntable.insert(likesMy, like3)<s>ntable.insert(likesMy, like4)<s>ntable.insert(likesMy, like5)<s>ntable.insert(likesMy, like6)<s>ntable.insert(likesMy, like7)<s>ntable.insert(likesMy, like8)<s>ntable.insert(likesMy, like9)<s>ntable.insert(likesMy, like10)<s>n<s>ntable.insert(disMy, dis1)<s>ntable.insert(disMy, dis2)<s>ntable.insert(disMy, dis3)<s>ntable.insert(disMy, dis4)<s>ntable.insert(disMy, dis5)<s>ntable.insert(disMy, dis6)<s>ntable.insert(disMy, dis7)<s>ntable.insert(disMy, dis8)<s>ntable.insert(disMy, dis9)<s>ntable.insert(disMy, dis10)<s>nend","calculate":true,"text":"  ","id":23},{"text":"  ","super_calculate":false,"id":23,"calculate":true,"lua_do":"function lua_do()<s>nif not pet then pet = 0 end<s>nif not petGolod then petGolod = 0 end<s>nif not petPrice then petPrice = 0 end<s>nif pet == 1 then<s>n   petPrice = math.random(100,150)<s>nelseif pet == 2 then<s>n   petPrice = math.random(80,130)<s>nelseif pet == 3 then<s>n   petPrice = math.random(60,110)<s>nelseif pet == 4 then<s>n   petPrice = math.random(40,90)<s>nend<s>nif pet > 0 and pet < 5 then<s>n   if money > a then<s>n      money = money - petPrice<s>n   else <s>n      petGolod = petGolod <plus> 1<s>n   end<s>nend<s>nif petGolod > 50 then<s>npet = 0<s>npetGolod = 0<s>nmessage(<s>"Из-за частых голоданий твой питомец заболел и умер.<s>")<s>nend<s>nend","var_need":["pet",1]},{"super_calculate":false,"lua_do":"function lua_do()<s>nspisokAuthors = { <s>"Sincerely<s>", <s>"Shaber<s>", <s>"theuRay<s>",<s>"Antihero<s>", <s>"Lilu Schwarz<s>", <s>"Химера2000<s>", <s>"Историус<s>", <s>"Felix<s>", <s>"Proffit<s>", <s>"Ankylosaurus<s>", <s>"Teppish<s>", <s>"ChatNoir<s>", <s>"Бахия Александр<s>", <s>"ARTBLOODLESS<s>", <s>"Lana Ashgrow<s>", <s>"Инко313<s>", <s>"Авантюристка<s>", <s>"Мышка На Сервере<s>", <s>"Пан-Ант<s>", <s>"Аника Хериссон<s>", <s>"Каэран<s>", <s>"RYZ<s>", <s>"Master Cho<s>", <s>"Ярослав Зверев<s>" }<s>nspisokQuest = { <s>"Ошейник<s>", <s>"Клинки и Кинжалы 2<s>", <s>"Похищение алмаза Санси<s>", <s>"Выбор Капитана<s>", <s>"Загадка поместья Ревера<s>", <s>"Выбор мага<s>", <s>"Под знаменем Хищника<s>", <s>"Охота на ведьм<s>", <s>"Восточный ветер<s>", <s>"S.T.A.L.K.E.R.: Поршень<s>", <s>"Бремя теней<s>", <s>"Кукла<s>", <s>"Цена вечности<s>", <s>"Спираль<s>", <s>"Свет последней звезды<s>", <s>"Ловись, большое и маленькое<s>", <s>"Детективное агенство ''Пять сольдо''<s>", <s>"Я няня?!<s>", <s>"Тора ан Павен 3<s>", <s>"Давай поженимся<s>", <s>"Легенды Сладена<s>", <s>"Игра Шута<s>", <s>"Одиссея Алонсо Кортеса<s>", <s>"Время нечисти<s>" }<s>n<s>nlikesOsheinik = likesOsheinik or 0<s>ndisOsheinik = disOsheinik or 0<s>npageOsheinik = pageOsheinik or math.random(1800,2000)<s>n<s>npageOsheinik = pageOsheinik <plus> math.random(3)<s>nlikesOsheinik = likesOsheinik <plus> math.random(3)<s>n   if math.random(15) == 1 then <s>n   disOsheinik = disOsheinik <plus> 1 end<s>n<s>nif not author then<s>n   local pp = math.random(#spisokAuthors)<s>n   author = spisokAuthors[pp]<s>n   nazvanie = spisokQuest[pp]<s>nend<s>nend","calculate":true,"text":"osheinik","id":23},{"var_equal":["ghat",0],"text":"   ","super_calculate":false,"lua_do":"function lua_do()<s>nauthors = { <s>"Redmond<s>", <s>"Asking Eagle<s>", <s>"Shurupovert<s>", <s>"Умочка<s>", <s>"Дед Мазай<s>", <s>"Невероятник<s>", <s>"Ленивый Страус<s>", <s>"RandomMaster<s>", <s>"ZedCruger<s>", <s>"Allan Abrams<s>", <s>"Жертва фантазии<s>", <s>"Суровый Дэн<s>", <s>"Иван Николаев<s>", <s>"Brigadier<s>", <s>"Crouse<s>", <s>"пИСАТЕЛЬ<s>", <s>"Montager<s>", <s>"UberPistol<s>", <s>"MiniWang<s>", <s>"Xin Lu Zhen<s>", <s>"Alucard<s>", <s>"Жаргонный словарик<s>", <s>"DeadMoroz<s>", <s>"Убивец лени<s>", <s>"МегаПисец<s>", <s>"Скарлетт<s>", <s>"Сандра Мартини<s>", <s>"S@dM@x<s>"}<s>nNN = { <s>"Интересный<s>", <s>"Скучный<s>", <s>"Невероятный<s>", <s>"Влюбленный<s>", <s>"Капризный<s>", <s>"Грустный<s>", <s>"Сердечный<s>", <s>"Весёлый<s>", <s>"Ироничный<s>", <s>"Опасный<s>", <s>"Тревожный<s>", <s>"Горящий<s>", <s>"Нервный<s>", <s>"Меланхоличный<s>", <s>"Мутный<s>", <s>"Чёткий<s>", <s>"Жалкий<s>", <s>"Уродливый<s>", <s>"Терпеливый<s>", <s>"Бестолковый<s>", <s>"Смешной<s>", <s>"Ненавистный<s>", <s>"Нетерпеливый<s>", <s>"Мёртвый<s>", <s>"Не интересный<s>", <s>"Безумный<s>", <s>"Улётный<s>", <s>"Разгневаный<s>", <s>"Радостный<s>", <s>"Кровавый<s>", <s>"Печальный<s>", <s>"Жадный<s>", <s>"Увлекательный<s>" }<s>nBB = { <s>" кипарис<s>", <s>" Макс<s>", <s>" пингвин<s>", <s>" котик<s>", <s>" Петрович<s>", <s>" прохожий<s>", <s>" жандарм<s>", <s>" дворник<s>", <s>" бомж<s>", <s>" герой<s>", <s>" малыш<s>", <s>" пёс<s>", <s>" охранник<s>", <s>" щенок<s>", <s>" учитель<s>", <s>" студент<s>", <s>" начальник<s>", <s>" Василий<s>", <s>" Геннадий<s>", <s>" R2D2<s>", <s>" зомби<s>", <s>" апокалипсис<s>", <s>" секретарь<s>", <s>" труп<s>", <s>" обжора<s>", <s>" продавец<s>", <s>" доставщик пиццы<s>", <s>" негодяй<s>", <s>" убийца<s>", <s>" свидетель<s>", <s>" случай<s>", <s>" автор<s>", <s>" поход<s>", <s>" покупатель<s>", <s>" совет<s>", <s>" день<s>", <s>" месяц<s>", <s>" год<s>", <s>" жених<s>", <s>" Сидорович<s>", <s>" рок<s>", <s>" работник<s>", <s>" клоун<s>", <s>" человек<s>", <s>" собеседник<s>", <s>" почтальон<s>", <s>" кукла<s>" }<s>nqAuthors = { }<s>nfor i = 1, 28 do<s>ntable.insert(qAuthors, NN[math.random(#NN)] .. BB[math.random(#BB)])<s>nend<s>n<s>nlikesAuthors = { math.random(10), math.random(10), math.random(10), math.random(20), 0,  math.random(10), math.random(10), math.random(10), 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0 }<s>ndisAuthors = { 0, 0, 0, 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0,  0, 0, 0, 0, 0 }<s>npageAuthors = { math.random(300, 500), math.random(300, 500), math.random(300, 1000), math.random(300, 2000), 999,  math.random(300, 500), math.random(300, 700), math.random(300, 700), math.random(300, 700), 777,  math.random(300, 800), math.random(300, 800), math.random(300, 800), math.random(300, 800), 888,  math.random(300, 900), math.random(300,  900), math.random(400, 900), math.random(200, 1000), 666,  math.random(500, 1000), math.random(500, 1000), math.random(500, 1000), math.random(700, 1000), 1111,  math.random(1000, 1500), math.random(1000, 1800), math.random(1000, 2000), 0, 0 }<s>nend","calculate":true,"id":23,"var_set":["ghat",1]},{"super_calculate":false,"id":23,"calculate":true,"lua_do":"function lua_do()<s>nsetQuest = { setQuest1 or 0, setQuest2 or 0, setQuest3 or 0, setQuest4 or 0, setQuest5 or 0, setQuest6 or 0, setQuest7 or 0, setQuest8 or 0, setQuest9 or 0, setQuest10 or 0 }<s>n<s>nlocal box1 = { }<s>nfor i = 1, 10 do<s>ntable.insert(box1, sizeNow[i]) end<s>n<s>nlocal poi = 1<s>nlocal po = box1[1]<s>nfor i, j in ipairs(box1) do<s>n   if setQuest[i] == 1 and po < j then<s>n   poi = i<s>n   po = j end<s>nend<s>n<s>nfor i = 1, 28 do<s>n   local x = math.random(5,9)<s>n   if math.random(2) == 1 then likesAuthors[i] = likesAuthors[i] <plus> math.random(3) end<s>n   if math.random(x) == 1 then disAuthors[i] = disAuthors[i] <plus> 1 end<s>n   if math.random(2) == 1 then pageAuthors[i] = pageAuthors[i] <plus> math.random(1,5) end<s>nend<s>n<s>n   local y = math.random(28)<s>n   pageAuthors[y] = pageAuthors[y] <plus> 15<s>n   local x = math.random(28)<s>n   pageAuthors[x] = pageAuthors[x] - 5<s>n<s>n   likesAuthors[29] = likesOsheinik<s>n   disAuthors[29] = disOsheinik<s>n   pageAuthors[29] = pageOsheinik<s>n   qAuthors[29] = nazvanie<s>n   authors[29] = author<s>nlikesAuthors[30] = likesMy[poi]<s>ndisAuthors[30] = disMy[poi]<s>npageAuthors[30] = sizeNow[poi]<s>nqAuthors[30] = questName[poi]<s>nauthors[30] = text55<s>nend","text":"   "},{"super_calculate":false,"id":23,"text":"  ","calculate":true,"lua_do":"function lua_do()<s>ndrevoT= drevoT or 0<s>ndrevoT = drevoT - 1<s>n<s>nCompleteQ = 0<s>nfor i = 1, 10 do<s>nif sizeNow[i] > CompleteQ then<s>nCompleteQ = sizeNow[i] end<s>nend<s>nend"},{"super_calculate":false,"lua_do":"function lua_do()<s>nlocal QU = { <s>"Сытый Федот<s>", <s>"Правление Тяньши Бэя<s>", <s>"Выпад звёзд<s>", <s>"Служанка и Граф<s>", <s>"Рыцарь из трущоб<s>", <s>"Супергеройский эпик!<s>", <s>"Колобок, но наоборот<s>", <s>"Эпидемия Т-вируса<s>", <s>"И приехал цирк<s>", <s>"Преступление клоуна<s>", <s>"Загадка дворца Артибальд<s>", <s>"Бегство из Зеленолесья<s>", <s>"Эльфийский амулет<s>", <s>"Эльфийская кровь<s>", <s>"Молот дварфа<s>", <s>"Копьё судьбы<s>", <s>"Предатель<s>", <s>"Карточный король<s>", <s>"Последний день Земли<s>", <s>"Исчезнувшее человечество<s>", <s>"В один миг<s>", <s>"Люблю тебя<s>", <s>"Случайная встреча<s>", <s>"Дамоклов меч<s>", <s>"Варвар севера<s>", <s>"Учебник Луа<s>" }<s>nfor i = 1, 28 do<s>ntable.insert(QU, qAuthors[i])<s>nend<s>nlocal result = { <s>" и хорошо провёли время. Таких квестов много в своём жанре.<s>", <s>" и взяли некоторые идеи на заметку. Может использовать их и у себя?<s>", <s>", но вам было скучно это читать: банальный сюжет, картонные персонажи, примитивные сцены.<s>", <s>". Главный герой вызывает больше неприязни, чем главный злодей. Так может автору стоит сменить сторону повествования?<s>", <s>" и вам очень понравился сюжет. Его развитие идёт плавно, как течение реки, аккуратно направляя читателя от одной сцены к другой.<s>", <s>" и весело провёли время, смеясь над часто встречающиеся шутки в тексте.<s>", <s>". Сможете ли вы использовать похожие механики в своём квесте?<s>", <s>". Вам понравилось раскрытие персонажей, но сюжет очень слабый с банальным развитием.<s>", <s>". Персонажи раскрыты так себе, но увлекательный сюжет спасает весь квест от провала.<s>", <s>". И герои, и повествование, и грамматика - всё на высшем уровне.<s>", <s>". Очень хорошая работа, но что-то в ней не так.<s>", <s>". Кажется, что всё простое и банальное, но всё равно хочется перечитать вновь.<s>", <s>". Первые десять страниц было интересно, но потом интерес мигом пропал из-за кучи нестыковок в сюжете.<s>" }<s>nlocal a = math.random(#result)<s>nlocal b<s>nhead3 = <s>"Чтение квестов<s>"<s>ntext3 = 'Вы читали квест <s>"' .. QU[math.random(#QU)] .. '<s>"' .. result[a]<s>nend","calculate":true,"text":"   ","id":22},{"super_calculate":false,"id":23,"calculate":true,"lua_do":"function lua_do()<s>notzQ = otzQ or 5<s>notzQ = otzQ <plus> 1<s>n<s>notpusk = otpusk or 0<s>nif home == 1 then<s>notpusk = otpusk <plus> 1<s>nend<s>nend","text":"  "}]},{"id":24,"text":" ... события с девушкой...","answers":[{"text":"   ","super_calculate":false,"var_less":["love",1],"calculate":true,"id":24,"var_set":["lover",0]},{"super_calculate":false,"var_random":["lover",1,45],"id":24,"calculate":true,"var_need":["ttt",6,"love",1],"text":"   "},{"super_calculate":false,"lua_do":"function lua_do()<s>n   dialog ({header = <s>"Девушка<s>", <s>n   text = <s>"Ваша девушка приготовила вкусный ужин, а после подала еще и ваш любимый десерт. Вы очень приятно провели время вместе и отдохнули.<s>", <s>n   answers = {{text = <s>"Шикарно!<s>",<s>n   pressListener = function()<s>n   love = love <plus> math.random(3,5)<s>n   lover = 0<s>n   fun = fun <plus> 5<s>n   hideDialog() end}}})<s>n   end","var_equal":["lover",25],"id":24,"var_need":["ttt",6,"love",1],"calculate":true,"text":"  "},{"text":"  ","calculate":true,"super_calculate":false,"id":24,"var_need":["ttt",6,"love",1,"money",2500],"lua_do":"function lua_do()<s>n   dialog ({header = <s>"Девушка<s>", <s>n   text = <s>"Вам пришла идея порадовать вашу девушку неожиданным подарком. Можно заказать букет цветов с доставкой, и не придётся тратить много времени на поход до магазина.<s>", <s>n   answers = {{text = <s>"Заказать цветы<s>",<s>n   pressListener = function()<s>n   love = love <plus> math.random(2,4)<s>n   money = money - math.random(2000,2500)<s>n   lover = 0<s>n   fun = fun <plus> 2<s>n   hideDialog() end},<s>n   <s>n   {text = <s>"В другой раз<s>",<s>n   pressListener = function()<s>n   love = love - math.random(1,3)<s>n      if love < 1 then<s>n      message(<s>"Ваша девушка бросила вас, так как вы совсем не уделяли ей время и внимание.<s>") end<s>n   lover = 0<s>n   hideDialog() end}}})<s>n   end","var_equal":["lover",9]},{"text":"  ","calculate":true,"super_calculate":false,"id":24,"var_need":["ttt",6,"love",1,"money",4000],"lua_do":"function lua_do()<s>n   dialog ({header = <s>"Девушка<s>", <s>n   text = <s>"Ваша девушка просит вас сходить с ней в кафе. Стоит согласиться и удовлетворить её просьбу, за одно и самому проветриться.<s>", <s>n   answers = {{text = <s>"Согласиться<s>",<s>n   pressListener = function()<s>n   love = love <plus> math.random(2,5)<s>n   money = money - math.random(3000,4000)<s>n   lover = 0<s>n   fun = fun <plus> 3<s>n   hideDialog() end},<s>n   <s>n   {text = <s>"Отказаться<s>",<s>n   pressListener = function()<s>n   love = love - math.random(4,6)<s>n      if love < 1 then<s>n      message(<s>"Ваша девушка бросила вас, так как вы совсем не уделял ей время и внимание.<s>") end<s>n   lover = 0<s>n   hideDialog() end}}})<s>n   end","var_equal":["lover",1]},{"text":"  ","super_calculate":false,"id":24,"calculate":true,"lua_do":"function lua_do()<s>nif not love then love = 0 end<s>nif love < 1 then<s>n   welove = math.random(20)<s>n   if welove == 1 then<s>n   love = math.random(20,30)<s>n   dialog ({header = <s>"Встреча<s>", <s>n   text = <s>"На очередной событии вне стен дома вы познакомился с девушкой. Стоит заботиться о ней, ужелять внимание и баловать подарками.<s>", <s>n   answers = {{text = <s>"Хорошо<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end<s>nend<s>nend","var_need":["ttt",6]}]},{"id":25,"text":"Обучение в универе имеет очень гибкий график. Главное осваивать учебные программы, и по оконцове сдать экзамены. ","answers":[{"comment":false,"lua_do":"function lua_do()<s>nif fun > 0 then<s>n   fun = fun - 1<s>n   teaching = teaching <plus> math.random(2)<s>n   rand_teach = math.random(3)<s>n      if rand_teach == 1 then<s>n      message(tekst1) end<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>nelse <s>n   message(<s>"От учёбы голова уже пухнет, да и настроения совсем нет. Стоит немного чем-то развлечься!<s>")<s>n   showPage {id = 20, transition = <s>"instant<s>"}<s>nend<s>nend","instant":true,"no_transition":true,"lua_text":"function lua_text()<s>nif not teaching then teaching = 1 end<s>nreturn <s>"Обучаться (освоено на <s>" .. teaching .. <s>"%)<s>"<s>nend","id":25,"text":"Обучаться","var_less":["teach",15,"teaching",100],"answerImage":["http://188.120.236.127/SimKvestopisca/StudyPlace.png"]},{"comment":true,"id":25,"var_need":["teaching",100],"var_less":["ocenka",1],"text":"Ты освоил всю программу курса. Жди экзаменов."},{"lua_text":"function lua_text()<s>nif not ocenka then ocenka = 0 end<s>nreturn <s>"Твоя полученная оценка по экзаменам: <s>" .. ocenka<s>nend","id":25,"var_need":["ocenka",1],"comment":true,"text":"   "},{"comment":false,"id":25,"instant":true,"lua_text":"function lua_text()<s>nreturn <s>"Писать дипломную работу (<s>" .. teaching1 .. <s>"%)<s>"<s>nend","lua_do":"function lua_do()<s>nif not teaching1 then teaching1 = 1 end<s>nif fun > 0 then<s>nfun = fun - 1<s>nteaching1 = teaching1 <plus> math.random(3)<s>nelse teaching1 = teaching1 <plus> 1<s>nmessage(<s>"Ты продолжаешь писать дипломную работу через силу. Может стоит немного отдохнуть?<s>")<s>nend<s>nend","var_less":["teaching1",100],"var_need":["teaching1",1,"ocenka",1],"text":"Писать диплом","answerImage":["http://188.120.236.127/SimKvestopisca/StudyPlace.png"]},{"id":25,"text":"Вы успешно завершили написание диплома. Скоро начнётся защита диплома.","comment":true,"var_need":["teaching1",100]},{"id":25,"text":"  ","comment":true},{"id":20,"text":"Назад","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]},{"id":22,"text":"... задания ...","run":[22]},{"id":23,"text":"...счётчик дней ...","run":[23]},{"id":24,"text":"... события с девушкой...","run":[24],"var_less":["wife",1]},{"id":28,"text":"... события жена ...","run":[28]},{"super_calculate":false,"lua_do":"function lua_do()<s>ntekst2 = { <s>"Так, и в чём же разница между аннотацией и эпитафией?<s>", <s>"Часы могут идти, когда лежат, и могут стоять, когда висят...<s>", <s>"Проведите лексический анализ фразы 'начисть репу двум перцам'.<s>", <s>"Ложь или правда, ложь или клади.<s>", <s>"Слово 'угу' является синонимом к словам 'пожалуйста', 'спасибо', 'добрый день', 'не за что' и 'извините', а слово 'давай' в большинстве случаев заменяет 'до свидания'.<s>", <s>"Ого, а 'вот этим' словом можно и оскорбить, и восхититься, и выразить все остальные оттенки эмоций.<s>", <s>"Он победит, ты победишь, я... победю? побежу? побежду?<s>", <s>"Вилка на столе лежит, и в раковине тоже лежит. Но тарелка - на столе стоит, а в раковине - лежит. А кошка на столе может и стоять, и сидеть, и лежать.<s>" }<s>ntekst1 = tekst2[math.random(#tekst2)]<s>nend","calculate":true,"text":"  ","id":25}]},{"id":26,"text":"Выберите квест для пиара...","answers":[{"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[1] .. <s>"<s><s>nНомер квеста: <s>" .. number[1] .. <s>"<s><s>nЖанр: <s>" .. quest[1] .. <s>"<s><s>nНаписано страниц: <s>" .. a1 .. <s>"<s><s>nЛайки: <s>" .. like1 .. <s>" / Дизлайки: <s>" .. dis1<s>nend","lua_if":"function lua_if()<s>nif not setQuest1 then setQuest1 = 0 end<s>nreturn setQuest1 == 1<s>nend","isBack":true,"lua_do":"function lua_do()<s>nrek1 = 15<s>nend","text":"  ","id":26,"backstepCount":1},{"backstepCount":1,"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[2] .. <s>"<s><s>nНомер квеста: <s>" .. number[2] .. <s>"<s><s>nЖанр: <s>" .. quest[2] .. <s>"<s><s>nНаписано страниц: <s>" .. a2 .. <s>"<s><s>nЛайки: <s>" .. like2 .. <s>" / Дизлайки: <s>" .. dis2<s>nend","id":26,"lua_do":"function lua_do()<s>nrek2 = 15<s>nend","text":"  ","isBack":true,"lua_if":"function lua_if()<s>nif not setQuest2 then setQuest2 = 0 end<s>nreturn setQuest2 == 1<s>nend"},{"lua_if":"function lua_if()<s>nif not setQuest3 then setQuest3 = 0 end<s>nreturn setQuest3 == 1<s>nend","lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[3] .. <s>"<s><s>nНомер квеста: <s>" .. number[3] .. <s>"<s><s>nЖанр: <s>" .. quest[3] .. <s>"<s><s>nНаписано страниц: <s>" .. a3 .. <s>"<s><s>nЛайки: <s>" .. like3 .. <s>" / Дизлайки: <s>" .. dis3<s>nend","isBack":true,"id":26,"text":"  ","backstepCount":1,"lua_do":"function lua_do()<s>nrek3 = 15<s>nend"},{"lua_do":"function lua_do()<s>nrek4 = 15<s>nend","lua_if":"function lua_if()<s>nif not setQuest4 then setQuest4 = 0 end<s>nreturn setQuest4 == 1<s>nend","backstepCount":1,"id":26,"text":"  ","isBack":true,"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[4] .. <s>"<s><s>nНомер квеста: <s>" .. number[4] .. <s>"<s><s>nЖанр: <s>" .. quest[4] .. <s>"<s><s>nНаписано страниц: <s>" .. a4 .. <s>"<s><s>nЛайки: <s>" .. like4 .. <s>" / Дизлайки: <s>" .. dis4<s>nend"},{"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[5] .. <s>"<s><s>nНомер квеста: <s>" .. number[5] .. <s>"<s><s>nЖанр: <s>" .. quest[5] .. <s>"<s><s>nНаписано страниц: <s>" .. a5 .. <s>"<s><s>nЛайки: <s>" .. like5 .. <s>" / Дизлайки: <s>" .. dis5<s>nend","lua_if":"function lua_if()<s>nif not setQuest5 then setQuest5 = 0 end<s>nreturn setQuest5 == 1<s>nend","isBack":true,"backstepCount":1,"text":"  ","lua_do":"function lua_do()<s>nrek5 = 15<s>nend","id":26},{"id":26,"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[6] .. <s>"<s><s>nНомер квеста: <s>" .. number[6] .. <s>"<s><s>nЖанр: <s>" .. quest[6] .. <s>"<s><s>nНаписано страниц: <s>" .. a6 .. <s>"<s><s>nЛайки: <s>" .. like6 .. <s>" / Дизлайки: <s>" .. dis6<s>nend","lua_do":"function lua_do()<s>nrek6 = 15<s>nend","backstepCount":1,"text":"  ","isBack":true,"lua_if":"function lua_if()<s>nif not setQuest6 then setQuest6 = 0 end<s>nreturn setQuest6 == 1<s>nend"},{"lua_if":"function lua_if()<s>nif not setQuest7 then setQuest7 = 0 end<s>nreturn setQuest7 == 1<s>nend","lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[7] .. <s>"<s><s>nНомер квеста: <s>" .. number[7] .. <s>"<s><s>nЖанр: <s>" .. quest[7] .. <s>"<s><s>nНаписано страниц: <s>" .. a7 .. <s>"<s><s>nЛайки: <s>" .. like7 .. <s>" / Дизлайки: <s>" .. dis7<s>nend","isBack":true,"lua_do":"function lua_do()<s>nrek7 = 15<s>nend","text":"  ","id":26,"backstepCount":1},{"backstepCount":1,"lua_if":"function lua_if()<s>nif not setQuest8 then setQuest8 = 0 end<s>nreturn setQuest8 == 1<s>nend","id":26,"lua_do":"function lua_do()<s>nrek8 = 15<s>nend","text":"  ","isBack":true,"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[8] .. <s>"<s><s>nНомер квеста: <s>" .. number[8] .. <s>"<s><s>nЖанр: <s>" .. quest[8] .. <s>"<s><s>nНаписано страниц: <s>" .. a8 .. <s>"<s><s>nЛайки: <s>" .. like8 .. <s>" / Дизлайки: <s>" .. dis8<s>nend"},{"lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[9] .. <s>"<s><s>nНомер квеста: <s>" .. number[9] .. <s>"<s><s>nЖанр: <s>" .. quest[9] .. <s>"<s><s>nНаписано страниц: <s>" .. a9 .. <s>"<s><s>nЛайки: <s>" .. like9 .. <s>" / Дизлайки: <s>" .. dis9<s>nend","lua_if":"function lua_if()<s>nif not setQuest9 then setQuest9 = 0 end<s>nreturn setQuest9 == 1<s>nend","isBack":true,"id":26,"text":"  ","backstepCount":1,"lua_do":"function lua_do()<s>nrek9 = 15<s>nend"},{"lua_do":"function lua_do()<s>nrek10 = 15<s>nend","lua_text":"function lua_text()<s>nreturn <s>"Название: <s>" .. questName[10] .. <s>"<s><s>nНомер квеста: <s>" .. number[10] .. <s>"<s><s>nЖанр: <s>" .. quest[10] .. <s>"<s><s>nНаписано страниц: <s>" .. a10 .. <s>"<s><s>nЛайки: <s>" .. like10 .. <s>" / Дизлайки: <s>" .. dis10<s>nend","backstepCount":1,"id":26,"text":"  ","isBack":true,"lua_if":"function lua_if()<s>nif not setQuest10 then setQuest10 = 0 end<s>nreturn setQuest10 == 1<s>nend"},{"id":26,"text":"   ","comment":true},{"super_calculate":false,"id":26,"calculate":true,"text":"  ","var_set":["vosk",1,"day_vosk",0]},{"backstepCount":1,"id":26,"text":"Отказаться на этот раз","isBack":true,"answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":27,"text":"Редактор списка квестов. Какой квест хотите улучшить? ","answers":[{"lua_if":"function lua_if()<s>nreturn quest[1]<s>nend","lua_do":"function lua_do()<s>nquality[1] = quality[1] <plus> 1<s>nend","text":"1","lua_text":"function lua_text()<s>nk = 1<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":20},{"lua_text":"function lua_text()<s>nk = 2<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[2] = quality[2] <plus> 1<s>nend","text":"2","id":20,"lua_if":"function lua_if()<s>nreturn quest[2]<s>nend"},{"lua_text":"function lua_text()<s>nk = 3<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[3] = quality[3] <plus> 1<s>nend","text":"3","id":20,"lua_if":"function lua_if()<s>nreturn quest[3]<s>nend"},{"lua_text":"function lua_text()<s>nk = 4<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[4] = quality[4] <plus> 1<s>nend","text":"4","id":20,"lua_if":"function lua_if()<s>nreturn quest[4]<s>nend"},{"lua_text":"function lua_text()<s>nk = 5<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[5] = quality[5] <plus> 1<s>nend","text":"5","id":20,"lua_if":"function lua_if()<s>nreturn quest[5]<s>nend"},{"lua_text":"function lua_text()<s>nk = 6<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[6] = quality[6] <plus> 1<s>nend","text":"6","id":20,"lua_if":"function lua_if()<s>nreturn quest[6]<s>nend"},{"lua_text":"function lua_text()<s>nk = 7<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[7] = quality[7] <plus> 1<s>nend","text":"7","id":20,"lua_if":"function lua_if()<s>nreturn quest[7]<s>nend"},{"lua_text":"function lua_text()<s>nk = 8<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[8] = quality[8] <plus> 1<s>nend","text":"8","id":20,"lua_if":"function lua_if()<s>nreturn quest[8]<s>nend"},{"lua_text":"function lua_text()<s>nk = 9<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[9] = quality[9] <plus> 1<s>nend","text":"9","id":20,"lua_if":"function lua_if()<s>nreturn quest[9]<s>nend"},{"lua_text":"function lua_text()<s>nk = 10<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>nquality[10] = quality[10] <plus> 1<s>nend","text":"10","id":20,"lua_if":"function lua_if()<s>nreturn quest[10]<s>nend"},{"id":27,"text":"  ","comment":true},{"id":20,"text":"В другой раз","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":28,"text":"... события жена ...","answers":[{"text":"    ","super_calculate":false,"id":28,"calculate":true,"need":[999],"lua_do":"function lua_do()<s>nif math.random(100) == 76 then<s>n   dialog({header = <s>"Событие!<s>", <s>n   text = <s>"<s>", <s>n   answers = {{text = <s>"Окей<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end<s>nend"},{"id":28,"text":"    ","calculate":true,"super_calculate":false},{"calculate":true,"super_calculate":false,"lua_do":"function lua_do()<s>nkidAdapted = kidAdapted or 0<s>nkidTime = kidTime or 0<s>n   if kidTime > 0 then <s>n   kidTime = kidTime - 1 <s>n   end<s>n<s>ntimeToSchool = timeToSchool or 0<s>ntimeToSchool = timeToSchool <plus> 1<s>n<s>ntoSchool = toSchool or 0<s>n   if timeToSchool >= 200 and toSchool == 0 then<s>n      toSchool = 1<s>n   local expEn = native.showAlert (<s>"Ребёнок пошёл в школу<s>", <s>"Как же быстро растут дети. Еще недавно вы только платили ипотеку, а вот уже и ребенок в первый класс идёт.<s>", {<s>"Ок<s>"})<s>n   end<s>n<s>nschoolDay = schoolDay or 0<s>nif toSchool > 0 then<s>n   schoolDay = schoolDay <plus> 1<s>n   if kidAdapted < 50 then<s>n      toSchool = toSchool <plus> math.random(2,3)<s>n   elseif kidAdapted >= 50 and kidAdapted  < 100 then <s>n      toSchool = toSchool <plus> math.random(3,4)<s>n   else toSchool = toSchool <plus> math.random(4,5)<s>n   end<s>nend<s>n   <s>nif toSchool > 0 then<s>n   if money > 30000 and math.random(50) == 1 then<s>n      dialog({header = <s>"Ремонт школы<s>",<s>n   text = <s>"Требуется сдать 20.000 на ремонт школы. Либо же можно самому помочь сделать этот ремонт, потратив много сил.<s>",<s>n   answers = {{text= <s>"Сдать 20.000<s>",<s>n   pressListener = function()<s>n   money = money - 20000<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end},<s>n   {text = <s>"Помогать своими силами<s>",<s>n   pressListener = function()<s>n   fun = fun - 50<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end}}})<s>n   end<s>nend<s>n<s>n<s>nend","text":"    ","id":28,"var_need":["godovschina",7]},{"var_less":["inSchool",1],"text":"    ","super_calculate":false,"id":28,"var_need":["godovschina",7],"calculate":true,"lua_do":"function lua_do()<s>ninSchool = 1<s>nlocal expNum = native.showAlert (<s>"Подготовка в школу<s>", <s>"Ваш ребенок уже почти достиг того возраста, когда пора идти в школу. Пока ещё есть время до начала школы - нужно водить ребёнка на подготовительные занятия. Это не обязательно, но если хотите, чтобы ребёнку было проще учиться в будущем, то нужно водить. Уровень подготовки можно смотреть в Дневнике.<s>", {<s>"Понял<s>"})<s>nend"},{"super_calculate":false,"id":28,"calculate":true,"text_color":[1,0,0],"text":"    -   -   -   -   -"},{"var_less":["godovschina",7],"text":"    ","super_calculate":false,"id":28,"var_need":["kid",1,"money",60000],"calculate":true,"lua_do":"function lua_do()<s>nkidFun = kidFun or 50<s>nif math.random(100) == 68 then<s>n   local a = math.random(30000,50000)<s>n   dialog({header = <s>"Для ребенка<s>", <s>n   text = <s>"Ребенок увидел модную игрушку своего любимого мультсериала, который часто смотрит на юТубе, и просит купить эту игрушку здесь и сейчас. Всё бы ничего, но игрушка слишком навороченная и стоит <s>" .. a .. <s>" денег.<s>", <s>n   answers = {{text = <s>"Купить эту игрушку<s>",<s>n   pressListener = function()<s>n   kidFun = kidFun <plus> math.random(3,6)<s>n   money = money - a<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end} }})<s>n   end<s>nend"},{"lua_do":"function lua_do()<s>nif math.random(100) == 76 and money >= 90000 then<s>n   dialog({header = <s>"Шуба для жены!<s>", <s>n   text = <s>"Любимая жена захотела купить себе шубу меховую, а вы не стал отказывать и сделал ей такой подарок.<s>", <s>n   answers = {{text = <s>"С любовью!<s>",<s>n   pressListener = function()<s>n   shuba = 1<s>n   money = money - 70000<s>n   showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end}}})<s>n   end<s>nend","calculate":true,"super_calculate":false,"id":28,"text":"    ","var_need":["kid",1],"var_less":["shuba",1]},{"lua_do":"function lua_do()<s>ngodovschina = godovschina or 0<s>nif math.random(100) == 76 and money > 126000 then<s>n   godovschina = godovschina <plus> 1<s>n   local a = math.random(80000, 120000)<s>n   dialog({header = <s>"Жена<s>", <s>n   text = <s>"У вас приближается годовщина свадьбы, поэтому вы решаете организовать это мероприятие. Расходы будут большие, так как друзей и родственников много, а без них жена не захочет праздновать. Расходы составят: <s>" .. a .. <s>" денег.<s>", <s>n   answers = {{text = <s>"Что ж, оторвёмся по полной!<s>",<s>n   pressListener = function()<s>n   fun = fun <plus> 50<s>n   money = money - a<s>n    showPage {id = g.current_id, transition = <s>"instant<s>"}<s>n   hideDialog() end}}})<s>n   end<s>nend","calculate":true,"super_calculate":false,"id":28,"text":"   ","var_need":["wife",1,"kid",1],"var_less":["godovschina",7]},{"var_less":["godovschina",7],"var_need":["kid",1],"super_calculate":false,"id":28,"text":"   ","calculate":true,"lua_do":"function lua_do()<s>nlocal a = math.random(50)<s>nif a == 1 then<s>n   fun = fun <plus> 3<s>n   text2 = <s>"Вы остались на весь день с ребёнком. Время прошло весело, но тянулось очень долго, отчего вы сильно устали.<s>"<s>nelseif a == 10 then<s>n   fun = fun <plus> 10<s>n   text2 = <s>"Ребёнок спокойно спал всю ночь, так что вы выспались и полны сил.<s>"<s>nelseif a == 33 or a == 30 then<s>n   fun = fun - 3<s>n   text2 = <s>"Ребёнок не давал ночь спать, так что настроение и активность снижены.<s>"<s>nend<s>n   if a == 1 or a == 10 or a == 33 or a == 30 then<s>n   dialog({header = <s>"Ребёнок<s>", <s>n   text = text2, <s>n   answers = {{text = <s>"Окей<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end<s>nend"},{"super_calculate":false,"lua_do":"function lua_do()<s>nif not wife then wife = 0 end<s>nif not wife_preg then wife_preg = 0 end<s>n   if wife > 0 and wife_preg > 0 then<s>n      wife_preg = wife_preg - 1<s>n   end<s>n   if wife_preg == 240 then<s>n      local expNum = native.showAlert (<s>"Семья<s>", <s>"Ваша жена беременна, а значит через каких-то сорок недель в вашей семье будет пополнение.<s>", {<s>"Отлично<s>"})<s>n   end<s>n   if wife_preg == 180 then<s>n      local expNum = native.showAlert (<s>"Семья<s>", <s>"Вот вы и увидили своего будущего ребёнка на УЗИ. Пол пока не назвали, ну и пусть будет тайной. А время-то неумолимо идёт вперёд.<s>", {<s>"Ждать<s>"})<s>n   end<s>n   if wife_preg == 90 then<s>n      local expNum = native.showAlert (<s>"Семья<s>", <s>"Осталось еще около трёх месяцев до рождения ребенка. Кто же будет, мальчик или девочка?<s>", {<s>"Скоро узнаем<s>"})<s>n   end<s>n   if wife_preg == 1 then<s>n      kid = math.random(2)<s>n      local expNum = native.showAlert (<s>"Семья<s>", <s>"У вас родился ребёнок. Беспокойство и радость наполнит ваш дом. Выполнено второе предназначение из четырёх. Что же будет следующим?<s>", {<s>"Ю-ху!<s>"})<s>n   end<s>nend","calculate":true,"text":"   ","id":28},{"text":"   ","var_need":["home",1],"super_calculate":false,"lua_do":"function lua_do()<s>nif not love then love = 0 end<s>nif not wife then wife = 0 end<s>n   if love > 50 and wife == 0 then<s>n   wife, wife_preg = 1, 280<s>n   local expNum = native.showAlert(<s>"Событие!<s>", <s>"Вы хороший парень, и у вас есть любимая девушка, есть собственный дом, но еще пока нет детей... Нужно срочно исправляться.<s>", {<s>"Жениться<s>"})<s>n   end<s>nend","calculate":true,"var_less":["ipoteka",1],"id":28}]},{"id":29,"text":"   ","answers":[{"lua_text":"function lua_text()<s>nreturn <s>"Рейтинг авторов:<s><s>n<s><s>n<s>"<s>nend","super_calculate":false,"id":29,"calculate":false,"text":"   ","merge":true},{"super_calculate":false,"id":29,"calculate":true,"lua_do":"function lua_do()<s>nbox = {}<s>nfor i = 1, 30 do<s>n   table.insert(box, pageAuthors[i] * 2 <plus> likesAuthors[i] - disAuthors[i])<s>nend<s>nstack = table.copy2(box)<s>n   local function compare(a, b)<s>n   return a > b end<s>ntable.sort(stack, compare)<s>nend","text":"   "},{"lua_text":"function lua_text()<s>nlocal text = <s>"<s>"<s>nlocal x = 1<s>nlocal i = 1<s>nrepeat<s>n if box[i] == stack[x] then<s>n   text = text .. x .. <s>". Автор: <s>" .. authors[i] .. <s>" (квест: <s>" .. qAuthors[i] .. <s>", страниц: <s>" .. pageAuthors[i] .. <s>", лайк: <s>" .. likesAuthors[i] .. <s>", диз: <s>" .. disAuthors[i] .. <s>")<s><s>n<s>"<s>n   x = x <plus> 1<s>n   i = i <plus> 1<s>n      if i >= 31 then i = 1 end<s>n else i = i <plus> 1<s>n      if i >= 31 then i = 1 end<s>n end<s>nuntil x >= 31<s>nreturn text<s>nend","super_calculate":false,"id":29,"calculate":false,"text":"   ","merge":true},{"id":29,"text":"Назад","go_to":["back"],"answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":30,"text":"   Какой квест улучшать? ","answers":[{"lua_text":"function lua_text()<s>nlocal k = 1<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","lua_do":"function lua_do()<s>njk = 1<s>nend","text":"1","id":32,"lua_if":"function lua_if()<s>nsetQuest1 = setQuest1 or 0<s>nreturn setQuest1 == 1<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 2<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"2","lua_if":"function lua_if()<s>nsetQuest2 = setQuest2 or 0<s>nreturn setQuest2 == 1<s>nend","lua_do":"function lua_do()<s>njk = 2<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 3<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"3","lua_if":"function lua_if()<s>nsetQuest3 = setQuest3 or 0<s>nreturn setQuest3 == 1<s>nend","lua_do":"function lua_do()<s>njk = 3<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 4<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"4","lua_if":"function lua_if()<s>nsetQuest4 = setQuest4 or 0<s>nreturn setQuest4 == 1<s>nend","lua_do":"function lua_do()<s>njk = 4<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 5<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"5","lua_if":"function lua_if()<s>nsetQuest5 = setQuest5 or 0<s>nreturn setQuest5 == 1<s>nend","lua_do":"function lua_do()<s>njk = 5<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 6<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"6","lua_if":"function lua_if()<s>nsetQuest6 = setQuest6 or 0<s>nreturn setQuest6 == 1<s>nend","lua_do":"function lua_do()<s>njk = 6<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 7<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"7","lua_if":"function lua_if()<s>nsetQuest7 = setQuest7 or 0<s>nreturn setQuest7 == 1<s>nend","lua_do":"function lua_do()<s>njk = 7<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 8<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"8","lua_if":"function lua_if()<s>nsetQuest8 = setQuest8 or 0<s>nreturn setQuest8 == 1<s>nend","lua_do":"function lua_do()<s>njk = 8<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 9<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"9","lua_if":"function lua_if()<s>nsetQuest9 = setQuest9 or 0<s>nreturn setQuest9 == 1<s>nend","lua_do":"function lua_do()<s>njk = 9<s>nend"},{"lua_text":"function lua_text()<s>nlocal k = 10<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k]<s>nend","id":32,"text":"10","lua_if":"function lua_if()<s>nsetQuest10 = setQuest10 or 0<s>nreturn setQuest10 == 1<s>nend","lua_do":"function lua_do()<s>njk = 10<s>nend"},{"id":30,"text":"  ","comment":true},{"id":17,"text":"В кабинет автора","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":31,"text":"   Последние отзывы.<s>n<s>n","answers":[{"comment":false,"super_calculate":false,"id":31,"calculate":true,"text":"Новый ответ. введите текст"},{"lua_do":"function lua_do()<s>notzLang1 = { <s>"Куча ошибок в тексте, аж сложно читать текст.<s>", <s>"Ты что, в третьем классе учишься? Откуда столько ошибок, автор?<s>", <s>"Интересный сюжет, но из-за ошибок иногда кровь из глаз идёт.<s>", <s>"Автор, исправь ошибки или найди редактора.<s>", <s>"Слишком много ошибок, но их всегда можно исправить - было бы желание.<s>", <s>"И пяти страниц не осилил из-за ошибок.<s>", <s>"Автор, проведи работу над ошибками.<s>", <s>"Ты специально не ставишь запятые там, где они должны быть?<s>", <s>"Самый безграмотный квест, какой я тольао встречал.<s>", <s>"Самый безграмотный квест, какой я только встречала.<s>" }<s>n<s>notzLang2 = { <s>"Иногда встречаются опечатки и пропущенные запятые, но это терпимо.<s>", <s>"Мне очень понравился квест, но редкие ошибки портят общее впечатление.<s>", <s>"Автор видимо очень быстро пишет, и с телефона, поэтому допускает ошибки.<s>", <s>"Есть ошибки, но очень редко встречаются.<s>", <s>"Редно, но встречаются ошибки.<s>", <s>"Есть немногочисленные ошибки, которые стоило бы исправить.<s>", <s>"У автора довольно неплохо с граматикой.<s>", <s>"Описания хороши.<s>", <s>"Квест же уже завершен, так когда уже до конца исправят грамматические ошибки?<s>", <s>"Ошибки в тексте напрягают, но бывает и гораздо хуже.<s>" }<s>n<s>notzLang3 = { <s>"Читается легко, а текст написан граммотно, понятно.<s>", <s>"Орфография на высоте. Уважение автору!<s>", <s>"Одна из лучших работ в этом жанре.<s>", <s>"Спасибо автору за приятно проведённое время.<s>", <s>"Заметно выделяющаяся работа среди прочих. Удачи автору.<s>", <s>"Описания живые и красивые, прям услада для глаз.<s>", <s>"Не хотите стать редактором для моего квеста?<s>", <s>"Я уже начинал читать этот квест,но тогда ошибок было просто море, а сейчас вижу, что всё уже отредактировано.<s>", <s>"Как долго ты писал этот прекрасный квест?<s>", <s>"Красивый слог. У вас явно талант!<s>" }<s>n<s>notzTech1 = { <s>"Почти нет выборов, и поэтому читается как книга.<s>", <s>"Стоило бы сделать больше ветвлений, ведь это квест, а не книга.<s>", <s>"Прошёл квест один раз, и сразу на <s>" .. math.random(75,90) .. <s>"%. Ветвлений совсем нет, что ли?<s>", <s>"Стоит добавить больше выбора.<s>", <s>"Сделайте больше выборов.<s>", <s>"Жаль, что в квесте мало действий и загадок.<s>", <s>"Мне одному кажется, что история оборвалась как-то внезапно?<s>", <s>"Плохо проработанна загадка, поэтому с её решением возникают проблемы.<s>", <s>"Последствия некоторых выборов крайне нелогичны.<s>", <s>"Мало интересного.<s>" }<s>n<s>notzTech2 = { <s>"Выборы есть, но некоторые кажутся бессмысленными.<s>", <s>"Порой встречаются хорошие выборы, но не часто.<s>", <s>"Неплохая вариативность, но автору есть к чему стремиться.<s>", <s>"С первого прохождения пройдено на <s>" .. math.random(45,60) .. <s>"%. Есть смысл перепройти квест ещё раз :).<s>", <s>"Достойная работа, но не самая лучшая в плане выборов в ней.<s>", <s>"Стоило бы проработать некоторые варианты развития событий.<s>", <s>"В некоторые моменты кажется, что автор и сам не знает, о чём пишет.<s>", <s>"В некоторых местах повествование идёт то от второго, то от третьего лица.<s>", <s>"Довольно любопытная работа.<s>", <s>"Неплохие загадки и головоломки, но они простые в решении.<s>", <s>"Что-то подобное я уже читал. Плагиат?<s>" }<s>n<s>notzTech3 = { <s>"Много выбора, который действительно влияет на развитие сюжета в целом.<s>", <s>"При первом прохождении было всего-то <s>" .. math.random(12,20) .. <s>"%. Пойду проходить его ещё раз.<s>", <s>"Стоит отметить хорошо проработанные выборы - и много, и равнозначные.<s>", <s>"Обалдеть, сколько труда вложено в написание квеста.<s>", <s>"Вариативность на высоте.<s>", <s>"Некоторые загадки уникальные, которые еще нигде не встречал.<s>", <s>"Великолепная работа.<s>", <s>"Достойная работа.<s>", <s>"Автор большой молодец!<s>", <s>"Не хочешь написать со мной совместный квест?<s>" }<s>n<s>notzProg1 = { <s>"Общее впечатление - не очень.<s>", <s>"И примитивные механики рушат весь квест.<s>", <s>"Кстати, шаблонные персонажи портят весь сюжет.<s>", <s>"Добавьте какие-нибудь головоломки в квест.<s>", <s>"В общем, отстой!<s>" }<s>n<s>notzProg2 = { <s>"Мне понравился квест.<s>", <s>"Очень годный квест.<s>", <s>"Есть интересные механики и задачки, но их мало.<s>", <s>"Персонажи мало раскрыты, так что стоило бы их дописать по квесту.<s>", <s>"Вполне норм.<s>" }<s>n<s>notzProg3 = { <s>"А ещё мне понравились игровые механики.<s>", <s>"А еще интересно проработан сюжет и персонажи.<s>", <s>"И отличные живые персонажи, которые имеют свои нешаблонные характеры.<s>", <s>"Великолепная механика и головоломки в квесте.<s>", <s>"Определённо пройду его ещё раз!<s>" }<s>nend","comment":true,"super_calculate":false,"id":31,"calculate":true,"text":"  ","merge":false},{"id":31,"text":"Назад","lua_text":"function lua_text()<s>notzQ = otzQ or 5<s>n<s>ntabQuest = { }<s>nif setQuest1 == 1 then<s>n   table.insert (tabQuest, 1) end<s>nif setQuest2 == 1 then<s>n   table.insert (tabQuest, 2) end<s>nif setQuest3 == 1 then<s>n   table.insert (tabQuest, 3) end<s>nif setQuest4 == 1 then<s>n   table.insert (tabQuest, 4) end<s>nif setQuest5 == 1 then<s>n   table.insert (tabQuest, 5) end<s>nif setQuest6 == 1 then<s>n   table.insert (tabQuest, 6) end<s>nif setQuest7 == 1 then<s>n   table.insert (tabQuest, 7) end<s>nif setQuest8 == 1 then<s>n   table.insert (tabQuest, 8) end<s>nif setQuest9 == 1 then<s>n   table.insert (tabQuest, 9) end<s>nif setQuest10 == 1 then<s>n   table.insert (tabQuest, 10) end<s>n<s>nlangQ = { }<s>n   for i = 1, 10 do<s>n   table.insert (langQ, sizeNow [i] / languageQuest [i]) end<s>ntechQ = { }<s>n   for i = 1, 10 do<s>n   table.insert (techQ, sizeNow [i] / technicalQuest [i]) end<s>nprogQ = { }<s>n   for i = 1, 10 do<s>n   table.insert (progQ, sizeNow [i] / programmingQuest [i]) end<s>n<s>nif #tabQuest < 3 then<s>n   otzN = math.random(3,5)<s>nelse otzN = math.random(4,7) end<s>n<s>nif otzQ >= 5 then<s>n   otzQ = 1<s>n   reOtz = 1<s>n   ot1 = math.random(2)<s>n      if ot1 == 1 then<s>n      ot11 = math.random(2,3)<s>n      else ot11 = 3 end<s>n   ot2 = math.random(2)<s>n      if ot2 == 1 then<s>n      ot22 = math.random(2,3)<s>n      else ot22 = 3 end<s>n   ot3 = math.random(2)<s>n      if ot3 == 1 then<s>n      ot33 = math.random(2,3)<s>n      else ot33 = 3 end<s>n   if otzN > 3 then ot4 = math.random(2)<s>n       if ot4 == 1 then ot44 = math.random(2,3)<s>n       else ot44 = 3 end end<s>n   if otzN > 4 then ot5 = math.random(2)<s>n       if ot5 == 1 then ot55 = math.random(2,3)<s>n       else ot55 = 3 end end<s>n   if otzN > 5 then ot6 = math.random(2)<s>n       if ot6 == 1 then ot66 = math.random(2,3)<s>n       else ot66 = 3 end end<s>n   if otzN > 6 then ot7 = math.random(2)<s>n       if ot7 == 1 then ot77 = math.random(2,3)<s>n       else ot77 = 3 end end<s>nend<s>n<s>nreOtz = reOtz or 0<s>nif reOtz == 1 then <s>n   reOtz = 0<s>n   k1 = { }<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   table.insert (k1, tabQuest [math.random (#tabQuest)])<s>n   textOtz = <s>"Отзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot1 == 1 then<s>n      if langQ[ k1[1]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[1]] < 20 and langQ[ k1[1]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[1]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot1 == 2 then<s>n      if techQ[ k1[1]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[1]] < 20 and techQ[ k1[1]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[1]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot11 == 2 then<s>n      if techQ[ k1[1]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[1]] <= 20 and techQ[ k1[1]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[1]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot11 == 3 then<s>n         if progQ[ k1[1]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[1]] < 20 and progQ[ k1[1]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[1]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>n<s>n<s>n   textOtz = textOtz .. <s>"<s><s>n<s><s>nОтзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot2 == 1 then<s>n      if langQ[ k1[2]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[2]] < 20 and langQ[ k1[2]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[2]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot2 == 2 then<s>n      if techQ[ k1[2]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[2]] < 20 and techQ[ k1[2]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[2]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot22 == 2 then<s>n      if techQ[ k1[2]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[2]] <= 20 and techQ[ k1[2]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[2]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot22 == 3 then<s>n         if progQ[ k1[2]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[2]] < 20 and progQ[ k1[2]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[2]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>n<s>n<s>n   textOtz = textOtz .. <s>"<s><s>n<s><s>nОтзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot3 == 1 then<s>n      if langQ[ k1[3]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[3]] < 20 and langQ[ k1[3]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[3]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot3 == 2 then<s>n      if techQ[ k1[3]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[3]] < 20 and techQ[ k1[3]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[3]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot33 == 2 then<s>n      if techQ[ k1[3]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[3]] <= 20 and techQ[ k1[3]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[3]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot33 == 3 then<s>n         if progQ[ k1[3]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[3]] < 20 and progQ[ k1[3]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[3]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>n<s>nif otzN > 3 then<s>n   textOtz = textOtz .. <s>"<s><s>n<s><s>nОтзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot4 == 1 then<s>n      if langQ[ k1[4]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[4]] < 20 and langQ[ k1[4]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[4]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot4 == 2 then<s>n      if techQ[ k1[4]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[4]] < 20 and techQ[ k1[4]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[4]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot44 == 2 then<s>n      if techQ[ k1[4]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[4]] <= 20 and techQ[ k1[4]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[4]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot44 == 3 then<s>n         if progQ[ k1[4]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[4]] < 20 and progQ[ k1[1]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[4]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>nend<s>n<s>n<s>nif otzN > 4 then<s>n   textOtz = textOtz .. <s>"<s><s>n<s><s>nОтзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot5 == 1 then<s>n      if langQ[ k1[5]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[5]] < 20 and langQ[ k1[5]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[5]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot5 == 2 then<s>n      if techQ[ k1[5]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[5]] < 20 and techQ[ k1[5]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[5]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot55 == 2 then<s>n      if techQ[ k1[5]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[5]] <= 20 and techQ[ k1[5]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[5]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot55 == 3 then<s>n         if progQ[ k1[5]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[5]] < 20 and progQ[ k1[5]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[5]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>nend<s>n<s>n<s>nif otzN > 5 then<s>n   textOtz = textOtz .. <s>"<s><s>n<s><s>nОтзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot6 == 1 then<s>n      if langQ[ k1[6]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[6]] < 20 and langQ[ k1[6]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[6]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot6 == 2 then<s>n      if techQ[ k1[6]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[6]] < 20 and techQ[ k1[6]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[6]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot66 == 2 then<s>n      if techQ[ k1[6]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[6]] <= 20 and techQ[ k1[6]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[6]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot66 == 3 then<s>n         if progQ[ k1[6]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[6]] < 20 and progQ[ k1[6]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[6]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>nend<s>n<s>n<s>nif otzN > 6 then<s>n   textOtz = textOtz .. <s>"<s><s>n<s><s>nОтзыв к квесту ''<s>" .. questName [ k1[ math.random(#k1) ]] .. <s>"'':<s><s>n<s>"<s>n   if ot7 == 1 then<s>n      if langQ[ k1[7]] >= 20 then<s>n      textOtz = textOtz .. otzLang1[ math.random (#otzLang1)]<s>n      elseif langQ[ k1[7]] < 20 and langQ[ k1[7]] > 5 then<s>n      textOtz = textOtz .. otzLang2[ math.random (#otzLang2)]<s>n      elseif langQ[ k1[7]] <= 5 then<s>n      textOtz = textOtz .. otzLang3[ math.random (#otzLang3)] end<s>n   elseif ot7 == 2 then<s>n      if techQ[ k1[7]] >= 20 then<s>n      textOtz = textOtz .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[7]] < 20 and techQ[ k1[7]] > 5 then<s>n      textOtz = textOtz .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[7]] <= 5 then<s>n      textOtz = textOtz .. otzTech3[ math.random (#otzTech3)] end<s>n   end<s>n<s>n   if ot77 == 2 then<s>n      if techQ[ k1[7]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech1[ math.random (#otzTech1)]<s>n      elseif techQ[ k1[7]] <= 20 and techQ[ k1[1]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech2[ math.random (#otzTech2)]<s>n      elseif techQ[ k1[7]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzTech3[ math.random (#otzTech3)] end<s>n   elseif ot77 == 3 then<s>n         if progQ[ k1[7]] >= 20 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg1[ math.random (#otzProg1)]<s>n      elseif progQ[ k1[7]] < 20 and progQ[ k1[7]] > 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg2[ math.random (#otzProg2)]<s>n      elseif progQ[ k1[7]] <= 5 then<s>n      textOtz = textOtz .. <s>" <s>" .. otzProg3[ math.random (#otzProg3)] end<s>n   end<s>nend<s>nend<s>n<s>nreturn textOtz<s>nend","merge":true},{"id":17,"text":"Назад","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]},{"comment":false,"id":31,"text":"   ","need":[999],"var_set":["fun",1000,"читер",1]}]},{"id":32,"text":"Какое улучшение с этим квестом провести? <s>n<s>n","answers":[{"comment":false,"id":32,"text":"   ","lua_text":"function lua_text()<s>nlocal k = jk<s>nreturn <s>"Название: <s>" .. questName[k] .. <s>"<s><s>nНомер квеста: <s>" .. number[k] .. <s>"<s><s>nЖанр: <s>" .. quest[k] .. <s>"<s><s>nСтраниц: <s>" .. sizeNow[jk]<s>nend","merge":true},{"bg_color":[],"lua_text":"function lua_text()<s>nlocal ab1 = languageQuest[jk]<s>nlocal ab2 = technicalQuest[jk]<s>nlocal ab3 = programmingQuest[jk]<s>nlocal size = sizeNow [jk]<s>n<s>nabc1 = size / ab1<s>nabc2 = size / ab2<s>nabc3 = size / ab3<s>n<s>nlocal tabP = { <s>"ужасная<s>", <s>"плохая<s>", <s>"хорошая<s>" }<s>nlocal tabP1 = { <s>"ужасное<s>", <s>"плохое<s>", <s>"хорошее<s>" }<s>n<s>nif abc1 >= 20 then <s>n   ab1 = tabP[1]<s>nelseif abc1 < 20 and abc1 > 5 then<s>n   ab1 = tabP[2]<s>nelse ab1 = tabP[3]<s>nend<s>n<s>nif abc2 >= 20 then <s>n   ab2 = tabP[1]<s>nelseif abc2 < 20 and abc2 > 5 then<s>n   ab2 = tabP[2]<s>nelse ab2 = tabP[3]<s>nend<s>n<s>nif abc3 >= 20 then <s>n   ab3 = tabP1[1]<s>nelseif abc3 < 20 and abc3 > 5 then<s>n   ab3 = tabP1[2]<s>nelse ab3 = tabP1[3]<s>nend<s>n<s>nreturn <s>"<s><s>n<s><s>nГрамотность квеста: <s>" .. ab1 .. <s>"<s><s>nМеханика квеста: <s>" .. ab2 .. <s>"<s><s>nПрограммирование квеста: <s>" .. ab3 <s>nend","text_color":[],"id":32,"text":"  ","shadow_color":[],"merge":true},{"comment":false,"lua_if":"function lua_if()<s>nreturn abc1 >= 4.9<s>nend","id":32,"lua_do":"function lua_do()<s>nfun = fun - 5<s>nlanguageQuest[jk] = languageQuest[jk] <plus> navykLang<s>nend","text":"Улучшить грамматику и пунктуацию квеста","var_need":["fun",5],"instant":true},{"comment":false,"lua_if":"function lua_if()<s>nreturn abc2 >= 4.9<s>nend","id":32,"lua_do":"function lua_do()<s>nfun = fun - 5<s>ntechnicalQuest[jk] = technicalQuest[jk] <plus> navykTech<s>nsizeNow[jk] = sizeNow[jk] <plus> math.random(3,7)<s>nend","text":"Ввести новую механику в квест","var_need":["fun",5],"instant":true},{"comment":false,"lua_if":"function lua_if()<s>nreturn abc3 >= 4.9<s>nend","id":32,"lua_do":"function lua_do()<s>nfun = fun - 5<s>nprogrammingQuest[jk] = programmingQuest[jk] <plus> navykProg<s>nsizeNow[jk] = sizeNow[jk] <plus> 2<s>nend","text":"Программировать в квесте","var_need":["fun",5],"instant":true},{"comment":false,"text":"Расписывать события и персонажей ","id":32,"var_need":["fun",5],"lua_do":"function lua_do()<s>nfun = fun - 5<s>nsizeNow[jk] = sizeNow[jk] <plus> math.round( math.random( navykWrite * 0.7, navykWrite) )<s>nif navykWrite < 50 then<s>n   if math.random(12) == 7 then<s>n   navykWrite = navykWrite <plus> 1<s>n   message(<s>"Навык написания квеста повышен <plus> 1<s>") end end<s>nend","instant":true},{"id":32,"text":"  ","comment":true},{"id":30,"text":"Выбрать другой квест","var_need":["fun",5]},{"id":17,"text":"В кабинет автора","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]}]},{"id":33,"text":"   Основные понятия:<s>n<s>n   Квест — нечто похожее на книгу, которую пишет автор/писатель, но отличие состоит в том, что в квестах есть влияние читателя в виде <s>"выборов<s>" развития сюжета. Если в книге есть одно начало и одна концовка, то в квестах, зачастую, одно начало и много концовок.<s>n<s>n   Текстовые квесты — одноимённое приложение в PlayMarket'e, в котором можно писать квесты. Данная игра напрямую связана с данным Приложением и её сообществом в ВКонтакте.<s>n<s>n   Кабинет Автора — рабочее место пользователя Приложения, в котором он создаёт и пишет свои квесты. Так же это и рабочее место для написания квестов в этой игре. Каждому квесту присваивается номер, название и жанр. При желании, все эти три значения можно сменить на другие.<s>n<s>n   Настроение — некая шкала желания, которая напрямую влияет на процесс написания квестов и выполнение ряда задач. Свободно повышается от развлечений, наподобие <s>"Игры в компьютер<s>", <s>"Общение в Кворуме<s>" и <s>"Развлечения в соц.сети<s>".<s>n<s>n   Игровое время — оно зависит от Ваших выполняемых действий. Если телефон будет просто лежать, то время стоит на месте.<s>n<s>n   Случайные события — время от времени выскакивающие таблички с выбором, которые приносят ту или иную пользу, или отказ от события. Такие события имеют небольшое, но значимое влияние на процесс игры и получаемые результаты.","answers":[{"isBack":true,"text":"Назад","id":33,"backstepCount":1}]},{"id":34,"text":"   Основные понятия:<s>n<s>n   Личное пространство — некое место, в котором обитает главный персонаж. В нём представлены возможные действия, которые позволят повышать настроение и выполнять нужные цели.<s>n<s>n   Читать Текстовые квесты — действие, которое приводит к увеличению настроения. Дополнительно выводится развлекательная информация о случайном квесте. <s>n<s>n   Общаться в Кворуме Квестописцев — действие, которое приводит к повышению/понижению настроению, в зависимости от произошедшего случайного события в процессе. Может значительно повышать настроение. Иногда даёт возможность <s>"улучшить квест с модератором<s>". За частое общение в Кворуме можно стать модератором, что убирёт отрицательное влияние на настроение при общении.<s>n<s>n   Улучшить квест с модератором — увеличивает качество квеста, в результате чего квест может набирать больше лайков за раз. Лайки/дизлайки сами автоматически приростают, и оказать на них прямое влияние — невозможно.<s>n<s>n   Развлекаться в соц.сети — простое действие, которое незначительно повышает настроение. Показывает небольшое всплывающее сообщение с результатом времяпровождения.<s>n<s>n   Поиграть в компьютер — выбор действий, которые значительно могут повысить настроение. Доступна игра в MMORPG с прокачкой персонажа, и список игр для прохождения. Если пройти все игры, то откроется достижение, но никакого влияние на процесс выполнения игровых целей оно не окажет.<s>n<s>n   Поиграть с питомцем — действие, которое повышает настроение. Станет доступным только после приобретения питомца (после завершения выплат по ипотеке).<s>n<s>n   Рекламировать квест/квесты в Воскресном спойлере — действие, которое даёт повышенное внимание к выбранному квесту. Такой квест начинает получать большое количество лайков в течении небольшого времени. <s>n<s>n   Заметки писателя — небольшой интерфейс, содержащий информацию по текущей игровой цели и статусам. <s>n<s>n   Изучение грамматики, квестовых механик и программирования Lua — три навыка, которые позволят Вам улучшить квесты. Чем выше их значение (макс.50), тем сильнее оказывают влияние на качество квеста. Рекомендуется улучшить их до 20-30 единиц после выполнения игровой цели <s>"Учёба в Университете<s>".<s>n<s>n   Деньги — игровая валюта, которая прибывает самостоятельно, а значение прибыли зависит от количества написанных страниц в опубликованных квестах. Деньги нужны в первую очередь для игровой цели <s>"Ипотека<s>", но тратятся в случайных событиях и на питомцев. Для хорошей игры рекомендуется иметь от 1000 опубликованных страниц.","answers":[{"isBack":true,"text":"Назад","id":33,"backstepCount":1}]},{"id":35,"text":"   Игровые цели:<s>n<s>n   1) Написать квест и опубликовать его. Дождаться накопления небольшого числа лайков.<s>n   2) Написание квеста на 300<plus> страниц. Можно написать новый квест, либо улучшать старый. После этого начнут прибывать деньги.<s>n   3) Учёба в Университете — временное событие, на которое нужно потратить время и силы, чтобы получить оценку. Чем больше сил внесёте на обучение, тем выше будет оценка. Время этого события ограничено, так что не рекомендуется откладывать на потом. Можно и провалиться, но тогда это событие повторится вновь по истечению некоторого времени.<s>n   4) Накопить 100.000 денег, чтобы началась игровая цель <s>"Ипотека<s>" — первая основная цель игры из четырёх. Платеж по ипотеке всегда равен половине накопленных денег, но не менее 5.000. <s>n   5) После появления денег есть шанс того, что появится девушка, с которой главному герою предстоит проживать. С ней же появятся случайные события — сходить куда-либо или купить подарок, что повышает крепкость отношений. Если от всего отказываться, то рано или поздно можно разрушить отношения и расстаться. <s>n   6) После выплаты ипотеки произойдёт свадьба,  если отношения достаточно крепки. Если нет, то нужно ждать случайных событий с девушкой и укреплять отношения подарками и прогулками. После свадьбы будет цель — родить ребёнка. Тут ничего делать не надо, а просто ждать и играть во что-либо, чтобы время шло. Родится мальчик или девочка. На этом вторая основная цель будет выполнена.<s>n   7) Вырастить дерево — просто, но долго и муторно поливать его после нескольуих действий. Когда вырастет дерево, то выполнится третья основная цель игры.<s>n   8) Четвёртая основная цель — написать большой квест. После написания появится окно с подписью <s>"Финал<s>", что будет означать о прохождении игры. Можно продолжить играть дальше, а можно просто начать заново.","answers":[{"isBack":true,"text":"Назад","id":33,"backstepCount":1}]},{"id":36,"text":"   Создавая новый квест нужно выбрать три парамерта: жанр, размер и название. Жанр и название никак не влияет на рейтинг квеста, и несёт исключительно желаемое значение, а вот от размера зависит будущая привлекательность квеста — чем больше идея (выбранный размер), тем больший приток лайков возможен в будущем.<s>n   Также привлекательность можно увеличивать проводя работу по <s>"улучшению с модератором<s>", но это событие доступно только после случайного выпадения в процессе <s>"Общения в Кворуме<s>". Но шансы высоки на выпадение данного события, так что пользуйтесь этим, чтобы сделать квест более привлекательным и увеличить приток лайков.<s>n   Помимо этих трёх параметров у квеста есть ещё номер. Он по умолчанию даётся случайный последовательный. Номер тоже несёт исключительно эстетический вид для любителей прекрасного.<s>n   Название, номер и жанр можно сменить в любое время в соответствуещем меню, в которое можно перейти из Кабинета Автора.<s>n   Если по какой-то причине не нужен квест, то его можно удалить, но восстановление будет невозможным. <s>n   <s>n   При написании используется четыре навыка автора: написание, грамотность, умение создавать механики квеста и программирование. <s>n   Первый навык прокачивается автоматически во время написания квестов, и он определяет размер возможных написанных страниц за один раз. <s>n   Второй навык определяет <s>"чистоту<s>" написания квеста — ошибки, опечатки и пунктуацию — и определяет их уровень по отношению к написанным страницам. Чем выше навык, тем сильнее оказывается влияние на грамотность написанного квеста. Чем больше квест по размеру, тем сложнее довести его до хорошего состояния, но ничего невозможного нет!<s>n   Третий навык определяет интересные взаимодействия в квесте — события, задачки, головоломки. Да, мы их не видим в этой игре, но квестовые механии оказывают значительное влияние на читателей для привлекательности квестов.<s>n   Четвёртый навык — программирование — позволяет упрощать работу автора и создавать то, что невозможно стандартным набором инструментов Приложения. Хорошо спрограммированный квест имеет преимущества перед квестами без программирования.<s>n   Грамотность, написание механик и программирование можно улучшить в <s>"Личном пространстве<s>", и максимальное значение будет 50. Первые уровни получаются не так долго, и до 20 набрать не проблема. Далее — дело заинтересованности и терпения.<s>n<s>n   Качество квеста определяется по трём критериям: ужасно, плохо и хорошо. Так что улучшайте качество до отметки <s>"хорошо<s>" и получайте хорошие отзывы на квест.<s>n   Опубликованные квесты можно и нужно дорабатывать. Для этого необходимо <s>"желание писать квест<s>", и работа над завершенной работой требует куда больше сил и настроения, чем написание нового квеста, но наградой станет хорошие отзывы о квесте, которые вы можете прочитать в <s>"Кабинете Автора<s>".","answers":[{"isBack":true,"text":"Назад","id":33,"backstepCount":1}]},{"id":37,"text":"   Рейтинг — неосновная задача, но тоже может потребовать значительных сил, если захотите занять первое место в нём. Дело в том, что другие авторы тоже не сидят без дела, и постепенно пишут и улучшают свои квесты. На любое Ваше действие авторы продолжаю писать, пускай не так быстро, но пишут они медленно и верно. <s>n   Для завоевания рейтинга необходимо бросать все силы на какой-либо один квест и улучшать только его, ведь в рейтинг попадает только один из лучших Ваших квестов, а не все разом. <s>n   Рейтинг расчитывается исходя из количества страниц, лайков и дизлайков. Хоть основное преимущество за страницами, но лайки тоже могут дать ощутимый перевес в Вашу пользу.<s>n   Всего в рейтинге принимает участие 30 Авторов, поэтому конкуренция хорошая. Рейтинг обновляется в режиме онлайн, поэтому Вы всегда можете посмотреть своё актуальное местоположение в рейтинге.","answers":[{"isBack":true,"text":"Назад","id":33,"backstepCount":1}]},{"id":38,"text":"   Самые первые случайные события у Вас произойдут в момент написания квеста. Это проведение какого-либо вида улучшения для повышения качества квеста. Поначалу, пока <s>"навыки автора<s>" ещё низкие, стоит воздержаться от этих событий и отказываться, но после того, как прокачаете навыки побольше, чем 1 — используйте эти события, чтобы увеличить качество квеста.<s>n   Далее — появление девушки. Она оказывает хорошее влияние на настроение и расход денег. Поначалу, если опубликованных страниц мало, то события с ней отнимают небольшое количество денег и повышает настроение для написания квестов, что замедляет процесс выплаты ипотеки. Тут стоит искать золотую середину, ведь если отказывать девушке во всём, то она попросту уйдёт, а если всегда соглашаться с ней, то попросту будет мало денег для ипотеки.<s>n   Для гашения ипотеки используется половина из имеющихся денег, но не менее 5.000. Таким образом можно ускорить выплату ипотеки и выполнить игровую цель быстрее. После этого деньги будут копиться, но тем не менее они нужны на повседневные расходы — питание для питомца, квартплата, продукты.<s>n   С погашением ипотеки появится возможность завести питомца. Представится небольшой выбор, но возможен и отказ от него. При наличии питомца появится возможность в один клик повысить настроение, <s>"поиграв с питомцем<s>". Данное действие будет доступно в <s>"Личном пространстве<s>". Отказ от питомца приведёт к его невозможности приобретения в дальнейшем.<s>n   После рождения ребёнок тоже будет оказывать влияние на настроение — либо повышать, либо понижать. Системно сделано два события на повышение — слабое и среднее — и одно на понижение — слабое.","answers":[{"isBack":true,"text":"Назад","id":38,"backstepCount":1}]},{"id":39,"text":"   Выберите подготовительный курс...","answers":[{"comment":false,"var_add":["kidAdapted",2],"id":20,"text":"Простой (2500 денег за занятие)","var_need":["money",2500],"var_set":["kidTime",7]},{"comment":false,"var_add":["kidAdapted",4],"id":20,"text":"Усиленный (5000 денег за занятие)","var_need":["money",5000],"var_set":["kidTime",7]},{"comment":false,"var_add":["kidAdapted",6],"id":20,"text":"Индивидуальный (10000 денег за занятие)","var_need":["money",10000],"var_set":["kidTime",7]}]},{"id":40,"text":"   Дневник.<s>n<s>n   Средняя оценка: ","answers":[{"id":40,"text":"   ","lua_text":"function lua_text()<s>nlocal text = (math.floor (toSchool / (schoolDay * 5) * 50)) / 10<s>nif text >= 5 then text = 5 end<s>nreturn text .. <s>"<s><s>n   <s>" <s>nend","merge":true},{"comment":true,"text":"   ","id":40,"var_need":["Complete",1],"lua_text":"function lua_text()<s>nlocal text<s>nlocal aa = 1<s>nkidAdapted = kidAdapted or 0<s>nif kidAdapted >= 50 and kidAdapted < 100 then <s>n  aa = 2<s>nelseif kidAdapted >= 100 then<s>n   aa = 3<s>nend<s>ninSchool = inSchool or 0<s>nif inSchool < 1 then<s>n   text = <s>"Уровень ребёнка: <s>" .. ({<s>"неподготовленный.<s>", <s>"уверенный.<s>", <s>"полностью готов.<s>"}) [aa] <s>nelse<s>n   text = <s>"Уровень ребёнка: <s>" .. ({<s>"учится плохо.<s>", <s>"учится уверенно.<s>", <s>"учится хорошо.<s>"}) [aa]  <s>nend<s>nreturn text<s>nend","merge":true},{"id":20,"text":"Назад","answerImage":["http://188.120.236.127/SimKvestopisca/Back.png"]},{"id":40,"text":"   ","lua_text":"function lua_text()<s>nlocal text = <s>"<s><s>n   Ребёнок учится в <s>"<s>ntimeToSchool = timeToSchool or 0<s>nlocal aa = 1<s>nif timeToSchool >= 200 then<s>n   aa = math.ceil( (timeToSchool - 199) / 100 )<s>nend<s>nreturn text .. aa .. <s>" классе.<s>" <s>nend","merge":true},{"id":40,"text":"  <s>n<s>n   Чтобы повысить уровень ребёнка, нужно регулярно помогать ему в учёбе. ","var_less":["kidAdapted",100],"merge":true}]},{"id":41,"text":" ... ребенок в универе... ","answers":[{"super_calculate":false,"lua_do":"function lua_do()<s>n   timeToSchool = timeToSchool or 0<s>n   kidFun = kidFun or 20<s>n   toUniver = toUniver or 0<s>n   toSchool = toSchool or 0 <s>n   schoolDay = schoolDay or 0<s>n   local srednyaya = (math.floor (toSchool / (schoolDay * 5) * 50)) / 10<s>n   if toUniver == 0 and timeToSchool >= 1300 then<s>n      if srednyaya >= 3.5 then<s>n         toUniver = 1<s>n         local expEn = native.showAlert (<s>"Ребёнок пошёл в Университет<s>", <s>"Хорошие оценки позволили поступить в высшее учебное заведение. Теперь хлопот с ребёнком будет меньше, думали вы, но ошиблись. Нужно купить ему квартиру или помочь с ипотекой.<s>", {<s>"Ок<s>"})<s>n      else<s>n         toUniver = 2<s>n         local expEn = native.showAlert (<s>"Ребёнок пошёл в Техникум<s>", <s>"Плохие оценки позволили поступить только в профильное учебное заведение. Теперь хлопот с ребёнком будет меньше, думали вы, но ошиблись. Нужно купить ему квартиру или помочь с ипотекой.<s>", {<s>"Ок<s>"})<s>n      end<s>n   end<s>nend","text":"определяет, куда поступает ребёнок после школы","id":41,"calculate":true},{"id":41,"text":"    ","calculate":true,"super_calculate":false},{"calculate":true,"comment":false,"super_calculate":false,"id":41,"text":"    ","need":[999],"lua_do":"function lua_do()<s>nif math.random(100) == 76 then<s>n   dialog({header = <s>"Событие!<s>", <s>n   text = <s>"<s>", <s>n   answers = {{text = <s>"Окей<s>",<s>n   pressListener = function()<s>n   hideDialog() end}}})<s>n   end<s>nend"},{"lua_do":"function lua_do()<s>nif math.random(100) == 1 and money > 30000 then<s>n   local aa = math.random(15000,25000) <s>n   dialog({header = <s>"Ребёнок<s>", <s>n   text = ({<s>"Сын <s>", <s>"Дочь <s>"}) [kid] .. <s>"просит денег на покупку новой одежды. Для этого нужно <s>".. aa .. <s>" денег.<s>", <s>n   answers = {{text = <s>"Дать<s>", pressListener = function()<s>n      money = money - aa<s>n      kidFun = kidFun <plus> 1<s>n      hideDialog() end }, <s>n      {text = <s>"Отказать<s>", pressListener = function()<s>n      kidFun = kidFun - 2<s>n      hideDialog() end} <s>n      }})<s>n   end<s>nend","comment":false,"super_calculate":false,"id":41,"text":"    ","calculate":true,"var_need":["toUniver",1]},{"text":"    ","comment":false,"super_calculate":false,"id":41,"calculate":true,"lua_do":"function lua_do()<s>nif math.random(100) == 1 and money > 30000 then<s>n   local aa = math.random(15000,25000) <s>n   dialog({header = <s>"Ребёнок<s>", <s>n   text = ({<s>"Сын собирается сходить с девушкой в ресторан и просит у вас денег. Ему нужно <s>".. aa.. <s>" денег.<s>", <s>"Дочь собирается пройтись с подружками по торговым центрам, чтобы хорошо провести время. Для этого нужно <s>".. aa.. <s>" денег.<s>" }) [kid], <s>n   answers = {{text = <s>"Дать<s>", pressListener = function()<s>n      money = money - aa<s>n      kidFun = kidFun <plus> 1<s>n      hideDialog() end }, <s>n      {text = <s>"Отказать<s>", pressListener = function()<s>n      kidFun = kidFun - 2<s>n      hideDialog() end} <s>n      }})<s>n   end<s>nend","var_need":["toUniver",1]},{"var_need":["toUniver",1],"comment":false,"super_calculate":false,"id":41,"text":"    ","lua_do":"function lua_do()<s>nif math.random(60) == 1 and money > 15000 then<s>n   local aa = math.random(5000,10000) <s>n   dialog({header = <s>"Ребёнок<s>", <s>n   text = ({<s>"Сын придёт на семейный ужин вместе со своей возлюбленной. Нужно как следует приготовиться.<s>", <s>"Дочь придёт на семейный ужин вместе со своим возлюбленным. Стоит как следует приготовиться.<s>" }) [kid], <s>n   answers = {{text = <s>"Хорошо<s>", pressListener = function()<s>n      money = money - aa<s>n      kidFun = kidFun <plus> 1<s>n      hideDialog() end }}})<s>n   end<s>nend","calculate":true}]},{"id":42,"text":"","answers":[]}]