Secciones de la página

codetest. htm

HyperText markup language

Árbol de ficheros

Tol

Artículos del sitio

Presentación de Tol

Todos los programas

Simuladores visuales

Sitios que me gustan

Por categorías

Algoritmia

Búsqueda y ordenación

Computación fisiológica

Editorial y edición

Gráficos de datos

Herramientas y utilidades

Hipertexto

Informática forense

Lectura óptica de datos

Metaprogramación

No determinista

Ofimática

Recursión e iteración

Reglas y restricciones

Series y estadística









codetest.htm de SHi.SyntaxHighlight

Fichero de salida con el resultado

HyperText markup language

<!DOCTYPE
  html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"[]>
<html xmlns="http://www.w3.org/1999/xhtml" lang="es" xml:lang="es">
<head>
<meta http-equiv="content-type" content="text/html; charset=ISO-8859-1" />
<link href="code.css" rel="stylesheet" type="text/css" />
<title>Pruebas realzado de codigo</title>
</head>
<body>

<pre><code><span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// FILE    : gpl.tol</span>
<span class='CodRem'>// AUTHOR  : http://www.asolver.com</span>
<span class='CodRem'>// PURPOSE : Funciones para crear graficos polares en estrella con Gnuplot,</span>
<span class='CodRem'>// son especificas de esta aplicacion, no son generales.</span>
<span class='CodRem'>// Depende del directorio de instalacion de GnuPlot.</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// CONSTANTS</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>

<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Text GplExe = Q(FilDos(Q(<span class='CodTxt'>"%BIN%/gnuplot/bin/pgnuplot"</span>)));
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Ruta directorios donde esta instalado Gnuplot, depende de la instalacion.
Notese la necesidad de comillas dentro de comillas."</span>,
GplExe);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Text GplPolar2x20 = <span class='CodTxt'>"polar2x20"</span>;
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Prefijo para los ficheros Gnuplot de programacion (.gpl) y datos (.dar)."</span>,
GplPolar2x20);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Text GplDat =
<span class='CodTxt'>" 0, a01, c01
 18, a02, c02
 36, a03, c03
 54, a04, c04
 72, a05, c05
 90, a06, c06
108, a07, c07
126, a08, c08
144, a09, c09
162, a10, c10
180, a11, c11
198, a12, c12
216, a13, c13
234, a14, c14
252, a15, c15
270, a16, c16
288, a17, c17
306, a18, c18
324, a19, c19
342, a20, c20
360, a01, c01
"</span>;
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Plantilla de datos especifica para crear de graficos polares en estrella.
Permite generar graficos de 2 series de datos de 20 preguntas, cada 18º,
con respuestas en el rango del 0 al 5.
Los datos son etiquetas que seran reemplazados por los valores que
correspondan en cada llamada."</span>,
GplDat);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// FUNCTIONS</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>

<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Real PdfPolar2x20(Text outPth, <span class='CodRem'>// Ruta del fichero png de salida</span>
                   Set  repTab) <span class='CodRem'>// Tabla de reemplazamiento con datos a pintar</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  Text seePth = CtrDir+<span class='CodTxt'>"/semilla/"</span>+
                GplPolar2x20+<span class='CodTxt'>".see"</span>; <span class='CodRem'>// Semilla de programacion Gnuplot</span>
  Text gplPth = GplPolar2x20+<span class='CodTxt'>".gpl"</span>; <span class='CodRem'>// Programacion Gnuplot</span>
  Text datPth = GplPolar2x20+<span class='CodTxt'>".dat"</span>; <span class='CodRem'>// Fichero de datos para Gnuplot</span>

  Text WriteFile(datPth, ReplaceTable(GplDat, repTab)); <span class='CodRem'>// Escribe datos</span>
  Text seeTxt = ReadFile(seePth); <span class='CodRem'>// Lee la semilla de programacion</span>
  Text WriteFile(gplPth, Replace(seeTxt,<span class='CodTxt'>"web/shi_syntaxhighlight/codetest.html"</span>,outPth)); <span class='CodRem'>// Escribe programa</span>

  Text cmdTxt = GplExe+<span class='CodTxt'>" "</span>+gplPth;   <span class='CodRem'>// Ejecutable Gnuplot y programa .gpl</span>

  Real cmdExe = System(cmdTxt);
  Text cmdMsg = <span class='CodTxt'>"    "</span>+If(cmdExe, <span class='CodTxt'>"Plot OK"</span>, <span class='CodTxt'>"Plot ERROR"</span>)+<span class='CodTxt'>" -&gt; "</span>;
  Text WriteLn(cmdMsg+outPth);
  cmdExe
};
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Retorna TRUE si puede crear el fichero grafico Png de ruta outPth."</span>,
PdfPolar2x20);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
</code></pre>

<hr />

<pre><code><span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// FILE    : sqlqry.tol</span>
<span class='CodRem'>// AUTHOR  : http://www.asolver.com</span>
<span class='CodRem'>// PURPOSE : Funciones con los queries basicos de la aplicacion</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// FUNCTIONS</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>

<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Text SqlLitNam(Text ctrCod, <span class='CodRem'>// Control, periodo en el que se realiza</span>
               Text domCod, <span class='CodRem'>// Dominio</span>
               Text anyCod) <span class='CodRem'>// Codigo de para localizar el nombre</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  Text sqlTxt = <span class='CodTxt'>"
    select Etiqueta
    from   Literal
    where
      Control = '"</span>+ctrCod+<span class='CodTxt'>"' and "</span>+
    <span class='CodTxt'>" Dominio = '"</span>+domCod+<span class='CodTxt'>"' and "</span>+
    <span class='CodTxt'>" Codigo  = '"</span>+anyCod+<span class='CodTxt'>"'; "</span>;

  Set sqlSet = DBTable(sqlTxt);

  If(EQ(Card(sqlSet),1), sqlSet[1][1], <span class='CodTxt'>"ERROR"</span>) <span class='CodRem'>// Solo puede haber 1</span>
};
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Retorna el nombre de algo dado un periodo, su dominio y su codigo."</span>,
SqlLitNam);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Text SqlResAnd(Text ctrCod, <span class='CodRem'>// Control, periodo</span>
               Text prgCod, <span class='CodRem'>// Codigo de programa (opcional)</span>
               Text gruCod, <span class='CodRem'>// Codigo de grupo (opcional)</span>
               Text curCod, <span class='CodRem'>// Codigo de curso (opcional)</span>
               Text prfCod, <span class='CodRem'>// Codigo del profesor (opcional)</span>
               Text asiCod, <span class='CodRem'>// Codigo de la asignatura (opcional)</span>
               Text preCod) <span class='CodRem'>// Codigo de pregunta</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  Text ctrQry = If(ctrCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Control    = '"</span>+ctrCod+<span class='CodTxt'>"'"</span>);
  Text prgQry = If(prgCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Programa   = '"</span>+prgCod+<span class='CodTxt'>"'"</span>);
  Text gruQry = If(gruCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Grupo      = '"</span>+gruCod+<span class='CodTxt'>"'"</span>);
  Text curQry = If(curCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Curso      = '"</span>+curCod+<span class='CodTxt'>"'"</span>);
  Text prfQry = If(prfCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Profesor   = '"</span>+prfCod+<span class='CodTxt'>"'"</span>);
  Text asiQry = If(asiCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Asignatura = '"</span>+asiCod+<span class='CodTxt'>"'"</span>);
  Text preQry = If(preCod==<span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>"Pregunta   = '"</span>+preCod+<span class='CodTxt'>"'"</span>);
  
  Set  wheSet = [[ctrQry, prgQry, gruQry, curQry, prfQry, asiQry, preQry]];
  Set  wheSel = Select(wheSet, Real(Text txtQry) { txtQry != <span class='CodTxt'>""</span> });
  
  Set2Txt(wheSel, <span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>" and "</span>, <span class='CodTxt'>" and "</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>, <span class='CodTxt'>""</span>)
};
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Retorna una serie de condiciones Sql para la tabla Respuestas enlazadas con
el operador and.
Aquellos argumentos de entrada cuyo valor sea nulo no apareceran en la 
serie de condiciones."</span>,
SqlResAnd);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
Set SqlResLst(Text ctrCod, <span class='CodRem'>// Control, periodo</span>
              Text prgCod, <span class='CodRem'>// Codigo de programa (opcional)</span>
              Text gruCod, <span class='CodRem'>// Codigo de grupo (opcional)</span>
              Text curCod, <span class='CodRem'>// Codigo de curso (opcional)</span>
              Text prfCod, <span class='CodRem'>// Codigo del profesor (opcional)</span>
              Text asiCod, <span class='CodRem'>// Codigo de la asignatura (opcional)</span>
              Text preCod) <span class='CodRem'>// Codigo de pregunta</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  Text wheQry = SqlResAnd(ctrCod,prgCod,gruCod,curCod,prfCod,asiCod,preCod);

  Text sqlTxt = <span class='CodTxt'>"
    select CInt(Respuesta)
    from   Respuesta 
    where 
      Respuesta &gt;= '1' and
      Respuesta &lt;= '5' and 
    "</span> + wheQry + <span class='CodTxt'>";"</span>;

<span class='CodRem'>//Text WriteLn(sqlTxt);</span>

  Set sqlSet = DBTable(sqlTxt);

  If(Card(sqlSet), Traspose(sqlSet)[1], Empty)
};
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
PutDescription(
<span class='CodTxt'>"Retorna la lista de respuestas que cumplen unas determinadas condiciones de
control, programa, grupo, curso, profesor, asignatura y pregunta.
Aquellos campos para los que su codigo sea nulo quedan libres en el query.
El campo Respuesta es de texto pues se admite la respuesta ?,
pero en este querie el campo Respuesta se convierte a entero CInt()."</span>,
SqlResLst);
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>

</code></pre>

<hr />

<pre><code><span class='CodRem'>-- ///////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>-- FILE    : edi.sql</span>
<span class='CodRem'>-- AUTHOR  : http://www.asolver.com</span>
<span class='CodRem'>-- PURPOSE : Dos select de ejemplo para datos procedentes de EDI.</span>
<span class='CodRem'>-- ///////////////////////////////////////////////////////////////////////////</span>

<span class='CodRem'>-- ///////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>-- SlsUltLst</span>
<span class='CodRem'>-- ///////////////////////////////////////////////////////////////////////////</span>

select
  Tienda.Empresa         as Empresa,
  SlsUltDat.TiendaCodigo as TiendaCodigo,
  SlsUltDat.Departamento as Departamento,
  Tienda.Sucursal        as TiendaSucursal,
  Tienda.Nombre          as TiendaNombre,
  Tienda.Provincia       as TiendaProvincia,
  Tienda.Comunidad       as TiendaComunidad,
  SlsUltDat.FechaInicio  as FechaInicio,
  SlsUltDat.FechaFin     as FechaFin,
  SlsUltDat.ProductoEAN  as ProductoEAN,
  Producto.Codigo        as ProductoCodigo,
  Producto.Nombre        as ProductoNombre,
  Producto.Formato       as ProductoFormato,
  Producto.Fabricante    as ProductoFabricante,
  SlsUltDat.Venta        as Venta,
  SlsUltDat.Devolucion   as Devolucion
from
  Tienda right join
  (SlsUltDat left join Producto on SlsUltDat.ProductoEAN = Producto.EAN)
  on Tienda.CodigoOperacional = SlsUltDat.TiendaCodigo
order by
  Empresa,
  TiendaCodigo,
  Departamento,
  FechaInicio,
  ProductoEAN;

<span class='CodRem'>-- ///////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>-- SlsAbeWee</span>
<span class='CodRem'>-- Ventas semanales de la empresa ABE</span>
<span class='CodRem'>-- Ventas - Devolucion (que hay que sumar porque son negativas).</span>
<span class='CodRem'>-- ///////////////////////////////////////////////////////////////////////////</span>

select
  Departamento,
  Format(FechaInicio,<span class='CodTxt'>'WW'</span>,2,2) as Semana,
  min(FechaInicio) as minFecha,
  max(FechaFin)    as maxFecha,
  ProductoEAN,
  ProductoCodigo,
  ProductoNombre,
  ProductoFormato,
  Sum(Venta)+Sum(Devolucion) as VentaMenosDevolucion
from
  SlsAllLst
where
  Empresa = <span class='CodTxt'>'ABE'</span> and
  (Format(FechaInicio,<span class='CodTxt'>'WW'</span>,2,2) = Format(Now(),                <span class='CodTxt'>'WW'</span>,2,2) or
   Format(FechaInicio,<span class='CodTxt'>'WW'</span>,2,2) = Format(DateAdd(<span class='CodTxt'>'d'</span>,-7,Now()),<span class='CodTxt'>'WW'</span>,2,2))
group by
  Departamento,
  Format(FechaInicio,<span class='CodTxt'>'WW'</span>,2,2),
  ProductoEAN,
  ProductoCodigo,
  ProductoNombre,
  ProductoFormato
order by
  Format(FechaInicio,<span class='CodTxt'>'WW'</span>,2,2),
  ProductoEAN,
  Departamento

</code></pre>

<hr />

<pre><code><span class='CodRem'>#/////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>#/ FILE    : gif.gpl</span>
<span class='CodRem'>#/ AUTHOR  : http://www.asolver.com</span>
<span class='CodRem'>#/ PURPOSE : Gnu Plot Test 01.</span>
<span class='CodRem'>#/////////////////////////////////////////////////////////////////////////////</span>


<span class='CodRem'># Generate a gif format, font arial 10 of all text, size 800 x 500 pixels</span>
set term gif font <span class='CodTxt'>'arial'</span> 10 size 800, 500
set output <span class='CodTxt'>'gnuplot.01.gif'</span>
set datafile separator <span class='CodTxt'>';'</span>
set title <span class='CodTxt'>'Título ejemplo 01'</span>
set style data lines


<span class='CodRem'># Format dd/mm/yyyy (I try to define yyyy/mm/dd format but does not work)</span>
set timefmt <span class='CodTxt'>'%d/%m/%Y'</span>


set xdata time
set xlabel <span class='CodTxt'>'tiempo en días'</span>
set xrange [ <span class='CodTxt'>'1/6/2014'</span>:<span class='CodTxt'>'1/11/2014'</span> ]
set xtics rotate by 90
set format x <span class='CodTxt'>'%d/%m/%Y'</span>

set ylabel <span class='CodTxt'>'euros'</span>
set yrange [ 0 : ]

set grid


<span class='CodRem'># Put the time series label at top left</span>
set key left

<span class='CodRem'># plot data from gnuplot.01.dat:</span>
<span class='CodRem'>#   1:2 t -&gt; first column dates and second column data title serie.01</span>
<span class='CodRem'>#   1:3 t -&gt; first column dates and third  column data title serie.02</span>
plot <span class='CodTxt'>'gnuplot.01.dat'</span> using 1:2 t <span class='CodTxt'>'serie.01'</span>, \
     <span class='CodTxt'>'gnuplot.01.dat'</span> using 1:3 t <span class='CodTxt'>'serie.02'</span>

reset

</code></pre>

<hr />

<pre><code><span class='CodRem'>::////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>:: FILE    : pdf.bat</span>
<span class='CodRem'>:: AUTHOR  : http://www.asolver.com</span>
<span class='CodRem'>:: PURPOSE : Convierte de html a pdf, los ficheros necesitan el path completo,</span>
<span class='CodRem'>:: se usa doble % para pasar un solo % a HTML2PDF_Pilot.exe.</span>
<span class='CodRem'>::////////////////////////////////////////////////////////////////////////////</span>

<span class='CodTxt'>"C:\Program Files (x86)\Two Pilots\HTML2PDF Pilot\HTML2PDF_Pilot.exe"</span>^
  %CD%\web.memo\%1^
  %CD%\web.memo\%2^
  /jpeg 100^
  /margin-left 76^
  /margin-right 76^
  /margin-top 38^
  /margin-bottom 38^
  /pagenumbers center^
  /pagenumstr <span class='CodTxt'>"lazytol.com | %3 %%c de %%t"</span>^
  /author LazyTol^
  /subj Memoria^
  /title %3^
  /keyWords LazyTol^
  /psize A4^
  /protect yes</code></pre>

<hr />

<pre><code><span class='CodRem'>/*-///////////////////////////////////////////////////////////////////////////
// FILE    : cmm.css
// AUTHOR  : http://www.asolver.com
// PURPOSE : Cascade style sheet for syntax highlight test
///////////////////////////////////////////////////////////////////////////-*/</span>


<span class='CodRem'>/*-///////////////////////////////////////////////////////////////////////////
// Body
///////////////////////////////////////////////////////////////////////////-*/</span>

body
{
  margin:                0px 0px 0px 0px;
  padding:               0px 0px 0px 0px;
  text-align:            justify;
  font-family:           Arial, Helvetica, sans-serif;
  font-size:             16px;
  color:                 #000000;
  background-color:      #a0e0e0;
  letter-spacing:        -1px;
}


<span class='CodRem'>/*-///////////////////////////////////////////////////////////////////////////
// Divs hierarchy
///////////////////////////////////////////////////////////////////////////-*/</span>

div.Mid <span class='CodRem'>/* Middle main space */</span>
{
  margin:                0px;
  padding:               0px 186px 0px 186px;
  background-image:      url(<span class='CodSub'>'vida.en.agua.01.png'</span>);
}


div.Mem <span class='CodRem'>/* Outer membrane */</span>
{
  background:            #808080;
  border:                8px solid #808080;
  border-radius:         8px;
  box-shadow:            5px 5px 5px #404040;
}


div.Fix <span class='CodRem'>/* Fix position */</span>
{
  position:              fixed;
  top:                   16px;
  width:                 220px;
}


div.Lft <span class='CodRem'>/* Left position */</span>
{
  left:                  -62px;
  text-align:            right;
}


div.Lft:hover
{
  left:                  -12px;
}


div.Rgh <span class='CodRem'>/* Left position */</span>
{
  right:                 -62px;
  text-align:            left;
}


div.Rgh:hover
{
  right:                 -12px;
  text-align:            left;
}

</code></pre>

<hr />

<pre><code><span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// FILE    : arr.js</span>
<span class='CodRem'>// AUTHOR  : http://www.asolver.com</span>
<span class='CodRem'>// PURPOSE : Array functions</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>

<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// CONSTANTS</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
var ArrNil = new Array(); <span class='CodRem'>// The empty array</span>


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
<span class='CodRem'>// FUNCTIONS</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>

<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
function Arr2Txt(arr, <span class='CodRem'>// Array</span>
                 sep, <span class='CodRem'>// Separator (optional)</span>
                 ini, <span class='CodRem'>// Initial text (optional)</span>
                 end, <span class='CodRem'>// Final text (optional)</span>
                 lsp) <span class='CodRem'>// Last separator (optional)</span>
<span class='CodRem'>// PURPOSE: Returns a text with the catenation of all element in the array.</span>
<span class='CodRem'>//          The last separator lets do list like 1, 2, 3 y 4.</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  if(!sep) { sep = <span class='CodTxt'>""</span>;  } <span class='CodRem'>// If not definned then the empty string</span>
  if(!ini) { ini = <span class='CodTxt'>""</span>;  } <span class='CodRem'>// If not definned then the empty string</span>
  if(!end) { end = <span class='CodTxt'>""</span>;  } <span class='CodRem'>// If not definned then the empty string</span>
  if(!lsp) { lsp = sep; } <span class='CodRem'>// If not definned then like the separators</span>

  var str = ini;
  for(var pos=0; pos &lt; arr.length; pos++)
  {
    if(pos==0)                   { str = str +       arr[pos]; } <span class='CodRem'>// The first</span>
    else if((pos+1)==arr.length) { str = str + lsp + arr[pos]; } <span class='CodRem'>// The last</span>
    else                         { str = str + sep + arr[pos]; } <span class='CodRem'>// Middle</span>
  }
  return(str+end);
}


<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
function Arr2Pag(arr, <span class='CodRem'>// Array of numbers of pages</span>
                 end) <span class='CodRem'>// Ending (optional, default <span class='CodTxt'>"."</span>)
<span class='CodRem'>// PURPOSE: Returns a text with the catenation of all pages in the array,</span>
<span class='CodRem'>//          ordered and unique.</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  var ini = <span class='CodTxt'>"página"</span>; <span class='CodRem'>// Init for one</span>
  if(!end) { end = <span class='CodTxt'>"."</span>; }

  var uni = ArrStrUni(arr); <span class='CodRem'>// Order and remove duplicates pages</span>

       if(uni.length &lt; 1) { ini = <span class='CodTxt'>"adicional"</span>; }   <span class='CodRem'>// For 0</span>
  else if(uni.length &gt; 1) { ini = ini+<span class='CodTxt'>"s"</span>; }       <span class='CodRem'>// For 2, 3, ...</span>

  var res = Arr2Txt(uni, <span class='CodTxt'>", "</span>, ini+<span class='CodTxt'>" "</span>, end, <span class='CodTxt'>" y "</span>); <span class='CodRem'>// Pages</span>

  return(res);
}

<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
function Arr2Ul(arr, <span class='CodRem'>// Array of numbers of pages</span>
                cla) <span class='CodRem'>// Optional</span>
<span class='CodRem'>// PURPOSE: Returns a basic html ul/li list.</span>
<span class='CodRem'>//////////////////////////////////////////////////////////////////////////////</span>
{
  if(cla &amp;&amp; cla!=<span class='CodTxt'>""</span>) { cla = <span class='CodTxt'>" class='"</span>+cla+<span class='CodTxt'>"'"</span>; }
  
  var res = Arr2Txt(arr,                <span class='CodRem'>// Array</span>
                    <span class='CodTxt'>"&lt;/li&gt;&lt;li"</span>+cla+<span class='CodTxt'>"&gt;"</span>, <span class='CodRem'>// Separator</span>
                    <span class='CodTxt'>"&lt;ul&gt;&lt;li"</span> +cla+<span class='CodTxt'>"&gt;"</span>, <span class='CodRem'>// Initial</span>
                    <span class='CodTxt'>"&lt;/li&gt;&lt;/ul&gt;"</span>);      <span class='CodRem'>// End</span>
  return(res);
}

</code></pre>

<hr />

<pre><code><span class='CodTag'>&lt;?xml version=<span class='CodTxt'>"1.0"</span> encoding=<span class='CodTxt'>"UTF-8"</span>?&gt;</span>
<span class='CodTag'>&lt;urlset xmlns=<span class='CodTxt'>"http://www.google.com/schemas/sitemap/0.84"</span>&gt;</span>
<span class='CodTag'>&lt;url&gt;</span>
  <span class='CodTag'>&lt;loc&gt;</span>http://www.lazytol.com/<span class='CodTag'>&lt;/loc&gt;</span>
  <span class='CodTag'>&lt;priority&gt;</span>0.5<span class='CodTag'>&lt;/priority&gt;</span> 
  <span class='CodTag'>&lt;lastmod&gt;</span>2013-04-09T21:56:45+00:00<span class='CodTag'>&lt;/lastmod&gt;</span> 
  <span class='CodTag'>&lt;changefreq&gt;</span>monthly<span class='CodTag'>&lt;/changefreq&gt;</span> 
<span class='CodTag'>&lt;/url&gt;</span>
<span class='CodTag'>&lt;url&gt;</span>
  <span class='CodTag'>&lt;loc&gt;</span>http://www.lazytol.com/index.html<span class='CodTag'>&lt;/loc&gt;</span> 
  <span class='CodTag'>&lt;priority&gt;</span>0.5<span class='CodTag'>&lt;/priority&gt;</span> 
  <span class='CodTag'>&lt;lastmod&gt;</span>2013-04-09T21:56:44+00:00<span class='CodTag'>&lt;/lastmod&gt;</span> 
  <span class='CodTag'>&lt;changefreq&gt;</span>monthly<span class='CodTag'>&lt;/changefreq&gt;</span> 
<span class='CodTag'>&lt;/url&gt;</span>
<span class='CodTag'>&lt;url&gt;</span>
  <span class='CodTag'>&lt;loc&gt;</span>http://www.lazytol.com/absoluto.html<span class='CodTag'>&lt;/loc&gt;</span> 
  <span class='CodTag'>&lt;priority&gt;</span>0.5<span class='CodTag'>&lt;/priority&gt;</span> 
  <span class='CodTag'>&lt;lastmod&gt;</span>2013-04-09T21:56:44+00:00<span class='CodTag'>&lt;/lastmod&gt;</span> 
  <span class='CodTag'>&lt;changefreq&gt;</span>monthly<span class='CodTag'>&lt;/changefreq&gt;</span> 
<span class='CodTag'>&lt;/url&gt;</span>
<span class='CodTag'>&lt;/urlset&gt;</span></code></pre>

<hr />

<pre><code><span class='CodTag'>&lt;!DOCTYPE
  html
  PUBLIC
  <span class='CodTxt'>"-//W3C//DTD XHTML 1.0 Transitional//EN"</span>
  <span class='CodTxt'>"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"</span>[]&gt;</span>
<span class='CodRem'>&lt;!-- /////////////////////////////////////////////////////////////////////////
// FILE    : see.htm
// AUTHOR  : http://www.asolver.com
// PURPOSE : Semilla html con Tol embebido para librok.es, una web de LibrOk
////////////////////////////////////////////////////////////////////////// --&gt;</span>
<span class='CodTag'>&lt;html xmlns=<span class='CodTxt'>"http://www.w3.org/1999/xhtml"</span>&gt;</span>
<span class='CodTag'>&lt;head&gt;</span>
<span class='CodTag'>&lt;meta http-equiv=<span class='CodTxt'>"content-type"</span> content=<span class='CodTxt'>"text/html; charset=ISO-8859-1"</span> /&gt;</span>

<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"ROBOTS"</span>        content=<span class='CodTxt'>"INDEX, FOLLOW"</span> /&gt;</span>
<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"revisit-after"</span> content=<span class='CodTxt'>"7 days"</span> /&gt;</span>
<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"rating"</span>        content=<span class='CodTxt'>"GENERAL"</span> /&gt;</span>
<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"distribution"</span>  content=<span class='CodTxt'>"GLOBAL"</span> /&gt;</span>
<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"language"</span>      content=<span class='CodTxt'>"spanish"</span> /&gt;</span>

<span class='CodEmb'>&lt;{
<span class='CodRem'>// CtrXxx  Control variables inherit from make.tol</span>
<span class='CodRem'>// xxxXxx  Local variables created here, inside html code</span>
<span class='CodRem'>// XXX.XXX Text macro variables created here, inside html code.</span>

Set  DEF.KEY = [[<span class='CodTxt'>"librok"</span>,
                 <span class='CodTxt'>"libro"</span>, <span class='CodTxt'>"libros"</span>,
                 <span class='CodTxt'>"análisis"</span>,
                 <span class='CodTxt'>"corrección"</span>, <span class='CodTxt'>"correcciones"</span>,
                 <span class='CodTxt'>"guión"</span>, <span class='CodTxt'>"guiones"</span>, <span class='CodTxt'>"guionista"</span>, <span class='CodTxt'>"guionistas"</span>,
                 <span class='CodTxt'>"texto"</span>, <span class='CodTxt'>"textos"</span>,
                 <span class='CodTxt'>"literario"</span>, <span class='CodTxt'>"literarios"</span>,
                 <span class='CodTxt'>"autor"</span>, <span class='CodTxt'>"autora"</span>, <span class='CodTxt'>"autores"</span>, <span class='CodTxt'>"autoras"</span>,
                 <span class='CodTxt'>"editor"</span>, <span class='CodTxt'>"editora"</span>, <span class='CodTxt'>"editores"</span>, <span class='CodTxt'>"editoras"</span>,
                 <span class='CodTxt'>"productor"</span>, <span class='CodTxt'>"productora"</span>, <span class='CodTxt'>"productores"</span>, <span class='CodTxt'>"productoras"</span>,
                 <span class='CodTxt'>"editorial"</span>, <span class='CodTxt'>"editoriales"</span>, <span class='CodTxt'>"edición"</span>, <span class='CodTxt'>"ediciones"</span>]];

Text WIN.TIT = <span class='CodRem'>// Window title</span>
{
  Set  lstPst = PdbFirstN(SelPdb, CtrTit, Real(Set objPst)
                { objPst-&gt;pstTit != <span class='CodTxt'>""</span> });
  Set  lstTit = EvalSet(lstPst, Text(Set objPst)
                { objPst-&gt;pstTit+<span class='CodTxt'>"; "</span> });
  SetSum(lstTit)+<span class='CodTxt'>"Análisis y correcciones de guiones y textos literarios"</span>
};

Text MET.DES = <span class='CodRem'>// Page description</span>
{
  Set  lstPst = PdbFirstN(SelPdb, CtrDes, Real(Set objPst)
                { objPst-&gt;pstTit != <span class='CodTxt'>""</span> });
  Set  lstTit = EvalSet(lstPst, Text(Set objPst)
                { objPst-&gt;pstTit+<span class='CodTxt'>". "</span> });
  SetSum(lstTit)
};

Text MET.KEY = <span class='CodRem'>// Keywords</span>
{
  Set txtSet = EvalSet(SelPdb, Text(Set pdbObj)
  { pdbObj-&gt;pstTit+<span class='CodTxt'>" "</span>+pdbObj-&gt;pstTxt });

  Set2TxtKeyword(txtSet &lt;&lt; [[ DEF.KEY ]], 4, FALSE, 40) <span class='CodRem'>// Not ordered</span>
};

Text TAG.KEY = MET.KEY;

Text TmeEmpty; <span class='CodRem'>// Only definitions, no html code</span>
}&gt;</span>

<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"description"</span>   content=<span class='CodTxt'>""</span></span><span class='CodEmb'>&lt;{MET.DES}&gt;</span><span class='CodTag'><span class='CodTxt'>" /&gt;"</span></span>
<span class='CodTag'>&lt;meta name=<span class='CodTxt'>"keywords"</span>      content=<span class='CodTxt'>""</span></span><span class='CodEmb'>&lt;{MET.KEY}&gt;</span><span class='CodTag'><span class='CodTxt'>" /&gt;"</span></span>

<span class='CodTag'>&lt;link rel=<span class='CodTxt'>"icon"</span> href=<span class='CodTxt'>"../favicon.ico"</span> /&gt;</span>
<span class='CodTag'>&lt;link href=<span class='CodTxt'>"../css/common.css"</span> rel=<span class='CodTxt'>"stylesheet"</span> type=<span class='CodTxt'>"text/css"</span> /&gt;</span>

<span class='CodTag'>&lt;title&gt;</span><span class='CodEmb'>&lt;{WIN.TIT}&gt;</span><span class='CodTag'>&lt;/title&gt;</span>

<span class='CodEmb'>&lt;script type=<span class='CodTxt'>"text/javascript"</span>&gt;
  var _gaq = _gaq || [];
  _gaq.push([<span class='CodSub'>'_setAccount'</span>, <span class='CodSub'>'AU-72131254-1'</span>]);
  _gaq.push([<span class='CodSub'>'_trackPageview'</span>]);

  (function() {
    var ga = document.createElement(<span class='CodSub'>'script'</span>);
    ga.type = <span class='CodSub'>'text/javascript'</span>;
    ga.async = true;
    ga.src = (<span class='CodSub'>'https:'</span> == document.location.protocol ?
              <span class='CodSub'>'https://ssl'</span> : <span class='CodSub'>'http://www'</span>) + <span class='CodSub'>'.google-analytics.com/ga.js'</span>;
    var s = document.getElementsByTagName(<span class='CodSub'>'script'</span>)[0];
    s.parentNode.insertBefore(ga, s);
  })();
&lt;/script&gt;</span>
<span class='CodEmb'>&lt;script type=<span class='CodTxt'>"text/javascript"</span> src=<span class='CodTxt'>"../src/common.js"</span>&gt;&lt;/script&gt;</span>

<span class='CodTag'>&lt;/head&gt;</span>

<span class='CodTag'>&lt;body&gt;</span>

<span class='CodTag'>&lt;div id=<span class='CodTxt'>"fb-root"</span>&gt;</span><span class='CodTag'>&lt;/div&gt;</span>
<span class='CodEmb'>&lt;script type=<span class='CodTxt'>"text/javascript"</span>&gt;(function(d, s, id) {
  var js, fjs = d.getElementsByTagName(s)[0];
  if (d.getElementById(id)) {return;}
  js = d.createElement(s); js.id = id;
  js.src = <span class='CodTxt'>"//connect.facebook.net/es_ES/all.js#xfbml=1"</span>;
  fjs.parentNode.insertBefore(js, fjs);
}(document, <span class='CodSub'>'script'</span>, <span class='CodSub'>'facebook-jssdk'</span>));&lt;/script&gt;</span>

<span class='CodTag'>&lt;div id=<span class='CodTxt'>"wrapper"</span>&gt;</span>

  <span class='CodRem'>&lt;!-- header: ini ----------------------------------------------------------&gt;</span>
  <span class='CodTag'>&lt;div id=<span class='CodTxt'>"header"</span>&gt;</span>
    <span class='CodTag'>&lt;div id=<span class='CodTxt'>"logo"</span>&gt;</span>
      <span class='CodTag'>&lt;a href=<span class='CodTxt'>"http://www.librok.es"</span>&gt;</span>
        <span class='CodTag'>&lt;h1&gt;</span>libr<span class='CodTag'>&lt;b&gt;</span>ok<span class='CodTag'>&lt;/b&gt;</span><span class='CodTag'>&lt;/h1&gt;</span>
      <span class='CodTag'>&lt;/a&gt;</span>
      <span class='CodTag'>&lt;p&gt;</span>Análisis y correcciones de guiones y textos literarios<span class='CodTag'>&lt;/p&gt;</span>        
      <span class='CodTag'>&lt;p&gt;</span>
        <span class='CodTag'>&lt;a href=<span class='CodTxt'>"https://twitter.com/share"</span>
           class=<span class='CodTxt'>"twitter-share-button"</span>
           data-count=<span class='CodTxt'>"horizontal"</span>&gt;</span>Tweet<span class='CodTag'>&lt;/a&gt;</span>
           <span class='CodEmb'>&lt;script type=<span class='CodTxt'>"text/javascript"</span>
                   src=<span class='CodTxt'>"//platform.twitter.com/widgets.js"</span>&gt;&lt;/script&gt;</span>
      <span class='CodTag'>&lt;/p&gt;</span>        
      <span class='CodTag'>&lt;p&gt;</span>
        <span class='CodTag'>&lt;div class=<span class='CodTxt'>"fb-like"</span>
             data-href=<span class='CodTxt'>"http://www.librok.es"</span>
             data-send=<span class='CodTxt'>"true"</span>
             data-layout=<span class='CodTxt'>"button_count"</span>
             data-width=<span class='CodTxt'>"450"</span>
             data-show-faces=<span class='CodTxt'>"true"</span>
             data-font=<span class='CodTxt'>"arial"</span>&gt;</span><span class='CodTag'>&lt;/div&gt;</span>
      <span class='CodTag'>&lt;/p&gt;</span>        
    <span class='CodTag'>&lt;/div&gt;</span>
  <span class='CodTag'>&lt;/div&gt;</span>
  <span class='CodRem'>&lt;!-- header: end ----------------------------------------------------------&gt;</span>

  <span class='CodTag'>&lt;div id=<span class='CodTxt'>"page"</span>&gt;</span>
    <span class='CodTag'>&lt;div id=<span class='CodTxt'>"page-bgtop"</span>&gt;</span>
      <span class='CodTag'>&lt;div id=<span class='CodTxt'>"page-bgbtm"</span>&gt;</span>

        <span class='CodRem'>&lt;!-- menu: ini ------------------------------------------------------&gt;</span>
        <span class='CodTag'>&lt;div id=<span class='CodTxt'>"menu"</span>&gt;</span>
          <span class='CodTag'>&lt;ul&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span><span class='CodTag'>&lt;a href=<span class='CodTxt'>"http://www.librok.es"</span>         &gt;</span>Inicio<span class='CodTag'>&lt;/a&gt;</span><span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span><span class='CodTag'>&lt;a href=<span class='CodTxt'>"../articulos/novelistas.html"</span> &gt;</span>Novelistas<span class='CodTag'>&lt;/a&gt;</span><span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span><span class='CodTag'>&lt;a href=<span class='CodTxt'>"../articulos/guionistas.html"</span> &gt;</span>Guionistas<span class='CodTag'>&lt;/a&gt;</span><span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span><span class='CodTag'>&lt;a href=<span class='CodTxt'>"../articulos/editores.html"</span>   &gt;</span>Editores<span class='CodTag'>&lt;/a&gt;</span><span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span><span class='CodTag'>&lt;a href=<span class='CodTxt'>"../articulos/productores.html"</span>&gt;</span>Productores<span class='CodTag'>&lt;/a&gt;</span><span class='CodTag'>&lt;/li&gt;</span>
          <span class='CodTag'>&lt;/ul&gt;</span>
        <span class='CodTag'>&lt;/div&gt;</span>
        <span class='CodRem'>&lt;!-- menu: end ------------------------------------------------------&gt;</span>

        <span class='CodRem'>&lt;!-- content: ini ---------------------------------------------------&gt;</span>
        <span class='CodTag'>&lt;div id=<span class='CodTxt'>"content"</span>&gt;</span>

          <span class='CodRem'>&lt;!-- ini posts ----------------------------------------------------&gt;</span>
          <span class='CodEmb'>&lt;{ 
            Set allPst = EvalSet(SelPdb, Text(Set objPst)
            {
              <span class='CodTxt'>"&lt;div class='"</span>+objPst-&gt;pstTyp+<span class='CodTxt'>"'&gt;"</span>+
              If(objPst-&gt;pstTyp != <span class='CodTxt'>"post"</span>, objPst-&gt;pstHtm, <span class='CodRem'>// book, results</span>
              { 
                objPst-&gt;pstTh1+<span class='CodTxt'>"
                &lt;div class='entry'&gt;"</span> + objPst-&gt;pstHtm + <span class='CodTxt'>"&lt;/div&gt;
                "</span>
              })+
              <span class='CodTxt'>"&lt;/div&gt;\n\n"</span>
            });
            Text SetSum(allPst); <span class='CodRem'>// Escribe todos los posts</span>
          }&gt;</span>
          <span class='CodRem'>&lt;!-- end posts ----------------------------------------------------&gt;</span>

          <span class='CodTag'>&lt;div style=<span class='CodTxt'>"clear: both;"</span>&gt;</span>&amp;nbsp;<span class='CodTag'>&lt;/div&gt;</span>
        <span class='CodTag'>&lt;/div&gt;</span>
        <span class='CodRem'>&lt;!-- content: end ---------------------------------------------------&gt;</span>

        <span class='CodRem'>&lt;!-- sidebar: ini ---------------------------------------------------&gt;</span>
        <span class='CodTag'>&lt;div id=<span class='CodTxt'>"sidebar"</span>&gt;</span>
          <span class='CodTag'>&lt;ul&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span>
              <span class='CodTag'>&lt;h2&gt;</span>Para novelistas<span class='CodTag'>&lt;/h2&gt;</span>
              <span class='CodTag'>&lt;ul&gt;</span>
                 <span class='CodEmb'>&lt;{ PhtLinkPstSet(CtrNov, TRUE); }&gt;</span>
              <span class='CodTag'>&lt;/ul&gt;</span>
            <span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span>
              <span class='CodTag'>&lt;h2&gt;</span>Para guionistas<span class='CodTag'>&lt;/h2&gt;</span>
              <span class='CodTag'>&lt;ul&gt;</span>
                 <span class='CodEmb'>&lt;{ PhtLinkPstSet(CtrGui, TRUE); }&gt;</span>
              <span class='CodTag'>&lt;/ul&gt;</span>
            <span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span>
              <span class='CodTag'>&lt;h2&gt;</span>Para editores<span class='CodTag'>&lt;/h2&gt;</span>
              <span class='CodTag'>&lt;ul&gt;</span>
                 <span class='CodEmb'>&lt;{ PhtLinkPstSet(CtrEdi, TRUE); }&gt;</span>
              <span class='CodTag'>&lt;/ul&gt;</span>
            <span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span>
              <span class='CodTag'>&lt;h2&gt;</span>Para productores<span class='CodTag'>&lt;/h2&gt;</span>
              <span class='CodTag'>&lt;ul&gt;</span>
                 <span class='CodEmb'>&lt;{ PhtLinkPstSet(CtrPro, TRUE); }&gt;</span>
              <span class='CodTag'>&lt;/ul&gt;</span>
            <span class='CodTag'>&lt;/li&gt;</span>
            <span class='CodTag'>&lt;li&gt;</span>
              <span class='CodTag'>&lt;h2&gt;</span>Enlaces<span class='CodTag'>&lt;/h2&gt;</span>
              <span class='CodTag'>&lt;ul&gt;</span>
                 <span class='CodEmb'>&lt;{ PhtLinkPstSet(CtrVar, TRUE); }&gt;</span>
              <span class='CodTag'>&lt;/ul&gt;</span>
            <span class='CodTag'>&lt;/li&gt;</span>
          <span class='CodTag'>&lt;/ul&gt;</span>
        <span class='CodTag'>&lt;/div&gt;</span>
        <span class='CodRem'>&lt;!-- sidebar: end ---------------------------------------------------&gt;</span>

        <span class='CodTag'>&lt;div style=<span class='CodTxt'>"clear: both;"</span>&gt;</span>&amp;nbsp;<span class='CodTag'>&lt;/div&gt;</span>
      <span class='CodTag'>&lt;/div&gt;</span>
    <span class='CodTag'>&lt;/div&gt;</span>
  <span class='CodTag'>&lt;/div&gt;</span>
<span class='CodTag'>&lt;/div&gt;</span>

<span class='CodTag'>&lt;div id=<span class='CodTxt'>"footer-wrapper"</span>&gt;</span>
  <span class='CodTag'>&lt;div id=<span class='CodTxt'>"footer"</span>&gt;</span>
    <span class='CodTag'>&lt;p&gt;</span>
      Copyright (c) 2011
      <span class='CodTag'>&lt;a href=<span class='CodTxt'>"http://www.librok.es"</span>&gt;</span>librok.es<span class='CodTag'>&lt;/a&gt;</span>.
      Todos los derechos reservados.
      Desarrollado por <span class='CodTag'>&lt;a href=<span class='CodTxt'>"http://www.asolver.com"</span>&gt;</span>asolver.com<span class='CodTag'>&lt;/a&gt;</span>
      con <span class='CodTag'>&lt;a href=<span class='CodTxt'>"http://www.freecsstemplates.org/"</span>&gt;</span>Free CSS Templates<span class='CodTag'>&lt;/a&gt;</span>.
    <span class='CodTag'>&lt;/p&gt;</span>
  <span class='CodTag'>&lt;/div&gt;</span>
<span class='CodTag'>&lt;/div&gt;</span>

<span class='CodTag'>&lt;/body&gt;</span>
<span class='CodTag'>&lt;/html&gt;</span>
</code></pre>

<hr />
 
</body>
</html>

Árbol de ficheros

SHi.SyntaxHighlight funciones de sintaxis realzada de codigo

  • ←make.tol programa de test de las funciones de sintaxis realzada en Tol
  • ←make.bat mandato de ejecucion del programa de test de realce de sintaxis
  • tol directorios que contienen fichero de codigo fuente Tol
    • cmm funciones comunes de manejo y generacion de textos y Html
      • ←txt.tol funciones para el manejo y la transformacion de textos
      • ←htm.tol funciones para generar codigo fuente en lenguaje Html
    • app funciones especificas de aplicacion de sintaxis realzada
      • ←shi.tol sintaxis realzada de código fuente en Tol, Xml, Html, etc.
    • ←inc.tol fichero con ordenes de inclusion de otros ficheros Tol
  • code.inp directorio con ficheros de codigo en diversos lenguajes para pruebas
    • ←arr.js codigo fuente en lenguaje Javascript
    • ←cmm.css ejemplo de Css, Cascading Style Sheets
    • ←edi.sql lenguaje Sql, Structured Query Language
    • ←gif.gpl fichero de especificacion de mandatos Gnuplot
    • ←gpl.tol ejemplo de Tol invocando a Gnuplot
    • ←map.xml ejemplo de codigo Xml, eXtensible Markup Language
    • ←pdf.bat ficheros de mandatos de Windows de Microsoft
    • ←see.htm lenguaje Html, HyperText Markup Language
    • ←sql.tol ejemplo de lenguaje Tol con codigo Sql embebido
  • code.out directorio de resultados con el codigo de entrada realzado
  • →resultado.html codigos fuente realzado en varios lenguajes de programacion
  • →shi_syntaxhighlight.pdf documento de funciones de la libreria de realce de sintaxis

2015 asolver.com | Aviso legal | XHTML | Δ Θ Ξ | Creative Commons | Mapa y funciones del sitio

Tol