Nos cambiamos!

Nos vamos a www.jonyblog.com

Saludos.

Hablando del día de los enamorados…

Uhuuhuuhuh, es día 14 de febrero, que indica eso? que es el día de los enamorados, es mundialmente conocido este día, y su historial como día, tambien es bastante antiguo, y como yo no lo tengo con quien pasar (que triste vida xD), les dire y mencionare cual es mi enamorada, en realidad es que encuentro que a pesar de que nunca la he visto, ni conozco, es bastante bella esta actriz, su nombre es Liv Taylor, su pelicula mas famoso fue el papel de Arwen en el Señor de los Anillos, la Elfa riverbed que estaba enamorada de Aragorn. Mi amor por ella, o en realidad mi admiración de su belleza se dio cuando vi la 1ra pelicula de Señor de los Anillos.

Rescate esta fotito, para que puedan ver que en realidad no miento, y que lo que digo es cierto, este es mi pequeño homenaje en el día de los enamorados, ojala que el proximo año ya no sea igual xD! o si no obligado a esperar a mi princesita azul, que realmente aparezca de acuerdo a mis gustos y anhelos.

Esta foto la sacaron para una famoso revista, en realidad el nombre preciso, no la recuerdo bien, pero la encontre en Google, buscando por ahí entre su sitio y la opción de Google de imagenes. Que mas puedo decir, realmente bella esta mujer. Y ahora viene el clasico blablabla bla blablablabla bla blablablabla bla blablablabla bla bla blablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla blablablabla bla bla. Todo lo anterior para poder rellenar y no dejar espacio en blanco, porque se pierde hojita. Un momento de Ocio no le hace mal a nadie.

Continuando con el tema del famoso día de los enamorados, nada mas que desearles a todos un feliz día, y a los que no tienen con quien compartirlo, como yo solamente nos queda en la mente imaginar y soñar con nuestra princesita azul, que pronto aparecera estoy mas que seguro, y sera mas bella que cualquier amor platonico, que podamos tener.

Gracias por su visitas, lecturas y comentarios.

Tau.

Empezando a estudiar…

Ya me esta empezando a dar miedo, o mas que miedo son como ancias de saber si realmente podre con este lenguaje como es Visual Basic (VB), buscando por internet encontre un excelente manual, el cual esta bastante completo, y que obviamente compartire para todos los que pasen por este blog.

http://www.canalvisualbasic.net/temarios/manual_visualbasic_net.asp

Y hay que empezar a estudiar no mas po, no queda otra, faltan alrededor de 2 semanas para entrar a la Universidad, y veremos que sucede este año, animo y fuerza para todos los “colegas”. Y aguante!!!! INFORMATICA UTFSM CONCEPCIÓN.

Tau.

Wuau! como pasa el tiempo

Pareciera que fue ayer cuando estaba mariado y deambulando por dbase, clipper, c++, entre otras pruebas que tuve que sortear en la universidad, me queda menos de un mes para entrar a la universidad a este segundo año, este que viene cargado de grandes desafios, hartas pruebas y cosas que ire adquiriendo y aprendiendo. Y el tiempo sigue avanzando y sigues estando allí que es lo mas bello.

Espero que toda la gente que me conoce esten bien, mis compañeros de universidad esten disfrutando y tambien estudiando lo que se viene para poder no estar llegando con los brazos cruzados y sin cachar absolutamente nada, lo que es yo enero fue relajo, y ahora febrero volvemos al ambiente informático.

Espero seguir ocupando este blog, para ayudar, para intercambiar ideas, y lo mas importante tal vez dejar algo, para alguien, quien sabe…

Tau.

pda: tratare de darle otro aire al theme del blog, para innova

¿Quiere ganar un dominio .com .net .org? participe

Un viejo conocido, de esos que no se olvidan, como es Nachox esta realizando un concurso para regalar 3 dominios .com .net .org a tu elección, lo unico que tienes que hacer se crear realizar atraves de blog un anuncio del concurso tal cual lo estoy haciendo en este momento.

Las reglas son bastantes simples, las cuales estan explicadas claramente en su blog, si quieres participar como yo lo estoy haciendo, haz click en la siguiente imagen:

Estan todos invitados a participar, veamos como nos va a nosotros si logramos ganar aquel anciado dominio, para asi echar nuestra mente a crear en nuestro dominio.

Tau.

El resumen

Holas,

Hace siglos que no escribia, en realidad solamente un par de semanas, es que el colapso de terminar un año en la universidad se me vino encima, y fueron millones las cosas que tuve que hacer, pero al fin termine ayer a las 17:00 hrs aproximadamente termine mi trabajo de programacion final de OMA en Clipper, fue una maratonica tarde y mañana programando junto a mi compañero Pablito mi chiquillo (Otaku). Y se fue el año no mas po, en realidad paso volando primero año en la universidad y pase todos los ramos, estoy eternamente agradecido a Dios por haberme ayudado.

Ahora en adelante, veremos que sucede en el verano, que panorama tenemos, que productivo haremos, y obviamente estudiar, porque si no fuera por que estudie algunas cosas, tal vez otro seria el cuento y estaria todo estrezado por los examanes, solamente ahora faltan saber unas cuentas notitas en Administración, en OMA y Matemáticas 2, y estariamos dados.

Para finalizar, acá les dejo una foto de un grupo de compañeros, que juntos pasamos este año, ya se podriamos decir que somos amigos, si no fuera tambien por toda el aguante que le pusimos juntos, por los momentos felices que me hicieron pasar, por esos momentos de leseo y peluseo, que me hacian olvidar a veces situaciones malitas y salir adelante.

De izquierda a derecha: JonyLais(Yo), Kouga, Suricato,Otaku y el de la carita Pablosky, el fotografo Azucar de Color.

Tau.

pda: nos vemos el otro años cauros, aguante los que tienen que ir a global o examenes.
pda2: juntemosno en el verano a tomarnos una chelitas locas por ahí.

¿Sera verdad?

Veamos si esto resulta: “Yo no lo creía pero funciona de verdad!! Envia este mensaje a 10 personas y despues entra a http://www.quien-te-ama.com.ar y mira el nombre de la persona que te ama!!!!”

Tau.

Protesta numero 1845444545 vez…

Como entender a los “mapuches”, si en realidad muchos de ellos son estudiantes universitarios, y al parecer en la universidad no enseñan nada, el hecho radica en que como entenderlos y hacerles entender que con golpes, protestas, humo y cosas demases no van a lograr mayores cambios, no se trata de un sistema capitalista, ni tampoco de que el gobierno los quiere matar, es que su pensamiento y su manera de ver las cosas tiene que evolucionar.

Bueno, el tema es que ocurrió en mi querida universidad la protesta numero (en realidad han sido demasiadas), y todavía siguen haciendo lo mismo, ya cuando hay protesta como que todos anhelamos que al final los agarren de una vez por todas y que paren su escandalo, ya nadie les cree mucho (algunos si…), y al final siempre se escucha esta frase de algunos estudiantes de la UTFSM Concepción, frases como “ya llegaron los mapuches de nuevo”, “de nuevo lo mismo”, es que ya se puede predecir su andar y mover de este tipo de personas, cuando ya no tienen que tirar o quemar, arrancan…hoy la diferencia a otros dias es que pude sacar fotos y apenas el guanaco, se tiro en mala y tiro agua por todos lados, y tuvimos que correr todos los estudiantes.

Porque las palabras no son validas, si no tenemos imagenes, seleccione 5 fotos para resumir la ocasión:

Que mas se puede decir, la imagen lo dicen todo…hasta cuando! es mi pregunta. Jony reportero siempre en el hecho noticia, en el momento…

Tau.

Test Nº 3 de OMA

Finalmente me salio completamente un test de OMA, bueno acá les dejo el codigo, para que puedan estudiar, o si por ahí en la red a alguien le sirve.

oma3.PRG

*Jonathan Ramírez Medina / Grupo 2
*Menu principal
set status off
set bell off
set confirm on
set talk off
set date british
set wrap on
set message to 24 center
public opcion,codigo,dedonde,pedido
do bases
si=.T.
do while si
do menu
menu to opcion
do case
case opcion=1
keyboard chr(0)
do depar
do compras
case opcion=2
keyboard chr(0)
do depar
do listado
case opcion=3
si=.F.
clear
endcase
enddo
return
*————————
procedure bases
select 1
use deptos
select 2
use empresa
select 3
use compras
return
*———————–
procedure menu
@0,0 clear
@7,10 say “***** TEST NUMERO TRES DE OMA G2 *****”
@9,10 prompt “1. Compras” message “Presione <ENTER> para continuar”
@10,10 prompt “2. Listado” message “Presione <ENTER> para continuar”
@11,10 prompt “3. Salir” message “Presione <ENTER> para salir”
@13,10 say “Alumno: Jonathan Ramirez”

depar.PRG

*Listado de departamentos
select 1
go top
declare campo[2], forma[2], titulo[2]
campo[2]=”CLAVE”
campo[1]=”DEPTO”
forma[2]=”99″
forma[1]=”@! AAAAAAAAAAAAAAA”
titulo[2]=”Codigo;Departamento”
titulo[1]=”Nombre;Departamento”
@0,0 CLEAR
@7,10 SAY “***** LISTADO DE DEPARTAMENTOS *****”
set color to /w
@16,10 SAY ” ENTER(ingresar) ESC(Salir) “
set color to
dbedit(7,10,14,61,campo,”func1″,forma,titulo)
return
*—————————————–
function func1
parameters resp1
do case
case lastkey()=27
resp1=0
case lastkey()=13
store CLAVE to codigo
resp1=0
otherwise
resp1=1
endcase
return resp1

compras.PRG

*Listado de compras filtradas por departamento
keyboard chr(0)
select 3
go top
declare campo[3], forma[3], titulo[3]
campo[1]=”RUT”
campo[2]=”MES”
campo[3]=”MONTO”
forma[1]=”999″
forma[2]=”99″
forma[3]=”999″
titulo[1]=”Rut”
titulo[2]=”Mes”
titulo[3]=”Monto”
@0,0 clear
@7,10 SAY “***** LISTADO DE COMPRAS *****”
set color to /w
@16,10 say ” F2(Agregar) F3(Eliminar) ESC(salir) “
set color to
locate for DEPTO=codigo
set filter to DEPTO=codigo
dbedit(9,10,14,66,campo,”func2″,forma,titulo)
return
*—————————————
function func2
parameters resp2
do case
case lastkey()=27
resp2=0
case lastkey()=-1
set cursor on
var1=0
var2=0
var3=0
@row(),31 GET var1 pict forma[1] valid existe(var1)
@row(),37 GET var2 pict forma[2]
@row(),42 GET var3 pict forma[3]
read
if lastkey() <> 27
append blank
replace RUT with var1, MES with var2, MONTO with var3, DEPTO with codigo
else
resp2=2
endif
case lastkey()=-2
dele
pack
keyboard chr(0)
resp2=2
otherwise
resp2=1
endcase
return resp2
*———————
function existe
parameters si
locate for RUT=var1
if found()
si=.F.
else
si=.T.
endif
return si

listado.PRG

*Listado de montos filtrados por departamento y mes
pedido=0
@0,0 CLEAR
@7,10 SAY “***** MES DEL FILTRO *****”
@10,10 SAY “Ingrese el mes a filtar: ” GET pedido pict “99″
READ
keyboard chr(0)
select 3
go top
declare campo[2], forma[2], titulo[2]
campo[1]=”MONTO”
campo[2]=”MES”
forma[1]=”999″
forma[2]=”99″
titulo[1]=”Monto”
titulo[2]=”Mes filtrado”
@0,0 clear
@7,10 SAY “***** LISTADO DE MONTOS *****”
set color to /w
@16,10 say ” ESC(salir) “
set color to
locate for DEPTO=codigo .and. MES=pedido
set filter to DEPTO=codigo .and. MES=pedido
dbedit(9,10,14,66,campo,”func3″,forma,titulo)
return
*—————————–
function func3
parameters resp3
do case
case lastkey()=27
resp3=0
otherwise
resp3=1
endcase
return resp3

Tau.

Rising Force Rigel (mi adicción día a día)

Llego bastante tiempo jugando este juego en el servidor de Rigel, realmente primero juego de la clase MMORPG (Massive(ly) Multiplayer Online Role-Playing Games) que realmente lo juego con ganas, ya que anteriormente me aburria leveleando si tener un claro sentido, ya que los otros juegos eran pvp, en cambio cuando empeze a jugar Rising Force me di cuenta que era rvr(race vs race), asi lo definiria yo en mi caso…y en serio que me gusto el juego, debido a que primero conociendo la trama entiendes porque tienes que pelear contra los Bellato y contra los Accretia (que a mi opinión son mamones…), Ya me he hecho dos pj el primero se llama Jony, lo deje debido a mil peteo (asignación) de puntos de experiencia, ahora el segundo se llama Jonathan (que original), y este pj realmente aspira a mas que el anterior, son un Warrior de clase Black Knights, es un tanque por donde lo mires, te aguanta golpes superiores a 5000 lucas…osea realmente con este pj me quedo, obviamente atrastre a mis amigos del clan, y ahí día a día vamos leveleando y siendo mejores, por ahora la raza Cora dentro del servidor esta siendo la mas malita, pero ahora los que quedamos formamos una guild llamada No-Fear conocido nombres por algunos (Ghost Recon), asi que ahí estamos dando la cara por los coritas.

Pondre algunas datos sobre mi clase en particular los Warrior, para que esto no sea puro texto y se aburran…

La Alianza Sagrada de Cora (Cora Holy Alliance):

La alianza Sagrada de Cora es un civilización espiritual con creencias firmes en la religión y en las artes mágicas. A pesar que la historia de Cora a crecido en base a guerras religiosas, que terminaron por crear múltiples estados y naciones, el país esta unido por su fuerte fe a su religión. La gente de Cora, unificada como la Alianza Sagrada, ahora batalla por su sobre vivencia usando sus poderes sacados de sus recursos espirituales, y utilizando sus tradicionales armas bendecidas por sus Dios, Disem.

Warrior

*Los guerreros se especializan en combate de cuerpo a cuerpo poseen mas Stamina
*Poseen Mucha mas vida (Hp) que cualquiera de su clase
*Los guerreros son los mejores conocidos como tanques, capaces de absorber y de entregar cantidades devastadoras de daño. La armadura del guerrero tiene la defensa física más resistente en el juego.

Clases de Warrior

Tau.