CadenaPausada.java_

import javax.swing.JPanel;
import java.awt.Graphics;

// Muestra una cadena caracter por caracter

public class CadenaPausada extends JPanel implements Runnable
{
	Thread Hilo;
	String CAD = "Cadena pausada";
	String CAD_SALIDA = "";
	int indice = 0;

	public void start( )
	{
		if (Hilo == null)
		{
			Hilo = new Thread(this);
			Hilo.start( );
		}
	}

	public void run( )
	{
		// AQUI VA LA ANIMACION
		// Ciclo infinito
		while(true)
		{
			indice ++;
			if (indice > CAD.length())
			{
				indice = 0;
				CAD_SALIDA = "";
			}
			repaint();
			try { Thread.sleep(500); }
			catch(InterruptedException r)
			{// CODIGO PARA LA ATENCION A LA INTERRUPCION
			}
		}
	}

	public void paint(Graphics G)
	{
		G.clearRect(0, 0, 400, 250);
		CAD_SALIDA = CAD.substring(0, indice);
		G.drawString(CAD_SALIDA, 100, 100);		// (cadena, x, y)
	}
}