PHP Classes

File: Ejemplo1.php

Recommend this page to a friend!
  Classes of Matías montes   List   Ejemplo1.php   Download  
File: Ejemplo1.php
Role: Example script
Content type: text/plain
Description: Simple example using Integers
Class: List
Manage double-linked lists of sorted elements
Author: By
Last change: fixed a missing reference
Date: 19 years ago
Size: 2,159 bytes
 

Contents

Class file image Download
<?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();

?>