PIC16F630 Schleife für Delay einer LED

[Kai R. (Gast)]

Guten Morgen,

ich eigne mir momentan erste Erfahrungen mit Assembler und 
Mikrocontrollern an. Der erste Testaufbau auf Steckboard und die erste 
Programmierung hat geklappt, die Schleife für die Verzögerung zur 
Visualisierung der blinkenden LED jedoch funktioniert nicht!

Ohne Schleife kann ich mit dem Oszi die HIGH-LOW Wechsel des Ausgangs 
beobachten, aber selbst kleinste Schleifen gehen nicht - der Ausgang 
bleibt dauerhaft HIGH. Wenn ich die Funktion 'Delay' durch einfache 
"nop"s ersetze, dann zeigt mir das, das der Sub-Routinen Aufruf 
zumindest schon einmal funktioniert. Muss also irgendwie an dem 
Konstrukt ..

Loop1  decfsz COUNT1, 1  
       goto   Loop1    
       decfsz COUNT2,1  
       goto   Loop1

liegen. Ich dachte aber das sollte so funktionieren?

Der Gesamte Code:

;-----------------------------------------------------------------------

  LIST P=16F630, R=DEC    
  errorlevel 0 ,-302    
  INCLUDE "P16f630.inc"

;-----------------------------------------------------------------------

STATUS  equ 0x03  ;Adresse des STATUS-Registers
TRISC   equ 0x87  ;Adresse des Tristate-Registers für Port A
PORTC   equ 0x07  ;Adresse Port A
COUNT1  equ 0x08  ;Erster Counter für Verzögerung
COUNT2  equ 0x09  ;Zweiter Counter für Verzögerung

;-----------------------------------------------------------------------
 __CONFIG _CP_OFF & _INTRC_OSC_NOCLKOUT & _PWRTE_ON  & _WDT_OFF & _MCLRE_OFF

;-----------------------------------------------------------------------

  ORG     0x000          ; Reset-Vektor für Prozessor

;****Ports definieren****

  bcf     STATUS,RP0   ;Bank 0
  clrf    PORTC        ;Init PORTC
  bsf     STATUS,RP0   ;Wechsel zu Bank 1
  movlw   0x00         ;Alle Ports als Ausgang
  movwf   TRISC
  bcf     STATUS,RP0   ;Wechsel zu Bank 0
  movlw    0x01        ;LED on

;****LED ausschalten****

START  xorwf  PORTC,1  ;LED togglen

;****Verzögerung hinzufügen

  call  Delay

;****Jetzt zurück zum START 

  goto  START 

;****Subroutine

Delay

Loop1  decfsz COUNT1, 1  
   goto   Loop1    
   decfsz COUNT2,1  
   goto   Loop1  

  return

;****Ende des Programms

  end

Hat jemand eine Idee?

[Chris B. (dekatz)]

Kai R. schrieb:
> COUNT1  equ 0x08  ;Erster Counter für Verzögerung
> COUNT2  equ 0x09  ;Zweiter Counter für Verzögerung

Das sind keine gültigen RAM-Adressen sondern "Unimplemented data memory 
locations"

RAM beginnt beim 16F630 ab 0x20.

[Kai R. (Gast)]

Chris B. schrieb:
> Das sind keine gültigen RAM-Adressen sondern "Unimplemented data memory
> locations"
>
> RAM beginnt beim 16F630 ab 0x20.

Danke! Du hast vollkommen Recht. Jetzt funktioniert es.

[Silvio (Gast)]

Kai R. schrieb:
> ;-----------------------------------------------------------------------
>  __CONFIG _CP_OFF & _INTRC_OSC_NOCLKOUT & _PWRTE_ON  & _WDT_OFF &
> _MCLRE_OFF
>
> ;-----------------------------------------------------------------------
>
>   ORG     0x000          ; Reset-Vektor für Prozessor
>
> ;****Ports definieren****
>
>   bcf     STATUS,RP0   ;Bank 0
>   clrf    PORTC        ;Init PORTC
>   bsf     STATUS,RP0   ;Wechsel zu Bank 1
>   movlw   0x00         ;Alle Ports als Ausgang
>   movwf   TRISC
>   bcf     STATUS,RP0   ;Wechsel zu Bank 0
>   movlw    0x01        ;LED on

Du solltest beachten, dass bei den PIC16 bei 0x004 der Interrupt-Vector 
liegt. Ein Interrupt würde bei deinem Code an die Stelle
movwf   TRISC
springen. Man löst das im allgemeinen folgendermaßen:

   ORG    0x000              ; Reset-Vektor für Prozessor
   goto   Label1

   ORG    0x004              ; Interrupt-Vektor
   goto   Interrupt-Routine

   ORG    0x005              ; erste nutzbare Speicherstelle
Label1
;****Ports definieren****

   bcf     STATUS,RP0   ;Bank 0
   clrf    PORTC        ;Init PORTC
   bsf     STATUS,RP0   ;Wechsel zu Bank 1
   movlw   0x00         ;Alle Ports als Ausgang
   movwf   TRISC
   bcf     STATUS,RP0   ;Wechsel zu Bank 0
   movlw    0x01        ;LED on

[Kai R. (Gast)]

Silvio schrieb:

> Du solltest beachten, dass bei den PIC16 bei 0x004 der Interrupt-Vector
> liegt. Ein Interrupt würde bei deinem Code an die Stelle
> movwf   TRISC
> springen. Man löst das im allgemeinen folgendermaßen:   ORG    0x000
> ; Reset-Vektor für Prozessor
>    goto   Label1
>
>    ORG    0x004              ; Interrupt-Vektor
>    goto   Interrupt-Routine
>
>    ORG    0x005              ; erste nutzbare Speicherstelle
> Label1
> ;****Ports definieren****
>
>...

Danke für den Hinweis. Für das nächste kleinere Projekt werde ich das 
auf jeden Fall berücksichtigen!