diff --git a/data/computercraft/lua/rom/programs/alias.lua b/data/computercraft/lua/rom/programs/alias.lua
index 3018ed5..bbca7d4 100644
--- a/data/computercraft/lua/rom/programs/alias.lua
+++ b/data/computercraft/lua/rom/programs/alias.lua
@@ -1,9 +1,26 @@
 -- alias
 
-local args = {...}
-
-local shell = require("shell")
+-- 程序顶部名称栏
+local term = require("term")
 local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== Shell 别名管理器 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
+local args = {...}
+local shell = require("shell")
 local textutils = require("textutils")
 
 if #args == 0 then
diff --git a/data/computercraft/lua/rom/programs/clear.lua b/data/computercraft/lua/rom/programs/clear.lua
index 84b3072..0bff360 100644
--- a/data/computercraft/lua/rom/programs/clear.lua
+++ b/data/computercraft/lua/rom/programs/clear.lua
@@ -1 +1,24 @@
-require("term").at(1,1).clear()
+-- 程序顶部名称栏
+local term = require("term")
+local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 清除屏幕 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+
+-- 清除剩余屏幕区域
+for y=2, term.getSize() do
+  term.at(1, y).clearLine()
+end
+
+term.at(1, 2)
\ No newline at end of file
diff --git a/data/computercraft/lua/rom/programs/help.lua b/data/computercraft/lua/rom/programs/help.lua
index adaf970..dc8db14 100644
--- a/data/computercraft/lua/rom/programs/help.lua
+++ b/data/computercraft/lua/rom/programs/help.lua
@@ -1,5 +1,24 @@
 -- help
 
+-- 程序顶部名称栏
+local term = require("term")
+local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 帮助系统 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
 local help = require("help")
 local textutils = require("textutils")
 
diff --git a/data/computercraft/lua/rom/programs/list.lua b/data/computercraft/lua/rom/programs/list.lua
index 4e03ce9..bba492f 100644
--- a/data/computercraft/lua/rom/programs/list.lua
+++ b/data/computercraft/lua/rom/programs/list.lua
@@ -1,10 +1,27 @@
 -- list
 
-local args = {...}
+-- 程序顶部名称栏
+local term = require("term")
+local colors = require("colors")
 
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 文件列表工具 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
+local args = {...}
 local fs = require("fs")
 local shell = require("shell")
-local colors = require("colors")
 local settings = require("settings")
 local textutils = require("textutils")
 
diff --git a/data/computercraft/lua/rom/programs/lua.lua b/data/computercraft/lua/rom/programs/lua.lua
index 808c62c..90e2c72 100644
--- a/data/computercraft/lua/rom/programs/lua.lua
+++ b/data/computercraft/lua/rom/programs/lua.lua
@@ -1,8 +1,25 @@
 -- lua REPL
 
+-- 程序顶部名称栏
 local term = require("term")
-local copy = require("rc.copy").copy
 local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== Lua 交互环境 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
+local copy = require("rc.copy").copy
 local pretty = require("cc.pretty")
 local textutils = require("textutils")
 
diff --git a/data/computercraft/lua/rom/programs/peripherals.lua b/data/computercraft/lua/rom/programs/peripherals.lua
index 768523f..204078e 100644
--- a/data/computercraft/lua/rom/programs/peripherals.lua
+++ b/data/computercraft/lua/rom/programs/peripherals.lua
@@ -1,9 +1,26 @@
+-- 程序顶部名称栏
 local term = require("term")
 local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 已连接外设 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
 local peripheral = require("peripheral")
 
 term.setTextColor(colors.yellow)
-print("attached peripherals")
+print("已连接的外设")
 term.setTextColor(colors.white)
 local names = peripheral.getNames()
 
diff --git a/data/computercraft/lua/rom/programs/redstone.lua b/data/computercraft/lua/rom/programs/redstone.lua
index 36fe050..dd9c926 100644
--- a/data/computercraft/lua/rom/programs/redstone.lua
+++ b/data/computercraft/lua/rom/programs/redstone.lua
@@ -1,6 +1,24 @@
+-- 程序顶部名称栏
+local term = require("term")
+local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 红石控制 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
 local rc = require("rc")
 local rs = require("redstone")
-local colors = require("colors")
 local textutils = require("textutils")
 
 local args = {...}
diff --git a/data/computercraft/lua/rom/programs/set.lua b/data/computercraft/lua/rom/programs/set.lua
index 6b305d1..c590510 100644
--- a/data/computercraft/lua/rom/programs/set.lua
+++ b/data/computercraft/lua/rom/programs/set.lua
@@ -1,6 +1,24 @@
 -- 'set' program
 
+-- 程序顶部名称栏
+local term = require("term")
 local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 设置管理 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
 local settings = require("settings")
 local textutils = require("textutils")
 
diff --git a/data/computercraft/lua/rom/programs/shell.lua b/data/computercraft/lua/rom/programs/shell.lua
index 8c6b3e9..cd5d60e 100644
--- a/data/computercraft/lua/rom/programs/shell.lua
+++ b/data/computercraft/lua/rom/programs/shell.lua
@@ -1,10 +1,27 @@
 -- rc.shell
 
+-- 程序顶部名称栏
+local term = require("term")
+local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== Shell 命令行 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
 local rc = require("rc")
 local fs = require("fs")
-local term = require("term")
 local shell = require("shell")
-local colors = require("colors")
 local thread = require("rc.thread")
 local textutils = require("textutils")
 
diff --git a/data/computercraft/lua/rom/programs/threads.lua b/data/computercraft/lua/rom/programs/threads.lua
index f41ff9b..871d0bc 100644
--- a/data/computercraft/lua/rom/programs/threads.lua
+++ b/data/computercraft/lua/rom/programs/threads.lua
@@ -1,6 +1,24 @@
 -- threads
 
+-- 程序顶部名称栏
+local term = require("term")
 local colors = require("colors")
+
+-- 保存当前颜色设置
+local old_fg = term.getTextColor()
+local old_bg = term.getBackgroundColor()
+
+-- 设置名称栏颜色并显示
+term.setTextColor(colors.white)
+term.setBackgroundColor(colors.cyan)
+term.at(1, 1).clearLine()
+term.at(1, 1).write("=== 线程管理 ===")
+
+-- 恢复颜色设置
+term.setTextColor(old_fg)
+term.setBackgroundColor(old_bg)
+term.at(1, 2)
+
 local thread = require("rc.thread")
 local strings = require("cc.strings")
 local textutils = require("textutils")