codice:
i = 1;
turn = 1;
test = "";
line1 = "";
while (Number(i)<=Number(length(text))) {
	set("add", substring(text, i, 1));
	check = ord(substring(text, Number(i)+1, 1));
	set("line" add turn, (eval("line" add turn)) add add);
	if (Number(check) == 13) {
		turn = Number(turn)+1;
		set("line" add turn, "");
		i = Number(i)+2;
	}
	i = Number(i)+1;
}
turn = turn-1;