<?php
 
/******************************************************************************
 
 *       BBBB         AAA    RRRR    BBBB      AAA    ZZZZZZ  U     U  L           *
 
 *       B   B    A    A    R    R   B   B     A   A       ZZ  U     U  L           *
 
 *       B   B   A     A  R    R   B   B    A      A        ZZ   U     U  L           *
 
 *       BBBB       A     A  RRRR    BBBB    A     A     Z    U     U  L           *
 
 *       B   B   AAAAAAA  R  R    B   B   AAAAAAA    Z     U     U  L           *
 
 *     B    B  A     A  R   R   B    B  A     A   ZZ     U     U  L           *
 
 *     B    B  A     A  R    R  B    B  A     A  ZZ       U   U   L           *
 
 *     BBBBB   A     A  R    R  BBBBB   A     A  ZZZZZZ    UUU    LLLLLLL     *
 
 ******************************************************************************/
 
 
/* Ejemplo de utilización de Lista Genérica
 
 * Descripción: Este sencillo ejemplo muestra el funcionamiento de la lista
 
 * utilizando datos de tipo entero.
 
 * Autor: Matías Montes
 
 * Versión : 2.0
 
 */
 
 
/******************************************************************************/
 
/* Librerías y definiciones requeridas */
 
/*-------------------------------------*/
 
 
require_once("class.Lista.php");
 
 
if( !defined("MAX") ) define("MAX", 10);
 
 
function CompararEnteros($DatoEnteroIzq, $DatoEnteroDer)
 
{
 
   if ( ($DatoEnteroIzq) == ($DatoEnteroDer) ) $resultado = IGUAL;
 
   if ( ($DatoEnteroIzq) >  ($DatoEnteroDer) ) $resultado = MAYOR;
 
   if ( ($DatoEnteroIzq) <  ($DatoEnteroDer) ) $resultado = MENOR;
 
 
   return $resultado;
 
}
 
 
/******************************************************************************/
 
/* Programa Principal */
 
/*--------------------*/
 
 
//Instancio la lista
 
$L = new Lista("CompararEnteros");
 
 
//Inserto algunos datos
 
for(    $i=0 ; $i<MAX ; $i++ )
 
    $L->insertarDato(mt_rand(0, MAX));
 
 
//Obtengo el primer nodo
 
$cursor = $L->primero();
 
 
//Recorro la lista
 
while( $cursor != $L->fin() )
 
{
 
    //Pido el dato del cursor
 
    $miEntero = $L->getDato($cursor);
 
    //Salida
 
    echo $miEntero." ";
 
    $cursor =& $L->siguiente($cursor);
 
}
 
 
//Destruyo la Lista y libero el espacio usado
 
$L->destruir();
 
 
?>
 
 |