Auto scroll the terminal window

Code:
EXPORT AdivinarODeducir_Numero()

//Juego Matemático versión 0.8 By JaiMeza www.jaimeza.org

//test CAS Version: 1.1.2-11 and Operating System: version 6.2.9200

begin

    // Definición de Variables y tipo de contenedor

    local intentos := 0;

    local total_intentos := 0;

    local num_ingresado :=  0;

    local num_secreto := IP( random ( 1, 100 ) );

    

    print(); 

    print( "*** Ejecución Iniciada. ***" ); freeze;

    wait;

    

    // Presentación

    print( "Juego Matemático versión 0.8" );

    wait;

    print( "El programa genera un número real entre 1 y 100. Trate de deducirlo como recomendación en 8 intentos como máximo" );

    wait;

    

    // Entrada de Datos

    print( "Ingrese el # de intentos personalizados" );

    //freeze;

    wait( 1 );

    if NOT(input( total_intentos,"Total de Intentos","Intentos=","Digite un # como máximo total de intentos" ))

        then

        kill;

    end;

    wait;

    total_intentos := abs(total_intentos); // si el usuario ingresa números negativos se corrige

    print( "Intento #" + total_intentos);

    wait;

    intentos := total_intentos;

    

    print( "solo para hacer pruebas num aleatorio=" + num_secreto); // elimine esta sentencia para jugar verdaderamente

    wait;

    

    if NOT( input( num_ingresado,"Deducir_Numero","Num Ingresado=","Cual es el numero?" ) )

        then kill;

    end;

    print( ">"+num_ingresado );

    

    while( num_secreto <> num_ingresado and intentos > 1 ) do

        if num_secreto > num_ingresado then

            print( "El numero deducido es MENOR que el numero en cuestión" );

            wait;

            else

            print( "El numero deducido es MAYOR que el numero en cuestión" );

            wait;

        end;

        print("");

        

        intentos := intentos - 1; // decrementa en 1 el número de intentos

        print( "Le quedan "+intentos+" intento(s):" );

        print("Intento #" + intentos);

        //freeze;

        wait;

        if NOT( input( num_ingresado,"Deducir_Numero","Num Ingresado=","Cual es el numero?" ) ) then

            kill;

        end;

        print( ">"+num_ingresado );

    end;

    

    if num_secreto <> num_ingresado then

        print( "Perdió! trato en "+ ( ( total_intentos + 1 ) - intentos ) + " intento(s.) :~(, pero el numero era: "+ num_secreto);

        else

        print( "Gano! Usted lo dedujo en: "+ ( ( total_intentos + 1 ) - intentos ) +" intento(s.)" );

    end;

    print( "*** Ejecución Finalizada. ***" );

    

    //freeze;

    return "Done";

    

end;