Lo intenté, la cagué, aprendí... Pero lo hice!

Convertir segudos a Hora,Minutos Segundos en PL/SQL

2015-06-17T15:43:00.003-07:00

Hoy escribo un rápido post para mostrar una función en PL/SQL muy básica que convierte un número entero que representa segundos a un formato de texto de la forma HH:MI:SS que es la forma en la que visualizamos la duración en muchas herramientas; por ejemplo 61 segundos sería escrito como 00:01:01 . Como siempre esta función puede ser reescrita en cualquier lenguaje de programación; sin más que agregar esta es la función:


CREATE OR REPLACE FUNCTION DURACION(SEG NUMBER) RETURN VARCHAR2 IS

  RESULTADO VARCHAR2(50);

  H VARCHAR2(2); --HORAS

  M VARCHAR(2); --MINUTOS

  S VARCHAR2(2); --SEGUNDOS

BEGIN

  H:=LPAD(TO_CHAR(FLOOR(SEG/3600)),2,0);

  M:=LPAD(TO_CHAR(FLOOR(SEG/60)-TO_NUMBER(H)*60),2,0);

  S:=LPAD(TO_CHAR(MOD(SEG,60)),2,0);

  RESULTADO:=H||':'||M||':'||S;

  RETURN RESULTADO;

END;/

Desarrollo rápido de Aplicaciones Móviles Híbridas con HTML5, JavaScript y CSS

2015-05-06T21:20:00.001-07:00

El uso de dispositivos móviles está creciendo muy rápido y usan diferentes sistemas operativos por lo que se hace muy difícil mantener el desarrollo de aplicaciones para estos y llevarle el paso a la actual tendencia de desarrollo orientado a dispositivos móviles; para esto surgen frameworks que nos permiten desarrollar aplicaciones móviles usando HTML5, CSS y JavaScript ahorrándonos tiempo de desarrollo y aprendizaje de nuevos lenguajes.

Después de tanto tiempo con mi blog inactivo por el trabajo y la Universidad les comparto un pequeño artículo que escribí para darle un poco de contenido al blog; disculpen un poco la falta de detalle pero aún los escribo para aprender a usar el formato IEEE y desarrollar pequeñas investigaciones. Espero lograr al menos(si no lo conocías) que sepas que puedes desarrollar una pequeña aplicación móvil de una manera muy sencilla; quedo abierto a sus sugerencias y comentarios sobre el artículo.

Link al artículo

Seguridad en Stios Web - No confíes en el usuario

2015-05-03T22:30:00.000-07:00

Este artículo presenta cómo las vulnerabilidades pueden ser detectadas y explotadas del lado del usuario sin tener acceso físico al servidor que aloja el Sitio o Sistema Web.

Entre los que se describen en este artículo están:

SQL Injection
Exploits
Robo de Cookies
Cross-Site Scripting (XSS)
Ingeniería Social

Espero lo encuentren de utilidad; no olviden sus sugerencias y comentarios.

Seguridad en la web no confíes en el usuario

Herramienta para verificar la clave WEP por defecto de tu router

2013-09-10T21:34:00.001-07:00

Hola a todos, ¿has leido el post "Turbonett de Claro , podrías estar regalando tu Wi-fi [Clave por defecto de routers BroadTech]" y no puedes obtener la clave?; pues he creado un pequeño script en PHP que te retorna la posible clave WEP de la Red que ingreses en el formulario.

Está en una versión Beta por lo que aún no soporta todos los Routers y está propenso a errores. Espero comentes cómo te funciona, lo compartas y sugieras algunas funcionalidades.

Link: http://www.sorianocarlos.com/index.php/claves-wep-por-defecto

Routers Soportados:

Broadtech (TURBONET_XXXXXX)

Función para Oracle PL/SQL para encontrar cantidad de ocurrencias de cadenas

2013-08-28T23:15:00.000-07:00

Hola estimados lectores :) hoy vengo con otro post flash debido al corto tiempo que me queda.

Pues hoy les entrego una simple función en oracle (que seguramente es extrapolable a otro lenguaje) que hace algo sencillo: encuentra cuantas veces en una cadena aparace un caracter o substring que desees verificar.

Por ejemplo, te sirve para saber cuantas veces está la letra 'a' en la palabra 'amapolas' ó cuantas veces existe 'si' en '111si92992sisiwewesi'.

El concepto es así:

Calculamos la longitud de la cadena en la que queremos encontrar el número de ocurrencias.
Le restamos la longitud de esa misma cadena pero despues de hacer un REPLACE de el caracter o substring al que deseamos encontrar el número de ocurrencias.
Lo dividimos entre la longitud del caracter o substring al que deseamos encontrar el número de ocurrencias.

Y Listo!!! aqui les paso el código :) espero les sea útil.

 
CREATE OR REPLACE FUNCTION OCURRENCIES(CADENA IN VARCHAR2/*LA CADENA BASE*/,SUBCADENA IN VARCHAR2 /*LA CADENA QUE QUEREMOS ENCONTRAR LA OCURRENCIA*/) RETURN NUMBER
IS
 RESPUESTA NUMBER;
BEGIN
 SELECT 
 (LENGTH(CADENA)-LENGTH(REPLACE(CADENA,SUBCADENA,'')))/LENGTH(SUBCADENA)
 INTO RESPUESTA
 FROM DUAL;
 RETURN RESPUESTA;
 EXCEPTION
    WHEN OTHERS THEN
       RETURN 0;
END OCURRENCIES;

Ejemplo:

 
SELECT OCURRENCIES('AMAPOLA','A') FROM DUAL;

Este ejemplo retornará 3.

Listado MAC de Fabricantes de tarjetas de Red

2013-05-28T19:19:00.002-07:00

Como algunos sabrán, los primeros 3 octetos de una dirección MAC identifican al fabricante de la tarjeta.

También si queremos saber que fabricante es el de nuestra MAC usamos algun sitio web donde ingresamos la MAC y nos dá los datos del fabricante.
Pero ahora les comparto el listado oficial de fabricantes de Tarjetas de Red de la IEEE, esta lista es actualizada cada día y la puedes usar para hacer tu aplicación que identifique a los fabricantes.

Espero les sea útil a todos los developers.

http://standards.ieee.org/develop/regauth/oui/oui.txt

Calendario en C++

2013-05-01T14:36:00.000-07:00

Uno siempre tiende a subestimar pequeños "programitas" a los que no se le vé mayor complejidad debido a la abundante existencia de estos.

Por ello en la primera materia de programación que tuve en la Universidad nos dejaron de tarea crear un programa en C++ que con indicarle el mes y año nos imprimiera en pantalla el calendario.

Pero la real dificultad de este programa es Determinar el primer día de cada mes; esto se soluciona con un famoso algoritmo llamado Doomsay el cual usé para implementar el programa; otra cosa que hay que tener en cuenta es el límite de dias que tiene cada mes en especial febrero. Así que tomamos en cuenta el año bisiesto; en este febrero tiene 29 días y no 28 como normalmente lo es; para determinar si un año es bisiesto este debe cumplir 2 cosas:

Debe ser divisible por 4
Y no debe de ser divisible por 100, pero si lo es debe de ser divisble por 400.

Y esos son los criterios a considerar para crear el programa del calendario, espero les sea útil y no olviden en compartir su conocimiento y este blog :)

Descargar Aquí.

Breve reseña sobre Linux como Sistema Operativo de Red

2013-02-18T21:33:00.002-08:00

Hoy les publico un pequeño Paper en formato IEEE (no lo puedo aplicar muy bien aún xD) acerca de Linux como sistema operativo de red; no es muy profundo, pero es mi "hola mundo" en la redacción de papers; espero mejorar y que le sea útil a quien lo estime conveniente ;).

Descarga Aquí.

Como crear campos Auto Incrementales en Oracle

2012-11-13T18:04:00.004-08:00

Muchos habran tenido el problema de hacer un campo en Oracle Auto Incremental, ya que no es tan sencillo como en MySQL de escribir "auto_increment" en la definición del campo, sino que deberemos hacer lo siguiente:

Crear una Secuencia para ese Campo:

 
create sequence nueva_secuencia
   start with 1 
   increment by 1 
   nomaxvalue;

Crear un Trigger que ingrese el nuevo valor automaticamente

create or replace trigger campo_autoincremental
before insert on tabla for each row
begin
    select nueva_secuencia.nextval 
    into :new.campo_autoincremental
    from dual;
end;
/

Y eso es todo, espero les haya servido.

Fuente:http://foro.noticias3d.com/vbulletin/showthread.php?t=153477

Contar del 0 al 9 en un display 7 segmentos con Arduino

2012-09-24T15:32:00.001-07:00

Aunque no se si es la solución mas optima de hacerlo con el Arduino UNO (lo digo porque es casi mi primer trabajo con el; pero logré hacer que contara del 0 al 9 en un display ánodo común de 7 segmentos y un 74LS247 (Conversor BCD).

Codigo Fuente subido al Arduino:

   int maximo=13; //Pin que es el bit menos significativo
  int minimo=10;// Pin que es el bit mas significativo
  float segundos=1;
  
void setup() {
for(int i=minimo;i<=maximo;i++){
  pinMode(i, OUTPUT); 
  };  
}


void loop() {
    display(0,0,0,0);
     delay(segundos*1000);
     display(0,0,0,1);
     delay(segundos*1000);
     display(0,0,1,0);
     delay(segundos*1000);
     display(0,0,1,1);
     delay(segundos*1000);
     display(0,1,0,0);
     delay(segundos*1000);
     display(0,1,0,1);
     delay(segundos*1000);
     display(0,1,1,0);
     delay(segundos*1000);
     display(0,1,1,1);
     delay(segundos*1000);
     display(1,0,0,0);
     delay(segundos*1000);
     display(1,0,0,1);
     delay(segundos*1000);
}

void display(int d,int c, int b, int a){
 digitalWrite(13,a);
 digitalWrite(12,b);
 digitalWrite(11,c);
 digitalWrite(10,d);
}

SOLUCIÓN [Listener Refused the connection ora-12505] en Oracle XE

2012-08-27T19:51:00.001-07:00

Perdon por el post tan corto, pero he visto que bastante tráfico de mi blog busca la solución a este problema.

Aclaro que esto solo funciona para quienes usan la version Express de Oracle.

Si reciben el error "listener refused the connection ora-12505" escriban XE en nombre de la Base de datos(password y host dejarlos segun configuración) y se solucionará el problema.

Sistema Contable BASICO en PHP y MySQL

2012-08-26T21:59:00.000-07:00

Una vez mas trabajo contra tiempo (menos de 12 horas), hice un script de un sistema contable MUY BÁSICO (debido al corto tiempo para el desarrollo); lo único que se puede hacer en el es agregar cuentas al catálogo, ingresar partidas diarias (los datos ingresados no se pueden modificar directamente del script, debe ser en la base de datos), ver el balance de comprobacion y estado de resultados general por mes y años .
El sistemita es bastante sencillo porque aún no domino bien PHP y MySQL, los que empiezan en PHP saben lo difícil que puede ser ver una pantalla en blanco sin saber donde esta el error xD xD; y tampoco agregué los triggers y procedimientos almacenados, porque requería mayor tiempo de diseño de la base de datos.

Puedes descargar el código fuente; Agradecería sus comentarios y un backlink si es de su agrado.

Descarga Aqui.

Cómo formatear el codigo fuente que posteas en tu blog con SyntaxHighlighter

2012-06-24T17:38:00.003-07:00

Muchas veces que has querido compartir código fuente o una porcion de el en tu blog o en tu sitio posiblemente no hayas podido darle el formato de con sus respectivas indentaciones, resaltado de funciones,texto o definiciones y todo el formato con el que lo ves en tu entorno de desarrollo.

Con SyntaxHighlighter de Alex Gorbatchev puedes darle ese formato que deseas a tu código sea cual sea el lenguaje en el que lo tengas solo debes incluir en tu plantilla los archivos .js usando la siguiente sintaxis justo despues de la etiqueta head de tu plantilla.

Es indispensable que siempre incluyas shCore.js, shCore.css y las funciones que se detallan en el post a continuacion, luego dependiendo los lenguajes que quieras formatear en tu sitio deberas agregar los pinceles que detalla la tabla al final del post.
Claro que si quieres agregar todos los lenguajes disponibles basta con que copies y pegues el codigo anterior justo despues de la etiqueta head de tu plantilla.

Ahora que tienes agregadas las librerias en tu plantilla procederemos a formatear el código que queremos postear, para eso debemos editar la entrada a publicar como HTML y poner el código entre etiquetas pre . Para elegir el formato según el lenguaje (ya que depende la sintaxis) le agregamos a la etiqueta pre el atributo class="brush :xxx" donde en xxx deberas escribir el "Brush aliases" que encontraras en la tabla al final del post. Por ejemplo para resaltar el código PHP debemos escribirlo asi en la edicion HTML de la entrada:

  echo "Hola Mundo";

Y como se vera en tu post sera asi:

 echo "Hola Mundo"

Pero si prefieres tener alojados los scripts en tu hosting para evitar la dependencia del repositorio original descarga los archivos .js que encontraras en este link. Entre los lenguajes soportados estan:

Brush name	Brush aliases	File name
ActionScript3	as3, actionscript3	shBrushAS3.js
Bash/shell	bash, shell	shBrushBash.js
ColdFusion	cf, coldfusion	shBrushColdFusion.js
C#	c-sharp, csharp	shBrushCSharp.js
C++	cpp, c	shBrushCpp.js
CSS	css	shBrushCss.js
Delphi	delphi, pas, pascal	shBrushDelphi.js
Diff	diff, patch	shBrushDiff.js
Erlang	erl, erlang	shBrushErlang.js
Groovy	groovy	shBrushGroovy.js
JavaScript	js, jscript, javascript	shBrushJScript.js
Java	java	shBrushJava.js
JavaFX	jfx, javafx	shBrushJavaFX.js
Perl	perl, pl	shBrushPerl.js
PHP	php	shBrushPhp.js
Plain Text	plain, text	shBrushPlain.js
PowerShell	ps, powershell	shBrushPowerShell.js
Python	py, python	shBrushPython.js
Ruby	rails, ror, ruby	shBrushRuby.js
Scala	scala	shBrushScala.js
SQL	sql	shBrushSql.js
Visual Basic	vb, vbnet	shBrushVb.js
XML	xml, xhtml, xslt, html, xhtml	shBrushXml.js

Encontraras mas información y ejemplos de los lenguajes en el sitio oficial: http://alexgorbatchev.com/SyntaxHighlighter/manual/brushes/

Error oracle.jdbc.driver.OracleDriver al intentar conectar LibreOffice con Oracle en Ubuntu [SOLUCION]

2012-06-17T18:17:00.004-07:00

Muchos podriamos haber recibido ese Mensaje: "El conductor de la clase 'oracle.jdbc.driver.OracleDriver' no puede ser cargado" mientras intentabamos conectar LibreOffice con una base de datos que corriera en Oracle.

En mi caso usando Ubuntu caí en cuenta que el JDBC no lo agrega automáticamente LibreOffice para poder conectarse con Oracle, asi que aquí les presento como solucioné este problema y pude Conectar LibreOffice con Oracle.

Primero nos dirigimos al siguiente Enlace y descargamos un archivo llamado classes12.jar .

Luego abrimos LibreOffice y seguimos la siguiente ruta en los menús para acceder a la configuracion "Herramientas->Opciones->LibreOffice->Java->Ruta de clase" y agregamos el classes12.jar que acabamos de descargar seleccionando "Agregar Paquete".

Despues cuando hacemos la prueba con la clase oracle.jdbc.driver.OracleDriver nos deberia decir que el controlador JDBC se ha cargado correctamente.

Si reciben el error "listener refused the connection ora-12505" escriban XE en nombre de la Base de datos y se solucionara.

Referencias: http://gabyokal.blogspot.com/2011/06/error-ora-12505.html

Conectar LibreOffice con Oracle XE 10g en Linux

2012-05-13T18:04:00.000-07:00

Muchos o pocos han de conocer la utilidad de crear una hoja de cálculo cuyos datos sean provenientes de una base de datos. Generalmente se le conoce a esto como Cubos de Información y son bastante requeridos en las empresas para poder tomar decisiones o ver que rumbo llevan las que ya han sido tomadas.

Asi que aqui explicaré como logré extraer datos de una base de datos en Oracle y crear una hoja dinamica en LibreOffice Calc. Aunque realicé esto en Ubuntu creo que también funcionaría en Windows.

Para poder extraer datos de una base de datos en Oracle y presentarlos en una Hoja de Cálculo de LibreOffice Calc o cualquier otro uso que se le quiera dar en la suite LibreOffice se siguen los siguientes pasos:

Abrimos LibreOffice Base y seleccionamos "Conectar a una Base de Datos Existente".

En este paso es importante saber los datos de la base de datos.
Nombre de la base de datos: XE
Servidor: (deben colocar la dirección del servidor donde se encuentra la base de datos, en mi caso localhost)
Puerto: Por defecto es 1521 pero debe escribirse el que se especificó en la configuracion del Oracle.

En este paso se especifican los usuarios para el acceso a la base de datos; debemos escribir el nombre de usuario y seleccionar el CheckBox de "Se requiere una contraseña" si necesitaramos una para conectarnos a la base de datos.

Hacemos Click en "Conexión de Prueba" para verificar que podemos conectarnos correctamente a la Base de Datos.

Una vez obtenido una Conexión Exitosa, le damos siguiente y seleccionamos "Sí, deseo registrar la base de datos" (No es necesario que seleccionen que desean trabajar con la base de datos).

Guardamos un archivo ODF, que sería la fuente de donde sacaremos los datos para usarlos en LibreOffice.

Ahora nos dirigimos a cualquiera de los programas de LibreOffice (en mi caso Calc) y seguimos los siguientes pasos:

Nos dirigimos a Datos->Tabla de piloto de Datos->Crear

Seleccionamos "Fuente de datos registrada en LibreOffice"

En "Base de Datos" seleccionamos el nombre del documento ODF que guardamos (Nos pedira la contraseña para conectarlos a la base de datos), en "Fuente de Datos" seleccionamos la tabla de la cual queremos extraer los datos y en "Tipo" lo dejamos como hoja (en mi caso tomare los datos de una Base de Datos Transaccional).

Y listo, ya podemos trabajar con los datos almacenados en Oracle XE 10g.

¿Cómo saber si me bloquearon en Facebook? [Ya No Aplica]

2012-04-09T19:36:00.007-07:00

(Al parecer Facebook ya solventó esta vulnerabilidad, pero lo dejo como histórico)

En todo sistema hecho por humanos siempre hay errores, pero en el caso de la red social Facebook este no es necesariamente de programación, sino de políticas.

Ahora explicare como saber si alguno de tus "amigos" te han bloqueado para que no puedas ver su perfil.

Por ejemplo cuando tu intentas ingresar al perfil de esa persona te aparecerá un mensaje similar a este:

Las razones por la que aparece este mensaje puede ser:

Cerró su perfil de Facebook
Te bloqueó para que no pudieras ver su perfil

Asi que la pregunta sería: ¿Cómo saber si alguien me eliminó del Facebook?
Para determinar cual es la situación en este caso haremos lo siguiente:

Usaremos nuestro perfil de Facebook como una página (si no tienes creala o pide que te nombren administrador de una)
Buscaremos el perfil de esa persona ya sea con el link directo a su perfil ó a través del buscador.

Ahora si te aparece esa persona y puedes ver su perfil significa que te tenia bloqueado, y con este método podrias tener acceso a sus actualizaciones públicas.

Turbonett de Claro , podrías estar regalando tu Wi-fi [Clave por defecto de routers BroadTech]

2012-03-27T18:32:00.016-07:00

Si tienes internet Claro en cualquiera de los paises centro americanos y tienes un router Broadtech (ver imagen) podrias estar siendo víctima del robo de tu ancho de banda.

Router Broadtech de Claro

La configuración de fábrica que traen estos routers no son beneficiosas para el usuario ya que desde el momento en que tienes activado Wi-fi si no cambias la configuración por defecto cualquier persona podría facilmente obtener la clave WEP y conectarse a tu red.

¿Pero cómo? .... en el caso de El Salvador el SSID por defecto de claro es TURBONETT pero para estos routers es TURBONETT_xxxxxx donde las x son cualquier dígito Hexadecimal (0-9 y A-F).

Ahora el no tan secreto de obtener la clave para conectarnos por wi-fi es que esos números que aparecen en el nombre de la red son parte de la clave; y basta usar cualquier programa para la gestión de redes (en mi caso Wifi-Radar) para obtener la MAC y encontrar los dígitos que necesitamos para encontrar la WEP que son el segundo y tercer par de dígitos de la MAC.

Ejemplo:
Tenemos la red con un SSID TURBONETT_123456 y en el programa nos aparece con la MAC 12:AA:EE:12:34:57 los dígitos que necesitamos son el AA y EE ahora tomamos esos dígitos y los agregamos al inicio de los números que aparecen en el nombre de la red (en nuestro caso 123456) y nos quedaría AAEE123456 y este número es la clave WEP de esa red.

Otra forma de encontrar la WEP por defecto es tomando todos excepto el primer par de números de la MAC (en este caso AA:EE:12:34:57) y restarle 1 al ultimo par que nos quedaría AAEE123456.

Si aún tienes dudas, prueba esta herramienta que te ayudará a determinar la clave Wep por defecto de tu router en un paso: http://blog.sorianocarlos.com/2013/09/herramienta-para-verificar-la-clave-por.html

Asi que si posees unos de estos aparatos Broadtech cambies inmediatamente el nombre de tu red, la clave y el tipo de clave (WEP) ya que este tipo de encriptación tiene varias vulnerabilidades y la obtencion de la clave es bastante sencilla que cualquier persona sin mucho conocimiento de redes pero con un poco de paciencia y un software de auditoría de redes puede obtenerla.

Convertir binario de 10 bits a Hexadecimal (Ensamblador para 8086)

2012-03-25T20:22:00.000-07:00

Creo que este es el último programa que hago en el dia de hoy (espero poder dormir ya) y lo que hace este es convertir un numero binario con un maximo de 10 bits a su equivalente en Hexadecimal. Puede no sonar muy complicado (la verdad no lo es mucho ni en Assambler) pero salir de codificar de lenguajes de alto nivel como C++,Csharp a Ensamblador es un cambio fuerte aunque no dificil.

Aqui les muestro el código que desarrolle hoy y cabe decir que no creo que sea la solución mas óptima pero si la que me sacó de aguas para poder ir a dormir ya!. Como siempre por falta de práctica el tiempo es mi peor enemigo para desarrollar estos programas.

Si tienes una solución mas óptima agardeceria la compartieras ;)

Que tengan un feliz inicio de semana.

Haz Click en "expand source" para mostrar el código.

.model smal
.data
welcome db 'Bienvenido, ingrese el numero binario (10 digitos obligatorios):',0Ah,0Dh,'$'
error db 'Error numero incorrecto',0Ah,0Dh,'$'
sig db 'Ingresar otro numero? (S o s para si / cualquier otra cosa para no): $'
congrats db 'El numero en hexa es: $'
doble db 0Ah,0Ah,0Dh,'$';Doble Salto de linea
cadena db '          $'
digito1 db 00h
digito2 db 00h
digito3 db 00h
.stack
.code
dar:                          
mov ax,@data
mov ds,ax
mov digito1,00h
mov digito2,00h
mov digito3,00h
;limpamos pantalla
mov ah,06h
mov al,0
mov ch,0
mov cl,0
mov dh,24
mov dl,79
mov bh,0Fh
int 10h
mov ah,02h
mov bh,0h
mov dh,0
mov dl,0
int 10h
;fin de limpieza
lea dx,welcome
call imprime

mov si,0
leer:
call solicita
mov cadena[si],al
sub cadena[si],30h
;Aqui verificamos que sea 1 o 0
cmp cadena[si],0
je continua
cmp cadena[si],1
jne err
;fin de la comparacion

continua:
inc si
cmp si,9d;mientras los digitos introducidos sean menores o iguales a 9 seguira leyendo
jbe leer;Si ya leyo el digito 10 calcula


sub si,1;Decrementa 1 (el dato que incrementamos en la condicion anterior)
calcula:
;inicia el calculo de los primeros 4 bits
mov ax,01h
push ax
mov cx,4
pot1:
mul cadena[si]
add digito1,al
dec si
pop ax
mov bx,0002h
mul bx
push ax
loop pot1
;finaliza calculo de los primeros 4bits
;inicia el calculo de los segundos 4 bits
mov ax,01h
push ax
mov cx,4
pot2:
mul cadena[si]
add digito2,al
dec si
pop ax
mov bx,0002h
mul bx
push ax
loop pot2
;finaliza calculo de los segundos 4bits
;inicia el calculo de los ultimos 2 bits
mov ax,01h
push ax
mov cx,2
pot3:
mul cadena[si]
add digito3,al
dec si
pop ax
mov bx,0002h
mul bx
push ax
loop pot3
;finaliza calculo de los ultimos 2 bits
mov dl,digito3;convertimos el digito 3 a ascci
call numero
mov digito3,dl
;convertimos el segundo digito a ascci
mov dl,digito2
cmp dl,0Ah
jae c1;si es mayor a 10 lo convertimos a letra sino a numero
call numero
jmp f1
c1:
call letra
f1:
mov digito2,dl
;fin de la conversion
;convertimos el ultimo digito a ascci
mov dl,digito1
cmp dl,0Ah
jae c2;si es mayor a 10 lo convertimos a letra sino a numero
call numero
jmp f2
c2:
call letra
f2:
mov digito1,dl
;fin de la conversion


lea dx,doble
call imprime
lea dx,congrats; imprimimos el mensaje del resultado
call imprime
mov dl,digito3;Imprimimos el digito mas significativo
call imprime_caracter
mov dl,digito2; Imprimimos el segundo digito
call imprime_caracter
mov dl,digito1;imprime el ultimo digito
call imprime_caracter
jmp again;cuando lo calcule e imprima preguntara si quiere otro



err:;Mensaje de error
lea dx,doble
call imprime
lea dx,error
call imprime
again:;Pregunta si quiere ingresar otro numero
lea dx,doble
call imprime
lea dx,sig
call imprime
call solicita
cmp al,53h
jne k ;Si es S o s vuelve a la etiqueta inicio sino finaliza
jmp dar
k:
cmp al,73h
jne fin
jmp dar

fin:
mov ax,4c00h
int 21h

solicita proc
mov ah,01h
int 21h
ret
endp

imprime proc
mov ah,09h
int 21h
ret
endp

imprime_caracter proc
mov ah,02h
int 21h
ret
endp

numero proc ;procedimiento que convierte los numeros a Ascci
add dl,30h
ret
endp

letra proc ;Prodcedimiento que convierte las letras a ascci
add dl,55d
ret
endp

Simulador de Arbol ABB en Visual C#

2012-03-25T15:45:00.000-07:00

Aqui presento un simulador de Arbol ABB con las siguientes funciones:

Recorrido en Amplitud
Determinar Máximo y Mínimo
Altura del Arbol
Profundidad de un Nodo en específico
Determinar los nodos hojas
Determinar los Nodos Intermedios
Insertar Nodo

Aqui pongo el Proyecto para Visual C# y el ejecutable ya funcional en \bin\debug\ . Este código que he desarrollado no es el mas óptimo para este tipo de estructuras, sin embargo a la hora de ejecutar el programa funciona como debería. (Este proyecto no es tan eficiente por la falta de practica en este lenguaje por lo que lo considero mi "Hola Mundo" en Simulación y Estructuras de datos en C#).Recomiendo usarlo para una altura de arbol maxima de 4, porque de ahi en adelante no se aprecia bien el arbol en su totalidad.

Una de las mayores dificultades encontradas al desarrollar esto (ademas del tiempo) fueron lograr el "retraso" deseado para que se pudiera ver la simulación del recorrido que lo solucioné con esto. Y el otro fue lograr dibujar las líneas que unieran los nodos.

En este ultimo punto (en el cual aun no logro descubrir porque no me funcionan las soluciones mas habituales de internet) a lo que recurrí desesperadamente para poder dibujar las lineas fue:
Como use un Panel para dibujar en el los nodos este crea el método private void panel1_Paint(object sender, PaintEventArgs e) en el cual se ejectuta todo lo que este dentro de el cada vez que se "dibuja" en el Formulario; y tambien cree la funcion "pintar" que recibe como parametros un objeto de tipo NodoT y un objeto de tipo PrintEventArgs. Al hacerlo asi me resulto mas facil dibuja

public void pintar(NodoT Raiz, PaintEventArgs e)  {
  Pen lapiz = new Pen(Color.Red, 2);
  if (Raiz != null){
      if (Raiz.NodoIzquierdo != null){
          e.Graphics.DrawLine(lapiz, Raiz.t.Location.,Raiz.NodoIzquierdo.t.Location);
          pintar(Raiz.NodoIzquierdo, e);
       }
      if (Raiz.NodoDerecho != null)
      { 
         e.Graphics.DrawLine(lapiz, Raiz.t.Location,Raiz.NodoDerecho.t.Location);
         pintar(Raiz.NodoDerecho, e);
       }
   }
}

Y como no se aun como se usa la clase PrintEventArgs decidí llamar a Pintar dentro de panel1_Paint con el objeto PrintEventArgs de este.

 private void panel1_Paint(object sender, PaintEventArgs e)
{
  pintar(Raiz,e);
}

Al hacerlo asi tambien me resultó mas facil dibujar las lineas de forma Recursiva.

Descargar Proyecto.

Fuentes: http://www.algoritmia.net/articles.php?id=17

Timer para efectos visuales en C#

2012-03-24T22:48:00.010-07:00

Al querer hacer simulaciones simples en Visual C# nos encontramos con la necesidad de hacer un pequeño "retraso" para que cierto efecto visual sea perceptible para el usuario (en el caso que despues de cierto evento este vuelva a la condición anterior en que se encontraba).

Por ejemplo tener en un listbox N número de elementos en el y queremos que se seleccione el primer elemento(para resaltarlo) y que luego vuelva a su condición original cuando no estaba seleccionado para que siga con el mismo proceso en el elemento siguiente.

Para controlar el tiempo de un estado a otro debemos usar el método Sleep() de la clase Thread,
para ello usamos la librería System.Threading; en la cabecera del código y justo entre el cambio de estado usamos el método Thread.Sleep(ms); donde ms es el tiempo de espera en milisegundos.

Pero ahora bien, cuando corremos el código notamos que la aplicacion se pausa el tiempo deseado pero no vemos el efecto visual que esperabamos en el Form, sino que al final del tiempo pareciera como si todo se hubiera ejecutado de una sola vez.

Esto se soluciona agregando Application.DoEvents(); antes de la línea Thread.Sleep(ms); y veremos como el efecto si se aprecia correctamente. La única desventaja de este método es que mientras este corriendo el tiempo especificado en ms no podremos usar ningún control del Form ni mover la ventana y si cerramos la ventana mientras esta ejecutando el sleep quedara un proceso trabajando en segundo plano.

Ejemplo:

textbox.BackColor=Color.Aqua;
Application.DoEvents();
Thread.Sleep(1000);
textbox.BackColor=Color.White;

En el anterior ejemplo cambiamos el color de fondo de un TextBox de blanco(por defecto) a Aqua durante 1 segundo y luego volvio al color blanco por defecto. Sin la linea Application.DoEvents() lo único que hubiera pasado es que se congela la ventana por 1 segundo y no se percibe el cambio de color.

Tambien AQUI puedes ver un ejemplo del retardo al recorrer los textbox.

Fuente: http://msdn.microsoft.com/es-es/library/system.windows.forms.application.doevents.aspx

Hola Mundo

2012-03-13T13:50:00.004-07:00

Bienvenidos a mi blog, donde publicaré los avances en mi aprendizaje, proyectos y cualquier otro tema con el propósito de documentar y registrar cada progreso realizado.

Mas que todo escribiré sobre como hacer algunas cosas sin requerir configuraciones mas avanzadas, sino únicamente lo necesario para que algo funcione (poniendo en riesgo la seguridad pero se asume que es para un aprendizaje básico)....

Espero no descontinuar este blog por la falta de tiempo xD mas que todo me doy la bienvenida a mi que seré quien leerá las entradas para futuras referencias.

Guia 10 Ejercicio 1

2011-03-29T11:47:00.000-07:00

Ejercicio 1:

Agregar una nueva derivación de Figuras con la clase Rombo, las propiedades que tendrá el

rombo son diagonal mayor y diagonal menor, el área del rombo es:

Área Rombo = (Diagonal Mayor * Diagonal Menor) / 2

Realice las modificaciones necesarias al ejemplo No. 1, de tal manera que se construya una

solución para la jerarquía de clases mostrada en la Guia de laboratorio.

Archivo CPP (codigo fuente)
Archivo .exe (Windows)
Archivo Binario (Linux)

Ejercicio 2:

Considere la siguiente jerarquía de herencias:

<----Libros

Biblioteca<---Revistas

<---Articulos

Definir las clases. Considerar todas las propiedades y funciones necesarias para una
implementación completa haciendo uso de funciones virtuales y polimorfismo. Decidir que
atributos y métodos incluir en cada clase de tal manera que su programa pueda a través de un
menú realizar las siguientes acciones:
a) Crear objetos de cualquier tipo, solicitando los datos al usuario.
b) Visualizar un objeto en particular, con todos sus atributos.
c) Salir de la aplicación.
Ser creativos con la solución, es decir, agregar más opciones al menú.
El menú deberá estar siempre activo, en la misma posición en pantalla, hasta que el usuario
seleccione la opción salir. El programa debe estar debidamente comentado.

Archivo CPP (codigo fuente)
Archivo .exe (Windows)
Archivo Binario (Linux)

Guia de Laboratorio

Tarea de Investigación

2011-03-22T17:07:00.000-07:00

PROBLEMA No. 1

Construir una solución que permita el manejo de números complejos. Un número complejo está

formado por dos partes: una parte real y una parte imaginaria, por ejemplo: 2.2 + 3.11 i; la parte real es

2.2 y la parte imaginaria es 3.11.

Puesto que un número complejo (a, b) es un par ordenado de números reales, puede representarse

geométricamente mediante un punto en el plano, es decir, mediante un vector.

De aquí se deduce que a + bi, número complejo en forma binómico, es equivalente a:

m (cos α + i sen β), número complejo en forma polar, lo que indica que:

a = m cos α y b = m sen α

El número positivo m = √a2 + b2 se denomina módulo o valor absoluto y el ángulo α = arc tg (b/a)

recibe el nombre de argumento.

Las operaciones que deben implementarse son:

a) Una función que permita inicializar un objeto de tipo Complejo.

b) Una función que permita la visualización del número complejo.

d) Operaciones aritméticas de números complejos: Suma, Resta, Multiplicación y División.

e) Convertir un número complejo de forma polar a binómica.

f) Comparar dos números complejos: Igual, Menor, Menor o igual, Mayor, Mayor o igual, distinto

de.

g) Operaciones trigonométricas con complejos: Seno, Coseno, Tangente.

h) Otras operaciones con complejos: Logaritmo natural, exponencial, potencia y raíz cuadrada.

i) Conjugado de números complejos.

j) Negativo de números complejos.

Archivo .cpp (Codigo fuente)
Archivo Binario (Linux)
Arhivo .exe (Windows)
Parte de la lógica utilizada (PDF)

Ejercicio 1 Guia 7

2011-03-01T10:04:00.000-08:00

Ejercicio 1

Modifique el código del ejemplo No. 2, de tal manera que la solución se maneje a través de un

menú que contenga las siguientes opciones:

a) Crear los objetos de tipo vector, solicitando los datos al usuario.

b) Realizar la suma de vectores.

c) Realizar la resta de vectores.

d) Realizar el producto escalar de vectores.

e) Salir de la aplicación.

El programa debe estar debidamente comentado.

El ejemplo que menciona 2 esta en la guia que puedes descargar abajo

Guia completa

Archivos:

Archivo cpp (Código fuente)

Archivo Binario para Linux

Archivo .exe

Guia 6 Programacion II

2011-02-28T18:08:00.000-08:00

Investigación

Complementaria

Escribir un programa en C++ que simule la operación de una gasolinera haciendo uso de

punteros a objetos y el puntero this.

La gasolinera debe manejar al menos 6 bombas de combustible y cada bomba manejará tres

tipos de combustibles.

Los tipos de combustibles que se manejarán serán: Gasolina Especial, Gasolina Regular,

Diesel

En cualquier momento durante la simulación deberíamos poder determinar, a partir de la

bomba seleccionada, el precio por galón de combustible y la cantidad restante en el tanque de

suministro. Si la cantidad de combustible en el tanque de suministro es mayor o igual que la

cantidad de combustible solicitada, la solicitud debe despacharse; de lo contrario, solo deberá

usarse la cantidad disponible en el tanque de suministro.

Una vez que se ha bombeado el combustible, deberá desplegarse el precio total de los

galones surtidos y la cantidad de combustible en galones que se ha bombeado deberá

restarse de la cantidad sobrante en el tanque.

Para la simulación suponga que la capacidad de las bombas es la siguiente:

Para gasolina especial: 600 galones y el precio por galón es de $3.95.

Para gasolina regular: 800 galones y el precio por galón es de $3.50.

Para diesel: 800 galones y el precio por galón es de $3.25.

Deberá considerarse un menú con las siguientes opciones:

a) Verificar el nivel de combustible de una bomba en particular.

b) Verificar el precio por galón. Aquí deberá considerarse la opción de poder cambiar el

precio por galón del combustible en cualquier momento.

c) Surtir un pedido solicitado en un monto de dinero( por ejemplo: $15.00)

d) Surtir un pedido solicitado en número de galones( por ejemplo: 5 galones)

e) Salir de la aplicación.

El programa debe estar debidamente comentado.

Link a la guia completa

Archivo cpp (Código fuente)

Archivo Binario para Linux

Archivo .exe

Avisenme si les da algun error ;)