term.clear()
local text = "Run with disk"
local tx, ty = 2,2
local text2 = "Install"
local tx2,ty2 = 2,4
local text3 = "[BACON]"
local tx3,ty3 = 2,6
term.setBackgroundColor(colors.blue)
term.setCursorPos(tx,ty)
write(text)
term.setCursorPos(tx2,ty2)
write(text2)
term.setCursorPos(tx3,ty3)
write(text3)
term.setBackgroundColor(colors.black)
while true do
local event, button, cx, cy = os.pullEvent()
if event == "mouse_click" then
if cx >= tx and cx <= tx + text:len() and cy == ty then
term.clear()
term.setCursorPos(1,1)
dofile("/disk/GT-st.dll")
elseif cx >= tx2 and cx <= tx2 + text2:len() and cy == ty2 then
shell.run("cp /disk/GT-st.lf /")
shell.run("cp /disk/HC-BB4.dll /")
shell.run("cp /disk/start.lf /")
shell.run("rename /start.lf /startup")
term.setCursorPos(2,8)
for i=0,10 do
write(":")
os.sleep(1)
end
disk.eject("right")
os.reboot()
elseif cx >= tx3 and cx <= tx3 + text3:len() and cy == ty3 then
dofile("/disk/overload.bat")
break
end
end
end
Comments