No compila: el procedimiento Menu_Seleccio no está completo. Puede haber sido un problema al copiarlo. Prueba a usar el botón Code para recubrir el texto.
Está muy bien, para el relativo pequeño tamaño del código. Por cierto, que sepas que funciona en Linux, que es lo que uso yo a diario, compilando con el Adagraph para Linux.