From 39055a2a49d74d1c95016216b95088e3c3ffca63 Mon Sep 17 00:00:00 2001
From: Evgeny <zobnin@gmail.com>
Date: Mon, 22 Aug 2022 10:25:31 +0300
Subject: [PATCH] move games to community

---
 games/fifteen.lua | 137 -----------------------------
 games/sudoku.lua  | 220 ----------------------------------------------
 2 files changed, 357 deletions(-)
 delete mode 100644 games/fifteen.lua
 delete mode 100644 games/sudoku.lua

diff --git a/games/fifteen.lua b/games/fifteen.lua
deleted file mode 100644
index 7b17775..0000000
--- a/games/fifteen.lua
+++ /dev/null
@@ -1,137 +0,0 @@
-ui:set_title("15 puzzle")
-
-local json = require "json"
-local folded = "15 puzzle"
-
-function tab_create()
-    local tab_in = {"",1,2,3,4,5,6,7,8,9,10,11,12,13,14,15}
-    local tab_out = {}
-    repeat
-        local idx = math.random(1,#tab_in)
-        table.insert(tab_out,tab_in[idx])
-        table.remove(tab_in,idx)
-    until #tab_in == 0
-    return tab_out
-end
-
-function tab_to_tabs(tab)
-    local tab_in = tab
-    local tab_out = {}
-    local row = {}
-    for i,v in ipairs(tab_in) do
-        table.insert(row,v)
-        if #row == math.sqrt(#tab) then
-            table.insert(tab_out,row)
-            row = {}
-        end
-    end
-    return tab_out
-end
-
-function tabs_to_tab(tab)
-    local tab_in = tab
-    local tab_out = {}
-    for i,v in ipairs(tab_in) do
-        for ii,vv in ipairs(v) do
-            table.insert(tab_out,vv)
-        end
-    end
-    return tab_out
-end
-
-function tabs_to_desk(tab)
-    local t = tab
-    for i,v in ipairs(t) do
-        table.insert(v,1,"│")
-        table.insert(v,3,"│")
-        table.insert(v,5,"│")
-        table.insert(v,7,"│")
-        table.insert(v,9,"│")
-    end
-    table.insert(t,1,{"┌","─","┬","─","┬","─","┬","─","┐"})
-    table.insert(t,3,{"├","─","┼","─","┼","─","┼","─","┤"})
-    table.insert(t,5,{"├","─","┼","─","┼","─","┼","─","┤"})
-    table.insert(t,7,{"├","─","┼","─","┼","─","┼","─","┤"})
-    table.insert(t,9,{"└","─","┴","─","┴","─","┴","─","┘"})
-    return t
-end
-
-function desk_to_tabs(tab)
-    local t = tab
-    table.remove(t,9)
-    table.remove(t,7)
-    table.remove(t,5)
-    table.remove(t,3)
-    table.remove(t,1)
-    for i,v in ipairs(t) do
-        table.remove(v,9)
-        table.remove(v,7)
-        table.remove(v,5)
-        table.remove(v,3)
-        table.remove(v,1)
-    end
-    return t
-end
-
-function on_alarm()
-    on_resume()
-end
-
-function on_resume()
-    if (not files:read("fifteen")) or (#json.decode(files:read("fifteen"))~=16) then
-        reload()
-    else
-        redraw()
-    end
-end
-
-function redraw()
-    local tab = tabs_to_desk(tab_to_tabs(json.decode(files:read("fifteen"))))
-    ui:show_table(tab, 0, true, folded)
-end
-
-function on_click(idx)
-    if idx == 0 then
-        ui:show_dialog("Select Action","","Cancel","Reload")
-        return
-    else
-        local tab = tabs_to_tab(tabs_to_desk(tab_to_tabs(json.decode(files:read("fifteen")))))
-        if type(tab[idx]) ~= "number" then
-            return
-        end
-        if tab[idx-2] == "" then
-            tab[idx-2] = tab[idx]
-            tab[idx] = ""
-        elseif tab[idx+2] == "" then
-            tab[idx+2] = tab[idx]
-            tab[idx] = ""
-        elseif (idx-18>0) and (tab[idx-18] == "") then
-            tab[idx-18] = tab[idx]
-            tab[idx] = ""
-        elseif (idx+18<#tab) and (tab[idx+18] == "") then
-            tab[idx+18] = tab[idx]
-            tab[idx] = ""
-        else
-            return
-        end
-        system:vibrate(10)
-        tab = tabs_to_tab(desk_to_tabs(tab_to_tabs(tab)))
-        files:write("fifteen",json.encode(tab))
-        redraw()
-    end
-end
-
-function on_settings()
-end
-
-function reload()
-    local tab = tab_create()
-    files:write("fifteen",json.encode(tab))
-    redraw()
-end
-
-function on_dialog_action(idx)
-    if idx == 2 then
-        reload()
-    end
-end
diff --git a/games/sudoku.lua b/games/sudoku.lua
deleted file mode 100644
index edc3e42..0000000
--- a/games/sudoku.lua
+++ /dev/null
@@ -1,220 +0,0 @@
-ui:set_title("Sudoku")
-
-local json = require "json"
-local folded = "Sudoku"
-
-function tab_to_tabs(tab)
-    local tab_in = tab
-    local tab_out = {}
-    local row = {}
-    for i,v in ipairs(tab_in) do
-        table.insert(row,v)
-        if #row == 9 then
-            table.insert(tab_out,row)
-            row = {}
-        end
-    end
-    return tab_out
-end
-
-function tabs_to_tab(tab)
-    local tab_in = tab
-    local tab_out = {}
-    for i,v in ipairs(tab_in) do
-        for ii,vv in ipairs(v) do
-            table.insert(tab_out,vv)
-        end
-    end
-    return tab_out
-end
-
-function tabs_to_desk(tab)
-    local t = tab
-    for i,v in ipairs(t) do
-        table.insert(v,1,"│")
-        table.insert(v,5,"│")
-        table.insert(v,9,"│")
-        table.insert(v,13,"│")
-    end
-    table.insert(t,1,{"┌","─","─","─","┬","─","─","─","┬","─","─","─","┐"})
-    table.insert(t,5,{"├","─","─","─","┼","─","─","─","┼","─","─","─","┤"})
-    table.insert(t,9,{"├","─","─","─","┼","─","─","─","┼","─","─","─","┤"})
-    table.insert(t,13,{"└","─","─","─","┴","─","─","─","┴","─","─","─","┘"})
-    return t
-end
-
-function desk_to_tabs(tab)
-    local t = tab
-    table.remove(t,13)
-    table.remove(t,9)
-    table.remove(t,5)
-    table.remove(t,1)
-    for i,v in ipairs(t) do
-        table.remove(v,13)
-        table.remove(v,9)
-        table.remove(v,5)
-        table.remove(v,1)
-    end
-    return t
-end
-
-function on_alarm()
-    on_resume()
-end
-
-function on_resume()
-    if (not files:read("sudoku")) or (not json.decode(files:read("sudoku")).mask) then
-        reload()
-    else
-        redraw()
-    end
-end
-
-function reload()
-    local sudoku = matrix_create()
-    files:write("sudoku",json.encode(sudoku))
-    redraw()
-end
-
-function validate()
-    local sudoku = json.decode(files:read("sudoku"))
-    local state = "Solved"
-    for i = 1, #sudoku.mask do
-        if (sudoku.matrix[i] ~= sudoku.mask[i]) and (sudoku.mask[i] ~= 0) then
-            state = "Wrong"
-            break
-        elseif sudoku.mask[i] == 0 then
-            state = "Unsolved"
-        end
-    end
-    ui:show_toast(state)
-end
-
-function solve()
-    local sudoku = json.decode(files:read("sudoku"))
-    sudoku.mask = sudoku.matrix
-    files:write("sudoku",json.encode(sudoku))
-    redraw()
-end
-
-function redraw()
-    local tab = tabs_to_desk(tab_to_tabs(json.decode(files:read("sudoku")).mask))
-    ui:show_table(tab, 0, true, folded)
-end
-
-function on_click(idx)
-    if idx == 0 then
-        dialog_id = "menu"
-        ui:show_radio_dialog("Select Action",{"Reload","Validate","Solve"})
-        return
-    end
-    x = math.ceil(idx/13)
-    y = idx%13
-    if y == 0 then y = 13 end
-    local tab = tabs_to_desk(tab_to_tabs(json.decode(files:read("sudoku")).mask))
-    if type(tab[x][y]) == "number" then
-        dialog_id = "number"
-        ui:show_radio_dialog("Select Number",{1,2,3,4,5,6,7,8,9},tab[x][y])
-    end
-end
-
-function on_settings()
-end
-
-function on_dialog_action(idx)
-    if idx == -1 then
-        return
-    end
-    if dialog_id == "number" then
-        local sudoku = json.decode(files:read("sudoku"))
-        local tab = tabs_to_desk(tab_to_tabs(sudoku.mask))
-        tab[x][y] = idx
-        local mask = tabs_to_tab(desk_to_tabs(tab))
-        sudoku.mask = mask
-        files:write("sudoku",json.encode(sudoku))
-        redraw()
-    elseif dialog_id == "menu" then
-        if idx == 1 then
-            reload()
-        elseif idx == 2 then
-            validate()
-        elseif idx == 3 then
-            solve()
-        end
-    end
-end
-
-function matrix_create()
-    local sudoku = {}
-    local t = {}
-    local m = {}
-    local tmp
-    for i = 1, 81 do
-        t[i] = 0
-    end
-    for i = 0, 8 do
-        for j = 1, 9 do
-            t[i * 9 + j] = (i * 3 + math.floor( i / 3 ) + ( j - 1) ) % 9 + 1
-        end
-    end
-    for i = 1, 42 do
-        local n1 = math.random( 9 )
-        local n2
-        repeat
-            n2 = math.random( 9 )
-        until n1 ~= n2
-        for row = 0, 8 do
-            for col = 1, 9 do
-                if t[row * 9 + col] == n1 then
-                    t[row * 9 + col] = n2
-                elseif(t[row * 9 + col] == n2) then
-                    t[row * 9 + col] = n1
-                end
-            end
-        end
-    end
-    for c = 1, 42 do
-        local s1 = math.random( 2 )
-        local s2 = math.random( 2 )
-        for row = 0, 8 do
-            tmp = t[row * 9 + (s1 * 3 + c % 3)]
-            t[row * 9 + (s1 * 3 + c % 3)] = t[row * 9 + (s2 * 3 + c % 3)]
-            t[row * 9 + (s2 * 3 + c % 3)] = tmp
-        end
-    end
-    for s = 1, 42 do
-        local c1 = math.random( 2 )
-        local c2 = math.random( 2 )
-        for row = 0, 8 do
-            tmp = t[row * 9 + (s % 3 * 3 + c1)]
-            t[row * 9 + (s % 3 * 3 + c1)] = t[row * 9 + (s % 3 * 3 + c2)]
-            t[row * 9 + (s % 3 * 3 + c2)] = tmp
-        end
-    end
-    for s = 1, 42 do
-        local r1 = math.random( 2 )
-        local r2 = math.random( 2 )
-        for col = 1, 9 do
-            tmp = t[(s % 3 * 3 + r1) * 9 + col]
-            t[(s % 3 * 3 + r1) * 9 + col] = t[(s % 3 * 3 + r2) * 9 + col]
-            t[(s % 3 * 3 + r2) * 9 + col] = tmp
-        end
-    end
-    for i = 1, 81 do
-        m[i] = t[i]
-    end
-    for i = 0, 2 do
-        for j = 1, 3 do
-            for k = 1, 5 do
-                local c
-                repeat
-                    c = math.random( 9 ) - 1
-                until m[(i * 3 + math.floor(c / 3)) * 9 + j * 3 + c % 3] ~= 0
-                m[(i * 3 + math.floor(c / 3)) * 9 + j * 3 + c % 3] = 0
-            end
-        end
-    end
-    sudoku.matrix = t
-    sudoku.mask = m
-    return sudoku
-end