Actually code of sanitize

/proc/sanitize(var/t)
	var/index = findtext(t, "\n")
	while(index)
		t = copytext(t, 1, index) + "#" + copytext(t, index+1)
		index = findtext(t, "\n")

	index = findtext(t, "\t")
	while(index)
		t = copytext(t, 1, index) + "#" + copytext(t, index+1)
		index = findtext(t, "\t")
	index = findtext(t, "я")
	while(index)
		t = copytext(t, 1, index) + "____255;" + copytext(t, index+1)
		index = findtext(t, "я")

	t = html_encode(t)

	index = findtext(t, "____255;")
	while(index)
		t = copytext(t, 1, index) + "ÿ" + copytext(t, index+8)
		index = findtext(t, "____255;")

	return t

/proc/sanitize_ya(var/t)
	var/index = findtext(t, "я")
	while(index)
		t = copytext(t, 1, index) + "____255;" + copytext(t, index+1)
		index = findtext(t, "я")

	t = html_encode(t)

	index = findtext(t, "____255;")
	while(index)
		t = copytext(t, 1, index) + "я" + copytext(t, index+8)
		index = findtext(t, "____255;")
	return t