File content as of revision 2:15facba8b8b4:

#include "mbed.h"//biblioteca por defecto 
#include "algo.h"//biblioteca creada que contiene las figuras del juego de tetris
#include "funcion_comun.h"
#include "funcion_pinpon.h"
#include "funcion_matriz.h"

//Ticker inter();

int main()
{
//orden de funciones
    test();
    borrar();
    mostrarj();
       
    while(1)//ciclo que determina segun lectura de la funcion analogo que caso del swtich tomar, es decir que juego elegir 
{    
        analogo();//se llama funcion para leer voltaje
        
        if(mx<0.4)//condicional que lleva al usuario al primer caso, en este caso juego de pin pon
            {
               op=1;//contiene las funciones del juego de pin pon
            }
         if(mx>0.7)//condicional que lleva al usuario al primer caso, en este caso juego de tetris
            {
                op=2;//contiene las funciones del juego de pin pon
            }
            
          switch(op)//switch que hace seleccion de juego
            {
            case 1: //contenido del juego de pin pon
            
                borrar();
                wait(0.2);
                inicio();
    
            while(1)//ciclo principal del juego
                {
                    mostrar();
                    analogo();
                    move_fig();
                    if(up==0)
                        {
                        j++; //la va sumando de a 1 a la variable puntero con el fin de que la pelota ascienda 
                        }
                     else
                        {
                        j--;//la va restando de a 1 a la variable puntero con el fin de que la pelota descienda 
                        }
            
                 }
                
                case 2://contenido del juego de tetris
                borrar();
                    while(1)
                    {
                        while(read_command()==0);
                            ingred_d();   
                            act_matrix(mat_tmp); 
                            for (cont=0;cont<fila;cont++)
                    {     
                analogo(); 
                //inter.attach(&mover_fig, 5);
                mover_fig();
                act_matrix(mat_tmp);
                imp_mat(mat_tmp);
                wait_ms(500);
                    }
                guardar_mat(mat_tmp);
                elim_lin();
                    }
                    }
       
}
}