func main()
func q(s:[]char)
for i(0,195)
if(s[i]='\n')
do s:~"\\n"
elif(s[i]='\\'|s[i]='"')
do s:~"\\\{s[i]}"
else
do s:~"\{s[i]}"
end if
end for
do cui@print(s~"\")\nend func\n")
end func
do q("func main()\nfunc q(s:[]char)\nfor i(0,195)\nif(s[i]='\\n')\ndo s:~\"\\\\n\"\nelif(s[i]='\\\\'|s[i]='\"')\ndo s:~\"\\\\\\{s[i]}\"\nelse\ndo s:~\"\\{s[i]}\"\nend if\nend for\ndo cui@print(s~\"\\\")\\nend func\\n\")\nend func\ndo q(\"")
end func