Problema logico
- 1. RESOLUCIÓN DE UN PROBLEMA LÓGICO (MÓDULO BASIC STAMP)
- 2. Ejemplo: El problema lógico a resolver tiene tres entradas (A, B, C-Interruptores) y tres salidas (Y1, Y2, Y3-Leds): 1-DIAGRAMA DE CABLEADO
- 4. CONEXIONES Cablear los interruptores de botón activos en ALTA y conectarlos a los puertos 10, 11, 12. Cablee los LEDS (salidas) usando resistencias y conéctelos en los puertos 1, 2 y 3 del módulo BASIC Stamp 2
- 5. 2-CÓDIGO ‘Resolución de un problema lógico (Módulo Basic Stamp) ‘El apostrofo se utiliza para agregar un comentario ‘Declaro variables como 1 bit A VAR Bit B VAR Bit C VAR Bit Y1 VAR Bit Y2 VAR Bit Y3 VAR Bit ‘Declaro puertos 10, 11, 12 como entrada INPUT 10 INPUT 11 INPUT 12
- 6. ‘Declaro los puertos de salida OUTPUT 1 OUTPUT 2 OUTPUT 3 CkAllSwit: ‘Etiqueta rutina principal ‘Inicializa puertos en 0, LEDs apagados OUT1=0 OUT2=0 OUT3=0 ‘Asignar valor: Entradas a los puertos a las variables A, B, C A=INI12 B=INI11 C=INI10
- 7. ‘Asigna el valor de la expresión a la variable Y1 Y1=(A&B&C) ( A& B& C) ‘Si Y1=1, entonces ve a rojo, sino ve la siguiente línea If Y1= I THEN Red CkGreen: ‘Asigna el valor de la expresión a la variable Y2 Y2=(A& B) (A&C) Si Y2=1, entonces ve a verde, sino ve la siguiente línea If Y2= I THEN Green CkYellow: ‘Asigna el valor de la expresión a la variable Y3 Y3=(A) ( B&C) Si Y3=1, entonces ve a amarillo, o ve la siguiente línea If Y3= I THEN Yellow
- 8. ‘Ve a CkAllSwit- comienza la rutina principal GOTO CkAllSwit ‘Etiqueta-enciende Led rojo de subrutina Red: ‘La salida P1 va ALTA y enciende led rojo OUT1=1 ‘Ve a CkGreen GOTO CkGreen ‘Etiqueta-enciende Led verde de subrutina Green: ‘La salida P2 va ALTA y enciende led verde OUT2=1 ‘Ve a CkYellow GOTO CkYellow
- 9. ‘Etiqueta-enciende Led amarillo de subrutina Yellow: ‘‘La salida P3 va ALTA y enciende led amarillo OUT3=1 ‘Comienza la rutina principal de nuevo en CkAllSwit GOTO CkAllSwit
- 10. 3-Conectar el cable serial entre la PC y la tarjeta de desarrollo del BASIC Stamp 2 y encienda el módulo 4-Descargue el programa PBASIC de la PC al módulo BS2 usando el comando RUN
- 11. GRACIAS