View difference between Paste ID: Zvyiz26M and nq63aA39

--- A very basic 'hello, steve' program.
+local mon = peripheral.find("monitor")
 local speaker = peripheral.wrap("left")
-local sFile, sName = "histeve.txt", "" -- Our data file's name, and our user's name.
+local sFile = "data.txt"
--- We won't worry about finding the right directory to save our data in; we'll just use /
+local accent,range = "en",100
 
-if fs.exists(sFile) then -- Open the file if it exists, and get the user's name from it.
+function writemon(msg)
-	local hRead = assert(fs.open(sFile, "r")) -- assert will error for us if we can't open the file.
+ if mon then
-	-- the 'h' in the varaible name stands for 'handle', and 'read' is to remind me that I can only read from that handle.
+  mon.write(msg)
-	sName = hRead.readLine() -- Read a line of data from the handle
+  mX,mY = mon.getCursorPos()
-	hRead.close() -- Close the handle! This is extremely important, as not doing so can cause errors when writin/opening the file.
+  mon.setCursorPos(1,mY+1)
  end
 end
-if sName == "" then -- If the user's name doesn't exist, ask them for it.
+
-	print("Hello there, what's your name?")
+function writeln(msg)
-	local sInput = read()
+ print(msg)
-	if sInput ~= "" then
+ tX,tY = term.getCursorPos()
-		print("Hi, " .. sInput .. "!")
+ writemon(msg)
-		sName = sInput
+
-		-- Now, let's save the name.
+
-		hWrite = fs.open(sFile, "w") -- w for write! Note that this will also clear the file.
+function clear()
-		-- Note that if the above errors, you'll get an error message somewhere else. Use the example below to catch the error.
+ term.clear()
-		hWrite.write(sName) -- Write the user's name
+ term.setCursorPos(1,1)
-		hWrite.close() -- Close it; still very important.
+ if mon then
   mon.clear()
-		print("I'm currently calculating Pi to 1" .. string.rep("0", 20) .. "digits.") -- Banter. :)
+  mon.setCursorPos(1,1)
-		print("I'll see you again soon, " .. sName .. "!")
+ end
-		return
+
-	else
+
-		print("I'm sorry, I'm not allowed to speak to strangers, stranger.")
+function getUsername()
-		return -- exit :D
+ if fs.exists(sFile) then
-	end
+  local hRead = assert(fs.open(sFile, "r"))
   username = hRead.readAll()
--- We don't need to use an else here, since we're exiting in both branches of the above if statement.
+  hRead.close()
-print("Hi again, " .. sName .. "!\nHow are you doing today?") -- \n is a newline.
+ end
-read() -- Discard the input, this is just an example, after all :)
+
-print("Damnit! You made me garbagecollect all that work on my Pi digits!")
+
 rednet.open("back")
 username = "Steve"
 
 function help()
  writeln("Welcome to some shit chat")
  writeln("Press H to set your Handle")
  writeln("Press A to change the Accent")
  writeln("Press T to Type in the chat")
  writeln("Press E to Exit the program")
  writeln("Press R to adjust the Range")
 end
 
 clear()
 getUsername()
 help()
 
 while true do
  event, id, msg = os.pullEvent()
 
  if event == "rednet_message" then
   writeln(msg)
   spk = msg:gsub('%<[^)]*%>', "")
   speaker.speak(spk, range, accent)
 
  elseif event == "char" then
   if id == "t" then
    write("<"..username.."> ")
    msgsent = read()
    speaker.speak(msgsent, range, accent)
    writemon("<"..username.."> "..msgsent)
    rednet.broadcast("<"..username.."> "..msgsent)
 
   elseif id == "h" then
    write("New username: ")
    username = read()
    hWrite = fs.open(sFile, "w")
    hWrite.write(username)
    hWrite.close()
 
   elseif id == "a" then
    write("New accent: ")
    accent = read()
 
   elseif id == "r" then
    write("New range: ")
    range = read()
 
   elseif id == "e" then
    error("Quit program")
 
   end
 
  end
 
 end