Publicado por: vszener en 07 de Agosto de 2005, 13:39:00
Suerte!!! :wink:
Publicado por: BrunoF en 10 de Enero de 2006, 00:57:00
Publicado por: vszener en 14 de Enero de 2006, 17:30:00
Gracias por el comentario!
Publicado por: vszener en 20 de Enero de 2006, 10:17:00
Suerte!!! :wink:
Publicado por: LordLafebre en 20 de Enero de 2006, 11:58:00
No me parece "TONTO" el programa vszener.... esta muy bien, a muchos nos puede servir...
Felicidades...!!!
Publicado por: vszener en 05 de Febrero de 2006, 06:02:00
Suerte!!! :wink:
Publicado por: vszener en 25 de Mayo de 2006, 09:41:20
Suerte!!! :wink:
Publicado por: ehureka en 15 de Julio de 2006, 16:07:11
saludos a todos
Rebeca
Publicado por: vszener en 16 de Julio de 2006, 19:23:11
Suerte!!! :wink:
Publicado por: ehureka en 17 de Julio de 2006, 19:19:22
Publicado por: IAO en 29 de Agosto de 2007, 15:51:57
Se que el tema es viejo pero pensé que era mejor colocarlo aquí que abrir uno nuevo.
Les envio un programa parecido al calcucap, pero hecho en Freebasic Tipo consola MSDOS si alguien lo quiere
de guía base para pasarlo a VB aquí está.
Si gustas puedes cambiarlo a QB, pero debes modificarlo, quitando la librería que aparece al principio del programa.
También esta el mismo programa para trabajarlo en una HP48/49/50g llamado: CapCalcu2.hpe
Este programa para la HP debes colocar el Valor del último numero en ceros. 103 sería 10000 y te calcula
los otros valores. Ya lo estoy mejorando. Pero falta todavía.
LINK-Bajar (http://www.box.net/shared/5oasgx3dd7)
Saludos.
Bye('_').
Publicado por: vszener en 30 de Agosto de 2007, 09:49:40
Suerte!!! ;)
Publicado por: IAO en 31 de Agosto de 2007, 14:38:56
Sr. vszener: Es un placer ayudar, en lo que puedo.
Les dejo aquí unos programitas que monitorean el puerto LPT o Paralelo. Si tienen el programa EMU8086 también
puede monitoriar su puerto virtual. (los 3 fueron elaborados por mi y una ayuda de ElizaMarti).
Monitor de LPT (http://www.box.net/shared/iy5vcc4de0)
Y aquí les dejo 3 programitas para manipular el LPT y ver el estado con el PortMonitor. (Uno es mio)
Para manipular bits en LPT (http://www.box.net/shared/iikgind2yn)
Anuncio que estan los fuentes incluidos. Son muy humildes pero ayudan de rato en rato.
Se les aprecia
Bye('_').
Nunca he solicitado algo hecho, espero no ofender a ninguno. Si lo ofendo ignore esta petición. :)
Recontra Bye('_').
Publicado por: vszener en 31 de Agosto de 2007, 17:16:02
Suerte!!! ;)
Publicado por: migsantiago en 01 de Septiembre de 2007, 19:56:48
Talvez este tema te sea de ayuda
http://www.todopic.com.ar/foros/index.php?topic=17995.0
Publicado por: IAO en 01 de Septiembre de 2007, 20:45:59
Sr. vszener y Sr.migsantiago:
Saludos desde este lado del mundo.
Les comento (gracias por responder), ya he leido todo eso, me tome la libertad de gurdarlo como pdf y leer en casa pero no doy
con el meollo del asunto. Me inscribí en el foro de miarroba pero me dice sin nivel, he buscado aquí y cullá pero solo hay links rotos.
Los ejemplos se perdieron.
Traté de hacer el del Sr. migsantiago, pero me volví loco con el form, anoche me acoste a las 12:30 solo con el form de VB.
2 Días atrás conseguí un ejemplo de el Sr. PalitroqueZ , el cual trabaja pero me dá un error en el VB al enviar un valor superior a cero.
Cuando tenga algo concreto, haré un nuevo mensaje o post para preguntar ya que este hilo nada tiene que ver con eso.
Pero, gracias de igual forma, por estar pendientes de los novatos. :-/
Aunque no me crean he revisado y buscado por muchos rincones de varios foros. Creo que hoy lo someto y heré que funcione.
Les comento para los que no saben, hay una pagina elecktor.com (creo que es así) hay un pocotón de ejemplos para VB,
que sobre pasa mi entendimiento. Son realmente interesantes, si alguien gusta puede pasar por esa pagina, son increibles.
Bueno en el pais de los ciegos el tuerto es rey. Increibles para el que no sabe. Quien quita que sean una tontería.
Bye('_').
Publicado por: migsantiago en 04 de Septiembre de 2007, 14:39:18
Yo no sabía nada de RS232 con VB y me guié casi al 100% con esta página:
http://www.thaiio.com/prog-cgi/0002_serial.htm
Mejor inicia leyendo esa ya que de esa forma podrás hacer la form a tu gusto.
Publicado por: LABmouse en 04 de Septiembre de 2007, 14:45:43
Publicado por: IAO en 04 de Septiembre de 2007, 16:07:11
Ese saludo me recuerda a DIDI la hermana de Dexter Lab's, en Cartoon Network. (Con Razón me dejó mi novia, por mente de pollo.)
Aqui les dejo un Link, para descargar programa con fuente, que convierte bases: de Hexadecimal, Binario y Decimal.
No está hecho por mi. Nunca supe quien lo realizó. Pero gracias a esa persona por su colaboración.
Convertidor de bases numéricas (http://www.box.net/shared/l0gjsvy0ah)
Aquí les dejo un link de como hacer los Medidores Analógicos o de Aguja en VB. Tiene el fuente y es Gratis.
Analog Meter. (http://www.freevbcode.com/code/analogmeter.zip)
Bye('_')
Publicado por: IAO en 13 de Abril de 2008, 18:26:10
De una Base de Datos Access pasar a .TXT el contenido.
Estuve mucho tiempo intentando hacer este ejemplito. No se consigue mucha información
y la que hay es medio confusa.
Citar
Solo tengo que añadir :
Debe de estar referenciado Microsoft DAO 3.6 Object Library -- En proyecto referencias
Da un un error de: Separador de campos coincide con el separador decimal o de texto. (Ver .GIF el error.)
Quité este error pasando la configuración regional a Inglés.
Como evitar esto, todavía no lo he resuelto.
Es un ejemplo para que tengan un poco más claro como hacerlo.
Hay un archivo que debemos aprender a manejar que es el ---Schema.ini --- y es importante
para su correcta ejecución.
Espero les sirva de algo en el futuro....
Coloco aquí el documento momentanemente, en unos dias lo paso a w.box.net
Bye('_').
Publicado por: IAO en 09 de Mayo de 2008, 15:07:06
Aquí dejo el programa mejorado. Ya lo pasé al w.box.net.
Ahora son dos ejemplos con diferente método. Espero puedan entenderlo.
El ejemplo8 lo mejoré y comenté por donde pude para que se entienda mejor. Ya no me da el error del post anterior.
Ejemplo8 y 9 (http://www.box.net/shared/xfihd2348c)
Link documento Schema.ini, muy bueno. (http://es.geocities.com/softjaen/articulos/texto/jet_text_isam.htm#Index1)
Bye('_')
Publicado por: IAO en 24 de Mayo de 2008, 20:25:51
Aquì les estoy dejando fuentes VB6, Programa CapCalculator.
Es parecido al CalcuCap famoso, pero con su form y tal.
No es retro ingenierìa, ni crakeo ni nada de eso. Llevo 4 dìas haciendolo y no me aguanto por publicarlo.
Espero lo disfruten, no acepto criticas porque se que le falta varios toques tècnicos.
Pero asì programo yo, mucha repeticiòn pocas funciones. :D
Bueno regordetes bellos aquì esta, luego lo paso a w.box.net
Ya lo termino total en unos dìas.
Bye('_').
Publicado por: Cryn en 24 de Mayo de 2008, 21:59:09
este ultimo no tiene ejecutable? no tengo el vb instado :(
gracias
Publicado por: IAO en 26 de Mayo de 2008, 09:41:07
Es que trato de no saturar el foro con muchos archivos, pero
Okey te lo paso en un ratito en este mismo post, luego lo borro.
Bye('_').
Publicado por: IAO en 28 de Mayo de 2008, 08:55:31
Aquí les dejo uno de resistencias, con los fuentes y todo.
Igual no es retroingeniería, lo hice en dos días.
Como en el caso anterior no acepto criticas..... :D
En unos días lo paso a w.box.net y no recargo el foro con tonterías.
Bye('_').
Publicado por: Cryn en 28 de Mayo de 2008, 15:09:25
el de las Resistencias no me ha funcionado :(, cambio los colores de las bandsa y nada, siempre esta en 0 +- 0%
Publicado por: IAO en 28 de Mayo de 2008, 16:37:57
Yo lo ejecuté en tres maquinas sin ningún problema, pero voy a ver en otras.
Gordete disculpa, toca la banda negra luego de colocar los valores de colores.
Es que se me olvidó escribir que hay que hacer click en la banda negra. :D :D :D :D :-/ :-/ :-/ :-/
Gracias.
Bye('_').
Publicado por: Cryn en 29 de Mayo de 2008, 15:45:34
jajaja :D :D no sabia el truco, jaja
bueno ahora si funciona de maravilla IAO, gracias por responder!
un saludo, que estes mbien
Publicado por: jo.an. en 25 de Junio de 2008, 21:55:01
Publicado por: IAO en 26 de Junio de 2008, 05:53:15
Aquí yo ví un programa en VB, no sé si todavía lo regalan. *http://www.luberth.com/cstep/
Está en ingles, pero allí lo vi.
Te recuerdo, que debes abrir un nuevo tema o hilo, no usar este que es para programas efectuados
y compartir.
Saludos y mis respetos.....
Bye('_')..
Publicado por: IAO en 07 de Julio de 2008, 00:18:53
Para los amantes de la calculadoras HP48/49/50.
Les tengo el programa CapCalcu Mejorado. Esta buenisimo. No porque lo hice yo.
Sino es que quedó superior, de verdad verdad.
Aquí está el código. En UserRPL. Debes guardarlo en tu calculadora.
Código: [Seleccionar]
%%HP: T(0)A(D)F(.);
@
@-Hice un CHOOSE para elegir el tipo de operación a realizar
@con un dato a introducir, en una ventana INFORM.
«
CLLCD
WHILE
CLLCD
"žžžELIJA LA OPERACIONžž"
{ { " Nomenclatura" 1 }
{ " Micro Faradio" 2 }
{ " Nano Faradio" 3 }
{ " Pico Faradio" 4 }
{ " EXIT" 5. }}
1 CHOOSE
@Guardo en c el número de la selección para trabajar con el.
REPEAT c
«
CASE
@Caso si c es igual a 1 Trabajaré con la nomenclatura del condensador.
@Es el número que aparece en los condensadores cerámicos Ejem. 104 105 etc.
c 1 ==
THEN
"Valor de Nomenclatura"
{{"Valor Capac:" "No debe estar Vacio. ejm 105" 0}}
{1} {0 } {105 } INFORM
IF
THEN
DUP DROP OBJ DROP 'A' STO
@Si el valor de A es cero o menor de 102 Finaliza.
@Evita un error si el valor A es cero o uno.
IF A 0 == A 102 < OR
THEN
CLLCD
" Ingrese el Valor." 4 DISP
" No puede estar en Cero(0). " 5 DISP
" El programa se Finalizará " 6 DISP
0 WAIT
{A} PURGE
CLEAR CLLCD
KILL
END
@Tomo el valor de A le extraigo el número de
@su 1era y 2da posición lo almaceno en B.
A STR 1 2 SUB OBJ 'B' STO
@Tomo el valor de A le extraigo el número de su 3era
@posición lo almaceno en C. Efectuo los calculos.
A STR 3 3 SUB OBJ 'C' STO
@Relleno con ceros el valor de C. Si es 5 me dará "00000".
C "0" SWAP NDUPN LIST « + »
@El resultado de C lo almaceno en D
@Sumo B + D y lo almaceno en E
STREAM 'D' STO B D + OBJ 'E' STO
@Todos los otros calculos los realizo con E
"MicroF: " E 1000000 / NUM + 5 DISP
" NanoF: " E 1000 / NUM + 6 DISP
" PicoF: " E 1 / NUM + 7 DISP
@Sin este WAIT no se muestra el resultado.
0 WAIT
{A B C D E} PURGE @Borra las variables que se almacenaron.
ELSE
END
END
@Caso si c es igual a 2 Trabajaré con valor en MicroF.
c 2 ==
THEN
"Valor en Micro Faradios"
{{"Valor Micro:" }}
{1} {0 } {0 } INFORM
IF
THEN
DUP DROP OBJ DROP 'A' STO
@"Valor= " A 2 * STR + MSGBOX '''Es una prueba.
@Tomo el Valor A en Micro Faradio y hago la conversión.
"MicroF: " A 1 / NUM + 5 DISP
" NanoF: " A 1000 * NUM + 6 DISP
" PicoF: " A 1000000 * NUM + 7 DISP
@Sin este WAIT no se muestra el resultado.
0 WAIT
{A} PURGE
ELSE
END
END
@Caso si c es igual a 3 Trabajaré con valor en NanoF.
c 3 ==
THEN
"Valor en Nano Faradios"
{{"Valor Nano:" }}
{1} {0 } {0 } INFORM
IF
THEN
DUP DROP OBJ DROP 'A' STO
@Tomo el Valor A en Nano Faradio y hago la conversión.
"MicroF: " A 1000 / NUM + 5 DISP
" NanoF: " A 1 / NUM + 6 DISP
" PicoF: " A 1000 * NUM + 7 DISP
@Sin este WAIT no se muestra el resultado.
0 WAIT
{A} PURGE
ELSE
END
END
@Caso si c es igual a 4 Trabajaré con valor en PicoF.
c 4 ==
THEN
"Valor en Pico Faradios"
{{"Valor Pico:" }}
{1} {0 } {0 } INFORM
IF
THEN
DUP DROP OBJ DROP 'A' STO
@Tomo el Valor A en Pico Faradio y hago la conversión.
"MicroF: " A 1000000 / NUM + 5 DISP
" NanoF: " A 1000 / NUM + 6 DISP
" PicoF: " A 1 / NUM + 7 DISP
@Sin este WAIT no se muestra el resultado.
0 WAIT
{A} PURGE
ELSE
END
END
@Caso si c es igual a 5 Finaliza este Programa.
c 5 ==
THEN
" Finalizar Programa" MSGBOX
CLEAR CLLCD
KILL @Cancela ejecución del programa.
END
@Es el END del CASE que esta arriba.
END
»
@Es el END del WHILE que esta arriba.
END
CLEAR CLLCD
»
Puedes usarlo en el HpUserEdit 5.3 que trae su emulador.
Espero les sirva de algo.
Bye('_')....
Publicado por: PalitroqueZ en 07 de Julio de 2008, 19:11:43
pd: por cierto nunca aprendí a programa en RPL-system y mucho menos en asm para las HP :(
(en ambos los programas corren a mayor velocidad)
Publicado por: IAO en 08 de Julio de 2008, 09:49:39
Sr. Pali...Z:
Yo comprè la calcu para aprender màs matematicas y me puse fue a programar. El Propio Vicio mi pana. :D :D :D
No pretendo estudiar SysRPL(asm) para HP aunque corra màs ràpido :).
No quiero quedar màs loco de lo que estoy. :D
Pienso que si fuera a sacar beneficio econòmico, si lo haria. Pero eso depende de cada quien.
Para la mayorìa de los programas sencillos UserRpl, es sufiiente.
Saquè de una caja embalada la HP50, le puse las baterias y llevo dos semanas, tratando de terminar eso.
Con RPL-system tardarìa como un año :-/ :-/ :-/ , que va, te lo dejo a ti de tarea :D :D
Bye('_').
Tuve que editar el programa por un error ya està corregido.
Para el HPUserEdit y Binario HP49/50.
Publicado por: Cryn en 19 de Julio de 2008, 11:13:55
Que buenos tiempos con la HP, todavia la tengo, una 49g+, a pesar de no ser tan bien catalogada, no tuve muchos problemas.
Ahora que recuerdo :shock: la preste a un amigo! en cuanto llegue a casa le llamo! :x
:D :D :D
Publicado por: IAO en 20 de Julio de 2008, 12:41:15
Por Cryn
Citar
Ahora que recuerdo la preste a un amigo! en cuanto llegue a casa le llamo!
:D :D :D
Preferiría que me pidieran prestada a una esposa si la tuviera, pero una herramienta o algo electrónica, es como
si me insultaran a mi mamá.
Igual que prestar cd's, nunca los regresan, ni libros, el prestado se convierte en regalado.
Me recuerdo de un viejo refrán: Hay dos tipos de tontos, el que presta un libro y el segundo que es más tonto
que el primero, el que lo regresa.
Yo caí en lo de los libros varias veces hasta que me aprendí el refran. Y cuando me pedían un libro o X cosa
le hacía referencia al refrán. :D :D :D
Bye('_')...
Publicado por: Cryn en 27 de Julio de 2008, 18:58:50
:8} :8} :8}
:D :D :D
no pues tiene mucho de cierto, ahora que recuerdo tb he prestado libros!! :x :x
jajaja, pero ya ni modo, pero eso si, la calculadora si la recupero :mrgreen:
Publicado por: piojoadrian en 20 de Abril de 2009, 23:19:57
El post ya ha sido actualizado y los ficheros ya estan en este foro para su descarga!
Suerte!!! :wink:
Hola. Estoy llevando a cabo un proyecto leyendo en un conversor A/D de un 18F2455 y lo mando a traves de un max 232 a una antena y luego a traves de un max 232 a la pc.
Necesitaria si me podes ayudar con las lineas de programa del pic y del entorno grafico que utilizo que es el V basic. Uso la entrada RS 232.
Espero puedas ayudarme! Lo necesito con urgencia.
Publicado por: PalitroqueZ en 20 de Abril de 2009, 23:28:21
no hay necesidad de repetir el mismo post en 3 temas, te pido de favor que borres los post repetidos.
gracias.