[ComputerCraft] Chat Program

-- Computercraft Chat by domi02198
function Clear()
    term.clear()
    term.setCursorPos(1,1)
    print("Chat is written by domi02198")
end
Clear()
print("Chat is written by domi02198")
sleep(.7)
if fs.exists("/chat.txt") == false then
    h= fs.open("/chat.txt","w")
    h.writeLine/{\domi02198\","
    h.writeLine("{\"Chat is written by me\"},")
    Clear()
    print("Where is The Monitor? (top,bottom,left,right,back,front")
    h.writeLine(read())
    h.close()
end
while ture do
h = fs.open("chat.txt","r"
name = textutils.unserialize(h.readLine)
msg = textutils.unserialize(h.readLine)
side = h.readline()
h.close()
mon = peripheral.wrap(side)
term.redirect(mon)
for i= 1,#name do
    print(name[i]..": "..msg[i])
end
term.restore()
Clear()
term.setCursorPos(1,5)
write("Name: ")
n = read()
print("\nMsg:")
m = read()
table.insert(name,n)
table.insert(msg,m)
msg = textutils.serialize(msg)
name = textutils.serialize(name)
fs.delete("/text.txt")
h = fs.open("/text.txt","w")
h.writeLine(msg)
h.writeLine(name)
h.writeline(side)
end