Durcksensor MS5534 via SPI an PIC16F877A

[Enrock]

Servus und Hallo,

ich habe mal wieder ein Problem, mit dem ich allein nicht mehr zu Rande komme...
Ich versuche einen Drucksensor MS5534 mit dem PIC16F877A via SPI zu verbinden. Das Ganze habe ich auf dem PICDEM2 PLUS Board aufgebaut

Hier das Datenblatt des MS5534B
http://www.amsys.de/sheets/amsys.de.ms5534b(e).pdf

Nun ja der Sensor macht das "Verbinden" nicht gerade einfach. Der MS5534 verträgt maximal 3,6 Volt als VDD, sowie an den Pins. Also bin ich her gegangen und habe mir die 5 Volt die ich vom Board bekomme via Widerstand und Z-Diode auf 3,3 Volt runtergeregelt. Bei den Pins, die als Eingänge für den Drucksensor dienen habe ich Spannungsteiler eingesetzt, um von 5 Volt auf 3,3 zu kommen und bei dem Ausgang des Sensors habe ich keine Beschaltung gewählt, da der PIC die 3,3 Volt als HIGH interpretieren sollte.


Was soll ich sagen, die Kommunikation funktioniert nicht und ich weiß nicht woran es liegt.

Hier noch mein Code: Ich versuche mittlerweile lediglich ein Calibration Word zu empfangen....

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

__CONFIG _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_ON & _HS_OSC & _WRT_OFF & _LVP_OFF & _CPD_OFF


D_LCD_DATA UDATA 0x20 ;start of general purpose registers

COUNTER res 1 ; Counter in Init
RXDATA_1 res 1
RXDATA_2 res 1

TXDATA res 1
;endc

;#define LCD_D4 PORTD, 0

;PROG1 Code ; START
ORG 0x000
goto START_PRESSURE_INIT

org 0x0004 ; Interrupt
retfie
;***********************Zeile 1***************************************
START_PRESSURE_INIT

clrf RXDATA_1
clrf RXDATA_2
clrf TXDATA

banksel TRISC
movlw b'00010000'
movwf TRISC

banksel SSPSTAT
movlw b'11000000' ; SMP=1, CKE=1, BF=0
movwf SSPSTAT
banksel SSPCON
movlw b'00100010' ; WCOL=0, SSPOV=0, SSPEN=1, CKP=0, SSPM[3..0]= 0010 (FOSC/64)
movwf SSPCON

;LOOP BTFSS SSPSTAT, BF ;Has data been received(transmit complete)?
;goto LOOP ;No
;MOVF SSPBUF, W ;WREG reg = contents of SSPBUF
;MOVWF RXDATA ;Save in user RAM, if data is meaningful


movlw 0x1d
movwf TXDATA
MOVF TXDATA, W ;W reg = contents of TXDATA
MOVWF SSPBUF ;New data to xmit

movlw 0x50
movwf TXDATA
MOVF TXDATA, W ;W reg = contents of TXDATA
MOVWF SSPBUF ;New data to xmit

LOOP BTFSS SSPSTAT, BF ;Has data been received(transmit complete)?
goto LOOP ;No
MOVF SSPBUF, W ;WREG reg = contents of SSPBUF
MOVWF RXDATA_1 ;Save in user RAM, if data is meaningful
LOOP2 BTFSS SSPSTAT, BF ;Has data been received(transmit complete)?
goto LOOP2 ;No
MOVF SSPBUF, W ;WREG reg = contents of SSPBUF
MOVWF RXDATA_2 ;Save in user RAM, if data is meaningful



banksel TRISB
movlw b'00000000'
movwf TRISB
banksel PORTB
movlw b'01010101'
movwf PORTB
ABE
goto ABE

end

Und noch zur Beschaltung:
Ich verbinde
PIC_PIN_RC3_SCL mit SENSOR_PIN_SCLK
PIC_PIN_RC4_SDI mit SENSOR_PIN_DOUT
PIC_PIN_RC5_SDO mit SENSOR_PIN_DIN

So und jetzt kommt’s. Der Drucksensor braucht noch eine zusätzliche Clock von 30 bis 35 kHz (MCLK). Ich habe einen Uhrenquarz auf dem Board der mit RC0 und RC1 verbunden ist. Ich greife mir wahlweise an RCO bzw. RC1 die Clock ab, da ich mir nicht sicher bin an welchen Pin diese muss und ob das überhaupt funktioniert.
VDD_BOARD über "Widerstands-Z-Dioden-Teiler" an VDD_Sensor.
GND_BOARD an GND_SENSOR

Ich beschäftige mich das erste Mal mit dem SPI Modus... I2C habe ich schneller zum laufen gebracht.

Vielen Dank für die Hilfe

Gruß Daniel

[wassermann]

Hallo Enrock,

es gibt von Intersema (Hersteller des Sensors) eine application note (AN510). Einfach downloaden. Den Quarz benötigt der Sensor nur für die ADC-Wandlung. Ansonsten sind nur die Leitungen MISO, MOSI und SCL notwendig.
Mein MS5541 kommt im April. Vielleicht steh ich dann vor dem gleichen Problem. Aber vielleicht ist's mit ATMega's einfacher.

gruss,
wassermann

[Enrock]

Servus,

die Application note habe ich schon... Die hat auch einige Fragen klären können. Dennoch bin ich nicht weiter.

Ich habe mal meinen Code nachgebessert. Aber Emfangen tue ich immer noch nichts


TART_PRESSURE_INIT

call LCD_INIT

bcf STATUS, RP0 ; auf Bank 1 umschalten
movlw B'00111111' ; internen Takt zählen, Vorteiler zum Timer0, 32:1
movwf T1CON
bsf STATUS,RP0
movlw b'00000000'
movwf TRISB
movlw 0x00 ; 256-125=131 ((1MHz : 32 ): 125 = 250 Hz)
bcf STATUS, RP0 ; auf Bank 0 zurückschalten

clrf RXDATA_HIGH
clrf RXDATA_LOW
clrf TXDATA

banksel TRISC
movlw b'00010000'
movwf TRISC

banksel SSPSTAT
movlw b'10000000' ; SMP=1, CKE=1, BF=0
movwf SSPSTAT
banksel SSPCON
movlw b'00100010' ; WCOL=0, SSPOV=0, SSPEN=1, CKP=0, SSPM[3..0]= 0010 (FOSC/64)
movwf SSPCON


bcf SSPCON, SSPOV ; kein Überlauf
bcf SSPCON, WCOL
bsf SSPCON, SSPEN ; SPI=on

movwf 0x1d
movwf SSPBUF ;

call BF_BIT

movwf 0x60
movwf SSPBUF

call BF_BIT

banksel SSPSTAT
bsf SSPSTAT,CKE
banksel PORTA

movwf 0x10
movwf SSPBUF ;

call BF_BIT

movwf RXDATA_HIGH

movwf 0x01
movwf SSPBUF

call BF_BIT

movwf RXDATA_LOW


call LCD_LINE_1
; movf LOW_BYTE,w
movf RXDATA_HIGH,w
movwf FOR_HEX
call HEX_AN_LCD

call LCD_LINE_2
; movf LOW_BYTE,w
movf RXDATA_LOW,w
movwf FOR_HEX
call HEX_AN_LCD

banksel TRISB
movlw b'00000000'
movwf TRISB
banksel PORTB
movlw b'01010101'
movwf PORTB
ABE
goto ABE

BF_BIT

Banksel SSPSTAT
btfss SSPSTAT, BF
goto BF_BIT
banksel PORTA
movf SSPBUF,0

return

Wenn ich den Quarz nur für den ADC brauch müsste ich ja zumindest die Calb. Words lesen können... Oder etwa nicht?

Hat vielleicht irgendwer ein Prog für mich, in dem mit SPI gearbeitet wird?
Sollte ich mit dem Oszi den Quarz schwingen sehen? Und wenn wie?

gruß

[Enrock]

Servus,

würde mir jemand seinen Code zur SPI Initialisierung zur Verfügung stellen?

Wäre super Danke

Gruß

[theborg]

jo hier allerdings musste es anpassen unten ist noch nen Beispiel zum senden.



; PORTC
banksel TRISC ; auf Bank 1 umschalten
movlw B'00010000' ; PortC I/O setzen (1=In, 0=Out) (Reinfolge RC7,RC6...)
movwf TRISC ; PortC I/O setzen
clrf PORTC ; PortC auf 0 setzen
; SPI
movlw B'01000000' ; Mitlere Geschwindigkeit Output Time
movwf SSPSTAT
banksel SSPCON
movlw B'00110010' ; MODE 1,1, SPI MASTER, 1/16 Tosc SSP ON
movwf SSPCON
banksel PORTC
bsf SPI_CS ; SPI Slave Select aus (high)



SPI_Send
banksel SSPBUF
bcf SPI_CS ; Chip Select an (Low)
movf SPI_DATA_WRITE, W
movwf SSPBUF
banksel SSPSTAT
SPI_Wait
btfss SSPSTAT, BF ; Ist das Senden Komplet ?
goto SPI_Wait ; Wen nicht gehe zu SPIWait
bsf SPI_CS ; Chip Select aus (High)
return
SPI_Read
bcf SPI_CS
banksel SSPBUF
movf SSPBUF, W
movwf SPI_DATA_READ
bsf SPI_CS
return

[Enrock]

Schon mal Danke...

das schaut aus wie bei mir... Und gesendet wird auch wunderbar, das hab ich mit dem Oszi überprüft...
Aber Antwort bekomme ich von dem Sensor immer noch nicht. Immerhin setzt er mittlerweile ab und an den Ausfang auf High.

Für SPI brauche ich keine Pullup Widerstände oder?
Kann jemand bestätigen, dass ich keine MCLK brauche um die Calib Words zu lesen?

Gruß

[theborg]

haste
sdi -> sdo
und
sdo -> sdi verbunden ?

oder der spi takt ist zu schnell.

[Enrock]

Servus,

es geht endlich... Also von einem Druckmessen bin ich noch entfernt aber ich kann die CalibWords lesen und die geben auch sinn.
Leider kommen die Worte noch nicht richtig im PIC an... Eigentlich soll auf die fallende Flanke gesampled werden, wenn ich das aber tue, simmen die Words nicht mit dem Bild des Oszis überein...
Sample ich auch die Steigende Flanke dann sind die Werte richtig... Ich verstehe das aber nicht...
Ich kann auch nicht recht erklären, warumd as jetzt geht und die ganze Zeit vorhher nicht.
gruß

[Enrock]

Servus,

also ich hänge nach wie vor an meinem Drucksensorproblem.

Ich kann mittlerweile die Calib-Words lesen und die Ergebnisse passen auch zur Applikation Note.
Wenn ich nun aber die Temperatur berechne bekomme ich einen wilden Wert raus, der nicht stimmt.
Ich brauchte da mal Hilfe. Mir erscheint der gemessene Wert für die Temperatur also das WORD D2 mit rund 13000 zu gering. Im Datenblatt kann ich lesen, dass ein Typischer Wert von 22500 gemessen wird. Hmpf und jetzt?
Ich habe langsam keinen Plan mehr!

Gruß