jueves, 13 de noviembre de 2008

Ascensor 4




Private Sub cinco_Click()
asce.Top = 480
a.Caption = "5"
b.Caption = "5"
c.Caption = "5"
d.Caption = "5"
e.Caption = "5"
f.Caption = "5"
g.Caption = "5"

If asce.Top = 480 Then
h.Caption = Val(h.Caption) + 1
End If

asce.Top = 480
cinco.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True

End Sub

Private Sub Command1_Click()
asce.Top = 480
a.Caption = "5"
b.Caption = "5"
c.Caption = "5"
d.Caption = "5"
e.Caption = "5"
f.Caption = "5"
g.Caption = "5"

If asce.Top = 480 Then
h.Caption = Val(h.Caption) + 1
End If

asce.Top = 480
Command1.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
cinco.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub Command2_Click()
asce.Top = 1080
a.Caption = "4"
b.Caption = "4"
c.Caption = "4"
d.Caption = "4"
e.Caption = "4"
f.Caption = "4"
g.Caption = "4"
If asce.Top = 1080 Then
i.Caption = Val(i.Caption) + 1
End If

asce.Top = 1080
Command2.Enabled = False
Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
cinco.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub Command3_Click()
asce.Top = 1680
a.Caption = "3"
b.Caption = "3"
c.Caption = "3"
d.Caption = "3"
e.Caption = "3"
f.Caption = "3"
g.Caption = "3"
If asce.Top = 1680 Then
j.Caption = Val(j.Caption) + 1
End If

asce.Top = 1680
Command3.Enabled = False
Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
cinco.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub Command4_Click()
asce.Top = 2280
a.Caption = "2"
b.Caption = "2"
c.Caption = "2"
d.Caption = "2"
e.Caption = "2"
f.Caption = "2"
g.Caption = "2"
If asce.Top = 2280 Then
k.Caption = Val(k.Caption) + 1
End If

asce.Top = 2280
Command4.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
cinco.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub Command5_Click()
asce.Top = 2880
a.Caption = "1"
b.Caption = "1"
c.Caption = "1"
d.Caption = "1"
e.Caption = "1"
f.Caption = "1"
g.Caption = "1"
If asce.Top = 2880 Then
l.Caption = Val(l.Caption) + 1
End If
asce.Top = 2280
Command5.Enabled = False

Command6.Enabled = True
cinco.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub Command6_Click()
asce.Top = 3480
a.Caption = "PB"
b.Caption = "PB"
c.Caption = "PB"
d.Caption = "PB"
e.Caption = "PB"
f.Caption = "PB"
g.Caption = "PB"
If asce.Top = 3480 Then
m.Caption = Val(m.Caption) + 1
End If

asce.Top = 3480
cinco.Enabled = False
Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub contra_Change()
If contra.Text = "CAMEL" Then
asce.Top = 480
Else
contra.Text = ""
End If

End Sub

Private Sub cuatro_Click()
asce.Top = 1080
a.Caption = "4"
b.Caption = "4"
c.Caption = "4"
d.Caption = "4"
e.Caption = "4"
f.Caption = "4"
g.Caption = "4"

If asce.Top = 1080 Then
i.Caption = Val(i.Caption) + 1
End If

asce.Top = 1080
cuatro.Enabled = False
Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cinco.Enabled = True
End Sub



Private Sub luz_Click()
If asce.FillColor = vbWhite Then
asce.FillColor = vbBlack
Else
If asce.FillColor = vbBlack Then
asce.FillColor = vbWhite
End If
End If
End Sub

Private Sub pb_Click()
asce.Top = 3480
a.Caption = "PB"
b.Caption = "PB"
c.Caption = "PB"
d.Caption = "PB"
e.Caption = "PB"
f.Caption = "PB"
g.Caption = "PB"
If asce.Top = 3480 Then
m.Caption = Val(m.Caption) + 1
End If

asce.Top = 3480
pb.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
cinco.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub ss_Click()
asce.Top = 4080
a.Caption = "SS"
b.Caption = "SS"
c.Caption = "SS"
d.Caption = "SS"
e.Caption = "SS"
f.Caption = "SS"
g.Caption = "SS"
If asce.Top = 4080 Then
n.Caption = Val(n.Caption) + 1
End If

asce.Top = 4080
ss.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
cinco.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub dos_Click()
asce.Top = 2280
a.Caption = "2"
b.Caption = "2"
c.Caption = "2"
d.Caption = "2"
e.Caption = "2"
f.Caption = "2"
g.Caption = "2"
If asce.Top = 2280 Then
k.Caption = Val(k.Caption) + 1
End If

asce.Top = 2280
dos.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
cinco.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub SSS_Click()
asce.Top = 4080
a.Caption = "SS"
b.Caption = "SS"
c.Caption = "SS"
d.Caption = "SS"
e.Caption = "SS"
f.Caption = "SS"
g.Caption = "SS"
If asce.Top = 4080 Then
n.Caption = Val(n.Caption) + 1
End If

asce.Top = 4080
SSS.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
cinco.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub stop_Click()
If uno.Enabled = True Then
uno.Enabled = False
Else
uno.Enabled = True
End If

If dos.Enabled = True Then
dos.Enabled = False
Else
dos.Enabled = True
End If

If tres.Enabled = True Then
tres.Enabled = False
Else
tres.Enabled = True
End If

If cuatro.Enabled = True Then
cuatro.Enabled = False
Else
cuatro.Enabled = True
End If

If cinco.Enabled = True Then
cinco.Enabled = False
Else
cinco.Enabled = True
End If

If pb.Enabled = True Then
pb.Enabled = False
Else
pb.Enabled = True
End If

If ss.Enabled = True Then
ss.Enabled = False
Else
ss.Enabled = True
End If

If luz.Enabled = True Then
luz.Enabled = False
Else
luz.Enabled = True
End If

If Command1.Enabled = True Then
Command1.Enabled = False
Else
Command1.Enabled = True
End If

If Command2.Enabled = True Then
Command2.Enabled = False
Else
Command2.Enabled = True
End If

If Command3.Enabled = True Then
Command3.Enabled = False
Else
Command3.Enabled = True
End If

If Command4.Enabled = True Then
Command4.Enabled = False
Else
Command4.Enabled = True
End If

If Command5.Enabled = True Then
Command5.Enabled = False
Else
Command5.Enabled = True
End If

If Command6.Enabled = True Then
Command6.Enabled = False
Else
Command6.Enabled = True
End If

If SSS.Enabled = True Then
SSS.Enabled = False
Else
SSS.Enabled = True
End If


End Sub

Private Sub tres_Click()
asce.Top = 1680
a.Caption = "3"
b.Caption = "3"
c.Caption = "3"
d.Caption = "3"
e.Caption = "3"
f.Caption = "3"
g.Caption = "3"
If asce.Top = 1680 Then
j.Caption = Val(j.Caption) + 1
End If


asce.Top = 1680
tres.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
uno.Enabled = True
dos.Enabled = True
cinco.Enabled = True
cuatro.Enabled = True
End Sub

Private Sub uno_Click()
asce.Top = 2880
a.Caption = "1"
b.Caption = "1"
c.Caption = "1"
d.Caption = "1"
e.Caption = "1"
f.Caption = "1"
g.Caption = "1"
If asce.Top = 2880 Then
l.Caption = Val(l.Caption) + 1
End If

asce.Top = 2280
uno.Enabled = False

Command6.Enabled = True
Command5.Enabled = True
Command4.Enabled = True
Command3.Enabled = True
Command2.Enabled = True
Command1.Enabled = True
SSS.Enabled = True
pb.Enabled = True
ss.Enabled = True
cinco.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
End Sub

sábado, 8 de noviembre de 2008

Semana 29

Philips desarrolla una "píldora inteligente" (12-11-08)
El grupo holandés desarrolló una "píldora inteligente" que contiene un microprocesador, una batería, una radio inalámbrica, una bomba y un reservorio de medicación para emitir fármacos en una zona específica del cuerpo.
"iPill" mide la acidez con un sensor que determina su ubicación en los intestinos y entonces puede emitir la medicación necesaria.
Mientras que la cápsula contiene pequeñas cámaras ya empleadas en herramientas de diagnóstico, aquellas no contaban con la capacidad de administrar fármacos, agregó la empresa.
De todas formas, Philips señaló que la iPill es un prototipo, pero que pronto estará disponible para su fabricación en serie.
(La imagen no corresponde con una píldora inteligente)
Creo que será muy útil en un futuro cercano.




Duelo de sables de luz en la Wii
Nintendo anuncia la disponibilidad de uno de los juegos más esperados: 'Star Wars The Clone Wars: sables de luz'. Esta creado para vivir la sensación de pelear con el arma de los caballeros jedi en las "Guerras Clon".
Se podrá luchar en el bando de los héroes Jedi o en el lado oscuro de los Sith. Todo esto en escenarios inéditos y utilizando "los sables de luz".
La elegí porque parece que será una juego recomendable y entretenido.





Anuncian oficialmente el Nokia E63 (12/11)
Nokia lo confirmó a un precio de 199 euros y vendrá en dos colores, rojo rubí y azul marino. Es un dispositivo claramente enfocado para el uso profesional y corporativo.
Viene con una pantalla de 2.3 pulgadas, Wi-Fi, entre otras cosas.
Entre ellas incluye una función muy interesante:un botón switch que permite alternar entre el “modo profesional” (correo, agenda y la intranet de la empresa) y “modo personal” (fotos, correo personal, y favoritos de Internet; etc.).
Más información sobre este celular

Se ve que es un buen teléfono, especialmente para personas que usan el celular constantemente para trabajar.

Semana 28

MySpace podría desarrollar su propio reproductor digital (7/9/08)
La popular red social podría desarrollar un reproductor digital de música como una apuesta contra el Iphone de Apple.
"Es posible" que MySpace, que recientemente logró un trato con las discográficas más importantes, pueda eventualmente fabricar un dispositivo para escuchar música, según dijo DeWolfe.
MySpace ya había lanzado MySpace Music en septiembre, apuntando a convertirse en la primera parada para los aficionados a la música.
Creo que podría tener éxito.



YouTube permitirá la auto traducción de vídeos (06/NOV/ 08)

La empresa experimenta una nueva función que permite traducir automáticamente los vídeos que estén subtitulados. Desde hace unos meses YouTube permitía a los usuarios incorporar texto o subtítulos a las piezas que iban subiendo. Pero ahora fue un paso más adelante.
La función de auto traducción se puede activar clickeando en el botón CC que aparece al sostener el puntero del mouse en el borde inferior derecho del reproductor de YouTube.
Por el momento las traducciones disponibles son pocas e incluso deficientes, algo que suele suceder con este tipo de software de traducción en acción. Pero aún está en desarrollo.
Me parece que va a ser algo muy bueno y muy útil.




Samsung destronó a Motorola como líder en ventas en USA (7/11)
Según los datos estadounidenses, Samsung superó a Motorola como el principal vendedor de teléfonos celulares en el mercado de este país. La encueste muestra que Samsung se quedó con el 22.4% de las ventas, Motorola con el 21.1% y tercero quedó LG con el 20.5%. Los datos fueron sorprendentes ya que en el 2007 Motorola tenía 33 % de las ventas siendo líder indiscutible.

jueves, 30 de octubre de 2008


Private Sub cinco_Click()
asce.Top = 480
a.Caption = "5"
b.Caption = "5"
c.Caption = "5"
d.Caption = "5"
e.Caption = "5"
f.Caption = "5"
g.Caption = "5"
End Sub


Private Sub Command1_Click()
asce.Top = 480
a.Caption = "5"
b.Caption = "5"
c.Caption = "5"
d.Caption = "5"
e.Caption = "5"
f.Caption = "5"
g.Caption = "5"
End Sub


Private Sub Command2_Click()
asce.Top = 1080
a.Caption = "4"
b.Caption = "4"
c.Caption = "4"
d.Caption = "4"
e.Caption = "4"
f.Caption = "4"
g.Caption = "4"
End Sub


Private Sub Command3_Click()
asce.Top = 1680
a.Caption = "3"
b.Caption = "3"
c.Caption = "3"
d.Caption = "3"
e.Caption = "3"
f.Caption = "3"
g.Caption = "3"
End Sub


Private Sub Command4_Click()
asce.Top = 2280
a.Caption = "2"
b.Caption = "2"
c.Caption = "2"
d.Caption = "2"
e.Caption = "2"
f.Caption = "2"
g.Caption = "2"
End Sub


Private Sub Command5_Click()
asce.Top = 2880
a.Caption = "1"
b.Caption = "1"
c.Caption = "1"
d.Caption = "1"
e.Caption = "1"
f.Caption = "1"
g.Caption = "1"
End Sub


Private Sub Command6_Click()
asce.Top = 3480
a.Caption = "PB"
b.Caption = "PB"
c.Caption = "PB"
d.Caption = "PB"
e.Caption = "PB"
f.Caption = "PB"
g.Caption = "PB"
End Sub


Private Sub cuatro_Click()
asce.Top = 1080
a.Caption = "4"
b.Caption = "4"
c.Caption = "4"
d.Caption = "4"
e.Caption = "4"
f.Caption = "4"
g.Caption = "4"
End Sub


Private Sub luz_Click()
If asce.FillColor = vbWhite Then
asce.FillColor = vbBlack
Else
If asce.FillColor = vbBlack Then
asce.FillColor = vbWhite
End If
End If
End Sub


Private Sub pb_Click()
asce.Top = 3480
a.Caption = "PB"
b.Caption = "PB"
c.Caption = "PB"
d.Caption = "PB"
e.Caption = "PB"
f.Caption = "PB"
g.Caption = "PB"
End Sub


Private Sub ss_Click()
asce.Top = 4080
a.Caption = "SS"
b.Caption = "SS"
c.Caption = "SS"
d.Caption = "SS"
e.Caption = "SS"
f.Caption = "SS"
g.Caption = "SS"
End Sub


Private Sub dos_Click()
asce.Top = 2280
a.Caption = "2"
b.Caption = "2"
c.Caption = "2"
d.Caption = "2"
e.Caption = "2"
f.Caption = "2"
g.Caption = "2"
End Sub


Private Sub SSS_Click()
asce.Top = 4080
a.Caption = "SS"
b.Caption = "SS"
c.Caption = "SS"
d.Caption = "SS"
e.Caption = "SS"
f.Caption = "SS"
g.Caption = "SS"
End Sub

Private Sub stop_Click()

uno.Enabled = False
dos.Enabled = False
tres.Enabled = False
cuatro.Enabled = False
cinco.Enabled = False
ss.Enabled = False
pb.Enabled = False
luz.Enabled = False
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = False
SSS.Enabled = False
End Sub


Private Sub tres_Click()
asce.Top = 1680
a.Caption = "3"
b.Caption = "3"
c.Caption = "3"
d.Caption = "3"
e.Caption = "3"
f.Caption = "3"
g.Caption = "3"
End Sub


Private Sub uno_Click()
asce.Top = 2880
a.Caption = "1"
b.Caption = "1"
c.Caption = "1"
d.Caption = "1"
e.Caption = "1"
f.Caption = "1"
g.Caption = "1"
End Sub

Semana 27

Entrevista a la Madre de Google
El logo del buscador es una marca registrada de Internet. En una entrevista exclusiva su creadora explica cómo diseñó el emblema hace diez años: letras, colores y formas que están presentes en todo el mundo. Es con la diseñadora brasileña Ruth Kedar y comenta que los emprendedores de google "Me dieron muy buena impresión. Tenían una visión muy clara y lúcida de lo que la compañía tenía que ser. "
Cuenta que se tardó cuatro meses en hacer el logo.
Pero también su creación cambia. Así, en distintos aniversarios y fechas el logo muta a nuevas formas. Aunque Kedar, como cualquier madre, no se frustra si su hijo crece y cambia.
Entrevista completa...

Creo que creadora debe estar orgullosa de su logo, ya que yo pienso que es muy original y me gusta cuando cambian para distintas fechas (como se ve en la ilustración) .




La ONU lanzará en español el primer videojuego humanitario
El Programa Mundial de Alimentos de la Organización de las Naciones Unidas presentará “Food Force”, un videojuego para tomar conciencia sobre la pobreza.
El objetivo del juego es erradicar el hambre en el mundo. Para ello, el participante tendrá que localizar lugares donde la gente se muere de hambre o huye de la guerra. Una vez ubicados, repartirá cargamentos de comida desde un camión que, posiblemente, tenga que atravesar terrenos peligrosos.
Al final de la partida, los jóvenes descubren se puede contribuir a que la gente reconstruya sus vidas después de una tragedia.
LINK

La elegí por ser una propuesta buena para disminuir (o mejor dicho transmitir) estos problemas a través de algo tan sencillo como un videojuego.


Samsung Delve
Este nuevo celular probablemente estará en venta a partir del 7 de Noviembre e incluirá una pantalla táctil de 3 pulgadas con 240×400 pixels de resolución.
Pesa 102 gramos; tiene Bluetooth, memoria interna de 150 MB, y ranura para tarjetas MicroSD.
Entre otras aplicaciones, también tiene la interfaz TouchWiz que permite arrastrar los widgets por la home para personalizarla.

martes, 21 de octubre de 2008

Ascensor 2 (Melu)

Private Sub cinco_Click()
asce.Top = 480
End Sub

Private Sub cuatro_Click()
asce.Top = 1080
End Sub

Private Sub luz_Click()
If asce.BackColor = vbBlack Then
asce.BackColor = vbWhite
End If
End Sub

Private Sub pb_Click()
asce.Top = 3480
End Sub

Private Sub ss_Click()
asce.Top = 4080
End Sub

Private Sub dos_Click()
asce.Top = 2280
End Sub

Private Sub tres_Click()
asce.Top = 1680
End Sub

Private Sub uno_Click()
asce.Top = 2880
End Sub

miércoles, 15 de octubre de 2008

Noticias Semana 26

Montevideo se convierte primera ciudad Latino-América con Wi-Fi en transporte público
Esta ciudad es la primera latino-americana que ofrece a los usuarios de transporte urbano la posibilidad de acceder gratuitamente a Internet a través de un sistema de conexión inalámbrica WiFi instalado en los vehículos.
Así, viajeros con ordenadores portátiles, escolares del Plan Ceibal y usuarios de teléfonos móviles con conexión inalámbrica se beneficiarán del servicio.
En esta primera etapa, la conexión está disponible en tres vehículos de la línea urbana D10 y se ampliará progresivamente a otros recorridos.
Creo que es un excelente proyecto y será muy útil para la gente de Uruguay.



Los bloggers proponen ideas para combatir la pobreza (15/ 107/ 2008)
El "Día de Acción Blog" pretende unir a bitácoras, podcatsts y videocasts para compartir ideas sobre la pobreza. Anteriormente en la edición 2007, se había establecido un debate sobre la situación del medio ambiente.
También colgarán en sus sitios web ideas y tentativas de solución a este problema mundial. Está abierta a cualquier persona y no hay límites.
Esta convocatoria permitirá a los bloggers dirigir sus preguntas y comentarios a los políticos que estén dispuestos a sumarse a esta campaña.
Sobre Blog Action Day... Foto del logo 2007
Me parece que tendrá mucho existo. Ojalá se hagan buenas propuestas y los gobiernos las tomen en cuenta, llevándolas a la práctica.



Iluminación de las calles gracias a la genética (13/10)

Afortunadamente, cada vez mas calles de nuestras ciudades tienen árboles para darles vida, reducir la contaminación y alegrar la vista. Pero parece que pueden hacer algo más: modificados genéticamente podrían convertirse en organismos bioluminiscentes. Para eso existe la bioluminiscencia que es un proceso biológico que produce de luz gracias a una reacción química. Este proceso es (depende el ser vivo) así: luciferina/ luciferasa + oxigeno= luz + molécula.
Resultado: hojas que brillan en la oscuridad con una iluminación difusa y mucho más agradable que la de una farola.
Sin embargo, aún queda bastante para desarrollar un organismo que podamos utilizar. Empezando por la cantidad de luz: la suma de cientos de hojas no pueden (todavía) aportar una cantidad apreciable de luz.
Pero parece que el color es mucho menos problemático. Jugando con la biología, los científicos han sido capaces de generar hasta 90 colores diferentes...
Otra nueva propuesta para cuidar el medio ambiente

jueves, 9 de octubre de 2008

Calculadora3

Private Sub ocho_Click()
pantalla.Caption = pantalla.Caption + "8"
End Sub

Private Sub por_Click()
aux2.Caption = "*"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
coma.Enabled = True
End Sub

Private Sub porc_Click()
aux2.Caption = "%"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
coma.Enabled = True
End Sub

Private Sub raiz_Click()
If pantalla.Caption <= 0 Then
pantalla.Caption = "Error"
Else
pantalla.Caption = Sqr(pantalla.Caption)
End If
End Sub

Private Sub seis_Click()
pantalla.Caption = pantalla.Caption + "6"
End Sub

Private Sub siete_Click()
pantalla.Caption = pantalla.Caption + "7"
End Sub

Private Sub tres_Click()
pantalla.Caption = pantalla.Caption + "3"
End Sub

Private Sub uno_Click()
pantalla.Caption = pantalla.Caption + "1"
End Sub

Noticias Semana 25

Swirrl, trabajo en equipo mediante wiki (6/ 10/ 08)
Con la llegada de la web 2.0 el trabajo colaborativo ha recibido un tremendo empujón, y lo que antes significaba mantener un incesante intercambio de correos, ahora se simplifica con la aparición de herramientas que nos permiten trabajar en equipo al mismo tiempo y desde lugares remotos. Por eso nos encontramos con Swirrl, servicio web que facilita el almacenamiento, edición y análisis de la información de manera sencilla para que los equipos de trabajo metan mano en ella al estilo de una wiki. Tan solo hay que ingresar con el email y elegir el nombre del proyecto, para figurar como administrador. Después sólo será cuestión de invitar a los demás miembros de tu equipo.
Creo que es una interesante idea y muy útil.


El ADN de las huellas digitales permitiría revelar el apellido (8- Oct- 2008)
La policía podría llegar algún día a predecir el apellido de los sospechosos o las víctimas de crímenes a partir del ADN, informaron investigadores británicos. Ellos dijeron que habían demostrado que los hombres con el mismo apellido eran muy propensos a estar genéticamente relacionados.
En un estudio con aproximadamente 2.500 hombres, más del 70 por ciento de los hombres con apellidos como Attenborough y Swindlehurst compartían los mismos o tipos casi iguales del cromosoma Y.

Parece algo útil, pero habría que ver si realmente es tan exacto como dice la noticia.



El BlackBerry que faltaba : con pantalla táctil. (9/ 10/ 2008)
El Storm, que saldrá al mercado en pocos meses, esta listo para competir con el iPhone y el Nokia 5800. El visor se hunde ligeramente cuando se la presiona y hace un "clic" al soltarse.
Además viene con correo electrónico y gestión de documentos, un reproductor de música, películas y fotos. También está equipado con una cámara de 3,2 megapíxeles.

Parece un prometedor modelo.

domingo, 28 de septiembre de 2008

Noticias Semana 24

Salas de clases conectadas aparecen en el futuro de la educación (26/ 09/ 2008)

En Santiago se desarrolla el Salón Internacional de la Educación, que ha estado marcado por el ingreso de la tecnología a las salas de clases. Y con la importancia que adquiere Internet, la conectividad es clave. Por esto, la empresa taiwanesa D-Link presentó su modelo de sala digital.
La sala digital se diferencia de las aulas tradicionales por ser un espacio conectado, que permite la administración electrónica de clases, desarrollo de pruebas y exámenes con respuesta y calificación inmediata. Incorpora el equipo portátil propio como herramienta y el trabajo desde fuera de la sala, mediante la conexión de red.
Más sobre esta "sala del futuro"

Creo que es un buen paso hacia el futuro...






Murata Boy, el robot que pedalea (30/ Sep/ 08 )
En la feria de tecnológica CEATEC 2008 podrá verse al Murata Boy y la Murata Girl, del grupo tecnológico Murata Manufacturing. Estos son dos robots de 5 kilos de peso y 50 centímetros de alto. Pueden montar uniciclos y tienen un ojo electrónico con sensores ultrasónicos que les avisa si se van a chocar contra algo y un cerebro robótico que les ayuda a cambiar de dirección. Pueden controlarse por Bluetooth. En la feria se podrá ver también al coche robótico BR32C y muchas cosas nuevas.
Sobre esta feria en Japón...

Debe ser un muy buen robot.




Cambios en la familia Ipod (28/ 09)
Más colores, nuevo diseño, configuraciones que aparecen y otras que no existen más. Se deben a comentarios buscados por la empresa Apple para mejorar su linea.
Se puede decir que los iPod Nano tienen un diseño nuevo y una carcasa de aluminio curvo y vidrio. El iPod Touch, por su parte, agregó botones de volumen y se hizo más pequeño y delgado, permite colocar sensores opcionales en las zapatillas para dar seguimiento a kilómetros recorridos.
También hay nuevos colores como morado, naranja, amarillo y negro; el rojo se excluyó por una campaña. Y muchas innovaciones más.

Es bueno que de vez en cuando, las cosas cambien. Y en este caso, para mejor

jueves, 25 de septiembre de 2008

Noticias Semana 23

Google dará U$S 10 millones a las mejores ideas para ayudar al mundo (24/09/08)
El buscador lanzó un concurso para financiar los proyectos que mejoren la vida de las personas.
"Sabemos que hay innumerables ideas geniales que necesitan financiación y apoyo para ponerlas en marcha,” comunico la compañía.
Las propuestas pueden estar relacionadas con cualquier campo, pero Google ha definido en la web del proyecto algunas de las áreas más comunes, como energía, vivienda, salud o educación, para simplificar el proceso.

Perece una buena propuesta.



Peapod, otro auto que no "mancha"( 25/09/2008 )
Sin gasolina y sin emisiones, el Peapod va sólo con electricidad. Es un transporte limpio y ecológico que no emite gases contaminantes. Es un coche 'coqueto', de diseño innovador y diferente. Dispone una consola central que ofrece un iPod integral, manos libres para usar el iPhone. Asientos ergonómicos , hechos de materiales reciclables y muchos accesorios más.

Creo que es un excelente proyecto y se podría empezar a usar para no contaminar el ambiente.


Relojes Bluethoot de Sony Ericcson (25/ 09/ 08)
Están lanzados en colaboración con la marca Fossil. Se conectaban vía Bluetooth con nuestro teléfono y vibraban para avisarnos de nuevas llamadas o mensajes. Desde este podemos ver quién nos llama y aceptar o rechazar la llamada. Esta vez son de diseño femenino y presentan un cristal anti-reflejante y muy resistente.

La elegí por ser una buena idea.

jueves, 18 de septiembre de 2008

Códigos Visual Basic TV 2

Private Sub anterior_Click()
auxiliar.Caption = ""
auxiliar2.Caption = nrocanal.Caption
auxiliar.Caption = auxiliar2.Caption
nrocanal.Caption = auxiliar.Caption
auxiliar.Caption = ""
End Sub

Private Sub catv_Click()
TVCATV.Caption = "CATV"
End Sub

Private Sub CATVTV_Click()
If TVCATV.Caption = "TV" Then
TVCATV.Caption = "CATV"
Else
TVCATV.Caption = "TV"
End If
End Sub

Private Sub cero_Click()
auxiliar.Caption = auxiliar.Caption + "0"
End Sub

Private Sub cinco_Click()
auxiliar.Caption = auxiliar.Caption + "5"
End Sub

Private Sub Command1_Click()

End Sub

Private Sub cuatro_Click()
auxiliar.Caption = auxiliar.Caption + "4"
End Sub

Private Sub dos_Click()
auxiliar.Caption = auxiliar.Caption + "2"
End Sub

Private Sub enter_Click()
If auxiliar.Caption < 129 Then
auxiliar2.Caption = nrocanal.Caption

nrocanal.Caption = auxiliar.Caption
auxiliar.Caption = ""
Else
If auxiliar.Caption > 129 Then
nrocanal.Caption = "0"
End If
End If
End Sub

Private Sub masbrillo_Click()
pantalla.Top = pantalla.Top + 100
pantallita.Top = pantallita.Top + 100
auxiliar.Top = auxiliar.Top + 100
End Sub

Private Sub mascanal_Click()
If TVCATV.Caption = "TV" Then
If nrocanal.Caption < 13 Then
nrocanal.Caption = nrocanal.Caption + 1
Else
nrocanal.Caption = nrocanal.Caption + 1
End If
If TVCATV.Caption = "CATV" Then
If nrocanal < 129 Then
nrocanal.Caption = nrocanal.Caption + 1
End If
Else
nrocanal.Caption = 0
nrocanal.Caption = nrocanal.Caption + 1
End If
End If
End Sub

Private Sub masvolumen_Click()
pantalla.Left = pantalla.Left + 50
End Sub

Private Sub menosbrillo_Click()
pantalla.Top = pantalla.Top - 100
pantallita.Top = pantallita.Top - 100
auxiliar.Top = auxiliar.Top - 100
End Sub

Private Sub menoscanal_Click()
If nrocanal.Caption > 0 Then
nrocanal.Caption = nrocanal.Caption - 1
Else
nrocanal.Caption = 129
If TVCATV.Caption = catv Then
nrocanal.Caption = 129
Else
nrocanal.Caption = 13
End If
End If
End Sub

Private Sub menosvolumen_Click()
pantalla.Left = pantalla.Left - 50
End Sub

Private Sub nueve_Click()
auxiliar.Caption = auxiliar.Caption + "9"
End Sub

Private Sub ocho_Click()
auxiliar.Caption = auxiliar.Caption + "8"
End Sub

Private Sub off_Click()
nrocanal.Caption = ""
TVCATV = ""
ONOFF.BackColor = vbRed
ONOFF.Caption = "OFF"
uno.Enabled = False
dos.Enabled = False
tres.Enabled = False
cuatro.Enabled = False
cinco.Enabled = False
seis.Enabled = False
siete.Enabled = False
ocho.Enabled = False
nueve.Enabled = False
cero.Enabled = False
tv.Enabled = False
catv.Enabled = False
auxiliar.Enabled = False
enter.Enabled = False
auxiliar.Caption = ""
masbrillo.Enabled = False
masvolumen.Enabled = False
mascanal.Enabled = False
menosbrillo.Enabled = False
menosvolumen.Enabled = False
menoscanal.Enabled = False
End Sub

Private Sub OFFON_Click()
If ONOFF.BackColor = vbGreen Then
nrocanal.Caption = ""
TVCATV = ""
ONOFF.BackColor = vbRed
ONOFF.Caption = "OFF"
uno.Enabled = False
dos.Enabled = False
tres.Enabled = False
cuatro.Enabled = False
cinco.Enabled = False
seis.Enabled = False
siete.Enabled = False
ocho.Enabled = False
nueve.Enabled = False
cero.Enabled = False
tv.Enabled = False
catv.Enabled = False
auxiliar.Enabled = False
enter.Enabled = False
auxiliar.Caption = ""
masbrillo.Enabled = False
masvolumen.Enabled = False
mascanal.Enabled = False
menosbrillo.Enabled = False
menosvolumen.Enabled = False
menoscanal.Enabled = False
Else
ONOFF.BackColor = vbGreen
nrocanal.Caption = "1"
TVCATV = "TV"
ONOFF.BackColor = vbGreen
ONOFF.Caption = "ON"
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
cinco.Enabled = True
seis.Enabled = True
siete.Enabled = True
ocho.Enabled = True
nueve.Enabled = True
cero.Enabled = True
tv.Enabled = True
catv.Enabled = True
auxiliar.Enabled = True
enter.Enabled = True
masbrillo.Enabled = True
masvolumen.Enabled = True
mascanal.Enabled = True
menosbrillo.Enabled = True
menosvolumen.Enabled = True
menoscanal.Enabled = True
nrocanal.Caption = "1"
End If

End Sub

Private Sub on_Click()
nrocanal.Caption = "1"
TVCATV = "TV"
ONOFF.BackColor = vbGreen
ONOFF.Caption = "ON"
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
cinco.Enabled = True
seis.Enabled = True
siete.Enabled = True
ocho.Enabled = True
nueve.Enabled = True
cero.Enabled = True
tv.Enabled = True
catv.Enabled = True
auxiliar.Enabled = True
enter.Enabled = True
masbrillo.Enabled = True
masvolumen.Enabled = True
mascanal.Enabled = True
menosbrillo.Enabled = True
menosvolumen.Enabled = True
menoscanal.Enabled = True
End Sub

Private Sub seis_Click()
auxiliar.Caption = auxiliar.Caption + "6"
End Sub

Private Sub siete_Click()
auxiliar.Caption = auxiliar.Caption + "7"
End Sub

Private Sub tres_Click()
auxiliar.Caption = auxiliar.Caption + "3"
End Sub

Private Sub tv_Click()
TVCATV.Caption = "TV"
End Sub

Private Sub uno_Click()
auxiliar.Caption = auxiliar.Caption + "1"
End Sub

Noticias Semana 22

Amilo Mini, el nuevo netbook de Fujitsu Siemens (18/ 09/ 2008)

El Amilo Mini Ui3520 se caracteriza por ofrecer carcasas intercambiables, 60Gb de almacenamiento, pantalla de 9 pulgadas, procesador Atom de Intel y Windows XP. Un nuevo miembro de los mini portátiles (o netbooks), aportan facilidad de uso, ligereza y amplias opciones de conectividad. una característica es que tiene de carcasas intercambiables en diferentes colores e incluso una transparente gracias a la cual podremos ‘forrar’ con fotos; un detalles que además de personalizar mantiene el portátil siempre en perfecto estado.
Junto a las tecnologías inalámbricas WiFi y Bluetooth, el Mini Amilo incorpora hacer uso de módem 3G. Además contiene lector de tarjetas, la webcam integrada de 1,3 megapixeles (ideal para videoconferencias), dos micrófonos que ofrecen una gran calidad de sonido y muchas cosas más. El Mini Amilo Ui3520 ya está disponible a un precio de 399 euros.

Me parece una buena idea y se ve que es un buen modelo.



MySpace prepara lanzamiento de sitio de música

En las próximas semanas MySpace lanzará MySpace Music, un nuevo servicio que ofrecerá música gratis para que los internautas escuchen online, apoyado por las principales disqueras que pretenden enfrentar de alguna manera las bajas de las ventas de los CD.
El sitio es un acuerdo entre MySpace, propiedad de News Corp., y Sony, Universal y Warner.
MySpace Music reemplazará al área actual de la red social dedicada a la música y representa un esfuerzo de dar a los amantes de la música el tipo de reproductor online global que alguna vez soñaron.
"Creemos que estamos creando una economía para todos los artistas musicales" dijo Chris DeWolfe, presidente ejecutivo de MySpace.

Creo que es una buena idea para bajar música desde cualquier computadora, aunque no tenga el Ares, Emule, etc.




Primer Blackberry con tapa (12.9.08)
RIM presentó una nueva edición de su popular teléfono inteligente, con un formato alternativo y al gusto de un gran número de consumidores. Esta nueva versión plegable (llamada BlackBerry Pearl Flip 8220) viene equipada con un reproductor de vídeo, reproductor de música, cámara de 2 megapixeles con flash, navegador de Internet, entre otras funciones.
El Flip es el sucesor del Pearl, que fue lanzado hace dos años. Tienen 20 teclas y dos letras en cada teclas, en contraste con los Blackberries más anchos que tienen más teclas y asignan solamente una letra por tecla.
"Nunca ha habido un teléfono BlackBerry para aquellos usuarios que prefieren teléfonos plegables.", dijo el ejecutivo Jim Balsillie, quien aseguró que el nuevo aparato es extremadamente importante para atraer más usuarios.

Me parece un buen celular, completo y de buena forma.

jueves, 11 de septiembre de 2008

Noticias Semana 21

Problemas con el Messenger (11/09/2008)
Se registraron inconvenientes para acceder al sistema de chat y mensajería instantánea más usado del mundo. La página web de la empresa no brinda información sobre el tema.
El servicio de Microsoft está fuera de aire para millares de usuarios en varios países.
Elegí esta noticia porque creo que un montón de gente usa MSN Messenger y a la empresa no le conviene tener problemas.





Campaña por el Windows Vista
Microsoft estrenó una campaña de 300 millones de dólares para mejorar la imagen del sistema operativo Windows Vista y responder así a los anuncios de su rival Apple. "Lo que la marca representa, particularmente en el caso de Windows Vista, ya ha sido definido por los competidores. Ha llegado el momento de que contemos nosotros nuestra historia," dijo el vicepresidente de Microsoft. También dijo que estaba colaborando con fabricantes informáticos para optimizar los sistemas de cara a acelerar los procesos informáticos y mejorar la experiencia general de usar una máquina con Windows.




Samsung HighNote
Se trata de un slider orientado a la música con controles externos para el reproductor y acceso Sprint Music Store.
Tiene parlantes stereo, navegación, email y SMS, cámara de 2 megapíxeles, Bluetooth y muchas cosas más.
Disponible en rojo y azul.

Parece un modelo muy bueno y prometedor.

jueves, 4 de septiembre de 2008

Noticias Semana 20

Google presentó su navegador de Internet : Chrome (04/09/2008 )
Llevó 2 años desarrollarlo y estuvo durante 4 meses. "Había una necesidad de crear un browser nuevo.
"Chrome tiene muchas aplicaciones que se acceden por un navegador, y se basa en tres pilares: estabilidad, velocidad e intuitividad . ", aseguraron.
El navegador de Google tiene una única barra de navegación, a través de la cual se podrá escribir la dirección de los sitios. También presenta las típicas pestañas que se muestran en la parte superior de la aplicación para darle al usuario la sensación de tener el control independiente de la barra y los botones de navegación.
De momentos la aplicación sólo está disponible para usuarios de Windows. Pero habrá una versión para Mac OS y para Linux. También habrá un Chrome para Android , la plataforma para celulares que lanzará Google.
Más sobre Chrome...
La elegí porque esta bueno que Google haya sacado su propio Navegador.






Videojuegos en Tercera Dimensión (29/ 08/ 08)
Las industrias electrónicas y de juegos han creado nuevas tecnologías que permiten a sistemas hogareños y a ordenadores personales la emisión de 3D. Se requieren lentes 3D similares a los usados en cines IMAX y ya se están haciendo juegos como "Age of Empires III", "EverQuest II" y "Pirates of the Caribbean Online", entre otros.
LINK
Me parece una excelente idea, me gustaría probar como se siente jugar en 3D.






Samsung ofrece detalles del A137 (04/ 09/2008)
Es un teléfono celular clamshell básico. Trabaja con redes GSM/GPRS e incluye Bluetooth, a-GPS y reproductor de música en formato MP3.
También incluye funcionalidad para usar mensajería instantánea
y correo electrónico.
La elegí ya que parece un buen y sencillo modelo.

sábado, 30 de agosto de 2008

Flash de Narnia

Este animación es de la película Narnia, el Principe Caspian.


[Upload your own video]

Códigos y captura de Pantalla de mi TV


Los códigos son:

Private Sub catv_Click()TVCATV.Caption = "CATV"End Sub
Private Sub cero_Click()nrocanal.Caption = "0"auxiliar.Caption = auxiliar.Caption + "0"End Sub
Private Sub cinco_Click()nrocanal.Caption = "5"auxiliar.Caption = auxiliar.Caption + "5"End Sub
Private Sub Command1_Click()
End Sub
Private Sub cuatro_Click()nrocanal.Caption = "4"auxiliar.Caption = auxiliar.Caption + "4"End Sub
Private Sub dos_Click()nrocanal.Caption = "2"auxiliar.Caption = auxiliar.Caption + "2"End Sub
Private Sub enter_Click()nrocanal.Caption = auxiliar.Captionauxiliar.Caption = ""End Sub
Private Sub masbrillo_Click()pantalla.Top = pantalla.Top + 100pantallita.Top = pantallita.Top + 100auxiliar.Top = auxiliar.Top + 100End Sub
Private Sub mascanal_Click()If nrocanal.Caption < 129 Thennrocanal.Caption = nrocanal.Caption + 1Elsenrocanal.Caption = 0End IfEnd Sub
Private Sub masvolumen_Click()pantalla.Left = pantalla.Left + 50End Sub
Private Sub menosbrillo_Click()pantalla.Top = pantalla.Top - 100pantallita.Top = pantallita.Top - 100auxiliar.Top = auxiliar.Top - 100End Sub
Private Sub menoscanal_Click()If nrocanal.Caption > 0 Thennrocanal.Caption = nrocanal.Caption - 1Elsenrocanal.Caption = 129End IfEnd Sub
Private Sub menosvolumen_Click()pantalla.Left = pantalla.Left - 50End Sub
Private Sub nueve_Click()nrocanal.Caption = "9"auxiliar.Caption = auxiliar.Caption + "9"End Sub
Private Sub ocho_Click()nrocanal.Caption = "8"auxiliar.Caption = auxiliar.Caption + "8"End Sub
Private Sub off_Click()nrocanal.Caption = ""TVCATV = ""ONOFF.BackColor = vbRedONOFF.Caption = "OFF"uno.Enabled = Falsedos.Enabled = Falsetres.Enabled = Falsecuatro.Enabled = Falsecinco.Enabled = Falseseis.Enabled = Falsesiete.Enabled = Falseocho.Enabled = Falsenueve.Enabled = Falsecero.Enabled = Falsetv.Enabled = Falsecatv.Enabled = Falseauxiliar.Enabled = Falseenter.Enabled = Falseauxiliar.Caption = ""End Sub
Private Sub on_Click()nrocanal.Caption = "1"TVCATV = "TV"ONOFF.BackColor = vbGreenONOFF.Caption = "ON"uno.Enabled = Truedos.Enabled = Truetres.Enabled = Truecuatro.Enabled = Truecinco.Enabled = Trueseis.Enabled = Truesiete.Enabled = Trueocho.Enabled = Truenueve.Enabled = Truecero.Enabled = Truetv.Enabled = Truecatv.Enabled = Trueauxiliar.Enabled = Trueenter.Enabled = TrueEnd Sub
Private Sub seis_Click()nrocanal.Caption = "6"auxiliar.Caption = auxiliar.Caption + "6"End Sub
Private Sub siete_Click()nrocanal.Caption = "7"auxiliar.Caption = auxiliar.Caption + "7"End Sub
Private Sub tres_Click()nrocanal.Caption = "3"auxiliar.Caption = auxiliar.Caption + "3"End Sub
Private Sub tv_Click()TVCATV.Caption = "TV"End Sub
Private Sub uno_Click()nrocanal.Caption = "1"auxiliar.Caption = auxiliar.Caption + "1"End Sub

miércoles, 27 de agosto de 2008

Noticias Semana 19

Los virus llegan al Espacio (27/ 08/ 2008)
Los ordenadores portátiles enviados a la Estación Espacial Internacional el pasado mes de julio están infectados con el virus W32.Gammima.AG. El principal objetivo de este programa malicioso, es robar las claves de varios juegos. El virus, que llegó a la plataforma orbital por vías que todavía se desconocen, no tiene capacidad de causar ningún daño a los sistemas de control de la EEI, según la NASA.
La elegí ya que me pregunto como es tan fácil ayer llegar un virus a la NASA, y que tan peligroso puede llegar a ser eso.



Guantes con Bluetooth
Que complicado que es atender una llamada al celular mientras se está con los guantes puestos! Pensando en esta dificultad, la marca Swany diseñó el G.Cell Glove, unos guantes con bluetooth integrado, que se comunican con el teléfono móvil.
Tiene un micrófono incorporado en el pulgar, el auricular está en la palma. Y no se preocupe por la humedad propia de la nieve, todo está protegido (incluso la mano) por una cubierta anti-agua. La batería dura 12 horas en standby, y 4 horas de conversación.
Me parece una idea muy buena y re-original. Me gustaría estar hablando por celular, sin tener frió en las manos y estar en la nieve!!





Sony Ericcson TM506

Este teléfono estilo clamshell es muy delgado y se trata del primer teléfono 3G de Sony Ericsson que soporta la banda AWS. Además incluye una cámara de 2 megapíxeles, GPS, Bluetooth con A2DP y conectividad HSDPA para datos. El lanzamiento oficial de este nuevo terminal está previsto para principios de septiembre.
Me parece un buen modelo, y muy prometedor. Aunque habrían que saber más especificaciones de este modelo.

lunes, 25 de agosto de 2008

Mis vacaciones: Mapa

El mapa con donde fuí en mis vacaciones de Invierno.


Ver mapa más grande

lunes, 18 de agosto de 2008

Mis vacaciones

Primer Semana



Lunes 28: Fui a entrenar gimnasia artistica a mi club. *






Martes 29: Con mi grupo, terminamos el trabajo de Sociales. *





Miercoles 30: Fui al cine de Villa del Parque. *








Jueves 31: Fui al Shopping Abasto. *





Viernes 1: me quede en mi casa.







Segunda semana


Lunes 4: Me quede en el hotel de La Lucila, mirando videos. *



Martes 5: Fui a las playas de la ciudad San Bernardo. *



Miercoles 6: Viaje de la Lucila a mi Casa. *



Jueves 7: Fui a Coto a jugar al bowling. *




Viernes 8: Fui al campo de deportes de Macabi.

Noticias Semana 18

El inventor del mouse 'jubila' a su dispositivo (18- 08)
Cuando Douglas Engelbart creó el mouse fue considerado un genio en el mundo de la informática y un visionario. Pero ahora, este hombre se arriesga a decir que el mouse tiene fecha de vencimiento.
El inventor afirma que ya existen en el mercado otros dispositivos de señalamiento que ocupan el lugar de su invento (la pantalla táctil y al reconocimiento de voz).
Sobre el "adiós" al mouse...

La elegí ya que me parece que es cierto, que hay nuevos inventos que podrán reemplazar el mouse. Aunque yo pienso que es un invento que sirvió y sirve mucho.





Se viene el "Google Phone" (16/ 08/08)
El primer celular con el software de Google saldrá al mercado en septiembre. El teléfono inteligente que se llamará Dream será fabricado por HTC y permitirá a los usuarios acceder a la red y a los servicios de Google, Gmail y otros, desde cualquier dispositivo móvil con conexión a Internet. Tendrá una gran pantalla táctil , un teclado completo debajo.
LINK


Parece que Iphone va a tener competencia. según lo que se lee en el artículo completo, este celular parece prometedor.









Estudio: videojuegos pueden ayudar a los estudiantes
Un grupo de investigadores detallaron una serie de estudios que sugerían que los videojuegos también pueden ser poderosas herramientas de aprendizaje.. Un estudio incluso se cuestionó si “World of Warcraft”, el juego multijugador más grande del mundo, podía mejorar el pensamiento científico.
En un estudio de la Universidad Fordham, se le pidió a 122 estudiantes que pensaran en voz alta mientras jugaban un juego que nunca habían visto. Los investigadores estudiaron las frases de los niños para ver si jugar un juego mejoraba las habilidades cognitivas y de percepción.
Más de este estudio...

Elegí esta noticia porque creo es bueno que un videojuego ayude a pensar, y que no solo sea matar al del equipo contrario.

jueves, 14 de agosto de 2008

Noticias Semana 17

Lo que hace Google con los datos personales (13/ 08)
A este respecto, se refirió a la política de privacidad de Google, puntualizando que Google almacena información personal cuando alguien se registra para un servicio, que el usuario proporciona de manera voluntaria. También, que se utilizan “cookies” y que los servidores del buscador registran automáticamente la dirección IP del visitante, el tipo de navegador que utilizó, el idioma, la fecha y la hora.
Toda esta información se almacena en servidores seguros.
En cuanto a lo que se escribe en cada correo electrónico, existe una lista de palabras que se “buscan” en estos, para mostrar publicidad asociada con el contenido del mail.
Me interesa ya que mucha gente utiliza este buscador y esta bueno saber que hace con la información que recibe de cada persona que busca.




MP3 Olímpico
El furor por los Juegos Olímpicos y los souvenirs que se generan a su alrededor ha dado a luz un curioso reproductor de MP3 con la forma del Estadio Olímpico de Beijing.
El original artefacto reproduce archivos en formatos MP1, MP2, MP3, WMA, WMV, ASF y WAV. Tiene una pantalla LCD, la función de reproducir vía USB en Windows, grabador de voz, y muchas opciones más. Todo esto por un valor desde US$19.20, en su versión de 1GB, porque también se encuentra con capacidades de 2 y 4GB.


Pienso que es una muy buena idea, y muy original. Tambièn esta muy lindo!!



Celular Ecológico
Este móvil, el Samsung E200 Eco, esta fabricado con materiales no nocivos para el medio ambiente. Traduciendo: el modelo, de sólo 9,9 mm de grosor ha sido fabricado con ‘bio-plástico,’ que se obtiene de plantas como el maíz. Además, todo el proceso de producción está pensado para reducir al mínimo las emisiones de CO2. Hasta la caja en la que se venderá el E200 está fabricada con materiales reciclados.


La elegí ya que creo que es una excelente idea para reducir la contaminación, y también porque parece un buen modelo.