Mi Blog

Blog personal de José Ramón Martínez Pérez.

30 mayo, 2012
por admin
1 comentario

A Alcaudete con el Tosiria

C.C. Tosiria
El pasado 1 de mayo, Día del Trabajo y festivo, tuvimos etapa del C. C. Tosiria; el destino: Alcaudete. Como de costumbre, me levanté a las 8 de la mañana y a las 8:30 ya estaba pedaleando, rumbo a Torredonjimeno para salir con ellos desde la sede. Deshicimos el camino, volviendo a Martos y cogiendo la carretera de Alcaudete, bajando la cuesta del Salado y luego subiendo hasta coger el desvío de la carretera de la Venta de Pantalones, cruzando el Víboras y subiendo el portillo. Paramos en Alcaudete en el parque, donde nos tomamos unos refrescos para retomar fuerzas.
Estábamos casi a punto de volvernos cuando apareció Pedro que había salido algo más tarde desde Martos.
Volvimos siguiendo camino que habíamos utilizado para ir, salvo que ahora ya aproveché y me quedé en Martos. Al final, 63,5 km. en dos horas y media, con 1150 metros de desnivel y 1500 kilocalorías gastadas.

28 mayo, 2012
por admin
1 comentario

Recogiendo la moto después de la revisión

Moto en Baeza
Después de llevar la moto a la revisión, el lunes 30, después del trabajo me fui con un compañero que me acercó a Jaén a recoger la moto; pasamos por mi cochera, recogimos el casco, la chaqueta y al concesionario de la BMW en Jaén.
La revisión sin ninguna novedad, salvo que ya me han dicho que las ruedas están gastadas por el centro y duras por los bordes, después de tres años y medio; así que me recomiendan que las cambien (En BMW Ícaro de Jaén no cambian las ruedas de las motos).
Así que nada: Cambio de aceite y de frenos, 137 €.
Y luego a dar una vueltecilla para probar la moto: A Baeza ida y vuelta; en total 125 km.; sumando ya la moto 15160 km.

27 mayo, 2012
por admin
Sin comentarios

Torredonjimeno – Monte Lope – Noguerones con el Tosiria

C.C. Tosiria
El pasado 22 de abril, domingo, hicimos la etapa ordinaria: Salí de Martos para engancharme con la salida del club desde la sede, deshice el camino para volver a pasar por Martos, coger la carretera del Monte (por la circunvalación directamente), y una vez pasado el pueblo, continuar hasta el límite provincial para llegar hasta los Noguerones donde paramos tras llevar unos 40 km. Nos tomamos unos refrescos, repusimos algo de fuerzas, y a continuar pedaleando: Desde los Noguerones cogimos la carretera que va paralela al Viboras para salir a la carretera de Alcaudete y volvernos para Martos, donde yo ya me quedé, mientras el club continuó hasta Torredonjimeno.
Al final, 78 km. en tres horas y 10 minutos, con 1250 metros de desnivel y unas 1600 kilocalorías gastadas, según el pulsómetro.

26 mayo, 2012
por admin
Escribe tu contraseña para ver los comentarios.

Protegido: Fin de semana de la romería

Este contenido está protegido por contraseña. Para verlo introduce tu contraseña a continuación:

25 mayo, 2012
por admin
Sin comentarios

Cambiar de coordenadas RGB a CIE1931 x,y

CIE 1931
El diagrama de cromaticidad CIE 1931 es un diagrama creado en 1931 por parte de la «Comission Internacionale de l´Eclairage» (CIE), como una forma de representar todos los colores visibles por el ojo humano de una forma sencilla. Una parte de estos colores es el triángulo formado por las coordenadas RGB, modelo estándard en el mundo de la informática, muy usado en pantallas, escáneres, ficheros de imágenes, etc.
Hay veces en las que es necesario cambiar de una base a otra; buscando por Internet tuve suerte y encontré el código para pasar de coordenadas RGB a coordenadas x,y del diagrama CIE1931, así que pasar el código a Visual Basic es de lo más sencillo. Aquí lo dejo por si es de interés:

sub rgb_to_xy
For i = 1 To 3
nt_R = (Hoja1.Cells(i, 1) / 255)
nt_G = (Hoja1.Cells(i, 2) / 255)
nt_B = (Hoja1.Cells(i, 3) / 255)

If (nt_R > 0.04045) Then
nt_R = ((nt_R + 0.055) / 1.055) ^ 2.4
Else
nt_R = nt_R / 12.92
End If
If (nt_G > 0.04045) Then
nt_G = ((nt_G + 0.055) / 1.055) ^ 2.4
Else
nt_G = nt_G / 12.92
End If
If (nt_B > 0.04045) Then
nt_B = ((nt_B + 0.055) / 1.055) ^ 2.4
Else
nt_B = nt_B / 12.92
End If

nt_R = nt_R * 100
nt_G = nt_G * 100
nt_B = nt_B * 100

X = nt_R * 0.4124 + nt_G * 0.3576 + nt_B * 0.1805
Y = nt_R * 0.2126 + nt_G * 0.7152 + nt_B * 0.0722
Z = nt_R * 0.0193 + nt_G * 0.1192 + nt_B * 0.9505

Hoja1.Cells(i, 4) = X / (X + Y + Z)
Hoja1.Cells(i, 5) = Y / (X + Y + Z)
Next i
End Sub