viernes, 30 de septiembre de 2011
Mi nuevo bebé
La empresa Xilinx tiene un programa universitario con el que hacen descuentos muy buenos a estudiantes. Compré mi propio FPGA con tarjeta de desarrollo (BASYS 2 Spartan-3E) por $49 USD. Claro, más $29 USD de envío (seleccioné UPS express por error ) y $110 pesos de pinches impuestos aduanales. Llegó el miércoles desde Pullman, WA, después de 3 días de viaje, aunque la recibí hasta hoy en la tarde por haberme ausentado en las entregas pasadas; fui de visita a una central nuclear pero eso va para otra entrada.
miércoles, 28 de septiembre de 2011
Vecinos
Desde que me mudé a ésta colonia, una de las casas de la privada me ha llamado la atención. La no. 6704. Su fachada está decorada con misteriosos relieves de ángeles, figuras humanas y símbolos que recuerdan la alquimia o algún texto del siglo XIII. Es una casa que aún sigue en construcción. Debe tener unas 7 recamaras, un patio interno y otras construcciones más pequeñas dentro del mismo terreno. Cada tantos días la privada se llena de autos de todos los lujos. He visto como toda gente sombría, adulta y anciana principalmente, se reúne en aquella casa. No hay música ni cantos pero pueden escucharse murmullos hasta altas horas de la noche si se camina lo suficientemente cerca del lugar. La puerta de lamina, temporal seguramente, se mantiene abierta durante todo el concilio. ¿Masones, rosacruces, club de lectores de Lovecraft? Será la mierda, me asustan un poco.
domingo, 25 de septiembre de 2011
Orquesta Sinfónica del Estado de Puebla, Concierto 7 (Fotos)
San Pedro Museo de Arte, Puebla, Puebla.
11/Sep/2011
Obertura Festival académico, Op. 80 — J. Brahms
Concierto Fiesta otoñal, para marimba y orquesta — Enrique Arturo Diemecke
Sinfonía No. 4 en fa menor, Op. 36 — Tchaikovski
Director: Enrique Arturo Diemecke
Solista: Saúl Medina
martes, 20 de septiembre de 2011
Control PWM + LCD con PIC18F4550 en MikroC
[Update: El 4550 ya es un poco viejo. ¿No quieres echarle un ojo al 45K50?]
// Rodolfo E. Escobar U.
// Facultad de Ciencias de la Electrónica, BUAP
// LCD module connections
sbit LCD_RS at LATB4_bit;
sbit LCD_EN at LATB5_bit;
sbit LCD_D4 at LATB0_bit;
sbit LCD_D5 at LATB1_bit;
sbit LCD_D6 at LATB2_bit;
sbit LCD_D7 at LATB3_bit;
sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D4_Direction at TRISB0_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D7_Direction at TRISB3_bit;
// End LCD module connections
int velocity = 0;
int duty = 0;
char txt[6] = "0";
void main() {
ADCON1 |= 0x0F;
CMCON |= 7;
PORTC = 0; // sets port c to all 0
TRISC = 0; //configures port c as output port
PWM1_Init (5000); // sets pwm frequency to 5000Hz
PWM1_Start(); // starts pwm1 peripheral
Lcd_Init(); // Inicializa LCD
Lcd_Cmd(_Lcd_CLEAR); // Limpiar display
Lcd_Cmd(_Lcd_CURSOR_OFF); // Desactivar cursor
while(1)
{
wordToStr(velocity, txt);
Lcd_Out(1,4,"Velocidad");
Lcd_Out(2,7,Ltrim(txt));
Lcd_Out(2,10,"%");
if (PORTA.F0 == 1){ // Incremento de PWM
Lcd_Out(2,7," ");
velocity = velocity + 20;
duty = duty + 51;
if (duty >= 255) duty = 255;
if (velocity >= 100) velocity = 100;
}
if (PORTA.F1 == 1){ // Decremento de PWM
Lcd_Out(2,7," ");
velocity = velocity - 20;
duty = duty - 51;
if (duty <= 0) duty = 0;
if (velocity <= 0) velocity = 0;
}
if (PORTA.F2 == 1){ // Detener
duty = 0;
velocity = 0;
Lcd_Out(2,7," ");
}
PWM1_Set_Duty(duty); // Establece ciclo de trabajo
Delay_ms(10); // 10 msec delay
}
}
// Rodolfo E. Escobar U.
// Facultad de Ciencias de la Electrónica, BUAP
// LCD module connections
sbit LCD_RS at LATB4_bit;
sbit LCD_EN at LATB5_bit;
sbit LCD_D4 at LATB0_bit;
sbit LCD_D5 at LATB1_bit;
sbit LCD_D6 at LATB2_bit;
sbit LCD_D7 at LATB3_bit;
sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D4_Direction at TRISB0_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D7_Direction at TRISB3_bit;
// End LCD module connections
int velocity = 0;
int duty = 0;
char txt[6] = "0";
void main() {
ADCON1 |= 0x0F;
CMCON |= 7;
PORTC = 0; // sets port c to all 0
TRISC = 0; //configures port c as output port
PWM1_Init (5000); // sets pwm frequency to 5000Hz
PWM1_Start(); // starts pwm1 peripheral
Lcd_Init(); // Inicializa LCD
Lcd_Cmd(_Lcd_CLEAR); // Limpiar display
Lcd_Cmd(_Lcd_CURSOR_OFF); // Desactivar cursor
while(1)
{
wordToStr(velocity, txt);
Lcd_Out(1,4,"Velocidad");
Lcd_Out(2,7,Ltrim(txt));
Lcd_Out(2,10,"%");
if (PORTA.F0 == 1){ // Incremento de PWM
Lcd_Out(2,7," ");
velocity = velocity + 20;
duty = duty + 51;
if (duty >= 255) duty = 255;
if (velocity >= 100) velocity = 100;
}
if (PORTA.F1 == 1){ // Decremento de PWM
Lcd_Out(2,7," ");
velocity = velocity - 20;
duty = duty - 51;
if (duty <= 0) duty = 0;
if (velocity <= 0) velocity = 0;
}
if (PORTA.F2 == 1){ // Detener
duty = 0;
velocity = 0;
Lcd_Out(2,7," ");
}
PWM1_Set_Duty(duty); // Establece ciclo de trabajo
Delay_ms(10); // 10 msec delay
}
}
jueves, 8 de septiembre de 2011
10%
El domingo pasado salia temprano de mi nuevo departamento, más bonito grande y barato que el anterior, que está cerca de la Fac. de Contaduría. Cuando iba caminado por calle que lleva al bulevar Valsequillo se me acerco una muchacha de ojos bonitos para preguntarme sobre como visualizaba a México en las próximas décadas. Después de responderle, me hizo notar lo sorprendida que estaba de mi respuesta porque yo había sido el primero en dar una visión positiva en lo que iba del día. El objetivo de la encuesta, me contó, era dar a conocer la teoría de que si el 10% de la población de un país logra cambiar su forma de pensar, el resto la seguirá. No había escuchado hablar de ella, pero me parece posible. Nos presentamos y tuvimos una platica muy agradable algunos minutos en medio de la calle hasta que tuve que despedirme y disculparme por el retraso que tenía. Luego me regaló unas donitas.
martes, 6 de septiembre de 2011
Seguridad
Puedo sugerirles usar nombres de estrellas en denominación Flamsteed. Impopulares y tenues, nunca fallan.
sábado, 3 de septiembre de 2011
Del cómo casi invento a Youtube
Mucho antes de que aparecieran los videoblogs, la gente ya grababa monólogos con videocamaras analógicas. Yo lo hice, de manera muy espaciada, de Febrero de 1999 hasta mediados de 2003 con una 8mm de mi mamá. Tenía la visionaria idea de que en un futuro cercano esos videos podrían publicarse a través de internet. De haber sabido lo suficiente sobre computadoras y programación tal vez cargaría con unos cuantos millones encima. Aun conservo las cintas y la videocámara que, sorprendentemente, aún funciona. Sigo pensando en digitalizarlas pero siempre las olvido traerlas conmigo cuando visito mi casa. Como sea, estuve cerca.
Suscribirse a:
Entradas (Atom)