pic 16f627 timer0

#849921
Lesenswert?

hallo,

ich habe erst vor kurzem angefangen mikrocontrollern zu programmieren. 
jetzt wollte ich mit dem timer0 ein kleinen zähler bauen, der dann 
einzelne leds leuchten lässt. funktioniert leider nicht so ganz. hoffe 
mir kann jemand helfen? hab ich vielleicht was falsch initialisiert?
hier mein quellcode:

           list p=16f627
           #include <P16f627.INC>
__CONFIG        _BODEN_ON & _CP_OFF & _DATA_CP_OFF & _PWRTE_ON & 
_WDT_OFF & _LVP_OFF & _MCLRE_ON & _XT_OSC

    ORG 0
    GOTO RESET

;         **********************************
;          **  RESET :  main boot routine  **
;          **********************************
RESET  MOVLW  B'00000111'  ;Disable Comparator module's
    MOVWF  CMCON  ;
    BSF  STATUS,RP0  ;Switch to register bank 1              MOVLW 
B'11101000'  ;Set PIC options (See datasheet).
          ;Timer0 aktiviert
          ;RA4 istTaktquelle, kein Vorteiler
    MOVWF  OPTION_REG  ;Write the OPTION register.
    CLRF  INTCON    ;Disable interrupts
    MOVLW  B'11000000'
    MOVWF  TRISB    ;RB7 & RB6 are inputs.
          ;RB5...RB0 are outputs.
    MOVLW  B'11111111'  ;all RA ports are inputs
    MOVWF  TRISA
    BCF  STATUS,RP0  ;Switch Back to reg. Bank 0
    CLRF  PORTB

MAIN

    CLRF  TMR0
  LOOP
    CALL  PRUEFEN
    GOTO  LOOP

  PRUEFEN
    CLRF  STATUS
    MOVF  TMR0,0
    SUBLW  D'1'
    BTFSC  STATUS,Z
    CALL  IMPULSAN1

    CLRF  STATUS
    MOVF  TMR0,0
    SUBLW  D'2'
    BTFSC  STATUS,Z
    CALL  IMPULSAN2

    CLRF  STATUS
          MOVF  TMR0,0
    SUBLW  D'3'
    BTFSC  STATUS,Z
    CALL  IMPULSAN3

    NOP
    RETURN



IMPULSAN1
    MOVLW  B'00000001'
    MOVWF  PORTB
    RETURN

IMPULSAN2
    MOVLW  B'00000010'
    MOVWF  PORTB
    RETURN

IMPULSAN3
    MOVLW  B'00000100'
    MOVWF  PORTB
    RETURN

    END

das programm kann noch nichts tolles, soll aber zum lernen dienen und 
später erweitert werden und dann auch in eine schaltung eingebaut 
werden. achja, RA4 (also der takt für den timer0) kommt über einen 
(entprellten) taster.

vielen dank schon mal
Gast #852424
Lesenswert?

Ist in dem Fall aber egal, da er danach auf Ergebnis==0 vergleicht. Und 
nur wenn beide Ziffern gleich waren ist das Ergebnis Null und es wird 
gesprungen.

Er könnte den Vergleich aber auch mit xor machen. Nur wenn alle Bits 
gleich sind, kommt bei xor Null heraus.

Sven

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren