Autor Tema: ADC Proton3 Proteus7.4 GLCD y AMP OP 471  (Leído 2693 veces)

0 Usuarios y 2 Visitantes están viendo este tema.

Desconectado IAO

  • Colaborador
  • PIC24F
  • *****
  • Mensajes: 702
ADC Proton3 Proteus7.4 GLCD y AMP OP 471
« en: 30 de Septiembre de 2009, 17:20:35 »
Hola para todos.....

Me adelanto al regalo que dejo en navidad. :D

ADC PROTON3 PROTEUS7.4 GLCD RS232 y AMP OP 471

Este es un ejemplo un poco loco pero está funcionando. Les comento que el gráfico en tamaño, es pequeño,
pero todo se puede mejorar. Solo es un ejemplo para aquellos que estan comenzando y se enredan un poco
como yo.
Tengo que hacer retoques como auto rango de la entrada ADC, para mejorar la amplitud.
Que el gráfico no me salga invertido.
Y otros retoques más, pero en esencia está funcionando.

La idea es esta. Cuando muevo uno y solo uno, de los dip-switch(DSW1) me muestra la curva caracteristica del
componente que se está probando. Para hacer otra prueba, seleccionas otro switch y apretar el boton reset.
Te graficará la curva de la nueva selección.  
Para entender un poco mas leer este link, esta en ingles.....
Explicación del Trazador de Curvas....



Les dejo una captura de la emulación, y todos los archivos necesarios....(.bas, hex, etc...)
Captura de la Emulación.

Espero les guste y puedan aprender y mejorarlo si lo necesitan.

Fuente-Simulación-Hex

Saludos......se les quiere y aprecia........


Tengo otro ejemplo con picaxe 08m pero se los paso en otro hilo, que sea para PiCAxe .


Si alguien bajó el ejemplo anterior, aquí les muestro un pequeña modificación al
código. Ahora grafica más rápido y puedes poner el alternador de la simulación a 50Hz.

Aunque la idea principal no es usar un  GLCD, me atrajo la idea de hacerlo y bueno
aquí les dejo una captura y la parte a modificar.



Buscar esta parte del código y modificar....
Código: [Seleccionar]
       adcVar2 = ADIN 1 '''Read channel 1
        adcVar2 = ((adcVar2 */ 500) >> 2)* -1        
        
  
        DELAYUS 5 '0
        
        FOR  t = 0 TO 1023  STEP 50 '''Step 50 me grafica más rápido.
            '''Si quiero que baje debo aumentar 215, para subir disminuir el valor.
            Xpos = ((adcVar1 + 215)) /1.4  
            '''Si quiero ir a la izq debo disminuir 165, para la derecha aumentar el valor.
         Ypos = ((adcVar2 + 165)) /1.4  
         PLOT  Xpos * 2 , Ypos  
         DELAYMS 1 '0
        NEXT


Debo aclarar que solicité mi actualización para proteus y estoy trabajando ahora con el Proteus 7.6.
Esto por si no les funciona con la versión 7.4.



Saludos......
« Última modificación: 02 de Octubre de 2009, 11:52:47 por IAO »
"No hay caminos para lograr la PAZ. La PAZ es el camino"... (Mahatma Gandhi).
Mentes Superiores discuten Ideas, Proyectos. Mentes Promedio discuten Acontecimientos y Sucesos. Mentes Pobres discuten sobre Personas.