[{"id":1,"text":"Автор: Ярослав Зверев.<s>n<s>nНаряжайте ёлку, получайте конфеты и покупайте украшения! Эта простая игра на память поможет создать праздничное настроение.","answers":[{"id":4,"text":"Начать","lua_do":"function lua_do()<s>n  g.range = {<s>n{x = 0.340062, y = 0.804113},<s>n{x = 0.240683, y = 0.685065},<s>n{x = 0.374224, y = 0.566017},<s>n{x = 0.498447, y = 0.787879},<s>n{x = 0.690994, y = 0.787879},<s>n{x = 0.771739, y = 0.679654},<s>n{x = 0.563665, y = 0.541126},<s>n{x = 0.178571, y = 0.493506},<s>n{x = 0.068323, y = 0.375541},<s>n{x = 0.343168, y = 0.288961},<s>n{x = 0.343168, y = 0.172078},<s>n{x = 0.822981, y = 0.495671},<s>n{x = 0.67236, y = 0.281385},<s>n{x = 0.881988, y = 0.36039},<s>n{x = 0.681677, y = 0.147186},<s>n{x = 0.962733, y = 0.231602},<s>n  }<s>n  g.sweets = g.sweets or 0<s>n  g.decor = g.decor or {}<s>n  if not g.pDifficulty then<s>n  g.pDifficulty = {}<s>n  g.pDifficulty[1] = {<s>n    sum = 5, <s>n    maxUrl = 2, <s>n    time = 4<s>n  }<s>n  g.pDifficulty[2] = {<s>n    sum = 6, <s>n    maxUrl = 3, <s>n    time = 8<s>n  }<s>n  g.pDifficulty[3] = {<s>n    sum = 8, <s>n    maxUrl = 3, <s>n    time = 10<s>n  }<s>n  g.pDifficulty[4] = {<s>n    sum = 10, <s>n    maxUrl = 4, <s>n    time = 12<s>n  }<s>n  end<s>n  difficulty = 1<s>n  sum = 5<s>n  maxUrl = 2<s>n  time = 4<s>n  combo = 0<s>n  imgToys = {<s>n<s>"https://images.vfl.ru/ii/1609511984/e58245e2/32828995.png<s>",<s>n<s>"https://images.vfl.ru/ii/1607284593/a0227a87/32574199.png<s>",<s>n<s>"https://images.vfl.ru/ii/1607284576/7892f650/32574189.png<s>",<s>n<s>"https://images.vfl.ru/ii/1607284634/159c84fc/32574210.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174423/64db14e2/32798384.png<s>",<s>n<s>"https://images.vfl.ru/ii/1607284611/212117cc/32574204.png<s>",<s>n<s>"https://images.vfl.ru/ii/1607284622/e8b975b8/32574207.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174462/a0c2be0c/32798398.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174449/b40620c3/32798397.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174388/0e65c786/32798380.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174437/05bc6a26/32798396.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174372/ef3fc855/32798370.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609277905/f68456d0/32810870.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174354/daa9b737/32798369.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174335/60c953a7/32798366.png<s>",<s>n<s>"https://images.vfl.ru/ii/1609174410/35997641/32798383.png<s>",<s>n  }<s>n  if not g.open then<s>n    g.open = {}<s>n    for i = 1, 4 do<s>n      g.open[i] = 0<s>n    end<s>n    local t = {8, 12, 16, 5, 18, 20, 13, 27, 10, 23, 19, 35}<s>n    for i = 5, 16 do<s>n      g.open[i] = t[i - 4]<s>n    end<s>n  end<s>n  first = true<s>n  curGame = 0<s>n  g.fullscreen = 0<s>n  g.background = <s>"https://images.vfl.ru/ii/1609506689/cb65e488/32828507.jpg<s>"<s>n  g.defaultBgAnswerImage = <s>"https://images.vfl.ru/ii/1609362074/03de5640/32820660.jpg<s>"<s>nend","addToHistory":[3]},{"id":1,"text":"","pageImg":"","system":true},{"id":8,"text":"Новый ответ. введите текст","need":[999]}]},{"id":2,"text":"      ","answers":[{"id":2,"text":"place","url":"https://images.vfl.ru/ii/1607278013/dcaac66d/32572819.jpg"},{"super_calculate":true,"lua_do":"function lua_do()<s>n  images.place.isVisible = false<s>n  function scale (t1, v, t2)<s>n    local s = v/t1<s>n    return t2*s<s>n  end<s>n  bg = display.newImage (<s>"https://images.vfl.ru/ii/1607278013/dcaac66d/32572819.jpg<s>")<s>n  bg.width = scale (bg.height, canvas.height, bg.width)<s>n  bg.height = canvas.height<s>n  bg.y = bg.height/2<s>n  bg.x = bg.width/2<s>nend","calculate":false,"text":"Отрисовка фона","id":2},{"super_calculate":true,"lua_do":"function lua_do()<s>n  if g.decor.gift and gift_on then<s>n    rGift = display.newImage (<s>"https://images.vfl.ru/ii/1607670206/edb33c69/32623173.png<s>")<s>n    rGift.height = scale (rGift.width, 0.185*canvas.width, rGift.height)<s>n    rGift.width = 0.185*canvas.width<s>n    rGift.x = 0.17*canvas.width<s>n    rGift.y = (1 - 0.0095)*canvas.height - rGift.height/2<s>n  end<s>n  if g.decor.star and star_on then<s>n    rStar = {}<s>n    for i = 1, 2 do<s>n      rStar[i] = display.newImage (<s>"https://images.vfl.ru/ii/1607670248/17266b0c/32623178.png<s>")<s>n      rStar[i].isVisible = false<s>n    end<s>n  end<s>n  if g.decor.tinsel and tinsel_on then<s>n    rTinsel = {}<s>n    for i = 1, 2 do<s>n      rTinsel[i] = display.newImage (<s>"https://images.vfl.ru/ii/1607670225/e992ccf5/32623175.png<s>")<s>n      rTinsel[i].height = scale (rTinsel[i].width, 0.4*canvas.width, rTinsel[i].height)<s>n      rTinsel[i].width = 0.4*canvas.width<s>n      rTinsel[i].y = rTinsel[i].height/2<s>n    end<s>n    rTinsel[1].x = rTinsel[1].width/2<s>n    rTinsel[2].x = canvas.width - rTinsel[2].width/2<s>n    rTinsel[1].xScale = -1<s>n  end<s>n  if g.decor.paper and paper_on then<s>n    rPaper = {}<s>n    rPaper[1] = display.newImage (<s>"https://images.vfl.ru/ii/1615133535/3ba696fd/33589969.png<s>")<s>n    rPaper[1].xScale = canvas.width/6/rPaper[1].width<s>n    rPaper[1].yScale = rPaper[1].xScale<s>n    rPaper[1].x = 0.9*canvas.width<s>n    if tinsel_on then<s>n      rPaper[1].y = rTinsel[2].height <plus> rPaper[1].height*rPaper[1].yScale*0.6<s>n    else<s>n      rPaper[1].y = 0.33*canvas.height<s>n    end<s>n    rPaper[2] = display.newImage (<s>"https://images.vfl.ru/ii/1615133515/0fb10f76/33589967.png<s>")<s>n    rPaper[2].xScale = canvas.width/6.5/rPaper[2].width<s>n    rPaper[2].yScale = rPaper[2].xScale<s>n    rPaper[2].x = 0.9*canvas.width<s>n    rPaper[2].y = rPaper[1].y <plus> (rPaper[1].height*rPaper[1].yScale <plus> rPaper[2].height*rPaper[2].yScale)*0.6<s>n  end<s>n  rWin = display.newImage (<s>"https://images.vfl.ru/ii/1607672416/aab99fae/32623471.png<s>")<s>n  rWin.isVisible = false<s>nend","text":"Отрисовка декораций","id":2,"calculate":false},{"super_calculate":true,"id":2,"calculate":false,"lua_do":"function lua_do()<s>nfunction tree (index)<s>n  local g; local t; local n<s>n  if index == <s>"key<s>" then<s>n    g = <s>"groupKey<s>"<s>n    t = <s>"tableKey<s>"<s>n    n = 1<s>n  else<s>n    g = <s>"groupAnswer<s>"<s>n    t = <s>"tableAnswer<s>"<s>n    n = 2<s>n  end<s>n  vars[t] = {}<s>n  vars[t].tree = display.newImage (<s>"https://images.vfl.ru/ii/1607279841/ef911cfe/32573159.png<s>")<s>n  vars[t].tree.height = scale (vars[t].tree.width, 0.9*canvas.width, vars[t].tree.height)<s>n  vars[t].tree.width = 0.9*canvas.width<s>n  if vars[t].tree.height > 0.85*canvas.height then<s>n    vars[t].tree.width = scale (vars[t].tree.height, 0.85*canvas.height, vars[t].tree.width)<s>n    vars[t].tree.height = 0.85*canvas.height<s>n  end<s>n  vars[t].tree.x = (n-0.5)*canvas.width<s>n  vars[t].tree.y = 0.94*canvas.height - vars[t].tree.height/2<s>n  vars[g] = display.newGroup ()<s>n  vars[g]:insert (vars[t].tree)<s>n<s>n  vars[t].toys = {}<s>n  local x = vars[t].tree.x - vars[t].tree.width/2<s>n  local y = vars[t].tree.y <plus> vars[t].tree.height/2<s>n  for i = 1, #vars[index] do<s>n    vars[t].toys[i] = display.newImage (vars[index][i].url)<s>n    if vars[t].toys[i].height > 2*vars[t].toys[i].width then<s>n      k = 0.08<s>n    else<s>n      k = 0.09<s>n    end<s>n    vars[t].toys[i].height = scale (vars[t].toys[i].width, k*vars[t].tree.width, vars[t].toys[i].height)<s>n    vars[t].toys[i].width = k*vars[t].tree.width<s>n    vars[t].toys[i].x = x <plus> vars[index][i].x*vars[t].tree.width<s>n    vars[t].toys[i].y = y - vars[index][i].y*vars[t].tree.height <plus> vars[t].toys[i].height/2<s>n    vars[g]:insert (vars[t].toys[i])<s>n  end<s>nend<s>nend","text":"Отрисовка ёлки и игрушек"},{"super_calculate":true,"id":2,"text":"Спецэффекты","calculate":false,"lua_do":"function lua_do()<s>nfunction effects ()<s>nif win then<s>n  local index = rWin<s>nindex.isVisible = true<s>nindex.width = scale (index.height, 0.1*canvas.height, index.width)<s>nindex.height = 0.1*canvas.height<s>nindex.x = 0.78*canvas.width<s>nindex.y = 0.14*canvas.height<s>ntransition.scaleTo (index, {xScale = 1.65, yScale = 1.65, time = 1500})<s>nend<s>nend<s>nend"},{"super_calculate":true,"id":2,"text":"Отрисовка кнопки","calculate":false,"lua_do":"function lua_do()<s>nfunction tapButton (event)<s>n    transition.scaleBy (button, {<s>n      xScale = -0.2,<s>n      yScale = -0.2,<s>n      time = 100<s>n    })<s>n    transition.scaleBy (button, {<s>n      xScale = 0.02,<s>n      yScale = 0.02,<s>n      time = 200,<s>n      delay = 200<s>n    })<s>n  curGame = curGame <plus> 1<s>n  if curGame == 1 then<s>n    sumGames = math.random(4, 6)<s>n    bonusGame = math.random (sumGames)<s>n  elseif curGame == sumGames then<s>n    curGame = 0<s>n  end<s>n  flag = true<s>n  win = true<s>n  for i = 1, #key do<s>n    if key[i].url ~= answer[i].url then<s>n      win = false<s>n      break<s>n    end<s>n  end<s>n  effects ()<s>n  final = {}<s>n  if win then<s>n    combo = combo <plus> 1<s>n<s>n    if combo < 2 then<s>n      g.sweets = g.sweets <plus> difficulty<s>n      final.header = <s>"Всё верно!<s>"<s>n      if difficulty == 1 then<s>n        final.text = <s>"Вы получили 1 конфету.<s>"<s>n      else<s>n        final.text = <s>"Вы получили <s>".. difficulty .. <s>" конфеты.<s>"<s>n      end<s>n<s>n    elseif combo > 1 and combo < 4 then<s>n      g.sweets = g.sweets <plus> difficulty*combo<s>n      final.header = <s>"Комбо х<s>".. combo .. <s>"!<s>"<s>n      if combo*difficulty < 5 then<s>n        final.text = <s>"Вы получили <s>".. difficulty*combo .. <s>" конфеты.<s>"<s>n      else<s>n        final.text = <s>"Вы получили <s>".. difficulty*combo .. <s>" конфет.<s>"<s>n      end<s>n<s>n    else<s>n      combo = 1<s>n      g.sweets = g.sweets <plus> difficulty<s>n      final.header = <s>"Всё верно!<s>"<s>n      if difficulty == 1 then<s>n        final.text = <s>"Вы получили 1 конфету.<s>"<s>n      else<s>n        final.text = <s>"Вы получили <s>".. difficulty .. <s>" конфеты.<s>"<s>n      end<s>n    end<s>n  else<s>n    combo = 0<s>n    final.header = <s>"Промах!<s>"<s>n    final.text = <s>"Попробуйте ещё раз.<s>"<s>n  end<s>n  final.answers = {}<s>n  final.answers[1] = {<s>n    text = <s>"Продолжить игру<s>",<s>n    pressListener = <s>n    function ()<s>n      showPage {id = 2, transition = <s>"instant<s>"}<s>n      hideDialog ()<s>n    end<s>n  }<s>n  final.answers[2] = {<s>n    text = <s>"Ёлочные игрушки<s>",<s>n    pressListener = <s>n      function ()<s>n        showPage {id = 5}<s>n        hideDialog ()<s>n      end<s>n  }<s>n  final.answers[3] = {<s>n    text = <s>"Магазин<s>",<s>n    pressListener = <s>n      function ()<s>n        g.fullscreen = 0<s>n        showPage {id = 6}<s>n        hideDialog ()<s>n      end<s>n  }<s>n  final.answers[4] = {<s>n    text = <s>"Меню<s>",<s>n    pressListener = <s>n      function ()<s>n        g.fullscreen = 0<s>n        showPage {id = 7}<s>n        hideDialog ()<s>n      end<s>n  }<s>n  dialog (final)<s>nend<s>n<s>nfunction endButton ()<s>nif canvas.width then<s>n  button.isVisible = true<s>n  button.width = 0.19*canvas.width<s>n  button.height = button.width<s>n  button.x = 0.88*canvas.width<s>n  button.y = 0.94*canvas.height<s>n  button:addEventListener (<s>"tap<s>", tapButton)<s>nend<s>nend<s>nend"},{"super_calculate":true,"id":2,"text":"Перетаскивание игрушек","calculate":false,"lua_do":"function lua_do()<s>nfunction find (x, y)<s>n  for i = 1, #answer do<s>n    if tableAnswer.toys[i].x == x and tableAnswer.toys[i].y == y then<s>n      return i<s>n    end<s>n  end<s>nend<s>n<s>nfunction tapToy (event)<s>n  if curToy == 0 then<s>n    curToy = find (event.target.x, event.target.y)<s>n    options = {<s>n      xScale = -0.2,<s>n      yScale = -0.2,<s>n      time = 100<s>n    }<s>n    transition.scaleBy (tableAnswer.toys[curToy], options)<s>n    options = nil<s>n<s>n  elseif curToy == find (event.target.x, event.target.y) then<s>n    options = {<s>n      xScale = 0.2,<s>n      yScale = 0.2,<s>n      time = 100<s>n    }<s>n    transition.scaleBy (tableAnswer.toys[curToy], options)<s>n    curToy = 0<s>n    options = nil<s>n  <s>n  else<s>n    options = {<s>n      xScale = 0.2,<s>n      yScale = 0.2,<s>n      time = 100<s>n    }<s>n    transition.scaleBy (tableAnswer.toys[curToy], options)<s>n    curToy2 = find (event.target.x, event.target.y)<s>n    T = {<s>"curToy<s>", <s>"curToy2<s>"}<s>n<s>n    changeX = (tableAnswer.toys[curToy].x - tableAnswer.toys[curToy2].x)/canvas.height<s>n    changeY = (tableAnswer.toys[curToy].y - tableAnswer.toys[curToy2].y)/canvas.height<s>n    fs = ( <s>n      (changeX)^2 <plus> <s>n      (changeY)^2<s>n    )^0.5<s>n    if fs < 0.25 then<s>n      fv = 0.15/350<s>n    elseif fs > 0.7 then<s>n      fv = 0.15/200<s>n    else<s>n      fv = 0.15/250<s>n    end<s>n    ft = fs/fv<s>n    for i = 1, 2 do<s>n      if i == 1 then<s>n        another = 2<s>n      else<s>n        another = 1<s>n      end<s>n      options = {<s>n        x = tableAnswer.toys[ vars[ T[another] ] ].x,<s>n        y = tableAnswer.toys[ vars[ T[another] ] ].y - tableAnswer.toys[ vars[ T[another] ] ].height/2 <plus> tableAnswer.toys[ vars[ T[i] ] ].height/2,<s>n        time = ft<s>n      }<s>n      transition.to (tableAnswer.toys[ vars[ T[i] ] ], options)<s>n    end<s>n<s>n  answer[curToy].url, answer[curToy2].url = answer[curToy2].url, answer[curToy].url<s>n  curToy = 0<s>n  T = nil<s>n  another = nil<s>n  curToy2 = nil<s>n  ft = nil<s>n  fs = nil<s>n  fv = nil<s>n  changeX = nil<s>n  changeY = nil<s>n  end<s>n<s>nend<s>nend"},{"super_calculate":true,"lua_do":"function lua_do()<s>n  function setting ()<s>n    tc = {}<s>n    for i = 1, #g.range do<s>n      tc[i] = i<s>n    end<s>n    tu = {}<s>n    j = 1<s>n    for i = 1, #g.open do<s>n      if g.open[i] == 0 then<s>n        tu[j] = i<s>n        j = j <plus> 1<s>n      end<s>n    end<s>n    if maxUrl < #tu then<s>n      for i = 1, #tu - maxUrl do<s>n        table.remove (tu, math.random(#tu) )<s>n      end<s>n    end<s>n    key = {}<s>n<s>n    for i = 1, sum do<s>n      myR = math.random (#tc)<s>n      key[i] = table.copy2 (g.range[ tc[myR] ] )<s>n      table.remove (tc, myR)<s>n      key[i].url = imgToys[ tu[math.random(#tu)] ]<s>n    end<s>n    myR = nil<s>n    tc = nil<s>n    tu = nil<s>n<s>n    answer = {}<s>n    answer = table.copy2 (key)<s>n    for i = 1, math.random (sum, 2*sum) do<s>n      a1 = math.random(#answer)<s>n      a2 = math.random(#answer) <s>n      answer[a1].url, answer[a2].url = answer[a2].url, answer[a1].url<s>n    end<s>n    a1 = nil<s>n    a2 = nil<s>n  end<s>nend","calculate":false,"text":"Создание key и answer (правильный ответ и ответ игрока)","id":2},{"super_calculate":true,"id":2,"text":"Каждую секунду","calculate":false,"lua_do":"function lua_do()<s>nfunction everySec ()<s>nif canvas.width then<s>nif g.current_id == 2 then<s>n  sec = sec - 1<s>n  if sec == 0 then<s>n    options = {<s>n      time = 750,<s>n      x = -canvas.width<s>n    }<s>n    transition.moveBy (groupKey, options)<s>n    transition.moveBy (groupAnswer, options)<s>n    timer.performWithDelay (850, function () endButton () end)<s>n    options = nil<s>n  end<s>nend<s>nend<s>nend<s>nend"},{"super_calculate":true,"id":2,"text":"Главная функция","calculate":false,"lua_do":"function lua_do()<s>nfunction myMain ()<s>n  setting ()<s>n<s>n  tree (<s>"key<s>")<s>n  tree (<s>"answer<s>")<s>n  if g.decor.star and star_on then<s>n    for i = 1, 2 do<s>n      rStar[i].isVisible = true<s>n      rStar[i].height = scale (rStar[i].width, 0.2*tableKey.tree.width, rStar[i].height) <s>n      rStar[i].width = 0.2*tableKey.tree.width<s>n      rStar[i].x = (i - 0.5)*canvas.width<s>n      rStar[i].y = tableKey.tree.y - tableKey.tree.height/2<s>n    end<s>n    groupKey:insert (rStar[1])<s>n    groupAnswer:insert (rStar[2]) <s>n  end<s>n<s>n  button = display.newImage (<s>"https://images.vfl.ru/ii/1607539935/53d6a959/32608113.png<s>")<s>n  button.isVisible = false<s>n<s>n  sec = time<s>n  timer.performWithDelay (1000, everySec, time)<s>n<s>n  curToy = 0<s>n  if answer then<s>n  for i = 1, #answer do<s>n    tableAnswer.toys[i]: addEventListener (<s>"tap<s>", tapToy)<s>n  end<s>n  end<s>nend<s>nend"},{"super_calculate":true,"lua_do":"function lua_do()<s>n  if myMain then<s>n    myMain ()<s>n  else<s>n    showPage {id = 2, transition = <s>"instant<s>"}<s>n  end<s>nend","text":"Проверка и запуск игры","id":2,"calculate":false}]},{"id":3,"text":"Страница с картинками","answers":[{"id":3,"text":"Красно-жёлтое:","comment":true,"text_color":[1,0.4,0.2]},{"id":2,"text":"Красный шар с полосками:<s>nhttps://images.vfl.ru/ii/1607284345/b5ffdb91/32574118.png<s>n<s>nКрасный шар с завитками:<s>nhttps://images.vfl.ru/ii/1607284576/7892f650/32574189.png<s>n<s>nЖёлтый шар:<s>nhttps://images.vfl.ru/ii/1607284593/a0227a87/32574199.png<s>n<s>nКрасная шишка:<s>nhttps://images.vfl.ru/ii/1607284611/212117cc/32574204.png<s>n<s>nЖёлтая шишка:<s>nhttps://images.vfl.ru/ii/1607284622/e8b975b8/32574207.png<s>n<s>nКрасный колокольчик:<s>nhttps://images.vfl.ru/ii/1607284634/159c84fc/32574210.png","comment":true},{"id":3,"text":"Новое:","comment":true,"text_color":[1,0.4,0.2]},{"id":2,"text":"Снежинка синяя:<s>nhttps://images.vfl.ru/ii/1609174335/60c953a7/32798366.png<s>n<s>nСказка о ёлке:<s>nhttps://images.vfl.ru/ii/1609174354/daa9b737/32798369.png<s>n<s>nОранжевые цветочки:<s>nhttps://images.vfl.ru/ii/1609174372/ef3fc855/32798370.png<s>n<s>nФиолетовый с узорами:<s>nhttps://images.vfl.ru/ii/1609174388/0e65c786/32798380.png<s>n<s>nСнеговик:<s>nhttps://images.vfl.ru/ii/1609174410/35997641/32798383.png<s>n<s>nСнежинка красная:<s>nhttps://images.vfl.ru/ii/1609174423/64db14e2/32798384.png<s>n<s>nРозовый текстурный:<s>nhttps://images.vfl.ru/ii/1609174437/05bc6a26/32798396.png<s>n<s>nФиолетовый с волнами<s>nhttps://images.vfl.ru/ii/1609174449/b40620c3/32798397.png<s>n<s>nКрасная фигура:<s>nhttps://images.vfl.ru/ii/1609174462/a0c2be0c/32798398.png<s>n<s>nСиний:<s>nhttps://images.vfl.ru/ii/1609277905/f68456d0/32810870.png<s>n","comment":true},{"id":2,"text":"Декорации:","comment":true,"text_color":[1,0.4,0.2]},{"id":2,"text":"Подарок:<s>nhttps://images.vfl.ru/ii/1607670206/edb33c69/32623173.png<s>n<s>nМишура:<s>nhttps://images.vfl.ru/ii/1607670225/e992ccf5/32623175.png<s>n<s>nЗвезда:<s>nhttps://images.vfl.ru/ii/1607670248/17266b0c/32623178.png","comment":true},{"id":2,"text":"a3","url":"https://images.vfl.ru/ii/1607284576/7892f650/32574189.png"},{"id":2,"text":"a4","url":"https://images.vfl.ru/ii/1607284593/a0227a87/32574199.png"},{"id":2,"text":"a5","url":"https://images.vfl.ru/ii/1607284611/212117cc/32574204.png"},{"id":2,"text":"a6","url":"https://images.vfl.ru/ii/1607284622/e8b975b8/32574207.png"},{"id":2,"text":"a7","url":"https://images.vfl.ru/ii/1607284634/159c84fc/32574210.png"},{"id":3,"text":"Ёлка","url":"https://images.vfl.ru/ii/1607279841/ef911cfe/32573159.png"},{"id":3,"text":"Кнопка","url":"https://images.vfl.ru/ii/1607539935/53d6a959/32608113.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1607670206/edb33c69/32623173.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1607670225/e992ccf5/32623175.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1607670248/17266b0c/32623178.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174335/60c953a7/32798366.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174354/daa9b737/32798369.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174372/ef3fc855/32798370.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174388/0e65c786/32798380.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174410/35997641/32798383.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174423/64db14e2/32798384.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174437/05bc6a26/32798396.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174462/a0c2be0c/32798398.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609174449/b40620c3/32798397.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609277905/f68456d0/32810870.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609239624/85db1b39/32805236.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1609511984/e58245e2/32828995.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1615133535/3ba696fd/33589969.png"},{"id":3,"text":"Новый ответ. введите текст","url":"https://images.vfl.ru/ii/1615133515/0fb10f76/33589967.png"},{"id":3,"text":"local _x = math.round (event.target.x/canvas.width <plus> 0.5)<s>n  local _y = math.round ((event.target.y - (canvas.height - canvas.width)/2)<s>n/canvas.width <plus> 0.5)<s>n  message (<s>"x = <s>".. event.target.x .. <s>"; y = <s>".. event.target.y)<s>n  local _ = 1<s>n  for y = 1, 4 do<s>n  for x = 1, 4 do<s>n   if x == _x and y == _y then<s>n     super_i = _<s>n     break<s>n   end<s>n    _ = _ <plus> 1<s>n  end<s>n  end<s>n  _ = 1<s>n  for i = 1, #g.open do<s>n    if i == super_i then<s>n      super_j = _<s>n      break<s>n    end<s>n    if g.open[i] > 0 then<s>n      _ = _ <plus> 1<s>n    end<s>n  end","comment":true},{"comment":false,"id":3,"text":"<plus>Конфеты","lua_do":"function lua_do()<s>ng.sweets = g.sweets <plus> 400<s>n--g.disableAuthorButton = 1<s>nend","no_transition":true}]},{"id":4,"text":"Правила.<s>r<s>n<s>r<s>nВ течении нескольких секунд Вы сможете смотреть на ёлку и запоминать расположение игрушек.<s>r<s>n<s>r<s>nПосле этого появится другая ёлка, которую нужно будет нарядить точно так же. <s>r<s>n<s>r<s>nДля этого кликните по одной игрушке, а затем по другой, чтобы поменять их местами. <s>r<s>n<s>r<s>nКогда закончите, нажмите на кнопку с галочкой.","answers":[{"id":7,"text":"Далее","addToHistory":[8,9]}]},{"id":5,"text":"   ","answers":[{"id":5,"text":"place1","url":"https://images.vfl.ru/ii/1609187044/c05282b2/32799922.jpg"},{"super_calculate":true,"id":5,"text":"Фон","calculate":false,"lua_do":"function lua_do()<s>n  images.place1.isVisible = false<s>n  function scale (t1, v, t2)<s>n    local s = v/t1<s>n    return t2*s<s>n  end<s>n  bg = display.newImage (<s>"https://images.vfl.ru/ii/1609187044/c05282b2/32799922.jpg<s>")<s>n  bg.height = scale (bg.width, canvas.width, bg.height)<s>n  bg.width = canvas.width<s>n  if bg.height < canvas.height then<s>n    bg.width = scale (bg.height, canvas.height, bg.width)<s>n    bg.height = canvas.height<s>n  end<s>n  bg.y = bg.height/2<s>n  bg.x = bg.width/2<s>n  p = 0<s>nend"},{"super_calculate":true,"id":5,"text":"Функция покупки","calculate":false,"lua_do":"function lua_do()<s>nfunction buy ()<s>n  g.sweets = g.sweets - g.open[super_i]<s>n  g.open[super_i] = 0<s>n  showPage {id = 5, transition = <s>"instant<s>"}<s>nend<s>nend"},{"super_calculate":true,"lua_do":"function lua_do()<s>nfunction myTap (event)<s>nevent.target.x = 10000<s>nfor j = 1, #groupBuy do<s>n    if groupBuy[j] and groupBuy[j].x == 10000 then<s>n      super_j = j<s>n      _sum = 0<s>n      for i = 1, #g.open do<s>n        if g.open[i] > 0 then<s>n          _sum = _sum <plus> 1<s>n          if _sum == j then<s>n            super_i = i<s>n            break<s>n          end<s>n        end<s>n      end<s>n      break<s>n    end<s>nend   <s>nevent.target.x = 0<s>n<s>nif g.sweets >= g.open[super_i] then<s>ndialog ({<s>n  header = <s>"Подтверждение<s>",<s>n  text = <s>"Вы точно хотите купить ёлочную игрушку за <s>".. g.open[super_i] .. <s>" конфет?<s>",<s>n  answers = {<s>n    {text = <s>"Да<s>", pressListener = function () buy() hideDialog () end},<s>n    {text = <s>"Нет<s>"}<s>n  }<s>n})<s>nelse<s>n  message (<s>"Недостаточно конфет для покупки<s>")<s>nend<s>nend<s>nend","calculate":false,"text":"Функция клика","id":5},{"super_calculate":true,"id":5,"calculate":false,"lua_do":"function lua_do()<s>nlocal i = 1<s>nrToys = {}<s>nlocal j = 1<s>nprices = {img = {}, text = {} }<s>ngroupBuy = {}<s>nfor y = 1, 4 do<s>n  rToys[y] = {}<s>n  for x = 1, 4 do<s>n    rToys[y][x] = display.newImage (imgToys[i])<s>n    rToys[y][x].width = scale (rToys[y][x].height, canvas.width/4*0.85, rToys[y][x].width)<s>n    rToys[y][x].height = canvas.width/4*0.85<s>n    rToys[y][x].x = (x - 0.5)*canvas.width/4<s>n    rToys[y][x].y = canvas.height/2 <plus> (y-2.5)*canvas.width/4<s>n    if g.open[i] > 0 then<s>n      prices.img[j] = display.newImage (<s>"https://images.vfl.ru/ii/1609239624/85db1b39/32805236.png<s>")<s>n      prices.img[j].width = scale (prices.img[j].height, 0.7*canvas.width/4, prices.img[j].width)<s>n      prices.img[j].height = 0.7*canvas.width/4<s>n      prices.img[j].x = rToys[y][x].x <plus> canvas.width/8*0.6<s>n      prices.img[j].y = rToys[y][x].y <plus> canvas.width/8*0.6<s>n      groupBuy[j] = display.newGroup ()<s>n      groupBuy[j]:insert (rToys[y][x])<s>n      groupBuy[j]:insert (prices.img[j])<s>n      local options = {<s>n        text = g.open[i],<s>n        x = prices.img[j].x,<s>n        y = prices.img[j].y,<s>n        font = <s>"Roboto-Light<s>",<s>n        fontSize = math.round (0.0764*canvas.width),<s>n        parent = canvasGroup,<s>n      }<s>n      prices.text[j] = display.newText (options)<s>n      groupBuy[j]:addEventListener (<s>"tap<s>", myTap)<s>n      j = j <plus> 1<s>n    end<s>n    i = i <plus> 1<s>n  end<s>nend<s>nend","text":"Игрушки"},{"super_calculate":true,"lua_do":"function lua_do()<s>nfunction rSweets ()<s>n  rS = {}<s>n  rS.img = display.newImage (<s>"https://images.vfl.ru/ii/1607672416/aab99fae/32623471.png<s>")<s>n  rS.img.width = scale (rS.img.height, 0.125*canvas.height, rS.img.width)<s>n  rS.img.height = 0.125*canvas.height<s>n  local top_field = (canvas.height-canvas.width)/2<s>n  if rS.img.height > top_field then<s>n    rS.img.width = scale (rS.img.height, 0.9*top_field, rS.img.width)<s>n    rS.img.height = 0.9*top_field<s>n  end<s>n  rS.img.y = top_field/2<s>n  local options = {<s>n    text = g.sweets,<s>n    x = canvas.width/2 - rS.img.width*0.5625,<s>n    y = rS.img.y,<s>n    parent = canvasGroup,<s>n    font = <s>"Roboto-Regular<s>",<s>n    fontSize = math.round (0.64*rS.img.height),<s>n  }<s>n  rS.text = display.newText (options)<s>n  rS.text:setFillColor (0.84706, 0.15686, 0.15686)<s>n  rS.img.x = rS.text.x <plus> rS.text.width/2 <plus> 0.625*rS.img.width<s>nend<s>nrSweets ()<s>nend","text":"Конфеты","id":5,"calculate":false},{"comment":false,"id":7,"text":"В меню","no_transition":false,"right_answer":false,"lua_do":"function lua_do()<s>ng.fullscreen = 0<s>nend","left_answer":false,"middle_answer":true,"addToHistory":[12]}]},{"id":6,"text":"Магазин.","answers":[{"super_calculate":false,"id":6,"text":"Случайный бонус","calculate":true,"lua_do":"function lua_do()<s>n  date = os.date( <s>"*t<s>" )<s>n  if date.month == 12 and date.day == 31 and (not g.newYear) then<s>n    flag = false<s>n    g.newYear = true<s>n    dialog ({<s>n      header = <s>"С наступающим Новым годом!<s>",<s>n      text = <s>"Пусть жизнь будет такой же сладкой, как этот подарок - 5 конфет.<s>"<s>n    })<s>n    g.sweets = g.sweets <plus> 5<s>n  elseif not (date.month == 12 and date.day == 31) then<s>n    g.newYear = false<s>n  end<s>n  if curGame == bonusGame and flag then<s>n    bonus = math.random(3)<s>n    g.sweets = g.sweets <plus> bonus<s>n    dialog ({header = <s>"Вам подарок!<s>", <s>n    text = <s>"В нём <s>" .. bonus .. (bonus > 1 and <s>" конфеты.<s>" or <s>" конфета.<s>")<s>n    })<s>n    flag = false<s>n  end<s>nend"},{"lua_text":"function lua_text()<s>nreturn <s>"Конфеты: <s>".. g.sweets<s>nend","middle_answer":true,"id":6,"text":"    ","comment":true,"answerImage":["https://images.vfl.ru/ii/1607672416/aab99fae/32623471.png"]},{"comment":false,"lua_if":"function lua_if()<s>nreturn not g.decor.gift and g.sweets >= 30<s>nend","lua_do":"function lua_do()<s>ng.decor.gift = true<s>ng.sweets = g.sweets - 30<s>ngift_on = true<s>nend","text":"Подарок под ёлкой (купить за 30 конфеты)","id":6,"addToHistory":[16]},{"id":6,"text":"Подарок под ёлкой (30 конфет)","comment":true,"lua_if":"function lua_if()<s>nreturn not g.decor.gift and g.sweets < 30<s>nend"},{"bg_color":[1,1,1],"lua_if":"function lua_if()<s>nreturn g.decor.gift<s>nend","comment":false,"id":6,"text":"Подарок под ёлкой (установлен)","lua_text":"function lua_text()<s>nreturn <s>"Подарок под ёлкой (<s>".. (gift_on and <s>"показывается)<s>" or <s>"убран в шкаф)<s>")<s>nend","lua_do":"function lua_do()<s>ngift_on = not gift_on<s>nend"},{"lua_if":"function lua_if()<s>nreturn not g.decor.star and g.sweets >= 45<s>nend","comment":false,"id":6,"text":"Верхушка для ёлки (купить за 45 конфет)","lua_do":"function lua_do()<s>ng.decor.star = true<s>ng.sweets = g.sweets - 45<s>nstar_on = true<s>nend","addToHistory":[17]},{"id":6,"text":"Верхушка для ёлки (45 конфет)","comment":true,"lua_if":"function lua_if()<s>nreturn not g.decor.star and g.sweets < 45<s>nend"},{"bg_color":[1,1,1],"lua_if":"function lua_if()<s>nreturn g.decor.star<s>nend","lua_do":"function lua_do()<s>nstar_on = not star_on<s>nend","id":6,"text":"Верхушка для ёлки (куплено)","lua_text":"function lua_text()<s>nreturn <s>"Верхушка для ёлки (<s>".. (star_on and <s>"показывается)<s>" or <s>"убрана в шкаф)<s>")<s>nend","comment":false},{"comment":false,"lua_if":"function lua_if()<s>nreturn not g.decor.tinsel and g.sweets >= 70<s>nend","lua_do":"function lua_do()<s>ng.decor.tinsel = true<s>ng.sweets = g.sweets - 70<s>ntinsel_on = true<s>nend","text":"Мишура (купить за 70 конфет)","id":6,"addToHistory":[18]},{"id":6,"text":"Мишура (70 конфет)","comment":true,"lua_if":"function lua_if()<s>nreturn not g.decor.tinsel and g.sweets < 70<s>nend"},{"comment":false,"bg_color":[1,1,1],"lua_if":"function lua_if()<s>nreturn g.decor.tinsel<s>nend","lua_text":"function lua_text()<s>nreturn <s>"Мишура (<s>".. (tinsel_on and <s>"показывается)<s>" or <s>"убрана в шкаф)<s>")<s>nend","id":6,"text":"Мишура (куплено)","lua_do":"function lua_do()<s>ntinsel_on = not tinsel_on<s>nend","addToHistory":[21]},{"comment":false,"bg_color":[1,1,1],"lua_if":"function lua_if()<s>nreturn g.decor.paper<s>nend","lua_do":"function lua_do()<s>npaper_on = not paper_on<s>nend","id":6,"text":"Вытынанки (куплено)","lua_text":"function lua_text()<s>nreturn <s>"Вытынанки (<s>".. (paper_on and <s>"показываются)<s>" or <s>"убраны в шкаф)<s>")<s>nend","addToHistory":[21]},{"id":6,"text":"    ","comment":true},{"bg_color":[1,1,1],"comment":false,"id":5,"text":"Ёлочные игрушки","lua_do":"function lua_do()<s>ng.fullscreen = 1<s>nend","addToHistory":[11]},{"id":6,"text":"    ","comment":true},{"id":7,"text":"В меню","bg_color":[1,1,1],"addToHistory":[19]}]},{"id":7,"text":"Меню.","answers":[{"comment":false,"super_calculate":false,"lua_do":"function lua_do()<s>n  function setPD (num)<s>n    for k, v in pairs (g.pDifficulty[num]) do<s>n      vars[k] = v<s>n    end<s>n  end<s>nend","calculate":true,"id":7,"text":"Функция установки параметров сложности"},{"super_calculate":false,"lua_do":"function lua_do()<s>n  local full = 0<s>n  for k, v in pairs (g.decor) do<s>n    full = full <plus> 1<s>n  end<s>n  if full == 3 then<s>n    full = true<s>n    for i = 1, #g.open do<s>n      if g.open[i] ~= 0 then<s>n        full = false<s>n        break<s>n      end<s>n    end<s>n    if full then<s>n      g.decor.paper = true<s>n      paper_on = true<s>n      dialog ({header = <s>"Поздравляем!<s>", text = <s>"Вы купили все украшения в игре и получаете бонусное украшение - бумажные вытынанки.<s>"})<s>n    end<s>n  end<s>nend","text":"Полное прохождение","id":6,"calculate":true},{"comment":false,"super_calculate":false,"lua_do":"function lua_do()<s>n  td = {<s>"низкая<s>", <s>"средняя<s>", <s>"высокая<s>", <s>"очень высокая<s>"}<s>nend","calculate":true,"text":"Названия","id":7},{"answerIcon":["https://images.vfl.ru/ii/1609507832/1cda592a/32828564.png"],"comment":false,"lua_text":"function lua_text()<s>nreturn <s>"Сложность: <s>" .. td[difficulty]<s>nend","id":7,"lua_do":"function lua_do()<s>nif difficulty == 4 then<s>n  difficulty = 1<s>nelse<s>n  difficulty = difficulty <plus> 1<s>nend<s>nsetPD (difficulty)<s>nend","instant":true,"text":"Сложность: низкая","addToHistory":[13]},{"id":7,"text":"    ","comment":true},{"id":6,"text":"Зайти в магазин","addToHistory":[10,15]},{"lua_if":"function lua_if()<s>nreturn not first<s>nend","lua_do":"function lua_do()<s>ng.fullscreen = 1<s>nend","text":"Продолжить игру","id":2,"addToHistory":[14]},{"lua_if":"function lua_if()<s>nreturn first<s>nend","lua_do":"function lua_do()<s>ng.fullscreen = 1<s>nfirst = false<s>nend","text":"Начать игру","id":2,"addToHistory":[20]}]},{"id":8,"text":"   ","answers":[{"id":9,"text":"Новый ответ. введите текст"}]},{"id":9,"text":"   ","answers":[{"id":10,"text":"Новый ответ. введите текст"}]},{"id":10,"text":"    ","answers":[{"id":11,"text":"Новый ответ. введите текст"}]},{"id":11,"text":"    ","answers":[{"id":3,"text":"Новый ответ. введите текст"},{"id":12,"text":"Новый ответ. введите текст"}]},{"id":12,"text":"    ","answers":[{"id":13,"text":"Новый ответ. введите текст"}]},{"id":13,"text":"    ","answers":[{"id":14,"text":"Новый ответ. введите текст"}]},{"id":14,"text":"    ","answers":[{"id":15,"text":"Новый ответ. введите текст"}]},{"id":15,"text":"    ","answers":[{"id":16,"text":"Новый ответ. введите текст"}]},{"id":16,"text":"   ","answers":[{"id":17,"text":"Новый ответ. введите текст"}]},{"id":17,"text":"    ","answers":[{"id":18,"text":"Новый ответ. введите текст"}]},{"id":18,"text":"    ","answers":[{"id":19,"text":"Новый ответ. введите текст"}]},{"id":19,"text":"    ","answers":[{"id":20,"text":"Новый ответ. введите текст"}]},{"id":20,"text":"   ","answers":[{"id":21,"text":"Новый ответ. введите текст"}]},{"id":21,"text":"   ","answers":[{"id":1,"text":"Новый ответ. введите текст"}]},{"id":22,"text":"","answers":[]}]