Cuaderno de campo, apuntes del mes de diciembre de 2011

El palmito de la Cueva Neptuno

viernes, 30 de diciembre de 2011

Entre las chapuzillas que me solicitaban el otro día estaba, como decía antes, recortar algunos vídeos antiguos con los que ilustrar unas páginas de espeleología que enlazaré otro día.
Son vídeos con muy mala calidad. Con más de 20 años (finales de los 80). Realizados originalmente con videocámara de super8 y digitalizados con una caja de pan bimb… bueno, digamos que todo lo que les faltan de técnica lo suplen con gran valor documental/sentimental.

He recortado un trozo correspondiente al curso práctico de espeleología que se realizó en la Cueva Neptuno, en la sierra de la Muela, en el que se aprovechó para topografía dicha cueva y en la que se puede apreciar el esplendor con que lucían el Palmito y la higuera que nacen en su interior.

Para quien no conozca la zona diré que la cueva Neptuno es una oquedad enorme en la ladera de la montaña junto a cala Aguilar, accesible por un gran agujero en su techo y en cuyo interior crecen un palmito y una higuera enormes, y que dadas las particulares condiciones (luz muy escasa y cenital, y mucha humedad) alcanzan una altura y un porte fabuloso.
Dada su ubicación exclusiva esta plantas son muy cuidadas, respetadas y atendidas (alguna poda desafortunada poda han tenido que sufrir). Actualmente unos de los brazos del palmito está en cabestrillo, ya que dada la longitud que alcanzan las ramas en busca de la luz tienden a hacerse extremadamente largas, delgadas y frágiles.

La cueva no dispone de más galerías o pasadizos que la sala principal en cuya parte más baja las filtraciones del mar forman un lago interior de gran belleza y donde en alguna ocasión hemos despedido el año viejo con un fresquito baño a medianoche.
Si se dispone de buena-muy buena capacidad pulmonar se puede salir buceando al exterior a través de una galería sumergida, pero esta es una actividad poco recomendable si se tiene algo de aprecio a la propia salud.

Nota: para comparación con el porte actual del palmito podéis ver el apunte de Jalesp en Flora de Murcia donde podéis ver una imagen más reciente.
Nota II: Pasen Vds. un feliz fin de año 2011

Comentarios desactivados
Trebol-a lo archivó en Curiosidades y Naturaleza

Resumir un vídeo largo, script

jueves, 29 de diciembre de 2011

Me han pasado unos amigos unos «encargitos al más puro estilo 100% Pringao Extreme. El más engorroso de todos es tratar de aprovechar unos vídeos antiguos para colgar en la web.

El problema es que son unos vídeos extremadamente largos (+1 hora) y con muy mala calidad (fueron grabados a principios de los 80 en super8 y digitalizados vaya usted a saber como/donde) y con un interés digamos que bajo-muy bajo para quien no sale en ellos, (especialmente si la duración del vídeo se prolongo muchos minutos).
Como no tenía ganas de comerme (gratis) la edición de vídeo extralarga que supondría seleccionar, cortar, mover, montar, editar… etc.. he tomado una decisión salomónica: que lo decida el azar.

Así es que me hice un script rapidito que mediante mencoder trocea un vídeo a intervalos y genera otro vídeo que vendría a ser un resumen del original con partes escogidas al azar.
Como no hay recodificación de vídeo/audio el proceso dura un instante (de un vídeo de 1Gb obtenemos un resumen de 35Mg en unos 15 segundos). Por si alguien le interesa, el script:
#!/bin/bash echo "Cambiar a $(pwd)" cd "$(pwd)"


  if [ -f "$1" ]; then
  	nombre=$(basename "$1")
  	nombreUnico=$(echo "$nombre" |  md5sum | cut -d " " -f1)
  	prefijo=${nombre/.*/}
  	sufijo=${nombre/*./}
  	identificacion=$(mplayer -identify "$1" -vo none -ao none)
  	clear
  	echo "La identificación dice que:"
  	duracion=$(echo "$identificacion" | grep "ID_LENGTH" | cut -d "=" -f2); duracion=${duracion/.*/}
  	while [ "$yn" != "s" ]; do
  		echo "Video dura $duracion segundos"
  		echo "---------------------------------"
  		read -p "Indica la duración de los fragmentos que se van a extraer (en segundos): " duracionFragmento
  		read -p "Indica el número de fragmentos de $duracionFragmento segudos que quieres obtener: " numeroFragmentos
  		echo
  		echo -n "Obtendriamos un vídeo de $numeroFragmentos fragmentos x $duracionFragmento segundos = "; longitudResumen=$(echo "scale=0; $duracionFragmento * $numeroFragmentos" | bc) ; echo " $longitudResumen segundos en total"
  		echo "scale=0; ($duracion - $longitudResumen)/($numeroFragmentos-1)"
  		longitudIgnora=$(echo "scale=0; ($duracion - $longitudResumen)/($numeroFragmentos-1)" | bc )
  		echo "Se ignoraría fragmentos de $longitudIgnora segundos"
  		read -p "Es esto lo que quieres? [sn]" yn 
  	done
  	reinicioSalto=$(expr $duracionFragmento + $longitudIgnora)
  	contador=0
  	for inicio in $(seq 1 $reinicioSalto $duracion); do
  		echo "Obtener $duracionFragmento segundos a partir del segundo $inicio"
  		let contador++
  		indice=$(printf "%02d" $contador)
  		mencoder "$1" -ss $inicio -endpos $duracionFragmento -ovc copy -oac copy -o "$nombreUnico""-parte_$indice.""$sufijo" 
  	done
  	mencoder $nombreUnico*".$sufijo" -oac copy -ovc copy -o "$prefijo""_resumen.""$sufijo"
  	find . -type f -name "$nombreUnico*$sufijo" -delete

else echo "El primer argumento debe ser un archivo de vídeo válido" echo "\"$1\" no cumple ese requisito" exit fi
Si se copia esto un archivo (videopartes.sh) y se ejecuta:

Obtienen la duración en seg del vídeo pasado como primer argumento

Solicita duración S (en segundos) deseada de los fragmentos F

Solicita Numero de fragmentos F deseados

Solicita confirmación y con esos datos obtiene del vídeo original fragmentos F de videos de duración S distribuidos a intervalos regulares

A continuación ensambla esos fragmentos en un nuevo vídeo con idéntica codificación video/audio

Se eliminan los fragmentos

No hay transiciones, ni fades, ni efecto ninguno. El vídeo original no es alterado

Ejemplo: Un vídeo dado de 2000 segundos. Obtener 25 fragmentos de 6 segundos.
Resultado: vídeo de 150 segundos tomando 6 segundos de imagen cada 74 segundos de vídeo

Otro día os enseño el resultado de esta edición-extra-rápida y algún fragmento de estos vídeos que son auténtica arqueología moderna de la espeleología Murciana.

5 comentarios
Trebol-a lo archivó en GNU/Linux y Imagen

Feliz gravidad y otros virus

jueves, 22 de diciembre de 2011 (Ayer)

Hoy es el primer día que me levanto después de tres días de cama, así es que mi cabeza da para poca cosa más allá que desearles Feliz Gravidad para el próximo aniversario del dia 25, se los acompaño con dos entrenenidos vídeos

El primero es una felicitación (probablemente demasiado geek para la mayoría) que no tardará mucho en llegar (buenísimo el Trending topic).

Carga retrasada de youtube

Y hablando de virus, este segundo vídeo es una compilación de los 200 virales que más éxito han tenido en internet durante el año 2011.

Si teneis interés en ver individualmente alguno de estos 200 vídeos a continuación teneis la lista completa a cada uno de ellos, hay de todos: por supuesto no podían faltar los vídeos de gatos (130), de anuncios televisivos (con gatos 169), de deportes divertidos (31), deportistas callejeros (43), deportes de chalaos (5), deportes sorprendentes (115)… en fín, que paseis un buen rato.
(Nota: es la lista original de vídeos recogidos por Zapatou, solo he corregido el texto para insertar los hiperlink)

001- The Arctic Light – bit.ly/swxWCx

002- GoPro HD: Avalanche Cliff Jump with Matthias Giraud – bit.ly/t1D3UV

003- Jeb Corliss Grinding The Crack – bit.ly/tU4j0d

004- Unbelievable cable car speed flying – Antoine Montant in Chamonix, France – bit.ly/vDo66C

005- På tynn sjøis 2 (on thin sea ice 2), Sandefjord in Norway – bit.ly/sxEkzC

006- Dressed for Dinner – bit.ly/szlhlT

007- Air France L’Envol – Film pub 2011 – bit.ly/t7N5J0

008- Columbia’s Omni-Heat Electric vs. Wim Hof: Another Day at the Office – bit.ly/sIn24f Sigue leyendo…

1 comentario
Trebol-a lo archivó en Curiosidades y Imagen

Después del 20-N

domingo, 18 de diciembre de 2011 (Hace 5 dias)

Esto son habas contadas.

Presente-Pasado:
Si comparamos grosso modo los resultados electorales de las elecciones al Congreso del 2008 con las del mes pasado tenemos los siguientes datos:
El PP mantiene sus 10 millones de votos.
El PSOE pierde 4 millones (de 11 pasa a 7).

¿Dónde están esos 4 millones de votos?
No hay que ser un lince de la sociología política para sospecharse algo así:
600.000 personas que votaron en 2008 pasan de ir a votar en 2011.
700.000 personas deciden votar a IU, además del millón que los había votado en 2008.
700.000 personas también deciden votar a UPyD.
En total 2 millones. ¿Dónde están los otros 2 millones de votantes del PSOE?
Repartidos, seguro, entre Equo, Partido Animalista, etc. Y también en el PP algunos cientos de miles, seguro.

Futuro: Sigue leyendo…

Comentarios desactivados
Miguel lo archivó en Apuntes y Política

Cesaria Evora

sábado, 17 de diciembre de 2011 (Hace 6 dias)

Carga retrasada de grooveshark

Ha muerto Cesária Évora. Caboverdiana.

Al menos en un par de ocasiones a venido a cantar al festival de La Mar de Músicas de Cartagena. Cesária Évora era una de esas «apuestas seguras«, si venía, llenaba.
Pero su última gira por Australia la tuvo que suspender por problemas graves de salud que le obligaron a abandonar definitivamente los escenarios hace poco más de un año

Buscando algún tema en youtube no terminaba de decidirme por ninguno entre sus muchos temas conocidos, Ausencia con Goran Bregovic, con Compay Segundo, con Marisa Monte, incluso con Kayah.
Al final me he decidido por esta, que si bien le acompaña Pedro Guerra (no me gusta) lo compensa una bella canción de Luis Pastor: Tiempo y silencio

Pulsa para abrir el álbum recopilatorio con una selección de Cesária Évora un popup.

Comentarios desactivados
Trebol-a lo archivó en Gente y Musica

Editores interactivos de PHP

jueves, 15 de diciembre de 2011 (Hace 8 dias)

Dos editores interactivos de PHP para ejecutar código php directamente en una consola. Muy útiles para depurar funciones, probar expresiones regulares, etc… sin tener que andar probando la ejecución de archivos ó servidores web.

El más sencillo, Phpa es un editor interactivo de Php desde la linea de comandos. Simplemente abrir un terminal, ejecutar phpa y comenzar escribir php sin necesidad de incluir las etiquetas de apertura <?php y cierre ?>.

Phpa

El código php se ejecuta a cada salto de línea y dispone de navegacion por el historial de la sesión y autocompletado con TAB. Para instalarlo simplemente descarga este archivo de texto phpa.txt, muevelo a /usr/bin/phpa y hazlo ejecutable (chmod +x /usr/bin/phpa)

Php-shell es básicamente idéntico pero incopora algunas mejoras como tolerancia a errores fatales, sistema de ayuda sobre las funciones y personalización de la interfaz. Incorpora un lanzador BAT para Windows.

Php-shell