Inicio / Blog's y documentación / Blogs / El blog de Alejandro Sánchez - Lurkan

sudo apt-get install build-essential cmake gettext gettext-kde kdeartwork kdelibs5-dev libxslt1-dev libqt4-sql-sqlite libphonon-dev libattica-dev libattica0.3 zlib1g-dev libqwt-dev libasound2-dev kdepim-dev libxtst-dev libjulius-dev git

No se porque razón pero siempre olvido una série de atajos muy útiles sobre todo ahora que estoy haciendo unos videos tutoriales de gnu/linux.

Efecto buscado Combinación Teclear
Zoom de la pantalla meta+= meta+shift+0
Reducir Zomm meta+- meta+-
Volver a la pantalla normal meta+0 meta+0
Resaltar el curso ctrl+meta ctrl+meta
Dibujar con el cursor meta+shift meta+shift
Bora última marca del ratón meta-shift+F12 meta+shift+f12 (dos veces f12)
Bora toda marca del ratón meta-shift+F11 meta+shift+f11 (dos veces f11

El día de tras una actualización de firefox y en flash todos los videos comenzaron a verse azules los pitufos me invadieron.

La solución es sencilla aunque no se se es la mejor entrar a ver un video y darle con el botón derecho sobre el video y desactivar aceleración por hardware.

A mi me funciono si a alguien no le funciona puede avisarme y busco otra posibilidad o si la encuentro la comento

Otra solución que encontré es

 

  1. Crear el directorio /etc/adobe:

    mkdir /etc/adobe

  2. Creamos el archivo /etc/adobe/mms.cfg:
    vi /etc/adobe/mms.cfg
  3. Agregamos la siguiente línea:
    EnableLinuxHWVideoDecode=1
  4. Cerramos y reiniciamos el navegador para probar.

Otra alternativa es intentando reinstalar el flash pero al menos a mi no me funciona la reinstalada.

Como es mi costumbre que debo de quitarme, luego hago cosas y no recuerdo como las hice, así es que voy anotando de forma más o menos sueltas tips o detalles que utilizo en KDenlive.

Fondos para títulos: Deben de ser de 1944x1080 de preferencia en png

Muchas veces si no es que siempre tenemos necesidades de espacio en nuestros discos duro, ya sea de nuestro equipo de escritorio o en los servidores muchas veces tenemos videos capturados con nuestras cámaras fotográficas, celulares o equipos de video pero no podemos reproducirlos en nuestra TV porque tenemos que conectar la laptop y se complican las cosas, entonces lo mejor es crear nuestros propios DVD's y para esto tenemos un programa sencillo y muy poderoso kdenlive.

Entonces voy a dar los pasos que yo hago para lograr esto.

Primero debemos de bajar los videos a nuestro computadora, eso se logra de varias formas dependiendo de donde tengamos capturado el video, en el caso de ser una cámara de fotografía podemos hacer también de varias formas una es poniendo la cámara en modo storage o play y conectarla a a computadora con esto podemos navegar en en contenido de la cámara como si fuera un dispositivo mas de almacenamiento copiando los videos a un directorio en donde luego los trabajaremos con kdenlive.

Otra forma es con mi herramienta preferida de manejo de cámaras fotográfica que es Digikam, lo abrimos conectamos la cámara y le decimos que importe ahí nos mostrara el contenido de la memoria de la cámara y escogeremos los archivos a importar. En los celulares es algo muy parecido.

Cuando ya tenemos los video en nuestro disco duro (hd)que por cierto, lo mejor es tenerlos en un directorio con su nombre, por cuestión de ser ordenados y tener todo junto y en orden, abriremos kdenlive y en los menús le diremos NUEVO y nos desplegara un recuadro con las diferentes opciones de procesamiento de video , tenemos muchas pero para el caso de hacer DV lo mejor es utilizar la opción de DV/DVD NTSC en donde dice PERFIL. También donde dice CARPETA DEL PROYECTO debemos poner la ruta donde estan nuestros archivos, si, ese directorio que les comente , se puede escribir la ruta o picar en el icono de al lado y que nos despliegue un manejador de archivos y así navegamos entre los archivos hasta estar en el directorio donde pusimos nuestro video, siempre es bueno llamar a este directorio con un nombre de acuerdo al contenido del mismo.

continuara .................

Contact junto con kmail pueden manejar el correo de cualquier tipo de servidor de correo que permita conexión remota no es raro manejar nuestro correo de gmail con kmail, pero entre las cosas que faltaba manejar o poderse sincronizar es el calendario de gmail así por ejemplo podemos consultar el calendario desde nuestro escritorio, un navegador o desde nuestro teléfono android.

La forma de hacerlo es relativamente sencilla, debemos de instalar o ver que estén instalados los siguientes paquetes: akonadi-kde-resource-googledata y libgcal0 así como sus dependencias, cosa que con aptitude install o apt-get install se hace de forma muy sencilla, por cierto, esto lo lleve a hice con Kubuntu 11.04

Una vez instalado debemos de entrar a Kontack y al area de calendario, le damos en el signo de mas en los calendarios y nos sale una ventana con los diferentes servidores de conexión que tengamos , debemos seleccionar akonadi, normalmente es el primero en la lista ahí saldrá una nueva ventana y debemos de seleccionar akonadi_gcal_resource_0 seleccionar eventos tareas diario y dar gestión de fuentes de calendario, nos pedirá el usuario y password de gmail, se lo damos y listo en algunas versiones nos dice que seleccionemos la fuente y buscamos entre los conectores y seleccionamos akonadi _gcal_resource y listo.

Así de fácil, si por alguna razón no se conectaran debemos de estar seguro que akonadi esta funcionando bien y que el usuario y la contraseña que dimos es la correcta.

Una forma de ver si akonadi esta funcionando es damos F2 y escribimos akonadi, ahí saldrá el configurador de akonadi, vamos a la pestaña de Configuración del servidor ya le damos en probar no deben aparecer errores, y debemos diferenciar entre errores y alertas,

Decidí instalar Oneric Ocelos Kubuntu 11.10 en mi lap top, una ferrari 4000, todas las anteriores versiones que e instalado activan la tarjeta de red inalámbrica sin problemas, una bmc4318. Bueno el asunto es que esta versión no lo hace y no me funcionaba la red inalámbrica así que a investigar.

El asunto es que en algunos modelos se debe de instalar por separado el firmware y se hace de la siguiente forma:

sudo -s

aptitude install firmware-bcm43-installer

kubuntu instalar las dependencias y bajara el firmware y lo activara y ya, eso es todo.

En pocas palabras, se debe de instalar el nuevo firmware para que esto funcione como siempre.

Un saludo y estamos en contacto.

Anoche me puse a buscar alguna macro para convertir de número a letras y en cosa de 10 minutos me encontré uno, lo probé y me gusto, luego al otro dia me di cuenta que tenia unos detallitos y me propuse corregirlo, detalles menores cosa de paréntesis y cosas sencillas, como no se nada de basic de openoffice pero algo de programación no creo que fuera mucho problema y así fue, en cosa de otros 15 minutos estaba como queria y aqui dejo el resultado.

El macro original es de Néstor Londoño B. y lo encontre en http://user.services.openoffice.org/es/forum/viewtopic.php?f=21&t=806

Aquí pongo el macro y la explicacion el macro que pongo es el que yo modifique y se ajusta a lo que necesito.

El macro original funciona bien lo que yo cambie fue estética en la presentación para ajustarlo a mis gustos.

Instrucciones:

1 - Abra OOo en hoja de cálculo.


2 - Vaya a la barra superior <Herramientas> < Macros> < Organizar MacrosOpenOffice.org Basic>

se abre otra ventana <Macros básicas de OpenOficce>

Abra ahora <Mis Macros> <Standard>

en la derecha utilice <Administrar>

en la nueva ventana escoja <Nuevo>

se abre nuevo módulo y pulse <Aceptar> ahora <Editar> y Borre la Sub Main y End Sub; en éste espacio pegue la macro.

Cierre la Macro.

3 - Escriba un Número en una casilla y donde necesite que salga el texto ejecute la función Cnp() o Cnt()

Escribimos =cnp(A1) y ejecutamos la instrucción.[Enter]. donde A1 es la casilla donde esta el número.

REM  *****  BASIC  *****

Dim texno (41) as string

Function Cnp ( X as currency ) as string
'Dim Cnp$, X@
'X=50000
Dim A%,B%,E$,F$,N$,pEnsa$,F1%
Cnp = ""
Texto
if X = 0 then Exit Function
If X > 15000000000000 then 
    print "Número muy grande "
    Exit Function
End if      
N = Str(X)
for I = 1 to len(N)
    if Asc(mid$(N,I,1))= 46 then 
        E = left$ (N,I-1)
        F = right$ (N,(len(N)-I)
        F = left$ (F,2)
        F1 = Val (F)
        CT = I
    end if
next
NL = (len(E)-1) \ 3
NK = (len(E)-1) mod 3
if NK = 0 then
    NK = 3
    NL = NL-1
end if    
A = val(mid(E,2,NK))             
pEnsa = Escribe(A) + texno (NL+37)
if NL = 4 or NL = 2 then
    if A = 1 then
    pEnsa = pEnsa + "ón "
    else
    pEnsa = pEnsa + "ones "
    end if
end if
if NL = 3 and Val(mid(E,nk+2,3)) = 0 then
    pEnsa = pEnsa + "millones "
end if
for J = NK+2 to Len(E) step 3
    A=val(mid$(E,j,3))
    NL = NL - 1 
    if A > 0 then
        pEnsa = pEnsa & Escribe(A) + texno (NL+37)
        if NL = 2 then
            if A = 1 then
                pEnsa = pEnsa + "ón "
            end if 
            if A >1 then
                pEnsa = pEnsa + "ones "
            end if
        end if         
    end if 
next
if right(pEnsa,5) = "ones " or right(pEnsa,3) = "ón " then 
    pEnsa = pEnsa + "de "
end if
if pEnsa = "" then pEnsa = "Cero "
if pEnsa = "un " then
    pEnsa = pEnsa + "peso "
    else
    pEnsa = pEnsa + "pesos "
end if            
if F1 >=1 then   'México: If F = 0 then F = "00" 
    A = F
    'pen = Escribe ( A )'Si desea que las fracciones se escriba en texto entonces active estas dos lineas quitando el apostrofe inicial
  'pEnsa = pEnsa + "con " + pen + "céntimos "' y desactive la linea inferior, logicamente colocando el apostrofe. 
  pEnsa = pEnsa + "con " + F1 +"/100 " 'Formato "01" con F
End if          'Mex: Elimine línea 
pEnsa = Ucase("("+left(pEnsa,1))+ right(pEnsa,len(pEnsa)-1) + "M.N.)"
Cnp = pEnsa
End Function 

sub Texto ()
texno(0) = "es "
Texno(1) = "un "
Texno(2) = "dos "
Texno(3) = "tres "
texno(4) = "cuatro "
texno(5) = "cinco "
texno(6) = "seis "
texno(7) = "siete "
texno(8) = "ocho "
texno(9) = "nueve "
Texno(10) = "diez "
texno(11) = "once "
texno(12) = "doce "
texno(13) = "trece "
texno(14) = "catorce "
texno(15) = "quince "
texno(16) = "dieciséis "
texno(17) = "diecisiete "
texno(18) = "dieciocho "
texno(19) = "diecinueve "
texno(20) = "veint"
texno(21) = "treinta "
texno(22) = "cuarenta "
texno(23) = "cincuenta "
texno(24) = "sesenta "  
texno(25) = "setenta "
texno(26) = "ochenta "
texno(27) = "noventa "
texno(28) = "ciento "
texno(29) = "doscientos "
texno(30) = "trescientos "
texno(31) = "cuatrocientos "
texno(32) = "quinientos "
texno(33) = "seiscientos "
texno(34) = "setecientos "
texno(35) = "ochocientos "
texno(36) = "novecientos "
texno(37) = ""
texno(38) = "mil "
texno(39) = "mill"
texno(40) = "mil "
texno(41) = "bill" 
end sub
    
Function Escribe (ByVal A as integer)
dim escrito as string
dim NA as integer
dim NB as integer
NA = A
    if NA >= 100 then
        NB = NA \ 100
        NA = NA - NB *100
        if NB = 1 and NA = 0 then
            escrito = "cien "
        else
        escrito = texno(NB + 27)
        end if
    end if        
    NB = NA \ 10
       NA = NA -10 * NB 
    if NB > 2 then
        escrito = escrito & texno(NB + 18)
        if NA > 0 then
            Escrito = Escrito & "y " & Texno (NA)
        End if    
        NA = 0
    end if
    if NB = 2 then
        if NA = 0 then 
            escrito = escrito +    "veinte "
        end if
    if NA = 1 then 
            escrito = escrito +    "veintiún "
        end if
        if NA > 1 then
        escrito = escrito & texno(20) +"i" & texno (NA
        end if 
    end if
    NA = 10 * NB + NA
    if NA < 20 and NA > 0 then
        escrito = escrito & texno (NA)
    end if     
    Escribe = Escrito 
End function

Function Cnt ( X as currency ) as string
'Dim Cnl$, X@ 
'X=50000
dim FX$, PX$, Y as Variant, T as variant
Cnt = ""
Cnt = Cnp(X)
Y = X
If Y = 0 then Exit Function 
Reval ( Y ) 'Para México agregue if X - int ( X ) = 0 then T = ",00"
Cnt = Cnt + " (" + Y + ")" 'Cambiar CNT = Y + T + " (" + cnt + ")"
end function

Function Reval ( X     as Variant ) as Variant
Dim L as Integer    'Recibe un valor numérico y la da formato de moneda
Dim J as integer
Dim K as integer
Dim Y as variant
Dim FX as string
    X = Str ( X )
    X = Trim ( X )
    L = Len ( X )
    For J = L to 1 Step - 1
        If Mid (X, J, 1) = "," or Mid ( X, J, 1 ) = "."  then
            K = L  - J
            L = J - 1
            J = 0
        End If    
    next
    If K > 0 then FX = "," + Right ( X, K )
    X = left ( X, L )
    FX = Left ( FX, 3 )
    If Val ( FX ) = 0 then FX = ""
    If L <= 3 then Y = X  
    Do while Len ( X ) > 3 
        Y = "." + right ( X, 3 ) + Y
        X = left ( X, len( X ) - 3 )
        If len ( X ) <= 3 then
            Y = X + Y
            X = ""
        end if
    Loop
'If FX = "" then FX = ",00" PARA MEXICO
X = "$" + Y + FX
Reval = X
End function

Entre los beneficios de actualizar a KDE 4.6 es que se a mejorado la velocidad de kwin y plasma.

debemos agregar un nuevo repositorio a nuestro Kubuntu

add-apt-repository ppa:kubuntu-ppa/backports

luuego actualizar

aptitude update

aptitude dist-upgrade

eso es todo

Better Beamer Flash Extender FX-2 Visual Echoes Better Beamer Flash Extender Model FX-2 for Canon 550EX, Nikon SB-25, SB-26 and similar-size flashes

asanchezm at e-compugraf dot com

¿chatear? en gmail bajo el nick de lurkan.

twitter @lurkan

identi.ca lurkan

youtube lurkan01

en la oficina me encuentras en la extensión 122

Mis galerías

Lun Mar Mié Jue Vie Sáb Dom
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30