Pic 16F887 überspringt Tasterabfrage

[Robert M. (pielo)]

Hallo,

ich, kleiner Anfänger, habe folgendes Problem.

Egal ob ich ein Lauflicht, Blinklicht oder einfach eine LED einschalten 
will, das Programm im 16F887 läuft sofort los, ohne auf die Taster zu 
achten. Wenn ich die Programme in ein anderen PIC versuche (z.b 16F627A 
oder 16F84A) oder über die Simulation von MPLAB funktionieren sie ohne 
Probleme.

Programmer: PICkit2
Versuchsplatine: (siehe Anhang)

 
;**********************************************************************
;   This file is a basic code template for assembly code generation   *
;   on the PIC16F887. This file contains the basic code               *
;   building blocks to build upon.                                    *
;                                                                     *
;   Refer to the MPASM User's Guide for additional information on     *
;   features of the assembler (Document DS33014).                     *
;                                                                     *
;   Refer to the respective PIC data sheet for additional             *
;   information on the instruction set.                               *
;                                                                     *
;**********************************************************************
;                                                                     *
;    Filename:      xxx.asm                                           *
;    Date:                                                            *
;    File Version:                                                    *
;                                                                     *
;    Author:                                                          *
;    Company:                                                         *
;                                                                     *
;                                                                     *
;**********************************************************************
;                                                                     *
;    Files Required: P16F887.INC                                      *
;                                                                     *
;**********************************************************************
;                                                                     *
;    Notes:                                                           *
;                                                                     *
;**********************************************************************


  list    p=16f887  ; list directive to define processor
  #include  <p16f887.inc>  ; processor specific variable definitions


  __CONFIG    _CONFIG1, _LVP_OFF & _FCMEN_OFF & _IESO_OFF & _BOR_OFF & _CPD_OFF & _CP_OFF & _MCLRE_OFF & _PWRTE_OFF & _WDT_OFF & _HS_OSC
  __CONFIG    _CONFIG2, _WRT_OFF & _BOR40V


Zaehler1  equ 0x20
Zaehler2  equ 0x21
Zaehler3  equ 0x22

  ORG   0x00        ;Power On Reset Startadresse

INIT   


  BSF     STATUS,RP1    ;Bank 2
  BCF     CM1CON0,C1ON  ;Comparator 1 ist aus
  BCF     CM2CON0,C2ON  ;Comparator 2 ist aus

  BANKSEL PORTA   
  CLRF    PORTA         ;Init PORTA
  BANKSEL ANSEL   
  CLRF    ANSEL         ;digital I/O
  BANKSEL TRISA   
  MOVLW   B'00000010'   ;alle als Inputs
  MOVWF   TRISA       

  BCF     STATUS,RP0    ;Bank 2
  BCF     STATUS,RP1    ;Bank 0
  
  CLRF    PORTB         ;Init PORTB
  BSF     STATUS,RP0    ;Bank 1
  BSF     STATUS,RP1    ;Bank 3
  CLRF    ANSELH        ;digital I/O
  BCF     STATUS,RP1
  
  MOVLW   B'00000000'   ;Alle als Output
  MOVWF   TRISB           
  BCF     STATUS,RP0    ;Bank 0


HAUPTSCHLEIFE  
  
    CALL  Pause
    CLRF  PORTB
    BTFSS PORTA,1       ; PRÜFEN OB SW1 GEDRÜCKT; WENN NEIN ÜBERSPRINGE NÄCHSTEN SCHRITT 
    CALL  LED           
    GOTO  HAUPTSCHLEIFE 

LED
    MOVLW  B'00000001'     
    MOVWF  PORTB        ; Bits setzen
    CALL   Pause
    MOVLW  D'5'
    MOVWF  Zaehler3
Schleife
    BTFSC  PORTA,1      ; PRÜFEN OB SW1 GEDRÜCKT; WENN NEIN ÜBERSPRINGE NÄCHSTEN   SCHRITT 
    GOTO   HAUPTSCHLEIFE
    CALL   Pause
    RLF    PORTB        ; schiebe Bit in Port B um eins weiter
    DECFSZ Zaehler3,1
    GOTO   Schleife     
    GOTO   LED

Pause
    MOVLW  D'250'       ; Wert für Zaehler1 ins WReg
    MOVWF  Zaehler1     ; Wert vom WReg in Zeahler1
    CALL   Pause_1    
    DECFSZ Zaehler1,1   ; Dec Zaehler1
    GOTO   $-2          ; wenn Zaehler1 nicht 0 dann springe 2 zurück
    RETURN  
Pause_1
    MOVLW  D'250'       ; Wert für Zaehler2 ins WReg
    MOVWF  Zaehler2     ; Wert vom WReg in Zeahler2
Dek
    NOP
    DECFSZ Zaehler2,1   ; Dec Zaehler2
    GOTO   Dek          ; gehe zu Pause
    RETURN              ; zurueck zum Ursprung

  END

Könnte das Problem an der Config liegen?

***lg Pielo***

[Der Rächer der Transistormorde (Gast)]

Bei Pics prüfe ich immer alle Funktionen eines Ports ob Sie nach Reset 
aktiv sind und ob man Sie ausschalten muss.

Gängige verdächtige sind analoge und ComparatorEingänge, Quarz bzw. Takt 
ein und Ausgänge und Reset.


Das Datenblatt macht dir das leicht da bei den Pin Beschreibungen alle 
Funktionen aufgeführt sind.

[Chris B. (dekatz)]

Damit:
MOVLW   B'00000010'   ;alle als Inputs
  MOVWF   TRISA

ist der Taster an RA0 aber wirkungslos.

Und MCLR würde ich über 10kOhm an +5V legen. Solange der Programmer 
dranhängt magd a sja funkteonieren, aber ohne hängt MCLR in der Luft mit 
undefinierten, zufälligen Pegel!

[Dani (Gast)]

Du hast den Taster an RA0, der Code ist fragt aber RA1 ab. Und ich würde 
dem Taster noch einen Pulldown Widerstand spendieren.

Richtig:

BANKSEL TRISA
MOVLW   B'00000001'   ;alle als Inputs
MOVWF   TRISA

BANKSEL PORTA       ; Falls die Richtige Bank noch nicht ausgewählt 
ist...
BTFSS PORTA,0       ; PRÜFEN OB SW1 GEDRÜCKT;

[Robert M. (pielo)]

Danke für die schnelle Antwort,
leider funktioniert es mit LVP_ON und MCLR über 10k auf 5V auch nicht.

Während das Programm läuft kann ich es jederzeit über den Taster 
ausschalten, sobald ich ihn loslasse fängt das Programm wieder von 
alleine an.

Der Taster ist an RA0, hab ich mich durch das ganze hin und her 
Probieren warscheinlich verschrieben.

***lg Pielo***

[Dani (Gast)]

Wenn der Taste auf + schaltet, muss in Code btfsc PORTA,0 stehen. Der 
Taster ist nicht gedrückt --> RA0 ist auf low --> der PIC überspringt 
das CALL LED…
Und wichtig: Den Pulldown Widerstand an RA0 nicht vergessen.

[Robert M. (pielo)]

Das Zauberwort = PULLDOWN WIDERSTAND

DANKE, darauf wäre ich nie gekommen!!!!

***lg Pielo***

[Dani (Gast)]

Hat es jetzt funktionier mit Pulldown?