mirror of
https://github.com/CCLeonOS/LeonOS.git
synced 2026-03-03 15:17:01 +00:00
feat: 初始提交 LeonOS 实现
添加 LeonOS 的基本实现,包括: - 核心 API 模块(colors, disk, gps, keys, multishell, parallel, rednet, redstone, settings, vector) - 命令行程序(about, alias, bg, clear, copy, delete, edit, fg, help, list, lua, mkdir, move, paint, peripherals, programs, reboot, set, shutdown, threads) - 系统启动脚本和包管理 - 文档(README.md, LICENSE) - 开发工具(devbin)和更新程序 实现功能: - 完整的线程管理系统 - 兼容 ComputerCraft 的 API 设计 - 改进的 shell 和命令补全系统 - 多标签终端支持 - 设置管理系统
This commit is contained in:
46
data/computercraft/lua/rom/programs/lua.lua
Normal file
46
data/computercraft/lua/rom/programs/lua.lua
Normal file
@@ -0,0 +1,46 @@
|
||||
-- lua REPL
|
||||
|
||||
local term = require("term")
|
||||
local copy = require("rc.copy").copy
|
||||
local colors = require("colors")
|
||||
local pretty = require("cc.pretty")
|
||||
local textutils = require("textutils")
|
||||
|
||||
local env = copy(_ENV, package.loaded)
|
||||
|
||||
local run = true
|
||||
function env.exit() run = false end
|
||||
|
||||
term.setTextColor(colors.yellow)
|
||||
|
||||
print("LeonOS Lua REPL.\nCall exit() to exit.")
|
||||
|
||||
local history = {}
|
||||
while run do
|
||||
term.setTextColor(colors.white)
|
||||
io.write("$ lua >>> ")
|
||||
local data = term.read(nil, history, function(text)
|
||||
return textutils.complete(text, env)
|
||||
end)
|
||||
if #data > 0 then
|
||||
history[#history+1] = data
|
||||
end
|
||||
|
||||
local ok, err = load("return " .. data, "=stdin", "t", env)
|
||||
if not ok then
|
||||
ok, err = load(data, "=stdin", "t", env)
|
||||
end
|
||||
|
||||
if ok then
|
||||
local result = table.pack(pcall(ok))
|
||||
if not result[1] then
|
||||
io.stderr:write(result[2], "\n")
|
||||
elseif result.n > 1 then
|
||||
for i=2, result.n, 1 do
|
||||
pretty.pretty_print(result[i])
|
||||
end
|
||||
end
|
||||
else
|
||||
io.stderr:write(err, "\n")
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user