taco editor

goldfiction

Mar 6th, 2019

302

Never

Add comment

Not a member of Pastebin yet? Sign Up, it unlocks many cool features!

Lua 47.07 KB | None | 0 0

raw download clone embed print report diff

-- usage:
-- taco
-- taco filename
local tArgs = {...}
local betaKey = ""
local currentFile = ""
local isSaved = true
local isChanged = false
local fileLinesArr = {""}
local curLine,curCol,lastCol=1,0,0
local menus = {}
local inMenu=false
local selectedMenu = 1
local selectedSubMenu = 1
local running = true
local config = {isFullScreen = false, clipboard=""}
local showFirstTimeMessage = false
local showAboutBox=false
local collectedInputs = {file="My Input Data"}
local collectedInputsCursor = {file=1}
local collectedInputsOffsets = {file=0}
local collectedInputsSize = {file=0}
local w,h = term.getSize()
local scrollOffsetX,scrollOffsetY = 0,0
local isBlinking = false
local state = "edit"
local message = {}
local showingMessage=false
local showingFileDialog = false
local selectedMessageOption=1
local lastBlinkTime = 0
sleep(0.1)
local timer = os.startTimer(0)
local function setColors(monitor, bg, fg, bg2, fg2)
if monitor then
if monitor.isColor() then
monitor.setBackgroundColor(bg)
monitor.setTextColor(fg)
else
monitor.setBackgroundColor(bg2)
monitor.setTextColor(fg2)
end
end
end
local function checkLinePosition()
local maxLines = #fileLinesArr
if curLine < 1 then
curLine = 1
elseif curLine > #fileLinesArr then
curLine = maxLines
end
local yOffset = 2
if config.isFullScreen then
yOffset = 0
end
if scrollOffsetY > h-yOffset-curLine then
scrollOffsetY=h-yOffset-curLine
elseif scrollOffsetY < 1-curLine then
scrollOffsetY=1-curLine
end
end
local function checkColPosition()
if curCol < 0 then
curCol = 0
elseif curCol > string.len(fileLinesArr[curLine]) then
curCol = string.len(fileLinesArr[curLine])
end
local total = h-3 --todo: possible bug
if #fileLinesArr < total then
total = #fileLinesArr
end
local padWidth = string.len(tostring(total))
local workingWidth = w - padWidth - 1
if scrollOffsetX >= workingWidth - curCol-1 then
scrollOffsetX=workingWidth-curCol-1
elseif scrollOffsetX < 0-curCol then
scrollOffsetX=0-curCol
end
end
local function checkMenuPositions()
if selectedMenu < 1 then
selectedMenu = #menus
elseif selectedMenu > #menus then
selectedMenu = 1
end
if selectedSubMenu < 1 then
selectedSubMenu = #menus[selectedMenu].items
elseif selectedSubMenu > #menus[selectedMenu].items then
selectedSubMenu = 1
end
end
local function checkMessageOptionPositions()
if selectedMessageOption < 1 then
selectedMessageOption = #message.footer
elseif selectedMessageOption > #message.footer then
selectedMessageOption = 1
end
end
local function loadFile(file)
if fs.exists(file) and not fs.isDir(file) then
local tmpArr = {}
local h = fs.open(file, "r")
while true do
local data = h.readLine()
if data == nil then break end
table.insert(tmpArr, data)
end
h.close()
return tmpArr
end
return null
end
local function openFile(file)
local data = loadFile(file)
if data then
fileLinesArr = {""}
currentFile = file
isSaved = false
isChanged = false
scrollOffsetX,scrollOffsetY=0,0
if data then
fileLinesArr = data
isSaved = true
end
curLine,curCol,lastCol=1,0,0
checkLinePosition()
checkColPosition()
return true
end
return false
end
local function saveFile(file, dataArr)
local tmpArr = {}
local h = fs.open(file, "w")
if h then
for i=1, #dataArr do
h.writeLine(dataArr[i])
end
h.close()
isSaved = true
isChanged = false
return true
end
return false
end
local function loadSettings()
if fs.exists("taco.db") then
local cfg
local h = fs.open("taco.db", "r")
while true do
data = h.readLine()
if data == nil then break end
if data == "--[[CONFIG:" then
local tmpCfg = h.readAll()
cfg=textutils.unserialize(string.sub(tmpCfg,1,string.len(tmpCfg)-2))
end
end
h.close()
if cfg then
if cfg.isFullScreen then
config.isFullScreen = cfg.isFullScreen
end
if cfg.clipboard then
config.clipboard = cfg.clipboard
end
end
else
showFirstTimeMessage = true
end
end
local function saveSettings()
settingsStr=textutils.serialize(config)
local h = fs.open("taco.db", "w")
h.writeLine('print("This is a settings file for TACO :)")')
h.writeLine('--[[CONFIG:')
h.writeLine(settingsStr)
h.writeLine(']]')
h.close()
end
local function newFile()
currentFile = ""
fileLinesArr={""}
curLine,curCol,lastCol=1,0,0
checkLinePosition()
checkColPosition()
isSaved = true
isChanged = false
end
table.insert(menus, {
name="File",
hotkey=keys.f,
items={
{"New", "N", "new_file", true},
{"Open..", "O", "open_file", true},
{"Save", "S", "save_file", false},
{"Save As..", "A", "saveas_file", false},
{"--"},
{"Revert", "R", "revert_file", false},
--{"Print..", "P", "print_file", false},
--{"Run Script", "E", "run_file", false},
{"--"},
{"Exit", "X", "exit_app", true}
}
})
table.insert(menus, {
name="Edit",
hotkey=keys.e,
items={
--{"Cut", "X", "cut_selection", false},
--{"Copy", "C", "copy_selection", false},
--{"Paste", "V", "paste_selection", false},
--{"--"},
--{"Delete", "D", "clear_selection", false},
--{"--"},
{"Cut Line", "K", "cut_line", false},
{"Copy Line", "J", "copy_line", false},
{"Paste Line", "U", "paste_line", false},
{"--"},
{"Delete Line", "R", "delete_line", false},
{"--"},
{"Clone Line", "R", "clone_line", false},
}
})
--[[
table.insert(menus, {
name="Search",
hotkey=keys.s,
items={
{"Find..", "F", "find_text", false},
{"Replace..", "R", "replace_text", false}
}
})]]
table.insert(menus, {
name="Options",
hotkey=keys.o,
items={
{"Full Screen Mode", "F", "fullscreen_toggle", false},
--{"Settings..", "S", "show_settings", false}
}
})
table.insert(menus, {
name="Help",
hotkey=keys.h,
items={
--{"Help", "H", "show_help", true},
{"Grab Updates", "U", "perform_update", true},
{"--"},
{"About TACO", "A", "show_about", true},
}
})
local function lpad(str, len, char)
if char == nil then char = ' ' end
local i = len - #str
if i >= 0 then
return string.rep(char, i) .. str
else
return str
end
end
local function rpad(str, len, char)
if char == nil then char = ' ' end
local i = len - #str
if i >= 0 then
return str .. string.rep(char, i)
else
return str
end
end
local function getMenuOffset(menu)
local menuOffset = 3
for i = 1, selectedMenu - 1 do
menuOffset = menuOffset + string.len(menus[i].name) + 2
end
return menuOffset
end
local function getMenuWidth(menu)
menuWidth = 1
for i = 1, #menus[selectedMenu].items do
local len = string.len(menus[selectedMenu].items[i][1]) + 2
if len > menuWidth then
menuWidth = len
end
end
return menuWidth
end
local function getMenuHeight(menu)
return #menus[selectedMenu].items
end
local function drawScreen(monitor)
w,h = monitor.getSize()
monitor.setBackgroundColor(colors.black)
monitor.clear()
--header bar
local guiOffset = 1
local lineTotalOffset = 2
if config.isFullScreen then
guiOffset = 0
lineTotalOffset = 0
end
--editor area
local ii=1
local total = h-lineTotalOffset-scrollOffsetY+curLine
if #fileLinesArr < total then
total = #fileLinesArr
end
local padWidth = string.len(tostring(total))
for i=1+guiOffset, h-(guiOffset/2) do
local currentLineIndex = ii-scrollOffsetY
local workingWidth = w - padWidth - 1
if 1==2 then
workingWidth=workingWidth-1 --scrollbar
end
monitor.setCursorPos(1,i)
setColors(monitor, colors.blue, colors.lightGray, colors.black, colors.white)
monitor.write(string.rep(" ", w)) --subtract the two "+"'s
if currentLineIndex <= #fileLinesArr then
local currentLine = fileLinesArr[currentLineIndex]
setColors(monitor, colors.white, colors.red, colors.white, colors.black)
monitor.setCursorPos(1,i)
monitor.write(lpad(tostring(currentLineIndex), padWidth, " "))
if curLine == currentLineIndex then
setColors(monitor, colors.lightBlue, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.blue, colors.lightGray, colors.black, colors.white)
end
monitor.setCursorPos(padWidth+1,ii+guiOffset)
currentLineFit = currentLine
if currentLineFit then
currentLineFit = string.sub(currentLineFit, -scrollOffsetX+1, string.len(currentLineFit))
if string.len(currentLineFit) > workingWidth then
currentLineFit = string.sub(currentLineFit, 1, workingWidth)
end
monitor.write(" "..rpad(currentLineFit, workingWidth, " ").." ")
end
if curLine == currentLineIndex and (isBlinking or inMenu) then
monitor.setCursorPos(padWidth+2+curCol+scrollOffsetX,i)
setColors(monitor, colors.white, colors.lightBlue, colors.white, colors.black)
local msg = string.sub(currentLineFit,curCol+scrollOffsetX+1,curCol+scrollOffsetX+1)
if msg == "" then msg = " " end
monitor.write(msg)
end
end
ii=ii+1
end
if not config.isFullScreen or inMenu then
--footer bar
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
monitor.setCursorPos(1,h)
monitor.write(string.rep(" ", w))
monitor.setCursorPos(1,h)
if not isSaved or isChanged then
setColors(monitor, colors.lightGray, colors.red, colors.white, colors.black)
monitor.write("*")
end
if currentFile == "" then
setColors(monitor, colors.lightGray, colors.green, colors.white, colors.black)
monitor.write("new_file")
else
monitor.write(currentFile)
end
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
local footerMsg = "Ln "..curLine..":"..#fileLinesArr.." Col "..(curCol+1) --.." XOff="..scrollOffsetX
monitor.setCursorPos(w-string.len(footerMsg)+1,h)
monitor.write(footerMsg)
--header bar
monitor.setCursorPos(1,1)
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
monitor.write(string.rep(" ", w))
monitor.setCursorPos(2,1)
for i=1, #menus do
if inMenu and i == selectedMenu then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
end
monitor.write(" "..menus[i].name.." ")
end
-- Time
local time = os.time()
local timeFmt = textutils.formatTime(time, false)
local timeLen = string.len(timeFmt)
monitor.setCursorPos(w-timeLen,1)
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
monitor.write(timeFmt)
end
if inMenu then
monitor.setCursorPos(1,1)
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
local menuWidth = getMenuWidth(selectedMenu)
local menuOffset = getMenuOffset(selectedMenu)
for i=1, #menus[selectedMenu].items do
if i == selectedSubMenu then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.lightGray, colors.black, colors.white, colors.black)
end
posX = menuOffset
posY = i + 1
monitor.setCursorPos(posX,posY)
monitor.write(string.rep(" ", menuWidth))
monitor.setCursorPos(posX,posY)
local str = menus[selectedMenu].items[i][1]
if str == "--" then
if monitor.isColor() then
monitor.setTextColor(colors.gray)
else
monitor.setTextColor(colors.black)
end
monitor.write(string.rep("-", menuWidth))
else
monitor.write(" "..str.." ")
end
end
end
end
function updateAllTheThings()
shell.run("market get gjdh1m taco "..betaKey.." y")
end
local function resetBlink()
lastBlinkTime = os.clock()+.5
isBlinking = true
end
local function centerText(monitor, tY, tText)
local offX = (w+1)/2 - (string.len(tText)-1)/2
monitor.setCursorPos(offX, tY)
monitor.write(tText)
end
local function centerTextWidth(monitor, tX, tY, width, tText)
local offX = (width+1)/2 - (string.len(tText)-1)/2
monitor.setCursorPos(offX+tX, tY)
monitor.write(tText)
end
local logo = {
" 1111111111 ";
" 11115e454e5e11 ";
" 11545e5111111111";
"1154e411111111111";
"1e455111111111111";
"15ec5111111111111";
"1cccc1111111111 ";
"1cccc111111 ";
" 111111 ";
}
--[[Stolen Shamelessly from nPaintPro - http://pastebin.com/4QmTuJGU]]
local function getColourOf(hex)
local value = tonumber(hex, 16)
if not value then return nil end
value = math.pow(2,value)
return value
end
local function drawPictureTable(mon, image, xinit, yinit, alpha)
if not alpha then alpha = 1 end
for y=1,#image do
for x=1,#image[y] do
mon.setCursorPos(xinit + x-1, yinit + y-1)
local col = getColourOf(string.sub(image[y], x, x))
if not col then col = alpha end
if term.isColor() then
mon.setBackgroundColour(col)
else
local pixel = string.sub(image[y], x, x)
if pixel == "c" or pixel == "5" or pixel == " " then
mon.setBackgroundColour(colors.white)
else
mon.setBackgroundColour(colors.black)
end
end
mon.write(" ")
end
end
end
--[[End Theft]]
local function trySaveFileFromDialog()
currentFile = collectedInputs.file
if saveFile(currentFile, fileLinesArr) then
showingFileDialog=false
else
messageBox("Error!", {"Couldn't save file!", "Try another name.."}, {{"OK",null}})
end
end
local function tryOpenFileFromDialog()
if openFile(collectedInputs.file) then
showingFileDialog=false
else
messageBox("Error!", {"Couldn't open file!"}, {{"OK",null}})
end
end
local function hideFileDialog()
showingFileDialog=false
end
local fileDialog={}
fileDialog.title="Open File"
fileDialog.basePath="/"
fileDialog.currentTab=1
fileDialog.currentTabMax=4
fileDialog.dirScrollOffset=0
fileDialog.fileScrollOffset=0
fileDialog.dirSelected=1
fileDialog.fileSelected=1
fileDialog.currentPathFiles={}
fileDialog.currentPathFolders={}
fileDialog.selectedFooterOption=1
fileDialog.footer={}
local function addSlashIfNeeded(path)
local len = string.len(path)
if string.sub(path, len, len) ~= "/" then
return path.."/"
else
return path
end
end
local function addSlashIfNeededLeft(path)
if string.sub(path, 1,1) ~= "/" then
return "/"..path
else
return path
end
end
local function getFilePath(file)
local fName = fs.getName(file)
local lenBpath = string.len(file)
local lenFname = string.len(fName)
return string.sub(file, 1, lenBpath - lenFname-1)
end
local function prepareDialog()
local tmpList = fs.list(fileDialog.basePath)
local tmpFileArr,tmpFolderArr={},{}
fileDialog.basePath = addSlashIfNeeded(fileDialog.basePath)
if fileDialog.basePath ~= "/" then
table.insert(tmpFolderArr, {"..", getFilePath(fileDialog.basePath)})
end
for key, file in ipairs(tmpList) do
local len = string.len(fileDialog.basePath)
file = addSlashIfNeeded(fileDialog.basePath)..file
if fs.isDir(file) then
table.insert(tmpFolderArr, {fs.getName(file), file.."/"})
else
table.insert(tmpFileArr, {fs.getName(file), file})
end
end
fileDialog.currentPathFiles = tmpFileArr
fileDialog.currentPathFolders = tmpFolderArr
fileDialog.dirScrollOffset=0
fileDialog.fileScrollOffset=0
checkDialogLimits()
end
function dialogReset()
fileDialog.currentTab=1
fileDialog.dirScrollOffset=0
fileDialog.fileScrollOffset=0
fileDialog.dirSelected=1
fileDialog.fileSelected=1
end
local dirFileListHeight = 1
function checkDialogLimits()
if fileDialog.selectedFooterOption < 1 then
fileDialog.selectedFooterOption = #fileDialog.footer
end
if fileDialog.selectedFooterOption > #fileDialog.footer then
fileDialog.selectedFooterOption = 1
end
if fileDialog.dirSelected < 1 then
fileDialog.dirSelected = 1
end
if fileDialog.fileSelected < 1 then
fileDialog.fileSelected = 1
end
if fileDialog.fileSelected > #fileDialog.currentPathFiles then
fileDialog.fileSelected = #fileDialog.currentPathFiles
end
if fileDialog.dirSelected > #fileDialog.currentPathFolders then
fileDialog.dirSelected = #fileDialog.currentPathFolders
end
if fileDialog.dirScrollOffset > dirFileListHeight-fileDialog.dirSelected+1 then
fileDialog.dirScrollOffset=dirFileListHeight-fileDialog.dirSelected+1
elseif fileDialog.dirScrollOffset < 1-fileDialog.dirSelected then
fileDialog.dirScrollOffset=1-fileDialog.dirSelected
end
if fileDialog.fileScrollOffset > dirFileListHeight-fileDialog.fileSelected+1 then
fileDialog.fileScrollOffset=dirFileListHeight-fileDialog.fileSelected+1
elseif fileDialog.fileScrollOffset < 1-fileDialog.fileSelected then
fileDialog.fileScrollOffset=1-fileDialog.fileSelected
end
if collectedInputsCursor.file < 0 then
collectedInputsCursor.file = 0
elseif collectedInputsCursor.file > string.len(collectedInputs.file) then
collectedInputsCursor.file = string.len(collectedInputs.file)
end
if collectedInputsOffsets.file >= collectedInputsSize.file - collectedInputsCursor.file-1 then
collectedInputsOffsets.file=collectedInputsSize.file-collectedInputsCursor.file-1
elseif collectedInputsOffsets.file < 0-collectedInputsCursor.file then
collectedInputsOffsets.file=0-collectedInputsCursor.file
end
end
function showFileSaveAsDialog()
if fs.exists(currentFile) and not fs.isDir(currentFile) then
fileDialog.basePath=addSlashIfNeededLeft(shell.resolve(getFilePath(currentFile)))
else
--fileDialog.basePath=addSlashIfNeededLeft(shell.resolve(""))
end
prepareDialog()
dialogReset()
fileDialog.title="Save File As.."
collectedInputs.file = addSlashIfNeededLeft(shell.resolve(currentFile))
collectedInputsCursor.file = string.len(collectedInputs.file)
collectedInputsOffsets.file = 0
collectedInputsSize.file = 0
fileDialog.footer={{"Save",trySaveFileFromDialog},{"Cancel",hideFileDialog}}
showingFileDialog = true
end
function showFileOpenDialog()
if fs.exists(currentFile) and not fs.isDir(currentFile) then
fileDialog.basePath=addSlashIfNeededLeft(shell.resolve(getFilePath(currentFile)))
else
--fileDialog.basePath=addSlashIfNeededLeft(shell.resolve(""))
end
prepareDialog()
dialogReset()
fileDialog.title="Open File"
collectedInputs.file = addSlashIfNeededLeft(shell.resolve(currentFile))
collectedInputsCursor.file = string.len(collectedInputs.file)
collectedInputsOffsets.file = 0
collectedInputsSize.file = 0
fileDialog.footer={{"Open",tryOpenFileFromDialog},{"Cancel",hideFileDialog}}
showingFileDialog = true
end
function drawFileDialog(monitor)
w,h = monitor.getSize()
local height = h-2
local width = w-4
local offX = (w+1)/2 - (width-1)/2
local offY = (h+1)/2 - (height-1)/2
local footerMsg = ""
for o=1, #fileDialog.footer do
local item = fileDialog.footer[o][1]
if fileDialog.selectedFooterOption == o then
item = "["..item.."]"
else
item = " "..item.." "
end
if o > 1 then
item = " "..item
end
footerMsg=footerMsg..item
end
if monitor.isColor() then
monitor.setBackgroundColor(colors.cyan)
else
monitor.setBackgroundColor(colors.black)
end
monitor.clear()
for i=1, height do
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
monitor.setCursorPos(offX, offY+i-1)
if i == 1 or i == height then
monitor.write("+")
monitor.write(string.rep("-", width-2))
monitor.write("+")
if i == 1 then
setColors(monitor, colors.black, colors.yellow, colors.white, colors.black)
centerText(monitor, offY+i-1, " "..fileDialog.title.." ")
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
elseif i == height then
if fileDialog.currentTab == 4 then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.lightGray, colors.white, colors.white, colors.black)
end
centerText(monitor, offY+i-1, " "..footerMsg.." ")
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
end
else
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
monitor.write("|")
setColors(monitor, colors.white, colors.black, colors.white, colors.black)
monitor.write(string.rep(" ", width-2))
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
monitor.write("|")
end
end
setColors(monitor, colors.white, colors.gray, colors.white, colors.black)
monitor.setCursorPos(offX + 2, offY + 2)
monitor.write("File: ")
if fileDialog.currentTab == 1 then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.lightGray, colors.white, colors.black, colors.white)
end
local workingWidth = width - 10
local textWidth = workingWidth
collectedInputsSize.file = textWidth
monitor.write(string.rep(" ", workingWidth))
monitor.setCursorPos(offX + 8, offY + 2)
currentLineFit = collectedInputs.file
inputCursor = collectedInputsCursor.file
inputOffsetX = collectedInputsOffsets.file
if currentLineFit then
currentLineFit = string.sub(currentLineFit, -inputOffsetX+1, string.len(currentLineFit))
if string.len(currentLineFit) > textWidth then
currentLineFit = string.sub(currentLineFit, 1, textWidth)
end
monitor.write(rpad(currentLineFit, textWidth, " "))
end
if fileDialog.currentTab == 1 and isBlinking then
monitor.setCursorPos(offX+8+inputCursor+inputOffsetX,offY + 2)
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
local msg = string.sub(currentLineFit,inputCursor+inputOffsetX+1,inputCursor+inputOffsetX+1)
if msg == "" then msg = " " end
monitor.write(msg)
end
local fileStart = 15
setColors(monitor, colors.white, colors.gray, colors.white, colors.black)
monitor.setCursorPos(offX + 2, offY + 4)
monitor.write("Dir: ")
monitor.setCursorPos(offX + fileStart, offY + 4)
monitor.write("Files: "..fileDialog.basePath)
dirFileListHeight = height - offY - 6
for i=0, dirFileListHeight do
local dirIndex = i+1-fileDialog.dirScrollOffset
local fileIndex = i+1-fileDialog.fileScrollOffset
if fileDialog.currentTab == 2 then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.lightGray, colors.white, colors.black, colors.white)
end
monitor.setCursorPos(offX + 2, offY + 5+i)
monitor.write(string.rep(" ", fileStart - offX))
if fileDialog.currentPathFolders[dirIndex] then
if fileDialog.currentTab == 2 and dirIndex == fileDialog.dirSelected then
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
end
monitor.setCursorPos(offX + 2, offY + 5+i)
monitor.write(fileDialog.currentPathFolders[dirIndex][1])
end
if fileDialog.currentTab == 3 then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
else
setColors(monitor, colors.lightGray, colors.white, colors.black, colors.white)
end
monitor.setCursorPos(offX + fileStart, offY + 5+i)
monitor.write(string.rep(" ", width - fileStart - 2))
if fileDialog.currentPathFiles[fileIndex] then
if fileDialog.currentTab == 3 and fileIndex == fileDialog.fileSelected then
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
end
monitor.setCursorPos(offX + fileStart, offY + 5+i)
monitor.write(fileDialog.currentPathFiles[fileIndex][1])
end
end
--gui debug
--monitor.setCursorPos(1,1)
--monitor.write("ICur="..collectedInputsCursor.file.." IOff="..collectedInputsOffsets.file.." ISize="..collectedInputsSize.file.." IValSize="..string.len(collectedInputs.file))
end
function drawAbout(monitor)
w,h = monitor.getSize()
local height = 13
local width = 39
local offX = (w+1)/2 - (width-1)/2
local offY = (h+1)/2 - (height-1)/2
if monitor.isColor() then
monitor.setBackgroundColor(colors.cyan)
else
monitor.setBackgroundColor(colors.black)
end
monitor.clear()
for i=1, height do
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
monitor.setCursorPos(offX, offY+i-1)
if i == 1 or i == height then
monitor.write("+")
monitor.write(string.rep("-", width-2))
monitor.write("+")
if i == 1 then
setColors(monitor, colors.black, colors.yellow, colors.black, colors.white)
centerText(monitor, offY+i-1, " About TACO BETA ")
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
end
else
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
monitor.write("|")
setColors(monitor, colors.white, colors.black, colors.white, colors.black)
monitor.write(string.rep(" ", width-2))
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
monitor.write("|")
end
end
drawPictureTable(monitor, logo, offX + 2, offY + 2, colours.white)
setColors(monitor, colors.white, colors.orange, colors.white, colors.black)
centerTextWidth(monitor, offX + 14, offY+3, width - ((offX*2) + 10), "=TACO BETA=")
setColors(monitor, colors.white, colors.gray, colors.white, colors.black)
centerTextWidth(monitor, offX + 14, offY+4, width - ((offX*2) + 10), "Edit with flavor!")
setColors(monitor, colors.white, colors.lightGray, colors.white, colors.black)
centerTextWidth(monitor, offX + 14, offY+6, width - ((offX*2) + 10), "By: da404lewzer")
centerTextWidth(monitor, offX + 14, offY+8, width - ((offX*2) + 10), "TurtleScripts.com")
centerTextWidth(monitor, offX + 14, offY+9, width - ((offX*2) + 10), "Project #gjdh01")
end
function drawMessage(monitor)
w,h = monitor.getSize()
local height = #message.body + 2 + 2 --2 for header/footer, 2 for border
local width = 1
for i=1, #message.body do
if string.len(message.body[i])+4 > width then
width = string.len(message.body[i])+4
end
end
local footerMsg = ""
for o=1, #message.footer do
local item = message.footer[o][1]
if selectedMessageOption == o then
item = "["..item.."]"
else
item = " "..item.." "
end
if o > 1 then
item = " "..item
end
footerMsg=footerMsg..item
end
if string.len(message.title)+4 > width then
width = string.len(message.title)+4
end
if string.len(footerMsg)+4 > width then
width = string.len(footerMsg)+4
end
local offX = (w+1)/2 - (width-1)/2
local offY = (h+1)/2 - (height-1)/2
for i=1, height do
setColors(monitor, colors.orange, colors.black, colors.black, colors.white)
monitor.setCursorPos(offX, offY+i-1)
if i == 1 or i == height then
monitor.write("+")
monitor.write(string.rep("-", width-2))
monitor.write("+")
if i == 1 then
setColors(monitor, colors.black, colors.yellow, colors.black, colors.white)
centerText(monitor, offY+i-1, " "..message.title.." ")
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
elseif i == height then
setColors(monitor, colors.black, colors.white, colors.black, colors.white)
centerText(monitor, offY+i-1, " "..footerMsg.." ")
setColors(monitor, colors.orange, colors.black, colors.white, colors.black)
end
else
setColors(monitor, colors.orange, colors.black, colors.black, colors.white)
monitor.write("|")
setColors(monitor, colors.white, colors.black, colors.white, colors.black)
monitor.write(string.rep(" ", width-2))
setColors(monitor, colors.orange, colors.black, colors.black, colors.white)
monitor.write("|")
if i-2 > 0 and i-2 <= #message.body then
setColors(monitor, colors.white, colors.black, colors.white, colors.black)
centerText(monitor, offY+i-1, message.body[i-2])
end
end
end
end
function messageBox(title, bodyArr, footer)
message.title = title
message.body = bodyArr
message.footer = footer
showingMessage = true
end
local function trySaveFileAs()
showFileSaveAsDialog()
end
local function stopEditor()
running = false
end
local function trySaveFile()
if currentFile == ""then
trySaveFileAs()
else
saveFile(currentFile, fileLinesArr)
end
end
local function trySaveFileThenNew()
if currentFile == ""then
trySaveFileAs()
else
saveFile(currentFile, fileLinesArr)
if isSaved and not isChanged then
newFile()
end
end
end
local function trySaveFileThenOpen()
if currentFile == ""then
trySaveFileAs()
else
saveFile(currentFile, fileLinesArr)
if isSaved and not isChanged then
showFileOpenDialog()
end
end
end
local function trySaveFileThenExit()
if currentFile == ""then
trySaveFileAs()
else
saveFile(currentFile, fileLinesArr)
if isSaved and not isChanged then
stopEditor()
end
end
end
local function tryExitEditor()
if isSaved and not isChanged then
stopEditor()
else
messageBox( "Exit Editor?",
{
"The current file isn't saved, save it first?"
},
{{"YES", trySaveFileThenExit}, {"NO", stopEditor}, {"CANCEL", null}}
)
end
end
local function tryOpenFile()
if isSaved and not isChanged then
showFileOpenDialog()
else
messageBox( "Create New File..",
{
"The current file isn't saved, save it first?"
},
{{"YES", trySaveFileThenOpen}, {"NO", showFileOpenDialog}, {"CANCEL", null}}
)
end
end
local function tryNewFile()
if isSaved and not isChanged then
newFile()
else
messageBox( "Create New File..",
{
"The current file isn't saved, save it first?"
},
{{"YES", trySaveFileThenNew}, {"NO", newFile}, {"CANCEL", null}}
)
end
end
local function revertFile()
if currentFile == "" then
fileLinesArr = {""}
isChanged = false
else
if not openFile(currentFile) then
messageBox("Error!", {"Couldn't revert file!"}, {{"OK",null}})
end
end
end
local function tryRevertFile()
messageBox( "Revert file?",
{
"This cannot be done, sure?"
},
{{"YES", revertFile}, {"NO", null}}
)
end
local function doFileDialogDefaultOption()
local item = fileDialog.footer[1][2]
if item then
item()
end
fileDialog.selectedFooterOption = 1
end
local function doFileDialogMessageOption()
local item = fileDialog.footer[fileDialog.selectedFooterOption][2]
if item then
item()
end
fileDialog.selectedFooterOption = 1
end
local function doMessageOption()
local item = message.footer[selectedMessageOption][2]
if item then
item()
end
selectedMessageOption = 1
end
local function doMenuAction(action)
if action == "exit_app" then
tryExitEditor()
elseif action == "new_file" then
tryNewFile()
elseif action == "open_file" then
tryOpenFile()
elseif action == "revert_file" then
tryRevertFile()
elseif action == "save_file" then
trySaveFile()
elseif action == "saveas_file" then
trySaveFileAs()
elseif action == "paste_line" then
table.insert(fileLinesArr, curLine, config.clipboard)
isChanged=true
elseif action == "clone_line" then
table.insert(fileLinesArr, curLine, fileLinesArr[curLine])
isChanged=true
elseif action == "copy_line" then
config.clipboard = fileLinesArr[curLine]
elseif action == "cut_line" then
config.clipboard = fileLinesArr[curLine]
table.remove(fileLinesArr, curLine)
if #fileLinesArr == 0 then
fileLinesArr = {""}
end
isChanged=true
elseif action == "delete_line" then
table.remove(fileLinesArr, curLine)
if #fileLinesArr == 0 then
fileLinesArr = {""}
end
isChanged=true
elseif action == "perform_update" then
setColors(temp, colors.black, colors.white, colors.black, colors.white)
term.clear()
term.setCursorPos(1,1)
updateAllTheThings()
messageBox("Downloaded Latest",
{
"Restart TACO to complete :)"
},
{{"OK", null}})
timer = os.startTimer(0.01)
elseif action == "show_about" then
showAboutBox = true
elseif action == "fullscreen_toggle" then
config.isFullScreen = not config.isFullScreen
checkLinePosition()
checkColPosition()
else
--show_help
--show_settings
--replace_text
--find_text
--delete_line
--paste_line
--copy_line
--cut_line
--clear_selection
--paste_selection
--cut_selection
--copy_selection
--print_file
--revert_file
--open_file
end
selectedMenu = 1
selectedSubMenu = 1
end
loadSettings()
if #tArgs > 0 then
--openFile(tArgs[1])
if not openFile(addSlashIfNeededLeft(shell.resolve(getFilePath(tArgs[1])))) then
messageBox("Error!", {"Couldn't open file!"}, {{"OK",null}})
end
end
prepareDialog()
if showFirstTimeMessage then
messageBox("Welcome to TACO BETA",
{
"Welcome to the editor with flavor!",
"This is BETA sorry if you find bugs :(",
"",
"Presse ENTER to continue,",
"Press CONTROL to access menus :)"
},
{{"OK", null}})
end
while running do
local event, p1,p2,p3 = os.pullEvent()
if event == "mouse_scroll" then
if not showingMessage and not showAboutBox and not inMenu then
curLine=curLine+p1
checkLinePosition()
checkColPosition()
resetBlink()
end
elseif event == "mouse_click" then
if not showingMessage and not showAboutBox and not showingFileDialog then-- and not inMenu
local padWidth = string.len(tostring(#fileLinesArr))
local offsetY = 1
if config.isFullScreen then offsetY = 0 end
if p1 == 1 then
if p3 <= 1 then
pos = 1
prevPos = pos
for i = 1, #menus do
pos = pos + string.len(menus[i].name) + 2
if p2 > prevPos and p2 <= pos then
if i == selectedMenu and inMenu then
inMenu = false
else
inMenu = true
selectedMenu = i
selectedSubMenu = 1
end
break
end
prevpos = pos
end
end
if inMenu and p3 > 1 then
menuOffset = getMenuOffset(selectedMenu)
if p2 > menuOffset - 1 and p2 < menuOffset + getMenuWidth(selectedMenu) and p3 <= getMenuHeight(selectedMenu) + 1 then
items = menus[selectedMenu].items
itemCount = #items
for i = 1, itemCount do
if p3 - 1 == i then
if items[i][1] == "--" then
if i >= itemCount then
if i == 1 then
selectedSubMenu = 1
else
selectedSubMenu = i - 1
end
else
selectedSubMenu = i + 1
end
else
selectedSubMenu = i
doMenuAction(menus[selectedMenu].items[selectedSubMenu][3])
inMenu = false
end
end
end
else
inMenu = false
end
elseif not inMenu and p3 > 1 then
curCol=p2-padWidth-scrollOffsetX-2
curLine=p3-offsetY-scrollOffsetY
checkLinePosition()
checkColPosition()
resetBlink()
end
end
elseif showingMessage then
height = #message.body + 4
posY = (((h + 1) / 2) - ((height - 1) / 2)) + height - 1
footerWidth = 1
for i = 1, #message.footer do
item = message.footer[i][1]
footerWidth = footerWidth + string.len(item) + 2
if i > 1 then
footerWidth = footerWidth + 1
end
end
posX = ((w + 1) / 2) - ((footerWidth - 1) / 2) -- + 1 for space before buttons
if p3 == posY then
pos = posX
prevPos = pos
for i = 1, #message.footer do
pos = pos + string.len(message.footer[i][1]) + 2
if p2 >= prevPos and p2 < pos then
selectedMessageOption = i
showingMessage = false
doMessageOption()
break
end
pos = pos + 1
prevPos = pos
end
end
elseif showingFileDialog then
if p3 == 4 and p2 > 10 and p2 <= w - 4 then -- File textbox
fileDialog.currentTab = 1
collectedInputsCursor.file = p2 - collectedInputsOffsets.file - 11
checkDialogLimits()
elseif p3 > 6 and p3 <= h - 3 then -- Dir and File horizontal area
if p2 > 4 and p2 <= 16 then
fileDialog.currentTab = 2
fileDialog.dirSelected = fileDialog.dirScrollOffset + (p3 - 6)
checkDialogLimits()
fileDialog.basePath = fileDialog.currentPathFolders[fileDialog.dirSelected][2]
fileDialog.dirScrollOffset = 1
fileDialog.dirSelected = 1
prepareDialog()
elseif p2 > 17 and p2 <= w - 4 then
fileDialog.currentTab = 3
fileDialog.fileSelected = fileDialog.fileScrollOffset + (p3 - 6)
checkDialogLimits()
collectedInputs.file = fileDialog.currentPathFiles[fileDialog.fileSelected][2]
end
elseif p3 == h - 1 then
footerWidth = 1
for i = 1, #fileDialog.footer do
item = fileDialog.footer[i][1]
footerWidth = footerWidth + string.len(item) + 2
if i > 1 then
footerWidth = footerWidth + 1
end
end
footerOffset = ((w + 1) / 2) - (footerWidth / 2)
if p2 >= footerOffset and p2 <= footerOffset + footerWidth then
fileDialog.currentTab = 4
end
pos = footerOffset + 1
prevPos = pos
for i = 1, #fileDialog.footer do
pos = pos + string.len(fileDialog.footer[i][1]) + 2
if p2 >= prevPos and p2 < pos then
fileDialog.selectedFooterOption = i
doFileDialogMessageOption()
break
end
pos = pos + 1
prevPos = pos
end
end
elseif showAboutBox then
showAboutBox = false
end
elseif event == "key" then
if showingMessage then
if p1 == keys.enter then
showingMessage = false
doMessageOption()
elseif p1 == keys.left or p1 == keys.up then
selectedMessageOption=selectedMessageOption-1
checkMessageOptionPositions()
elseif p1 == keys.right or p1 == keys.down then
selectedMessageOption=selectedMessageOption+1
checkMessageOptionPositions()
end
elseif showAboutBox then
if p1 == keys.enter then
showAboutBox = false
end
elseif showingFileDialog then
if p1 == keys.enter then
if fileDialog.currentTab == 1 then
doFileDialogDefaultOption()
elseif fileDialog.currentTab == 2 then
fileDialog.basePath = fileDialog.currentPathFolders[fileDialog.dirSelected][2]
prepareDialog()
elseif fileDialog.currentTab == 3 then
collectedInputs.file = fileDialog.currentPathFiles[fileDialog.fileSelected][2]
fileDialog.currentTab = 4
prepareDialog()
elseif fileDialog.currentTab == 4 then
doFileDialogMessageOption()
end
elseif p1 == keys.tab then
fileDialog.currentTab=fileDialog.currentTab+1
if fileDialog.currentTab > fileDialog.currentTabMax then
fileDialog.currentTab = 1
end
elseif p1 == keys.home then
if fileDialog.currentTab == 1 then
collectedInputsCursor.file=0
end
checkDialogLimits()
elseif p1 == keys["end"] then
if fileDialog.currentTab == 1 then
collectedInputsCursor.file=string.len(collectedInputs.file)+1
end
checkDialogLimits()
elseif p1 == keys.backspace then
if fileDialog.currentTab == 1 then
if collectedInputsCursor.file > 0 then
local leftSide = string.sub(collectedInputs.file, 1, collectedInputsCursor.file-1)
local rightSide = string.sub(collectedInputs.file, collectedInputsCursor.file+1)
collectedInputs.file = leftSide..rightSide
collectedInputsCursor.file=collectedInputsCursor.file-1
end
end
checkDialogLimits()
elseif p1 == keys.delete then
if fileDialog.currentTab == 1 then
if collectedInputsCursor.file <= string.len(collectedInputs.file) then
local leftSide = string.sub(collectedInputs.file, 1, collectedInputsCursor.file)
local rightSide = string.sub(collectedInputs.file, collectedInputsCursor.file+2)
collectedInputs.file = leftSide..rightSide
end
end
checkDialogLimits()
elseif p1 == keys.up or p1 == keys.left then
if fileDialog.currentTab == 1 then
collectedInputsCursor.file=collectedInputsCursor.file-1
elseif fileDialog.currentTab == 2 then
fileDialog.dirSelected=fileDialog.dirSelected-1
elseif fileDialog.currentTab == 3 then
fileDialog.fileSelected=fileDialog.fileSelected-1
elseif fileDialog.currentTab == 4 then
fileDialog.selectedFooterOption=fileDialog.selectedFooterOption-1
end
checkDialogLimits()
elseif p1 == keys.down or p1 == keys.right then
if fileDialog.currentTab == 1 then
collectedInputsCursor.file=collectedInputsCursor.file+1
elseif fileDialog.currentTab == 2 then
fileDialog.dirSelected=fileDialog.dirSelected+1
elseif fileDialog.currentTab == 3 then
fileDialog.fileSelected=fileDialog.fileSelected+1
elseif fileDialog.currentTab == 4 then
fileDialog.selectedFooterOption=fileDialog.selectedFooterOption+1
end
checkDialogLimits()
end
else
if state == "edit" then
if p1 == 29 or p1 == 157 then
inMenu = not inMenu
end
if inMenu then
if p1 == keys.up then
selectedSubMenu=selectedSubMenu-1
checkMenuPositions()
if menus[selectedMenu].items[selectedSubMenu][1] == "--" then
selectedSubMenu=selectedSubMenu-1
checkMenuPositions()
end
elseif p1 == keys.down then
selectedSubMenu=selectedSubMenu+1
checkMenuPositions()
if menus[selectedMenu].items[selectedSubMenu][1] == "--" then
selectedSubMenu=selectedSubMenu+1
checkMenuPositions()
end
elseif p1 == keys.left then
selectedSubMenu = 1
selectedMenu=selectedMenu-1
checkMenuPositions()
elseif p1 == keys.right then
selectedSubMenu = 1
selectedMenu=selectedMenu+1
checkMenuPositions()
elseif p1 == keys.enter then
doMenuAction(menus[selectedMenu].items[selectedSubMenu][3])
inMenu = false
end
else
if p1 == keys.up then
curLine=curLine-1
elseif p1 == keys.down then
curLine=curLine+1
elseif p1 == 201 then -- page up
curLine=curLine-(h-2)
elseif p1 == 209 then --page down
curLine=curLine+(h-2)
elseif p1 == keys.left then
curCol=curCol-1
elseif p1 == keys.right then
curCol=curCol+1
elseif p1 == keys.home then
curCol=0
elseif p1 == keys["end"] then
curCol=string.len(fileLinesArr[curLine])+1
elseif p1 == keys.tab then
isChanged=true
local leftSide = string.sub(fileLinesArr[curLine], 1, curCol)
local rightSide = string.sub(fileLinesArr[curLine], curCol+1)
fileLinesArr[curLine] = leftSide.." "..rightSide
curCol=curCol+2
resetBlink()
checkLinePosition()
checkColPosition()
elseif p1 == keys.enter then
isChanged=true
if curCol == string.len(fileLinesArr[curLine]) then
curLine=curLine+1
curCol=0
table.insert(fileLinesArr, curLine, "")
elseif curCol == 0 then
table.insert(fileLinesArr, curLine, "")
curLine=curLine+1
else
local leftSide = string.sub(fileLinesArr[curLine], 1, curCol)
local rightSide = string.sub(fileLinesArr[curLine], curCol+1)
fileLinesArr[curLine] = leftSide
table.insert(fileLinesArr, curLine+1, rightSide)
curLine=curLine+1
curCol=0
end
elseif p1 == keys.backspace then
isChanged=true
if curCol > 0 then
local leftSide = string.sub(fileLinesArr[curLine], 1, curCol-1)
local rightSide = string.sub(fileLinesArr[curLine], curCol+1)
fileLinesArr[curLine] = leftSide..rightSide
curCol=curCol-1
elseif curCol == 0 and curLine > 1 then
local newCurCol = string.len(fileLinesArr[curLine-1])
fileLinesArr[curLine-1] = fileLinesArr[curLine-1] .. fileLinesArr[curLine]
table.remove(fileLinesArr, curLine)
curLine = curLine -1
curCol = newCurCol
end
elseif p1 == keys.delete then
isChanged=true
if curCol < string.len(fileLinesArr[curLine]) then
local leftSide = string.sub(fileLinesArr[curLine], 1, curCol)
local rightSide = string.sub(fileLinesArr[curLine], curCol+2)
fileLinesArr[curLine] = leftSide..rightSide
elseif curCol == string.len(fileLinesArr[curLine]) and curLine < #fileLinesArr then
fileLinesArr[curLine] = fileLinesArr[curLine] .. fileLinesArr[curLine+1]
table.remove(fileLinesArr, curLine+1)
end
end
checkLinePosition()
checkColPosition()
end
resetBlink()
elseif state == "msg" then
if p1 == keys.enter then
state = "edit"
end
end
end
elseif event == "char" then
if showingMessage then
elseif showAboutBox then
elseif showingFileDialog then
if fileDialog.currentTab == 1 then
local leftSide = string.sub(collectedInputs.file, 1, collectedInputsCursor.file)
local rightSide = string.sub(collectedInputs.file, collectedInputsCursor.file+1)
collectedInputs.file=leftSide..p1..rightSide
collectedInputsCursor.file=collectedInputsCursor.file+1
checkDialogLimits()
end
else
if state == "edit" then
isChanged=true
local leftSide = string.sub(fileLinesArr[curLine], 1, curCol)
local rightSide = string.sub(fileLinesArr[curLine], curCol+1)
fileLinesArr[curLine] = leftSide..p1..rightSide
curCol=curCol+1
resetBlink()
checkLinePosition()
checkColPosition()
end
end
elseif event == "timer" and p1 == timer then
if state == "edit" then
drawScreen(term)
elseif state == "additem" then
--displayAddItem()
elseif state == "msg" then
--displayMsg(currentMessage)
end
if showingFileDialog then
drawFileDialog(term)
end
if showingMessage then
drawMessage(term)
end
if showAboutBox then
drawAbout(term)
end
timer = os.startTimer(0.01)
end
if os.clock() - lastBlinkTime > 0.5 then
lastBlinkTime = os.clock()
isBlinking = not isBlinking
end
end
saveSettings()
setColors(term, colors.black, colors.white, colors.black, colors.white)
term.clear()
term.setCursorPos(1,1)

Add Comment

Please, Sign In to add comment