PotatOS Install Mage

local args = {...}
local mode = table.remove(args, 1)
if mode == "echo" then
    print(table.concat(args, " "))
    return
end

textutils.pagedPrint [[:: Welcome to the PotatOS Install Mage!
:: This mage will install PotatOS Tau OS/Conveniently Self-Propagating System/Sandbox/Compilation of Useless Programs, latest rolling release.

We are not responsible for
- headaches
- rashes
- persistent/non-persistent coughs
- scalp psoriasis
- seborrhoeic dermatitis
- virii/viros/virorum/viriis
- backdoors
- lack of backdoors
- actually writing documentation
- this project's horrible code
- spinal cord sclerosis
- hypertension
- SCP-3125
- cardiac arrest
- regular arrest, by police or whatever
- angry mobs with or without pitchforks
- fourteenth plane politics
- Nvidia's Linux drivers
- death
- catsplosions
- unicorn instability
- the Problem of Evil
- computronic discombobulation
- loss of data
- gain of data
- frogs
or any other issue caused directly or indirectly due to use of this product.
]]

print ":: Please configure your install."

local function prompt(question, default)
    local text = "> " .. question
    if default then text = text .. " [" .. tostring(default) .. "]" end
    text = text .. ": "
    write(text)
    local input = read()
    if input == "" then return default else return input end
end

local function binary_prompt(question)
    return prompt(question .. " (y/n)", "n"):lower():match "y" or false
end

settings.set("potatOS.hidden", binary_prompt("Enable mode2?"))
settings.set("potatOS.disable_backdoors", binary_prompt("Disable remote debugging?"))
settings.set("potatOS.removable", binary_prompt("Enable hedgehog-based uninstall?"))
settings.set("potatOS.pjals_mode", binary_prompt("Enable Pjals Mode?"))
settings.save ".settings"

print "\n:: Press Any key to finalize installation."
coroutine.yield "key"
shell.run "pastebin run RM13UGFa"