Update with some fixxes and improvements

install.lua

@@ -1,100 +1,167 @@
-local basalt = http.get("https://raw.githubusercontent.com/Pyroxenium/Basalt2/master/release/basalt.lua")
+local basalt = require("src")
+local configPath = "https://raw.githubusercontent.com/Pyroxenium/Basalt2/refs/heads/main/config.lua"
 
+local coloring = {foreground=colors.black, background=colors.white}
+local currentScreen = 1
+local screens = {}
+local main = basalt.getMainFrame():setBackground(colors.black)
+local config
 
-local REPO_URL = "https://raw.githubusercontent.com/Pyroxenium/Basalt2/master/src"
+local function getConfig()
+    if not config then
+        local request = http.get(configPath)
+        if request then
+            local content = request.readAll()
+            config = load(content)()
+            request.close()
+        else
+            error("Failed to fetch config")
+        end
+    end
+    return config
+end
 
--- Basis-Komponenten die immer installiert werden müssen
-local REQUIRED_FILES = {
-    "init.lua",
-    "render.lua",
-    "elementManager.lua",
-    "propertySystem.lua",
-    "elements/BaseElement.lua",
-    "elements/VisualElement.lua",
-    "elements/Container.lua",
-    "elements/BaseFrame.lua"
-}
+local function getChildrenHeight(container)
+    local height = 0
+    for _, child in ipairs(container:getChildren()) do
+        local newHeight = child.get("y") + child.get("height")
+        if newHeight > height then
+            height = newHeight
+        end
+    end
+    return height
+end
 
--- Optionale Komponenten
-local OPTIONAL_ELEMENTS = {
-    "Button",
-    "Input",
-    "Label",
-    "List",
-    "Menu",
-    "Table",
-    "Tree",
-    "Dropdown"
-}
+local function createScreen(index)
+    local screen = main:addFrame(coloring)
+        :onMouseScroll(function(self, direction)
+            local height = getChildrenHeight(self)
+            local scrollOffset = self:getOffsetY()
+            local maxScroll = height - self:getHeight()
+            scrollOffset = math.max(0, math.min(maxScroll, scrollOffset + direction))
+            self:setOffsetY(scrollOffset)
+        end)
+        :setSize("{parent.width - 2}", "{parent.height - 4}")
+        if(index==1)then
+            screen:setPosition(2, 2)
+        else
+            screen:setPosition("{parent.width * "..(index-1).." + 2}", 2)
+        end
+    screens[index] = screen
+    return screen
+end
 
-local OPTIONAL_PLUGINS = {
-    "animation",
-    "theme",
-    "xml",
-    "state"
-}
+local function switchScreen(direction)
+    local newScreen = currentScreen + direction
+    if screens[newScreen] then
+        --main:setOffsetX((newScreen - 1) * main:getWidth())
+        main:animate():moveOffset((newScreen - 1) * main:getWidth(), 0, 0.5):start()
+        currentScreen = newScreen
+    end
+end
 
-local main = basalt.createFrame()
+main:addButton()
+    :setBackground("{self.clicked and colors.black or colors.white}")
+    :setForeground("{self.clicked and colors.white or colors.black}")
+    :setSize(8, 1)
+    :setText("Next")
+    :setPosition("{parent.width - 9}", "{parent.height - 1}")
+    :setIgnoreOffset(true)
+    :onMouseClick(function() switchScreen(1) end)
+
+main:addButton()
+    :setBackground("{self.clicked and colors.black or colors.white}")
+    :setForeground("{self.clicked and colors.white or colors.black}")
+    :setSize(8, 1)
+    :setText("Back")
+    :setPosition(2, "{parent.height - 1}")
+    :setIgnoreOffset(true)
+    :onMouseClick(function() switchScreen(-1) end)
+
+-- Screen 1: Welcome
+local welcomeScreen = createScreen(1)
+welcomeScreen:addLabel(coloring)
+    :setText("Welcome to Basalt!")
+    :setPosition(2, 2)
+
+welcomeScreen:addLabel(coloring)
+    :setWidth("{parent.width - 2}")
+    :setAutoSize(false)
+    :setText([[Basalt is an open-source project created with passion for the ComputerCraft community. It provides you with all the tools you need to create beautiful and interactive user interfaces.
+
+The project is actively maintained and continuously improving thanks to our amazing community. Whether you're a beginner or an experienced developer, you'll find Basalt easy to use yet powerful enough for complex applications.
+
+Have ideas or want to get involved? Join our friendly community on Discord or GitHub - we'd love to hear from you and welcome contributions of any kind!
+
+Let's start creating something awesome together!]])
+    :setPosition(2, 4)
+
+-- Screen 2: Installation
+local installScreen = createScreen(2)
+installScreen:addLabel(coloring)
+    :setText("Choose Your Installation")
+    :setPosition(2, 2)
+
+    installScreen:addLabel(coloring)
+    :setText("Select Version:")
+    :setPosition(2, 4)
+
+local versionDropdown = installScreen:addDropdown()
+    :setPosition("{parent.width - self.width - 1}", 4)
+    :setSize(15, 1)
+    :setBackground(colors.black)
+    :setForeground(colors.white)
+    :addItem("Release")
+    :addItem("Dev")
+    :addItem("Custom")
+
+local versionDesc = installScreen:addLabel("versionDesc")
+    :setWidth("{parent.width - 2}")
+    :setAutoSize(false)
+    :setText("The Release version is the most stable and tested version of Basalt. It is recommended for production use.")
+    :setPosition(2, 7)
+    :setSize("{parent.width - 4}", 3)
     :setBackground(colors.lightGray)
 
--- Header
-main:addLabel()
-    :setText("Basalt2 Installer")
-    :setPosition(2,2)
-    :setForeground(colors.black)
+versionDropdown:onSelect(function(self, index, value)
+    if(value == "Release") then
+        versionDesc:setText("The Release version is the most stable and tested version of Basalt. It is recommended for production use.")
+    elseif(value == "Custom") then
+        versionDesc:setText("The Custom version allows you to specify which elements or plugins you want to install.")
+    else
+        versionDesc:setText("The Dev version is the latest development version of Basalt. It may contain new features and improvements, but it may also have bugs and issues.")
+    end
+end)
 
--- Element Selection
-local elementList = main:addList()
-    :setPosition(2,4)
-    :setSize(20,8)
+installScreen:addLabel(coloring)
+    :setText("Additional Components:")
+    :setPosition(2, "{versionDesc.y + versionDesc.height + 1}")
+
+local luaLSCheckbox = installScreen:addCheckbox()
+    :setPosition(2, 12)
+    :setText("[ ] LLS definitions")
+    :setCheckedText("[x] LLS definitions")
     :setBackground(colors.white)
     :setForeground(colors.black)
 
-for _, element in ipairs(OPTIONAL_ELEMENTS) do
-    elementList:addItem({
-        text = element,
-        selected = true
-    })
-end
-
--- Plugin Selection
-local pluginList = main:addList()
-    :setPosition(24,4)
-    :setSize(20,8)
-    :setBackground(colors.white)
-    :setForeground(colors.black)
-
-for _, plugin in ipairs(OPTIONAL_PLUGINS) do
-    pluginList:addItem({
-        text = plugin,
-        selected = true
-    })
-end
-
--- Labels
-main:addLabel()
+-- Screen 3: Elements
+local elementsScreen = createScreen(3)
+elementsScreen:addLabel(coloring)
     :setText("Elements:")
-    :setPosition(2,3)
-    :setForeground(colors.black)
+    :setPosition(2, 2)
 
-main:addLabel()
-    :setText("Plugins:")
-    :setPosition(24,3)
-    :setForeground(colors.black)
+local elementsList = elementsScreen:addList()
+    :setPosition(2, 4)
+    :setSize("{parent.width - 2}", "{parent.height - 6}")
 
--- Install Button
-main:addButton()
-    :setText("Install")
-    :setPosition(2,13)
-    :setSize(42,1)
-    :onClick(function()
-        -- Installation Logic hier
-        local selectedElements = {}
-        local selectedPlugins = {}
-        
-        -- Sammle ausgewählte Items
-        -- Download Files
-        -- Erstelle Ordnerstruktur
-    end)
+local function addElements()
+    elementsList:clear()
+    for k,v in pairs(getConfig().files)do
+        if(k:match("src/elements/"))then
+            elementsList:addItem(v.name)
+        end
+    end
+end
+addElements()
 
-basalt.autoUpdate()
+basalt.run()