(set message (quote (HELLO WOLRD (HELLO LOVE ME) (I LOVE YOU (IF YOU LOVE ME)))))
(writefile "hello.txt" message)
(let data (readfile "hello.txt"))
(print data)
(print "\n")
