414349_es-ES

liliconcom

¿Cómo usar JSL para dividir el texto sin ramificar en una tabla de varias líneas según la cantidad de bytes?

Pregunte a un experto:

Cómo usar el script para dividir el siguiente texto en 1 línea cada 64 caracteres,

598A0F0548917B44F6C87B44855B7B44D7637B44DA57BE45140B000000000000598A1405715D7B4433637B445CFF7A441F057B4460562A45DE04000000000000598A1905F6087B44C3357B4433F37A44A4007B44C07519455304000000000000598A1E055CFF7A44C3257B445CCF7A44F6D87A4460D10845D903000000000000

Obtenga este formulario

 

ScriptingVentanasRe: 如何 用 JSL 将 没有 分行 的 文本 按 字节 数 拆分 为 多 行 的 表格？

Muchos iban a hacer esto y depende un poco de cómo se vean tus cadenas (siempre tienen esa secuencia larga de ceros, es siempre divisible con 64, cuánto tiempo es).

 

A continuación se muestra una forma tal vez no tan común de hacerlo mediante el uso de Regex Match:

Names Default To Here(1);
txt = "598A0F0548917B44F6C87B44855B7B44D7637B44DA57BE45140B000000000000598A1405715D7B4433637B445CFF7A441F057B4460562A45DE04000000000000598A1905F6087B44C3357B4433F37A44A4007B44C07519455304000000000000598A1E055CFF7A44C3257B445CCF7A44F6D87A4460D10845D903000000000000";
splitCount = Length(txt) / 64; //amount of splits
regexPattern = repeat("(.{64})", splitCount); //create regex pattern to be used with Regex Match()
regexList = Regex Match(txt, regexPattern); //get list of splits
answer = Substr(regexList, 2); //drop first index, because it has the whole string (see scripting index for why)

//add to table
dt = New Table("test",
 New Column("test", Character, Values(answer)),
 New Column("lenght", Numeric, Continuous, << Set Each Value(Length(:test)))
);

También puede usar For loop y Substr, insertar valores adicionales en la cadena y usar Words después de eso

 

Editar:

Otro método de expresiones regulares:

Names Default To Here(1);

txtToSplit = "598A0F0548917B44F6C87B44855B7B44D7637B44DA57BE45140B000000000000598A1405715D7B4433637B445CFF7A441F057B4460562A45DE04000000000000598A1905F6087B44C3357B4433F37A44A4007B44C07519455304000000000000598A1E055CFF7A44C3257B445CCF7A44F6D87A4460D10845D903000000000000";
splitLength = "64";
regexPattern = "([^\n]{1,"||splitLength||"})";
replaceChar = ".";
result = Words(Regex(txtToSplit, regexPattern, "\1"||replaceChar,GLOBALREPLACE), replaceChar);

Con For loop y Substr:

Names Default To Here(1);

txtToSplit = "598A0F0548917B44F6C87B44855B7B44D7637B44DA57BE45140B000000000000598A1405715D7B4433637B445CFF7A441F057B4460562A45DE04000000000000598A1905F6087B44C3357B4433F37A44A4007B44C07519455304000000000000598A1E055CFF7A44C3257B445CCF7A44F6D87A4460D10845D903000000000000";
splitCount = Length(txtToSplit) / 64; //amount of splits
resultList = {};

For(i = 0, i < splitCount, i++,
 Insert Into(resultList, Substr(txtToSplit, 1+i*64, 64));
);
show(resultList);