PIC16F877A - HEX-konverter

[Georg (geisterzwiebel)]

Liebes Forum,

ich habe mich vor ein paar Jahren schon ein bischen mit µC (eigentlich 
nur PIC) beschäftigt. Jetzt wollte ich wieder anfangen und habe mir dazu 
erst einmal ein kleines Versuchsboard aufgebaut. PORTB ist komplett mit 
active-high Schaltern belegt. An PORTD habe ich je nach Jumper eine 
7-Segmentanzeige oder 8 LEDs (auch active-high). Das erste Testprogramm 
hat einwandfrei funktioniert. Es hat in der main-Schleife einfach PORTB 
auf PORTD kopiert.
Der nächste Schritt ist eigentlich kein großer. PORTB wird eingelesen, 
die 4 MSB "rausgeundet" und dann das Ergebnis als HEX auf der 
7-Segmentanzeige angezeigt.
Ich finde soweit keinen Fehler in meinem Code:

; Übungsbeispiel Hex-Converter
; PORTB auf 7Segment und in Hex darstellen

  list p=16f877a
  include "p16f877a.inc"

  __CONFIG  0x3F41

  org 0x00        ; Programmstart (also 0x00)
  goto init

  org 0x04        ; Interuptadresse

init
  BCF  STATUS,  RP1      ;Wechsel auf Bank1 (RP1 = 0, RP0 = 1)
  BSF  STATUS,  RP0 
  MOVLW  0xFF        ; PORTB Eingang
  MOVWF  TRISB     
  MOVLW  0x00        ;PORTD Ausgang
  MOVWF  TRISD    
    
  BCF  STATUS, RP0      ;Wechsel auf Bank0 (RP1 = 0, RP0 = 0)


;   HEX-Zeichen in Speicher schreiben  
  MOVLW  0x3F 
  MOVWF  0x30
  
  MOVLW  0x06
  MOVWF  0x31
  
  MOVLW  0x5B
  MOVWF  0x32
  
  MOVLW  0x8F
  MOVWF  0x33
  
  MOVLW  0x66
  MOVWF  0x34
    
  MOVLW  0x6D
  MOVWF  0x35
    
  MOVLW  0x7D
  MOVWF  0x36
   
  MOVLW  0x07
  MOVWF  0x37
   
  MOVLW  0x7F
  MOVWF  0x38

  MOVLW  0x67
  MOVWF  0x39

  MOVLW  0x77
  MOVWF  0x3A

  MOVLW  0x7C
  MOVWF  0x3B

  MOVLW  0x39
  MOVWF  0x3C
  
  MOVLW  0x3F
  MOVWF  0x3D

  MOVLW  0x79
  MOVWF  0x3E

  MOVLW  0x71
  MOVWF  0x3F
  
main
    
  MOVF    PORTB,  0
  ANDLW   0x0F
  ADDLW   0x30
  MOVF    W,  0
  MOVWF  PORTD
  goto  main

  END

Ich habe NOPs an verschiedenen Stellen versucht. Der µC sollte so weit 
in Ordnung sein. Komplett gelöscht hab ich ihn auch dazwischen ein paar 
mal.

Einen Schaltplan gibts auf Anfrage gerne auch. Nachdem ich den aber nur 
handschriftlich hab, der Fehler vielleicht offensichtlich ist und das 
erste Programm bei gleicher Beschaltung funktioniert wollt ich mir 
ehrlich gesagt Arbeit ersparen.

Bitte um Ratschläge.

[Max H. (hartl192)]

Was funktioniert nicht?
Was sollte die main machen?

[Max H. (hartl192)]

Versuchs mal damit:

bcf STATUS,IRP
main

movf PORTB,w
andlw 0x0F
addlw 0x30
movwf FSR
movf INDF,w
movwf PORT
goto main

[Georg (geisterzwiebel)]

M. H. schrieb:
> Versuchs mal damit:
>
>

> bcf STATUS,IRP
> main
> 
> movf PORTB,w
> andlw 0x0F
> addlw 0x30
> movwf FSR
> movf INDF,w
> movwf PORT
> goto main
>

Funktioniert einwandfrei. Danke! Werd auch gleich nachlesen was du da 
genau gemacht hast (und ein paar falsche Zeichen ändern räusper.)

M. H. schrieb:
> Was funktioniert nicht?
> Was sollte die main machen?

Vor Beginn der Main werden beginnend bei 0x30 (willkürlicher Start) im 
Speicher die Bitkombinationen für die 16 Hex-Ziffern gespeichert. In der 
Main wird
1. PORTD eingelesen
2. Die MSB durch AND mit 0x0F gelöscht
3. 0x30 (= Listenbeginn) dazu Addiert
4. Der Inhalt der Speicheradresse bei dem Ergebnis ausgegeben.

Somit hab ich einen einfachen Binär-Hex-Konverter.


Herzlichen Dank nocheinmal für die schnelle Hilfe.

[Max H. (hartl192)]

Der Inhalt des Registers wird indirekt über das FSR und Das INDF 
Register adressiert.

http://www.sprut.de/electronic/pic/grund/adress.htm#indirekt

[Georg (geisterzwiebel)]

Alles klar. Hab nicht gewusst, dass man indirekte Adressierung irgendwie 
speziell machen muss...

Aber vor allem mit den 9-Bit Adressen ergibt das natürlich Sinn.

[Max H. (hartl192)]

Bei mowf darf die Adresse nur eine konstente sein, die in Quelcode 
angegeben wird.