Leer un texto de estadisticas

Aquí puedes preguntar o compartir tus dudas y conocimientos acerca del programa
Hola buenos dias, como siempre, programando en la madrugada me surgio una duda, al relajarme un rato jugando un juego on line, que curiosamente lo conoci hace poco y que lamentablemente no es con user y password, simplemente lo juegas y ya,

Mi duda surgio cuando navegando por la red la vez pasada encontre un programa que guarda en un texto las estadisticas de lo que juegas, todas tus matadas, muertes, suicidios , etc, etc, este es el texto que bota el programa

5|8|3|0|0|0|1|0|0|0|0|7|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0


Entonces pense si seria posible crear un programa que publike esas estadisticas en mi página web, antes claro crear un html, pero me intriga que cada numero esta dibidido en esos palitos xD

Entonces seria asi que diga;

Matadas: 5
Muertes: 8
suicidios: 3
y asi asi..

Tome este post como ejemplo,, http://www.amsspecialist.info/viewtopic.php?f=3&t=1002 , pero me cuesta entender, aunque alla leido el manual,, es un poco complejo :(
es muy facil, cojes el texto extraes:

5|8|3|0|0|0|1|0|0|0|0|7|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0


y entonces ejecutas una función de delimitación, por ejemplo en este caso seria de string a tabla.

Esta es la función para delimitar:
function DelimitedStringToTable(DelimitedString, Delimiter)
	tbReturn = {};
	local strWorking;
	local nPos = nil;
	local strData;
	local nTableIndex = 1;
	local nDelimiterLength = String.Length(Delimiter);
	
	if(nDelimiterLength < 1)then
		tbReturn[nTableIndex] = DelimitedString;
		return tbReturn;
	end
	
	strWorking = DelimitedString;
	nPos = String.Find(strWorking,Delimiter);
	while(nPos ~= -1)do
		strData = String.Left(strWorking,nPos-1);
		tbReturn[nTableIndex] = strData;
		nTableIndex = nTableIndex + 1;
		local nLength = String.Length(strWorking);
		strWorking = String.Right(strWorking,nLength - (nPos + (nDelimiterLength-1)));
		nPos = String.Find(strWorking,Delimiter);
	end
	if(strWorking ~= "")then
		tbReturn[nTableIndex] = strWorking;
	end
	
	return tbReturn;
end
esta función la tienes que añadir a global y para usarla seria así:
el_texto = "5|8|3|0|0|0|1|0|0|0|0|7|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0"

resultado = DelimitedStringToTable(el_texto, "|")

Dialog.Message("", "Matadas: "..resultado[1].."\r\nMuertes: "..resultado[2].."\r\nSuicidios: "..resultado[3]);
:yes:
Imagen

jaimevega ya no esta entre nosotros
Joder pablo como se te va la olla tio.