Card12 mit EVAL-AD5781 verbinden

[J. R. (cia_man)]

Ich habe den Text ausgetauscht... leider immer noch kein Signal auf dem 
Oszi zu sehen... jedenfalls kein Sägezahn ;)

Hast du übers WE noch einen Geistesblitz gehabt?

Gruß & THX

[Frank S. (franksanderdo)]

Hallo Jochen,

was kommt den raus 0V oder 2,5?

Grüße
Frank

[J. R. (cia_man)]

0V! Wieder einmal :( ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

kannst Du über printf Werte zurück zum Rechner ausgeben?

Das täte jetzt das suchen vereinfachen ;-)

Grüße
Frank

[J. R. (cia_man)]

Kann es sein, dass hier der Wurm drinnen ist?

DACValue = (int)(VoltValue / DACStepWidth); /* typeconversion added */

Weil wir ja int mit unsigned long = setzen!

Gruß

[J. R. (cia_man)]

Hier habe ich eine Funktion die festen Text ausgeben kann....

#include <stdio.h>

#include <mc912d128.h>

#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit


  void sci0_init(void){
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}

void main(void){
  sci0_init();
  sci0_puts("\n\nHallo ich bin ein String");
  sci0_putc(' ');sci0_putc('1');sci0_putc(' ');sci0_putc('2');sci0_putc(' ');sci0_putc('3');

  while(1);
}

Ich müsste aber auch noch eine haben, die eine Variable ausgeben kann... 
da muss ich aber erst suchen...

Du siehst aber schon hier, der Aufwand ist ziemlich groß an Code, der 
für ein einfaches printf nötig ist ;) bei meinem µC!

Gruß

[Frank S. (franksanderdo)]

Hallo Jochen,

das ist gelinde gesagt M...!

Ich würde gerne sehen welche Werte bei unseren Berechnungen rauskommen.
Ich mach mir Sorgen das ich mit den Type Castings nen Bock geschossen 
habe ;-)

Irgend eine Idee wie wir da an eine Rückmeldung vom uC kommen können?
Ich vermute das wir auch keinen online debugger haben?

Grüße
Frank

[J. R. (cia_man)]

//Zeichen ausgeben

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}



//Eingabe
sci0_puts("\nBitte Kommando eingeben (muss Doppelpunkt enthalten):");
sci0_gets(command);


//Kommando finden hier anhand des ":"
while (commandsub != ':'){

commandsub = command[y];
y++;

}


//Kommando zur Kontrolle nochmals ausgeben
sci0_puts("\n\nGefundenes Kommando: ");


x=y-2;

while(x>=0){

commandid[z] = command[z];
x--;
z++;

}

sci0_puts(commandid); //Kommandoausgabe

Das würde schon ehr helfen oder? ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

so da werden wir wohl ein kleines Testprogramm stricken müssen um eine 
Textausgabe hin zu bekommen.
Mein Problem is jetzt das ich nicht sicher bin wie arrays definiert 
werden.
Das musst Du bitte mal nachschauen und auch ob es eine Bibliothek mit 
einem printf gibt. Das sollte eigentlich in deinen Handbüchern zum 
compiler drin stehen ;-)

Weil wenn, dann können wir so etwas bauen:

#include <stdio.h>

#include <mc912d128.h>

#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit

const double HalfRange = 2.5;
const double DACStepWidth = 5 / 0x03ffff;


  void sci0_init(void){
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}

void main(void){
  char mycharacterarray[128] /* This should be a 128 characters long array, how to do this properly? */

  sci0_init();
  mycharacterarray = printf("\n Here kommt die 1. Zahl: %f",HalfRange);
  sci0_puts(mycharacterarray);
  mycharacterarray = printf("\n Here kommt die 2. Zahl: %f",DACStepWidth);
  sci0_puts(mycharacterarray);

  while(1);
}

DAS IST SO SICHER NICHT LAUFFÄHIG!!
Jetzt brauche ich deine Hilfe. Schau bitte das DU das array und den 
printf sauber bekommst. Evtl. gibt es auch einen Ersatz für den printf 
;-)

Grüße
Frank

[APW (Gast)]

J. R. schrieb:
> Kann es sein, dass hier der Wurm drinnen ist?
> DACValue = (int)(VoltValue / DACStepWidth); /* typeconversion added */

DACValue = (VoltValue / DACStepWidth);

Der Compiler macht die entsprechenden Konvertierungen.
[unsigned long] = ([Float]/[Float]) bzw
[  signed long] = ([Float]/[Float])

Sieh mal ins List-File, da wird das auf einen Blick klar.

Wenn du keine Umgebung hast, online zu debuggen,
dann schau wenigstens ab und zu ins list-File rein, was der
Compiler aus den C-Konstruktionen macht.

Du brauchst die 20-fache Zeit (gerade als Anfänger) wenn du keine
Möglichkeit hast, ein Programm zu debuggen, und am besten
mit Single-Stepping durchzutesten. Die Erfahrungen, die man dabei macht,
sind unbezahlbar.

Das mit
(int)..
ist hier total falsch. Das kopiert letztendlich einfach einen
(normalerweise 16Bit-) Teil aus dem Floatergebnis, konvertiert/erweitert
ihn dann erst (automatisch) auf den Typ von DACValue.

[APW (Gast)]

Vergesst meinen letztes Posting. Ich glaube das war total kacke.
Aber das kommt davon, wenn man ungetestet Quellcode absondert.

[Frank S. (franksanderdo)]

@APW

Du bist irgendwie immer da wenn ich nimmer weiter weis!!
Dank Dir, das hilft mir schon ein Stück weiter!

Grüße
Frank

[Frank S. (franksanderdo)]

@APW

nene so ganz falsch liegst Du nicht.
Das mit dem ungetestet tut mir ja auch leid, ich hab halt nix hier zum 
testen ;-)

@ Jochen
Da klauen wir mal die Idee vom APW und ändern die Zeile in:

DACValue = (VoltValue / DACStepWidth);

also das (int) raus. Ist wie ihr beide festgestellt habt aus mehreren 
Gründen Unsinn :-(

Ja ich werde doch langsam alt!


Was macht unser printf Testprogramm?

Grüße
Frank

[APW (Gast)]

Das Problem ist, dass ich jetzt einige Jahre nicht mehr in C
programmiert habe. Da ist einiges angerostet.

Vielleicht hole ich am WE mal wieder mein Zeug raus.
Bis auf den 18Bit DAC hab ich eigentlich alles hier.

[Frank S. (franksanderdo)]

@APW

hehe, so ähnlich habe ich auch gedacht und habe mir die Woche was zum 
Basteln bestellt ;-)

Wenn ich Anfang Juni für ein par Tage in D bin hoffe ich alles zusammen 
zu haben das ich das Zeugs mitnehmen kann. Wird spannend nach fast 20 
Jahren mal wieder zu basteln ;-)

Grüße
Frank

[J. R. (cia_man)]

Sorry war gerade anderweitig beschäftigt!

Diese Änderung hat nichts gebracht:

DACValue = (VoltValue / DACStepWidth);

leider :(

Kannst du mir nochmal sagen was ich jetzt genau nachschauen soll? Das 
mit dem printf meine ich!

Danke

[Frank S. (franksanderdo)]

Hallo Jochen,

so nachdem ich mich durch diverse Meetings gequält habe gehen wir wieder 
auf was sinnvolles über ;-)

printf ist eigentlich ein standard C Befehl mit dem texte formatiert in 
ein character array geschrieben werden können.
Ich will jetzt nicht lügen, aber ich meine das printf in der Bibliothek 
"stdio" definiert ist.
Wenn Du da die Definition findest täte mir das schon helfen.

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo Jochen,

ich war dann gestern Abend ein bischen fleißig und habe mal nachgelesen 
was ich finden konnte. Dem zufolge sollte unser Testprogramm für die 
Ausgabe so aussehen:

Was hängt an SCI0 um den Text anzuzeigen?
Kannst DU das bitte mal testen ob wir so eine Anzeige bauen können?
Damit hätten wir dann wenigsten ein wenig debugging zur Verfügung.

#include <stdio.h>

#include <mc912d128.h>

#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit

const double HalfRange = 2.5;
const double DACStepWidth = 5 / 0x03ffff;


  void sci0_init(void){
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}

void main(void){
  char mycharacterarray[128]; /* This is a 128 characters long array */

  sci0_init();
  sprintf(mycharacterarray,"\n Here kommt die 1. Zahl: %f",HalfRange);
  sci0_puts(mycharacterarray);
  sprintf(mycharacterarray,"\n Here kommt die 2. Zahl: %f",DACStepWidth);
  sci0_puts(mycharacterarray);

  while(1);
}

Grüße
Frank

[J. R. (cia_man)]

            
Here kommt die 1. Zahl: 2.5                                           
Here kommt die 2. Zahl: 0

Bis auf Here passt es :) ;)

Gruß

[J. R. (cia_man)]

Wie gehen wir jetzt weiter vor? Was soll ich bei dem anderen Programm 
ausgeben? ;)

Danke

[Frank S. (franksanderdo)]

COOOOOL!!!

Ok das mit dem Here ist meinem Job geschuldet.
Programmschnipsel basteln und gleichzeitig hier mit den Jungens englisch 
reden gibt dann so ein Misch Masch :-D

So die 2. Zahl schockiert mich.
Da hätte ich was anderes erwartet ;-)

Ich denke damit haben wir den Fehler schon eingefangen.
Ändere bitte mal in unserem Ausgabe Testprogramm:

const double DACStepWidth = 5 / 0x03ffff;

zu

const double DACStepWidth = 0.00001907;

und noch mal rennen lassen ;-)

[J. R. (cia_man)]

So....

Hier jetzt die Ausgabe:

                                                                                      
Hier kommt die 1. Zahl: 2.5                               
Hier kommt die 2. Zahl: 0.000019

2. Zahl? Zu kurz! ;)

Here ist zu Hier ausgebessert ;)

Gruß

[J. R. (cia_man)]

#include <stdio.h>

#include <mc912d128.h>

#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit

const double HalfRange = 2.5;
const double DACStepWidth = 0.00001907;


  void sci0_init(void){
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}

void main(void){
  char mycharacterarray[128]; /* This is a 128 characters long array */

  sci0_init();
  sprintf(mycharacterarray,"\n Hier kommt die 1. Zahl: %lf",HalfRange);
  sci0_puts(mycharacterarray);
  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %lf",DACStepWidth);
  sci0_puts(mycharacterarray);

  while(1);
}

Ich habe %f zu %lf noch ausgebessert ;) Aber an der Ausgabe ändert sich 
nichts :(

Leider :(

[Frank S. (franksanderdo)]

Hallo Jochen,

das ist um klassen besser als das Ergebnis vorher!!

So ich grübel mal ne runde warum die Zahl zu kurz wird!
Auch wie wir das Problem umgehen können muss ich noch rausfinden ;-)

Du baust bitte die geänderte const Zeile in das DAC Programm und machst 
auf verdacht mal einen Test.

Dann schauen wir weiter

Grüße
Frank

[APW (Gast)]

Bei dem const müsste es event. so gemacht werden:

const double DACStepWidth = 5.0 / 0x03ffff;

sonst rechnet der Compiler auf der rechten Seite erst ganzzahlig,
wobei 0 rauskommt und wandelt dann erst in float/double um.
5.0 zwingt die rechte Seite als double zu rechnen


und die Ausgabe:

sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %2.10f",DACStepWidth);

oder so ähnlich

[J. R. (cia_man)]

Hallo!

Tataaaaa! Wir haben den Sägezahn!!!! Ich werde nun einmal die Taktrate 
erhöhen. ;)

Danke!

[Frank S. (franksanderdo)]

Na das ist doch mal ein Wort ;-)

und APW war mal wieder schneller als ich mit der Lösung.
APW ich werde langsam ein wenig neidisch ;-)

Jochen, kannst Du bitte mal APWs Lösungsvorschlag für die const Zeile 
testen?

Grüße Frank
P.S. APW, Jochen, danke für die Geduld die ihr habt. Hab ja nu doch 
einige Böcke geschossen in den letzten Tagen ;-)

[J. R. (cia_man)]

Hey!

#include <stdio.h>
#include <mc912d128.h>


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;



void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = (VoltValue / DACStepWidth); /* typeconversion added */

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= HalfRange) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 1;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x02; /* 1,0 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue += DACStepWidth;
    if (myVValue > 5)
      myVValue = 0;
  }
  
  return 0;    
}

Das Programm sieht nun folgendermaßen aus. Es läuft schon! Also Danke 
APW ;)

Und Frank was heißt da Danke für die Geduld... ich habe bisher Danke zu 
sagen ;)

Nun werde ich noch den Takt erhöhen :)

[Frank S. (franksanderdo)]

Hallo Jochen,

kannst DU noch mal die von APW kommende Ausgabezeile testen?

sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: 
%2.10f",DACStepWidth);

nur das wir sicher gehen das wir keine "genauigkeit" verlieren ;-)

Tja und danach musste uns sagen was wir als nächstes machen. Weil dann 
rennt der DAC wie gewünscht ;-)

Grüße
Frank

[J. R. (cia_man)]

Ich habe nun den SPI-Clock auf 4 Mhz erhöht.... jedoch ist die Ausgabe 
mir dann etwas spanisch^^

Wisst ihr woran das liegt?
Das: sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl:
%2.10f",DACStepWidth); werde ich anschließend einmal testen ;)

Danke!

[Frank S. (franksanderdo)]

Hallo Jochen,

Du meinst weil der nicht schneller geworden ist?
Ich bin mir nicht sicher welche Takt der Prozessor selber hat, aber das 
sind jetzt einige Schritte wo er durchrechnen muss um durch zu kommen.
Kann es sein das der SPI mit 4Mhz nicht mehr das begrenzende Element 
ist?

Ist jetzt nur mal ein Verdacht.

Grüße
Frank

[J. R. (cia_man)]

Frank Sander schrieb:
> Hallo Jochen,
>
> Du meinst weil der nicht schneller geworden ist?
> Ich bin mir nicht sicher welche Takt der Prozessor selber hat, aber das
> sind jetzt einige Schritte wo er durchrechnen muss um durch zu kommen.
> Kann es sein das der SPI mit 4Mhz nicht mehr das begrenzende Element
> ist?
>
> Ist jetzt nur mal ein Verdacht.
>
> Grüße
> Frank

Du meinst also, dass es der DAC ist? Weil der µC kann es ja net mit 8 
Mhz sein ;) oder?? :)

[J. R. (cia_man)]

Hier kommt die 1. Zahl: 2.5                                                  
Hier kommt die 2. Zahl: 0.000019

Programm dazu:

#include <stdio.h>

#include <mc912d128.h>

#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit

const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;


  void sci0_init(void){
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}

void main(void){
  char mycharacterarray[128]; /* This is a 128 characters long array */

  sci0_init();
  sprintf(mycharacterarray,"\n Hier kommt die 1. Zahl: %lf",HalfRange);
  sci0_puts(mycharacterarray);
  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %lf",DACStepWidth);
  sci0_puts(mycharacterarray);

  while(1);
}

nicht, dass wir wieder aneinander vorbei reden ;) :)

Danke!

Scheint aber zu stimmen was APW da macht!

[Frank S. (franksanderdo)]

Hallo Jochen,

8Mhz hat der HC12?
Dann haben wir seine Grenze erreicht.

Ich stelle mal ein par Behauptungen auf:
der HC12 braucht 2 Taktzyklen / Befehl (das erscheint mir optimistisch)
damit kann der HC12 effektiv nur 4 Mhz umsetzen.
Jetzt brauchen wir aber schon 3 Befehle um nur 1 byte von 3 an den DAC 
zu schicken.
Gibt (wieder optimistisch) 9 Befehle. Dann boste schon bei ca. 0,5 Mhz 
oder 500kHz.

Das bedeutet:
Ohne das wir auch nur einen Wert berechnet haben und ohne die reine 
Übertragungszeit des SPI braucht der Prozessor schon 0,5s für einen 
Zyklus.

Wenn Du jetzt noch das ganze grechne da drauf packst und die 
Übertragungszeiten....


Grüße
Frank

[J. R. (cia_man)]

Hmmm okay! Das stimmt. Dann muss ich mal sehen, ob das für unsere Zwecke 
reicht... also brauche ich faktisch für jeden Wert an den DAC 0,5 s 
mindestens?!

[Frank S. (franksanderdo)]

Hallo Jochen,

ne bei dem Test der Ausgabe meinte ich das wir mal

  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %2.10f",DACStepWidth);

testen sollten. nur um zu sehen ob da was vom Wert abgeschnitten wird

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo Jochen,

nein nicht für jeden Wert. Das sind dann die ca 262000 werte welche 
Dufür einen Sägezahnzyklus brauchst

Grüße
Frank

[J. R. (cia_man)]

Aber du hast doch gesagt die 9 Befehle brauchen schon 0,5 s ??? Oder?? 
Wobei??? Dann kann des Oszi Bild nicht stimmen ^^ Aber alle Werte des 
Sägezahns brauchen auch mehr wie 0,5 s! :)

[Frank S. (franksanderdo)]

Du kannst die Maximale Rate mit dem Oscar genau ausmessen.
Änder unser Sägezahn Programm dahingehend, das Du zwischen 0 und 5V 
springst.
Damit bekommst DU am Oscar die Maximal mögliche Änderungsfrequnz 
dargestellt ;-)

[Frank S. (franksanderdo)]

Hallo Jochen,

ok dann die Erkläsrung noch mal anders und ein wenig genauer:

Wir führen (dieses mal habe ich nachgezählt) 22 C Zeilen aus um einen 
Wert zu schreiben.

Wenn wir behaupten das jede Zeile 2 Taktzyklen im HC12 sind (viel zu 
optimistisch) dann sind wir bei einer Bearbeitungszeit von 8Mhz / 44 
Zyklen = 0,18 Mhz
Das sind also ca. 0,000005 s pro Wert.

Wir verschicken pro Sägezahnzyklus 262143. Das ergibt dann schon 1,5 
sec.

Das deckt sich nicht mit deinem Bild, weil meine angenommen 2 Taktzyklen 
VIEEEEEEL zu optimistisch sind.

Mach ruhig mal den o.g. Versuch mit den Wertsprüngen zwischen 0 und 5 
Volt, damit wissen wir dann genau was bestenfalls möglich ist ;-)

Grüße
Frank

[J. R. (cia_man)]

Hier kommt die 1. Zahl: 2.5                                              Hier kommt die 2. Zahl: 0.000019

Dies gibt das Programm aus:

#include <stdio.h>

#include <mc912d128.h>

#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit

const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;


  void sci0_init(void){
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data){
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data){
   while (*data)
       sci0_putc(*data++);
}

void main(void){
  char mycharacterarray[128]; /* This is a 128 characters long array */

  sci0_init();
  sprintf(mycharacterarray,"\n Hier kommt die 1. Zahl: %lf",HalfRange);
  sci0_puts(mycharacterarray);
  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %2.10f",DACStepWidth);
  sci0_puts(mycharacterarray);

  while(1);
}

Das Ergebnis ist aber zu oben identisch.... Bringt es also dann jetzt 
den von dir gewünschten Erfolg?

Gruß

[Frank S. (franksanderdo)]

Hallo Jochen,

das bestätigt ein wenig meine Sorge.
Ich werde da noch mal lesen müssen ;-)

Generell haben wir aber jetzt ein funktionierendes Programm.
Die "Ungenauigkeit" werden ich noch mal genauer studieren, soll uns aber 
nicht davon abhalten das wir erst mal weiter basteln.

Kannst Du den Test zur maximal darstellbaren Frequenz durchführen?

Grüße
Frank

[J. R. (cia_man)]

Nach dem Mittag-Essen ;)

Bis dann

Cu

[APW (Gast)]

1) SPI läuft auf max Frequenz = F_Bus/2 = 4MHz
   3 Bytes pro Wertausgabe an den DAC zu übertragen:
   -> 24Bit * 250ns => 6us
   Wenn man den vollen Sägezahn mit 18Bits macht braucht man
   also für die SPI-Transfers alleine ca. 1,6s

   Sollte also momentan nicht der limitierende Faktor sein.

2) Das hier ist der limitierende Faktor:

   DACValue = (VoltValue / DACStepWidth);

   Pro Ausgabe eine double-Division sowie eine Double zu
   Longint Konvertierung. Wenn man auf Speed optimiert, muss man
   Fliesspunktrechnungen vermeiden. Ganz hardcoremässig event.
   sogar auf Assembler umsetzen.

3) Beim HC12 kann man nicht pauschal von 2 Clks/Maschinenbefehl 
ausgehen.
   Es gibt Befehle, die dauern 1 Clk, andere dauern so 12 Clks.
   Ich schätze den Durchschnitt so auf 3 Clks/Befehl
   Ausserdem wisst ihr ja nicht, was der C-Compiler aus euren
   Konstruktionen macht.

4) Kannst du mal sowas probieren:

...
  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %2.10f",DACStepWidth);
  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %2.10f",10000*DACStepWidth);

  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %2.12f",DACStepWidth);
  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %12.12f",DACStepWidth);

  sprintf(mycharacterarray,"\n Hier kommt die 2. Zahl: %e",DACStepWidth);
...

Einfach mal ein bischen experimentieren. Vielleicht sinds 
Rundungseffekte

[Frank S. (franksanderdo)]

APW du rettest meinen Tag!!

den %e habe ich gesucht und nicht gefunden!!
Ich gehe derzeit davon aus das wir einem Rundungsfehler zum Opfer 
fallen.

Da ich aber gerade an eben der Vermeidung der double Berechnungen 
arbeite (jep mir ist bewusst das die Dinger richtig Zeit kosten) werde 
ich auf dem Weg auch den Rundungsfehler los.

Ich stimme Dir übrigens zu was die 2 Zyklen betrifft. Habe derweil mal 
ein wenig im Netz gestöbert. Da sprach sogar jemand von 4 Zyklen im 
Mittel (bei Assembler code).
Ob ob Jochen aber wirklich viel schneller werden muss wird er uns noch 
verraten müssen ;-)

Dank Dir erst mal.

Grüße
Frank

[J. R. (cia_man)]

Geschwindigkeit ist für mich ziemlich wichtig! Aber ich werde als erstes 
jetzt mal den Test vom Frank programmieren ;)

Und mal messen wie schnell wir momentan sind!

[J. R. (cia_man)]

Hier die Messungen. Als Takt habe ich 4,0 Mhz am SPI.

Das Programm:

 while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 5;
    VValueTo18BitDAC(myVValue);
      myVValue = 0;
  }

Um Missverständnisse zu beseitigen ;)

:)

[J. R. (cia_man)]

Jetzt ^^

Sorry... die Arbeit ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

lese ich das richtig?
Von der fallenden Flanke zur fallenden Flanke ca. 450us?

Kannst Du mir sagen wie schnell Du es brauchst?

Grüße
Frank

[J. R. (cia_man)]

Ist das jetzt schnell? Also ihr habt ja da mehr Erfahrung wie ich... was 
µC betrifft! ;)

[J. R. (cia_man)]

Für meine Zwecke reicht es :) **freu**

[J. R. (cia_man)]

Nächste Schritte sollen dann sein, mehrere DACs an einem µC zu 
betreiben. SPI-BUS soll dazu verwendet werden. Hardware habe ich aber 
noch nicht :)

Die Frage die ich deswegen habe ist, was passiert wenn der µC sein 
Signal vom DAC abzieht... das heißt hält der DAC dann seinen Wert? Soll 
nämlich so werden, damit mehrere DACs gleichzeitig laufen können.

Danke!

[Frank S. (franksanderdo)]

Hallo Jochen,

leider hast Du die Frage nicht ganz beantwortet ;-)
Wie schnell (je DAC) brauchst Du es denn??

Über wie viele DACs reden wir?

Ich fange gerade an mir Sorgen zu machen ;-)

Grüße
Frank

[APW (Gast)]

J. R. schrieb:
> Die Frage die ich deswegen habe ist, was passiert wenn der µC sein
> Signal vom DAC abzieht... das heißt hält der DAC dann seinen Wert?

Hä??

Ich hab keinerlei Durchblick, was du genau vorhast.
Wir brauchen ja nicht die DAC Wandlerrate von 1000/s auf 20000/s
hochtreiben, wenn 10/s ausreichen.

Also
-Was soll das Ganze eigentlich
-Wo kommen welche Daten in welchem Format / bzw. Protokoll
 wie schnell rein
-Was sind die Ausgabekanäle
-Was muss der uC wie verarbeiten
-Wie schnell soll das laufen
-Reichen 30 DAC Wandlungen/s oder sollens 10000/s sein
-Sollen die DACs gleichzeitig ihre Analogausgänge updaten ?
-Wenn du mehrere DACs bedienen musst, kannst du dir es überhaupt
 noch leisten, die ganze Ausgabe über zu warten ?
 (während z.B. serielle Daten reinkommen)

.....usw...

Langsam gehts event. mit Interruptprogrammierung los.
Das kann noch viel lustiger werden als bisher.

Wenn das auf die 10000 Beiträge zustrebt,
bekomme ich echte Probleme mit meinem Browser.

[Frank S. (franksanderdo)]

Hallo APW,

wie viele Beiträge haben wir denn bis jetzt?
evtl. sollten wir dann demnächst einen neuen Fred aufmachen.
Die eigentliche Aufgabe (siehe Überschrift) haben wir ja gelöst ;-)

Grüße
Frank

[J. R. (cia_man)]

Ich kann darüber auch noch keine genaueren Angaben machen... ist bei mir 
auch alles noch im Aufbau und muss ich erst einmal selber abklären.... 
;)

Aber nochmal zu dem was ich meinte... wenn ich jetzt über den BUS sagen 
wir 4 DACs ansteuere... dann kann ich ja immer nur eine mit den 
entsprechenden Infos versorgen... wegen dem BUS... und wie ist das dann 
mit den übrigen DACs die nicht SS mäßig gerade angesprochen werden? 
Schalten die sich dann einfach auf 0 V oder halten die ihren vorher 
übermittelten Wert? Das meine ich! Klar? :) ;)

Thx!

[Frank S. (franksanderdo)]

Hallo Jochen,

heute wird die Session etwas holperig, weil wir hier auf der Baustelle 
versuchen einen 35KV Traffo scharf zu schalten.
Genauer der Kunde versucht das ;-)

Zu deiner Frage:
der DAC hält die Spannung am Ausgang.
Das kannst Du auch schon an unseren Sägezahnversuchen sehen. Weil wir ja 
immer nach dem Übertragen den SS wegnehmen ;-)

So ich hol mir schnell nen Kaffee und dann kommt die Antwort zu den 
Geschwindigkeiten ;-)

Grüße
Frank

[J. R. (cia_man)]

35 kV nicht schlecht ;) Bin zwar kein Energietechniker aber hört sich 
doch beachtlich an... was fließen da für Ströme? ;)

Gruß

[Frank S. (franksanderdo)]

Hallo Jochen,

jetzt mal zu den Geschwindigkeiten oder "sample rates".

Es gibt da kein schnell oder langsam. Es gibt nur eine Anforderung die 
mit der gewählten Plattform erfüllt werden kann oder eben nicht.

Einfaches Beispiel:
wenn Du einen 2 Mhz Rechteck mit deiner gewählten Plattform darstellen 
willst, wirst du feststellen das geht nicht. egal wie Du es 
programmierst. Da ist dann der SPI Takt = 4Mhz zusammen mit dem 24 bit 
Kontrollwort eine Physikalische Grenze ;-)

Um also sagen zu können ob und wie deine Idee umsetzbar ist, müssen wir 
erst mal wissen welche Voraussetzungen wir erfüllen müssen.

Wir kennen aber schon ein par Werte die wir schaffen können.

1. Die reine Übertragung eines Wertes dauert 6us (dank an APW)
2. Derzeit verbraten wir durch Rechnereien ca. 220us pro Wert.

Diese 220us können (und müssen??) wir optimieren, nur dafür müssen wir 
wissen auf was wir optimieren. Da kommen dann wieder die schon mal 
gestellten Fragen zum tragen.

Ein einfaches Beispiel:
Ich glaube das wir locker 100us sparen können wenn der "Bediener" die 
Spannung nicht in V sonder in uV angibt.
Dadurch können wir die doubles weg optimieren und die kosten richtig 
Zeit!!

Wie APW schon sagte: Wenn Du nur eine Wertänderung alle 0,5s brauchst 
dann brauchen wir gar nix optimieren und sind (fast) fertig ;-)

Alles klar soweit?

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo Jochen,

ich hoffe heute fließen keine Ströme :-D
Aber wenn es mal rennt sind es einige Megawatt die da verbrannt werden 
;-)
Das alles nur um irgendwelche dusseligen Steine durch die Gegend zu 
kutschieren.

Grüße
Frank

[APW (Gast)]

Solange man nicht weiß, wieviele Wandlungen/s er braucht, ist
optimieren überflüssige Arbeit. Vielleicht braucht er ja nur 50/s.

Ich denke Jochen hat 2 Möglichkeiten, mehrere DAC an den uC anzukoppeln:

Seriell:
So etwa, wie in Figure 47 und Figure 4 des AD5781 Datasheets.
Ist dort auch erklärt wiesowas funktioniert.
Nachteil ist, dass man jedesmal N*24Bit senden muss.
Wenn man weiß, dass man meistens alle DACs gleichzeitig mit neuen Werten
versorgen wird, ist das ok. Wenn man mal einen DAC in der Reihe nicht 
neu
mit Daten versorgen will, sendet man einfach ein NOP-Befehl
an der richtigen Position innerhalb der N*24Bit.

Parallel:
Da muss man nur die 24Bit des betreffenden DAC senden. Man braucht halt
individuelle Select-Leitungen. Alle DAC-SDI sind an einer Leitung und
alle DAC-SDO sind an einer Leitung. Aufpassen, dass nicht mehrere
Selects gleichzeitig aktiv sind.

[Frank S. (franksanderdo)]

Hallo Jochen,

so da ich gerade mal eine kurze Verschnaufoasue habe kommt hier ein 
Programm wo ich mal versuche auf Leufzeit zu optimieren:
Ich habe die doubles durch unsigned long ersetzt. damit wir trotzdem 
noch ausreichend genau rechnen musste ich dafür die Basiswert mit 
1000000 mutliplizieren.

ACHTUNG der SPI Takt steht noch auf 1 MHz ;-)
(glaube ich)

#include <stdio.h>
#include <mc912d128.h>

const unsigned long HalfRange = 2500000;
const unsigned long DACStepWidth = 5000000 / 0x03ffff;

void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(unsigned long VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = VoltValue / DACStepWidth; 

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= HalfRange) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 1;
  unsigned long myVValue = 0; /* changed to float as we do not need 64bit from double */  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x02; /* 1,0 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue += DACStepWidth;
    if (myVValue > 5000000)
      myVValue = 0;
  }
  
  return 0;    
}

[Frank S. (franksanderdo)]

Hallo APW,

habe aus "Langeweile" trotzdem mal nen Versuch der Optimierung 
gestartet.
Habe mit Schrecken gelernt das double ja 8 byte lang ist.
Schau mal was Du von meiner Optimierungsidee denkst bitte.

Interrupts möchte ich wenn es eben geht vermeiden, weil damit 
überfordern wir Jochen fürchte ich. Dazu kommt das er ja offensichtlich 
nix ordentliches zum debuggen hat.

Grüße
Frank

[J. R. (cia_man)]

Ich habe nun ein neues Problem:

Ich möchte auf jeden Wert des Sägezahns einen Sinus geben, bei dem ich 
Ampl + Frequenz und Anzahl der Perioden einstellen kann.

Das wird das neue Problem ;)

Ich bin für jede Hilfe dankbar :)

Danke!

[Frank S. (franksanderdo)]

Hallo Jochen.

schick mal mein Programm durch den geschwindigkeits test ;)
Das will ich jetzt wissen :D

Wie meinst DU auf jeden wert des Sägezahn?
Ich vermute Du willst auf den Sägezahn einen Sinus modulieren?

Grüße
Frank

[J. R. (cia_man)]

Genau... und auf jeder Stufe soll dann einer sein ;)

[J. R. (cia_man)]

Frank Sander schrieb:

> schick mal mein Programm durch den geschwindigkeits test ;)
> Das will ich jetzt wissen :D

Läuft schon ;)

[J. R. (cia_man)]

Hat nicht den gewünschten Erfolg ;) Und noch so ein hässlicher Peak nach 
unten :(

[Frank S. (franksanderdo)]

Hattest Du den Takt auf 4 MHz geändert?
Wenn nicht bitte machen ;-)

Der PEak muss ich mal suchen warum ich da nen Überlauf rein bekomme ;-)

[J. R. (cia_man)]

4 MHz liegen an:

 SP0BR = 0x00; /* 4,0 MHz SPI clock */

;)

[J. R. (cia_man)]

Zum Thema Sinus habe ich mir überlegt, dass man ja die Amplitude, die 
der Sinus haben soll, einfach so umsetzen könnte, dass man zu dem DC 
Wert die Werte die man vorher errechnet hat hinzu addiert. Bloß wie man 
jetzt die Frequenz umsetzt? Die Sache mit einer oder 2 Perioden könnte 
man ja mit einer while-Schleife lösen oder?

Danke.

[Frank S. (franksanderdo)]

ok dann haben wir gelernt:

Es waren nicht unbedingt die Fließkommazahlen ;)
(hat der HC12 ne eingebaute FPU??)

das ist schön das hilft und wir können mit dem alten Programm weiter 
arbeiten.

Jochen dir muss klar sein: schneller wird es durch den Sinus nicht ;-)

Also Sinus aufmodulieren:

Was ist die maximale amplitude?
Was ist die maximal frequenz?

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo Jochen,

das mit den 2 while Schleifen ist so eine Sache:
Du hast ja schon gelernt, das wir das Zeitverhalten des uC nicht 100% 
vorhersagen können. Wenn Du jetzt die Frequenz des Sinus über eine 
verschachtelte Schleife (im schlimmsten fall mit Wait) erzeugst, dann 
gibt das alles nur keinen Sinus mehr.

Um die position im Sinus (und damit den zugehörigen Wert) zu bestimmen 
brauchen wir dann doch einen Timer. Alles andere ist halbherzig.

Grüße Frank

[J. R. (cia_man)]

Frequenz max: 100 kHz
Ampl max: 19 mA... in Volt... ?? Sagen wir 0,5 V!

Ja das ist schon klar, dass es langsamer wird... es dürfte dann bis zu 
0,5s brauchen ein Sinus... bzw 2 Perioden also 2 Sinuse ;)

Danke

[J. R. (cia_man)]

Okay... owe ich sehe die Interrupts kommen ohoh! :)

[Frank S. (franksanderdo)]

Jochen das passt jetzt net zusammen:

100kHz und 0,5s 2 perioden

;)

[J. R. (cia_man)]

Die 0,5 s war nur ein Wert den der Guru bei uns in den Raum gestellt 
hat... sie wollen wissen wie lange es dauert so was zu modulieren ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

so kommen wir nicht weiter.
Kannst Du mir mal ein Bild skizzieren wie das Signal was ihr am ende 
braucht aussehen soll?

Ich muss verstehen was ich Dir erklären soll ;-)

Grüße
Frank

[J. R. (cia_man)]

Wollen wir es nicht trotzdem für den Anfang mit einer while-Schleife 
probieren? Oder könnt ihr das mit dem Timer schnell umsetzen, bzw mir 
dabei helfen? Weil es soll schon nächste Woche laufen :(

[J. R. (cia_man)]

Hier mal eine Skizze wie der Sinus an sich aussieht... und dieser kommt 
dann auf den Sägezahn bei jeder Stufe die wir haben... dadurch wird der 
Sägezahn sehr langsam...

[J. R. (cia_man)]

Sorry für die schlechte Paint-Skizze ;)

[J. R. (cia_man)]

Alles soweit verständlich?

Habe hier noch was zum Thema gefunden:

http://www.mikrocontroller.net/articles/Digitaler_Funktionsgenerator

Irgendwie macht mir die Sache gerade Bauchweh... :(

[Frank S. (franksanderdo)]

Hallo Jochen,

ok war jetzt nicht ganz was ich erwartet habe aber macht nix.
Ich hab mir hier parallel auch mal ein wenig nen Kopf gemacht:

Ich würde gerne 360 Punkte pro Zyklus setzen (darfst raten warum)
Dann täte ich gerne erst mal nur den Sinus bauen. Das aufmodulieren 
machen wir dann im 2. Schritt ;-)

Das Problem das ich jetzt habe:
Ich habe keinen blassen Schimmer über die Timer im HC12.
Da musst Du mal die passenden Passagen im Handbuch suchen und wenn es 
geht ein oder 2 Beispiele.

Dann hoffe ich das es eine sin Funktion in deinen Bibliotheken gibt!?
Kannst Du das bitte rausfinden? Wenn es die nicht gibt, dann werden wir 
uns ein Tabelle mit den entsprechenden Werten basteln müssen.

Alles klar?
Dann los ans Werk ;-)

Grüße
Frank

[J. R. (cia_man)]

Floating-Point Math Functions

ICCV7 for CPU12 generates reentrant code including floating-point 
mathematics (at V6, ICC12 floating-point code is non-reentrant due to 
the use of static variables).

The following floating-point math routines are supported. You must 
#include <math.h> before using these functions.

    float asinf(float x)

returns the arcsine of x for x in radians.

    float acosf(float x)

returns the arccosine of x for x in radians.

    float atanf(float x)

returns the arctangent of x for x in radians.

    float atan2f(float y, float x)

returns the angle whose tangent is y/x, in the range [-pi, +pi] radians.

    float ceilf(float x)

returns the smallest integer not less than x.

    float cosf(float x) )

returns the cosine of x for x in radians.

    float coshf(float x)

returns the hyperbolic cosine of x for x in radians.

    float expf(float x)

returns e to the x power.

    float exp10f(float x)

returns 10 to the x power.

    float fabsf(float x)

returns the absolute value of x.

    float floorf(float x)

returns the largest integer not greater than x.

    float fmodf(float x, float y)

returns the remainder of x/y.

    float frexpf(float x, int *pexp)

returns a fraction f and stores a base-2 integer into *pexp that 
represents the value of the input x. The return value is in the interval 
of [1/2, 1) and x equals f * 2**(*pexp).

    float froundf(float x)

rounds x to the nearest integer.

    float ldexpf(float x, int exp)

returns x * 2**exp.

    float logf(float x)

returns the natural logarithm of x.

    float log10f(float x)

returns the base-10 logarithm of x.

    float modff(float x, float *pint)

returns a fraction f and stores an integer into *pint that represents x. 
f + (*pint) equal x. abs(f) is in the interval [0, 1) and both f and 
*pint have the same sign as x.

    float powf(float x, float y) )

returns x raised to the power y.

    float sqrtf(float x) )

returns the square root of x.

    float sinf(float x)

returns the sine of x for x in radians.

    float sinhf(float x)

returns the hyperbolic sine of x for x in radians.

    float tanf(float x) )

returns the tangent of x for x in radians.

    float tanhf(float x)

returns the hyperbolic tangent of x for x in radians.

Since, by default, float and double have the same size (32 bits), math.h 
also contains a set of macros that map the function names to be without 
the f suffix form. For example, pow is the same as powf, sin is the same 
as sinf, etc.




Daraus haben wir hier die Fkt:

    float sinf(float x)

returns the sine of x for x in radians.

Schonmal einwas ;)

[Frank S. (franksanderdo)]

bin schon am basteln ;-)

[J. R. (cia_man)]

Der Timer heißt beim HC12 Enhanced Capture Timer... soweit ich weiß... 
nur ich habe auch damit so gut wie noch nie gearbeitet...

Außer dieses Blink-Programm:

//--------------------------------------------------------------
#include <stdio.h>
#include "mc912d128.h"
//--------------------------------------------------------------
void _HC12Setup(void) {
  COPCTL = 0x08;        // disable Watchdog
  }
//--------------------------------------------------------------
#pragma interrupt_handler isrOC2
void isrOC2(void) {
TFLG1 = 0x04; // clear OC2 Intr Flag
TC2 += 31250u; // 1 interrupt every 31250 timer ticks (0.5s)
PORTH ^= 0x80; // toggle LED
}
//--------------------------------------------------------------
void main(void) {
// install OC2 pseudo vector in RAM
// (if running with TwinPEEKs monitor)
*((unsigned char *)0x3FE2) = 0x06; // JMP opcode
*((void (**)(void))0x3FE3) = isrOC2;
// make PTH[7] an Output to drive the LED
DDRH |= 0x80;
// Timer Setup
TSCR = 0x80; // Timer enable
TMSK2 = 0x07; // Prescaler = 128 (1 timer tick every 16ìs)
TCTL2 = 0x00; // TC2 disconnected from Pin
TIOS |= 0x04; // TC2 is Output Compare
TMSK1 |= 0x04; // TC2 Interrupt enable
// enable Interrupts
asm("cli");
// loop endless (and let the interrupt work)
while(1) ;
}
//==============================================================

Wobei das uns jetzt glaube ich schon weiter bringt ;)

Sag mal wie weit dir das hilft!? Danke

[J. R. (cia_man)]

Hier ist noch eine Timer-Idee ;)

#include <stdio.h>

#include <mc912d128.h>


void delay1ms(void) {
  asm("ldy #2666"); //2666 in Y-Register laden
  asm("dbne y,.");  // Decrement, bis Y=0 ist / 
            //3cyc x 125ns x 2666 = 0,99975ms
}


void wait(int duration)
{
  while(duration--)
  delay1ms();
}



void main(void) {


  DDRH |= 0x3F;
 
 
 
   
  while(1){
  
  PORTH ^=0x3F;
  wait(1000);
  
  }
}

Vlt hilft das auch!


Sag mir bitte inwieweit dir das hilft.

[Frank S. (franksanderdo)]

Das ist sozusagen genial ;-)

[Frank S. (franksanderdo)]

Also wegen überschneidung der Posts:

1. Post mit Timer und interrupt
So was suchte ich!

2. Post mit wait
Ich hau Dich, so was will ich net sehen ;-)

[J. R. (cia_man)]

Juhuuu!!! ^^ Was nicht alles ein Blink-Programm bringt ;)


Okay vergiss 2. ;)

[Frank S. (franksanderdo)]

ok dann basteln wir erst mal einen kleinen Sinus mit unbestimmter 
frequenz nur so zum üben:

kannst schon mal das Sägezahnprogramm mit fleißkomma wieder raus suchen 
und oben die maths Bibliothek einfügen.
Code schnipsel kommt gleich ;-)

Frank

[J. R. (cia_man)]

Gutgut ;)

[Frank S. (franksanderdo)]

main()
{ 
  int i = 1;
  int GradZaehler = 1;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x02; /* 1,0 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler++);
    if (GradZaehler > 360)
      GradZaehler = 1;
  }
  
  return 0;    
}

[Frank S. (franksanderdo)]

Das sollte wenn ich net zu dumm bin einen 1 V Sinus um eine 2,5V Basis 
ergeben ;-)

[J. R. (cia_man)]

Geht! Du bist echt ein Held für mich ;) Die beiden Bilder geben dir auch 
mit dem "dreckigen" Sinus recht. :)

Saubere Sache! Thx

[Frank S. (franksanderdo)]

Jochen das ist aber zu dreckig, da stimmt was nicht

Bitte mach mal einen Versuch mit 1 Mhz Takt am SPI!

[J. R. (cia_man)]

Hier ein Ausschnitt aus dem Handbuch zum Thema Timer.

Mach ich mit 1.0 Mhz ;)

[Frank S. (franksanderdo)]

Ich hätte 360 punkte erwartet nicht nur 6 oder 7

[J. R. (cia_man)]

1.0 MHz liegen an! :0

Meinst du 4.0 Mhz???

[Frank S. (franksanderdo)]

Uff das schockiert mich jetzt!
kannste mal eines mit 0,5 MHz machen?

ich verstehe gerade nicht was das Probelm ist das der keine 360 Schritte 
pro Zyklus macht :-(

[J. R. (cia_man)]

Übrigens sollen dann später die Sinus-Werte aus einem Array gelesen 
werden...

Ich mach das mit den o,5 Mhz sofort ;)

[APW (Gast)]

100kHz Sinus ? Hab ich das richtig verstanden ??

[Frank S. (franksanderdo)]

Hallo APW

da gibt es derzeit beim Jochen etwas Klärungsbedarf und es werden viele 
Werte durcheinander geworfen.

Ich glaube er braucht da was Zeit um das zu klären ;)

Grüße
Frank

[J. R. (cia_man)]

Ja ist alles zum probieren.... wie weit wir kommen ;)

Das ganze mit 500 kHz brachte keine Besserung! :(

Kann es auch am Oszi liegen? Settings?

[J. R. (cia_man)]

Wir versuchen mal bis 70 kHz zu kommen.... die 100 KHz wären wirklich 
Obergrenze!

[Frank S. (franksanderdo)]

Ich bin verwirrt

[J. R. (cia_man)]

Warum? Weil der Sinus nicht so wird wie du willst?

[Frank S. (franksanderdo)]

AHHHHHHHHHHHHHHHHHHHHHHHHHHH
Ich Rindviech!!!!!!!!!

änder bitte mal den
int Gradzaehler in einen
double GradZaehler

[J. R. (cia_man)]

Auch wenn ich auf 31,25 KHz SPI Clock gehe ist kein Unterschied zu sehen 
:(

[J. R. (cia_man)]

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;



void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = (VoltValue / DACStepWidth); /* typeconversion added */

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= HalfRange) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 1;
  double GradZaehler = 1;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler++);
    if (GradZaehler > 360)
      GradZaehler = 1;
  }
  
  return 0;    
}

Programm. Und dazugehörige Aufnahme.

[APW (Gast)]

Überleg dir mal, mit SPI können wir max 166000 Werte/s an einen (1) DAC
senden. Wenn das dein Ernst ist, kannst du schonmal den C-Compiler 
weglegen.
Das wird nur mit Integer+Hardcore Assembler was. Und selbst dann reicht 
es lange nicht.

Soll der Sinus auf den Sägezahn addiert oder multipliziert werden ?

Übrigens wegen

    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler++);
    if (GradZaehler > 360)
      GradZaehler = 1;

Das muss Radiant sein, nicht Grad.

Und der HC12 hat keine FP-Unit, nur einige Befehle, die den Compiler 
dabei
unterstützen können. Wobei der ICC wahrscheinlich nicht den schnellsten
Code erzeugt.

Wenn die Speed-Anforderungen so hoch sind und es überhaupt HC12-artig
sein soll, dann würde ich nen HCS12, oder viel besser (und komplexer)
HCX12 nehmen, eine DAC event. parallel anbinden und wenn man auf C
besteht, den CodeWarrior-Compiler nehmen.

Diese Card12 gibts auch mit HCS12 und HCX12

[Frank S. (franksanderdo)]

@APW

Wieder muss ich mich bedaken, an den radiant habe ich net gedacht :-(

[J. R. (cia_man)]

Das heißt also besser wie so komme ich nicht mit dieser Karte... Und 
wenn wir einfach die Sinus-Werte in ein Array legen und danach erst 
schreiben???

Also die Sinus-Rechnung vor der eigentlichen Schreib-Operation machen?

[APW (Gast)]

Du siehst ja am Oszillogramm, dass eine Ausgabe aktuell ca 1,5ms dauert,
und das nur mit Sinus alleine.

[J. R. (cia_man)]

APW schrieb:

> Soll der Sinus auf den Sägezahn addiert oder multipliziert werden ?
>

addiert!

[J. R. (cia_man)]

@APW: Welche Frequenz meinst du dann, dass wir überhaupt schaffen?

[APW (Gast)]

J. R. schrieb:
> @APW: Welche Frequenz meinst du dann, dass wir überhaupt schaffen?

Kommt drauf an, wie kompromisslos du programmierst.
-kein Float, wenns eilig ist
-Werte vorberechnen
-Assembler benutzen
-nicht universeller (=langsamer/komplexer/mehr code) programmieren,
 als es die Aufgabenstellung (die wir nicht kennen) erfordert.
-Timings planen

Ohne Kenntnis der Aufgabenstellung kann man nichts genaues über
die Machbarkeit sagen.

[Frank S. (franksanderdo)]

Hallo Jochen,

also nochmal weil es so schön war.
Ich bin echt zu lange raus :-(
Später haben wir es leichter weil da benutzen wir eine Tabelle ;-)

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler * 0.17453293);
    GradZaehler += 1;
    if (GradZaehler > 360)
      GradZaehler = 1;
  }

Grüße
Frank

[J. R. (cia_man)]

0.17453293??? Mit pi???

[Frank S. (franksanderdo)]

@APW

Ich fürchte das wir bald erkennen werden, das selbst mit optimalster 
Programmierung der HC12 seine Grenzen erreicht.

Dennoch würde ich gerne das ganze weiter treiben, nicht zuletzt damit 
Jochen die Möglichkeiten kennt und das auf einen anderen (schnelleren) 
Prozessor umsetzen kann.

Grüße
Frank

[Frank S. (franksanderdo)]

@ Jochen

das ist die Umrechung von Grad in Bogenmaß.
Der sinus in C (und allen anderen programmiersprachen) arbeitet mit 
Bogenmaß ;-)
APW hat es geasgt und ich habe jetzt ein Beißspur im Schreibtisch ;-)

Grüße
frank

[J. R. (cia_man)]

Hier die neuen Bilder mit der Verbesserung! :)

Aber ein Peak muss halt dennoch wieder drinnen sein :(

[J. R. (cia_man)]

Bogenmaß = Grad * Pi/180 = Grad *0,017453.... ;) Oder?

[J. R. (cia_man)]

Hier mit 0,017... Bilder schauen besser aus oder?

[APW (Gast)]

probier mal das
 ...
    GradZaehler += 1;
    if (GradZaehler = 360)
      GradZaehler = 0;
 ...

[Frank S. (franksanderdo)]

Hallo Jochen,

ok der Peak beim 0 Durchlauf da will ich jetzt mal nicht pingelig sein. 
;-)
Den bekommen wir noch weg ;-)

Damit haben wir einen Sinus.
Gib mir bitte heute Abend um mal die Timernummer zu studieren.
Ich denke das ich aus dem Timer einen Sinus bauen kann und wir in der 
Main routine nur den Basis wert generieren.
Ich hab da so eine Idee ;-)

Grüße
Frank

[J. R. (cia_man)]

Gut ^^ aber die 0,017 stimmt oder?? ;)

[J. R. (cia_man)]

APW schrieb:
> probier mal das
>  ...
>     GradZaehler += 1;
>     if (GradZaehler = 360)
>       GradZaehler = 0;
>  ...

Sieht nicht so gut aus ;)

[Frank S. (franksanderdo)]

Jochen das kann jetzt aber net sein.
Zeig mal Code

[Frank S. (franksanderdo)]

die o,o17... stimmt

[J. R. (cia_man)]

Frank Sander schrieb:
> Jochen das kann jetzt aber net sein.
> Zeig mal Code

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;



void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = (VoltValue / DACStepWidth); /* typeconversion added */

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= HalfRange) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 1;
  double GradZaehler = 1;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler * 0.017453293);
     GradZaehler += 1;
    if (GradZaehler = 360)
      GradZaehler = 0;
  }


  
  return 0;    
}

[Frank S. (franksanderdo)]

Ach ja der ist herrlich ;-)

if (GradZaehler == 360)

dann funkts

[J. R. (cia_man)]

Frank Sander schrieb:
> Ach ja der ist herrlich ;-)
>
> if (GradZaehler == 360)
>
> dann funkts

Naja :) einen Peak hab ich aber noch ;) manchmal auch mehr... immer beim 
0-Durchgang... ???

while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler * 0.017453293);
     GradZaehler += 1;
    if (GradZaehler == 360)
    {
       GradZaehler = 0;
    }
  }


  
  return 0;    
}

Komisch? Klammern habe ich auch gesetzt!

[J. R. (cia_man)]

Ich habe jetzt sooo viele Variationen probiert (hier nicht genannt).... 
Peak bleibt :( das kann doch nicht sein ;(

[Frank S. (franksanderdo)]

Wenn Du den Oscar weiter auflöst, kommt der dann bei jedem Zyklus?

[J. R. (cia_man)]

Frank Sander schrieb:
> Wenn Du den Oscar weiter auflöst, kommt der dann bei jedem Zyklus?

Er kommt und geht immer bei 0-Durchgängen.... siehe Bilder...

Manchmal ist der Peak auch total weg... und im nächsten Moment ist er 
wieder da... :(

[Frank S. (franksanderdo)]

Hallo Jochen,

ich vermute das der Oscar den peak nicht immer auflöst.
Den bekommen wir weg, das ist kein Problem.

Kannst DU bitte mal einen Zyklus die genaue Länge bestimmen?

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo Jochen,
Hallo APW,

ich hab da mal wieder was gebastelt ;-)
Ob das funktioniert? Keine Ahnung!
Ich habe net alles verstanden was ich aus dem Timer Beispiel geklaut 
habe.
Evtl. findet ja noch jemand was mehr Text zu dem Timer im HC12
Jochen ist mal wieder das Versuchstier :-D

Fehlermeldungen bitte zu mir.
Anregungen bitte auch zu mir.

Grüße
Frank

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>

const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;

double GradZaehler = 1;
double SinusOffset = 0.5;
double SinusAmplitude = 0.5;

void _HC12Setup(void) /* interesting but I did not see it is called some were */
{
  COPCTL = 0x08;        // disable Watchdog
}

#pragma interrupt_handler isrOC2 /* this most probably tells the Compiler about the interrupt hanlder */

void isrOC2(void) 
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  double VoltValue = 0;

  TFLG1 = 0x04; // clear OC2 Intr Flag
  TC2 += 3125u; // 1 interrupt every 3125 timer ticks (0.05s) is kind of slow but good for the start ;-)

  VoltValue = SinusOffset + (sin(GradZaehler * 0.017453293) * SinusAmplitude);

  DACValue = (VoltValue / DACStepWidth); /* typeconversion added */
  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= HalfRange) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  SP0DR = myhighbyte; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
  SP0DR = mymidbyte; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
  SP0DR = mylowbyte; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
  PORTS |= 0x80;    /* /SS output high */
}

void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

main()
{ 
  int i = 1;
  /*********************************************************/
  /* Honestly the following I beblieve is not needed         */
  /*********************************************************/
  // install OC2 pseudo vector in RAM                        /***/
  // (if running with TwinPEEKs monitor)                    /***/
  *((unsigned char *)0x3FE2) = 0x06; // JMP opcode  /***/
  *((void (**)(void))0x3FE3) = isrOC2;                         /***/
  /********************************************************/
  /********************************************************/

  /*********************************************************/
  /*        Here starts what I beblieve is needed                */
  /*********************************************************/
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  // Timer Setup
  TSCR = 0x80; // Timer enable
  TMSK2 = 0x07; // Prescaler = 128 (1 timer tick every 16ìs)
  TCTL2 = 0x00; // TC2 disconnected from Pin
  TIOS |= 0x04; // TC2 is Output Compare
  TMSK1 |= 0x04; // TC2 Interrupt enable
  // enable Interrupts
  asm("cli");

  while (i>0) 
  { 
    SinusOffset += DACStepWidth;
    if (SinusOffset >= (5.0 - SinusAmplitude))
      SinusOffset = SinusAmplitude;
  }  
  return 0;    
}

[APW (Gast)]

Hallo Frank

Eine Frage. Hast du schon mal uC programmiert ?
(Ich meine mehr als 100 Zeilen und mit Interrups und so).
Bitte nicht übelnehmen.
In deinem Quellcode hats ein paar Sachen drin, da könnte ich schlaflose
Nächte bekommen ;)

[Frank S. (franksanderdo)]

Hallo APW,

jep habe ich. Ist aber 20 Jahre her. Von daher würde ich mich heute 
wieder Anfänger nennen.
Habe allerdings noch nie Interrupts in C eingebunden. Dafür habe ich 
früher immer Assembler pur gearbeitet.

Sag mal an was Dich beunruhigt. Ich will ja auch dazulernen.
Sorry wenn ich Dir die Nachtruhe raube. ;-)

Grüße
Frank

[J. R. (cia_man)]

Soll ich das Programm nun trotzdem eingeben? Ehr nicht oder? :)

Wollen wir bis APW antwortet den Sinus säubern? Frank?

Gruß

[APW (Gast)]

Ich hab gedacht ihr überlegt euch, was euch gleich um die Ohren fliegt,
und was euch erst später probleme macht.

Frage an Jochen:
Benutzt du TwinPeeks? Außerdem verwendest du ICC mit den Bibliotheken
in der Version 7?

[J. R. (cia_man)]

Ich verwende TwinPeeks & ICC V7 ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

Du kannst ja die Zeit nutzen und schon mal eine Tabelle mit den 360 
Werten für den Sinus generieren ;-)

Damit können wir dann den sin() rauswerfen. Kommt sicherlich der 
Geschwindigkeit zugute.

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo APW

sag an was Dich am meisten stört und ich werde versuchen mich zu 
bessern.
Leider steh ich das den HC12 betrifft etwas auf dem Schlauch, weil ich 
den vorher noch nicht genutzt habe. Unterlagen habe ich nur was ich 
bisher aus dem Netz gesammelt habe.

Da ich das ganze neben meinem normalen Job betreibe, bitte ich um 
Nachsicht bei den diversen Böcken die ich einbaue. Ich hoffe das Jochen 
trotzdem die Ideen die dahinter stecken versteht und umsetzen kann.

Grüße
Frank

[J. R. (cia_man)]

Frank Sander schrieb:
> Hallo APW
>
> sag an was Dich am meisten stört und ich werde versuchen mich zu
> bessern.
> Leider steh ich das den HC12 betrifft etwas auf dem Schlauch, weil ich
> den vorher noch nicht genutzt habe. Unterlagen habe ich nur was ich
> bisher aus dem Netz gesammelt habe.
>
> Da ich das ganze neben meinem normalen Job betreibe, bitte ich um
> Nachsicht bei den diversen Böcken die ich einbaue. Ich hoffe das Jochen
> trotzdem die Ideen die dahinter stecken versteht und umsetzen kann.
>
> Grüße
> Frank

Ich will es versuchen Meister ;)

[J. R. (cia_man)]

Frank Sander schrieb:
> Hallo Jochen,
>
> Du kannst ja die Zeit nutzen und schon mal eine Tabelle mit den 360
> Werten für den Sinus generieren ;-)
>
> Damit können wir dann den sin() rauswerfen. Kommt sicherlich der
> Geschwindigkeit zugute.
>
> Grüße
> Frank

Soll ich die dann mit dem Taschenrechner berechnen? Oder wie würdest du 
da vorgehen?

[Frank S. (franksanderdo)]

Hallo Jochen,

Ich persönlich bin ja eine faule Sau :-D, deswegen würde ich z.B. Excel 
dafür nutzen.
Geht einfacher und schneller ;)
Ausserdem kannst Du von da die Daten einfacher übernehmen.

Wenn Du dann noch sofort die 18 Bit werde generierst.... Das wäre mal ne 
so schlecht ;-)

Grüße
Frank

[J. R. (cia_man)]

Hab Excel genommen ;)

Hab das Programm hier im Inet gefunden und modifiziert. Die Werte in der 
E-Spalte hast du gemeint oder? ;)

Gruß

[Frank S. (franksanderdo)]

Hallo Jochen,

das sieht doch schon net schlecht aus.
Da müssen die 0 udn max werte noch korrigiert werden ;-)

Dann das ganze mit der Schrittweite multipliziert ergibt die Werte 
welche wir für den DAC brauchen.

Grüße
Frank

[APW (Gast)]

Da sind einige Fallen drin, kleine wie große. Und die sind nichtmal
HC12-spezifisch.

Mal der Reihe nach (kein Anspruch auf Vollständigkeit)
1) SinusOffset: Damit rechnest du in der Haupschleife UND in
   der Interruptfunktion (kurz ISR)
a)Was passiert, wenn die ISR Variablen verwendet, die vielleicht
  zum Interruptzeitpunkt gerade in der Haupschleife bearbeitet werden ?
  -> aus ISR rauswerfen oder in der Haupschleife z.B. mit kurzen (!!)
     Interruptsperren absichern
b)Wiedereintrittsfähigkeit (siehe auch Docu zum ICC6/7).
  Hier habt ihr reines Glück, dass Jochen den ICC V7 verwendet,
  bei ICC V6 (und auch bei einigen anderen Entwicklungsumgebungen)
  kann die gleichzeitige Verwendung von Float-Rechnungen
  in einer ISR und in der Haupschleife schiefgehen.
  In der ICC-Doku steht:

ICCV7 for CPU12 generates reentrant code including floating-point 
mathematics (at V6, ICC12 floating-point code is non-reentrant due to 
the use of static variables).

2) Halte die ISR so kurz wie möglich. Das mag jetzt noch funktionieren,
   aber irgendwann, wenn man nicht aufpasst ist auf einmal die Zeit
   für die ISR-Abarbeitung länger als als das ISR-Timerintervall.

  VoltValue = SinusOffset + (sin(GradZaehler * 0.017453293) * SinusAmplitude);
  DACValue = (VoltValue / DACStepWidth); /* typeconversion added */

  Das sind folgende Double-Rechnungen
  1x sin(), 2x Multiplikationen,
  1x Addition, 1x Division, 1x Konvertierung Double->Long

  Das frisst Zeit, und sollte nich in einer ISR stehen.
  Ich würde alles vorberechnen und in der ISR nur noch die
  fertigen Bytes über SPI rausschieben.

3) // Timer Setup
   TSCR = 0x80; // Timer enable
   ...(Timer Register init)
   Ich würde generell empfehlen, den Timer erst zu enablen, wenn die
   anderen Timer-Register initialisiert worden sind. Das kann dazu
   führen, dass das erste Zeitintervall nicht stimmt.

Am WE Veruche ich mal, das Programm (mit einigen Anpassungen) auf meiner
HW (S12Compact) laufen zu lassen. Da ist ein 16Bt DAC drauf, der auch
über SPI angebunden ist.

Wegen dem Sinus: Der DT128 hat doch 8KB Ram.
Da kann man locker eine Sinustabelle im Init-Teil des
Programms vorberechnen, am besten gleich als Ganzzahl !?

[J. R. (cia_man)]

Frank Sander schrieb:
> Hallo Jochen,
>
> das sieht doch schon net schlecht aus.
> Da müssen die 0 udn max werte noch korrigiert werden ;-)
>
> Dann das ganze mit der Schrittweite multipliziert ergibt die Werte
> welche wir für den DAC brauchen.
>
> Grüße
> Frank

Hab nochmal das Diagramm durch ein ungerundetes ergänzt ;)

Aber ich verstehe jetzt nicht was du noch gerechent haben willst?

Kannst du mir mal die Fkt dazu hinschreiben?

[J. R. (cia_man)]

APW schrieb:
> Da sind einige Fallen drin, kleine wie große. Und die sind nichtmal
> HC12-spezifisch.
>
> Mal der Reihe nach (kein Anspruch auf Vollständigkeit)
> 1) SinusOffset: Damit rechnest du in der Haupschleife UND in
>    der Interruptfunktion (kurz ISR)
> a)Was passiert, wenn die ISR Variablen verwendet, die vielleicht
>   zum Interruptzeitpunkt gerade in der Haupschleife bearbeitet werden ?
>   -> aus ISR rauswerfen oder in der Haupschleife z.B. mit kurzen (!!)
>      Interruptsperren absichern
> b)Wiedereintrittsfähigkeit (siehe auch Docu zum ICC6/7).
>   Hier habt ihr reines Glück, dass Jochen den ICC V7 verwendet,
>   bei ICC V6 (und auch bei einigen anderen Entwicklungsumgebungen)
>   kann die gleichzeitige Verwendung von Float-Rechnungen
>   in einer ISR und in der Haupschleife schiefgehen.
>   In der ICC-Doku steht:
>
> ICCV7 for CPU12 generates reentrant code including floating-point
> mathematics (at V6, ICC12 floating-point code is non-reentrant due to
> the use of static variables).
>
> 2) Halte die ISR so kurz wie möglich. Das mag jetzt noch funktionieren,
>    aber irgendwann, wenn man nicht aufpasst ist auf einmal die Zeit
>    für die ISR-Abarbeitung länger als als das ISR-Timerintervall.
>

>   VoltValue = SinusOffset + (sin(GradZaehler * 0.017453293) *
> SinusAmplitude);
>   DACValue = (VoltValue / DACStepWidth); /* typeconversion added */
>

>   Das sind folgende Double-Rechnungen
>   1x sin(), 2x Multiplikationen,
>   1x Addition, 1x Division, 1x Konvertierung Double->Long
>
>   Das frisst Zeit, und sollte nich in einer ISR stehen.
>   Ich würde alles vorberechnen und in der ISR nur noch die
>   fertigen Bytes über SPI rausschieben.
>
> 3) // Timer Setup
>    TSCR = 0x80; // Timer enable
>    ...(Timer Register init)
>    Ich würde generell empfehlen, den Timer erst zu enablen, wenn die
>    anderen Timer-Register initialisiert worden sind. Das kann dazu
>    führen, dass das erste Zeitintervall nicht stimmt.
>
> Am WE Veruche ich mal, das Programm (mit einigen Anpassungen) auf meiner
> HW (S12Compact) laufen zu lassen. Da ist ein 16Bt DAC drauf, der auch
> über SPI angebunden ist.
>
> Wegen dem Sinus: Der DT128 hat doch 8KB Ram.
> Da kann man locker eine Sinustabelle im Init-Teil des
> Programms vorberechnen, am besten gleich als Ganzzahl !?


Zu 3. : Du würdest das also drehen...

// Timer Setup
  TSCR = 0x80; // Timer enable
  TMSK2 = 0x07; // Prescaler = 128 (1 timer tick every 16ìs)
  TCTL2 = 0x00; // TC2 disconnected from Pin
  TIOS |= 0x04; // TC2 is Output Compare
  TMSK1 |= 0x04; // TC2 Interrupt enable

TSCR = .... ganz nach unten?

[Frank S. (franksanderdo)]

Hallo Jochen,

Wert aus Spalte E * (5/0x3ffff) ;-)

Damit sparen wir einen Rechneschritt auf dem Controler ;-)

Grüße
Frank

[APW (Gast)]

J. R. schrieb:
> TSCR = .... ganz nach unten?

Ja, so würde ich das machen.
Ich schau erst heute mittag wieder rein.
Hinter mir stapelt sich die Arbeit.

[Frank S. (franksanderdo)]

Hallo APW,

1a: Mist da habe ich wirklich net bedacht :-(
Ich war davon ausgegangen das ein reiner lesezugriff im Handler mir 
keine Probleme bereitet.

1b: Jep verstanden! So langsam kommt es mir wieder wieso ich früher 
immer gepredigt habe interrupt handler nur in assembler zu schreiben. Da 
wäre ich auf die Idee gar net gekommen floating point zu nutzen ;-)

2: rechst haste, deswegen habe ich die Zeit im Moment auch noch so lang 
gelassen.
Die Idee hinter dem Programm:
Sinus wird durch den timer gebaut. Damit bekomme ich den halbwegs 
stabil.
Mit dieser Version wollte ich die generelle Idee testen. Optimierung 
(sin() raus, floating point raus) sollten dann folgen.

3. Ups, den Teil habe ich einfach übernommen und net gesehen das da die 
Reihefolge vertauscht ist. Sorry, ich gelobe Besserung, habt Geduld mit 
einem alten Mann ;-)

Wäre klasse wenn Du am WE das ganze mal was mehr gerade rücken könntest.
Ich werde mit Jochen bis dahin mal versuchen alles was an floating point 
weg optimiert werden kann weg zu optimieren ;-)

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo Jochen,

wie schauts sollen wir uns an der Tabelle versuchen?
Wir nutzen erst mal das Programm ohne interrupt ;-)

Grüße Frank

[Frank S. (franksanderdo)]

Hallo Jochen,

TIPPFEHLER!!!

E2 / (5/0x3FFFF)

ware es gewesen.

[Frank S. (franksanderdo)]

const long SinusWerte[] = {0, 915, 1830, 2744, 3657, 4569, 5480, 6389, 
7297, 8202, 9104, 10004, 10901... };

so fängt die Tabelle an. Kannst Du das bitte komplettieren.

[J. R. (cia_man)]

Hey!

In Office werde ich gleich reingehen und mein Glück versuchen... mom 
erst einmal die Screenshots vom Programm wie du es mir geschickt 
hast.... ;)

Danke!

PS: Sieht man da den Sinus???

[J. R. (cia_man)]

Frank Sander schrieb:
> Hallo Jochen,
>
> TIPPFEHLER!!!
>
> E2 / (5/0x3FFFF)
>
> ware es gewesen.

Das geht so nicht direkt :( da muss ich erstmal schauen...

[Frank S. (franksanderdo)]

Hallo Jochen,

also ich seh den Sinus da net wirklich.
ein Verdacht: 0,05 sec zwischen den Sinus werten kann was lang sein ;-)

Grüße
Frank

[J. R. (cia_man)]

tataaaaa :) Wird jedoch weiter unten neg... :(

[J. R. (cia_man)]

// Timer Setup
  TMSK2 = 0x07; // Prescaler = 128 (1 timer tick every 16ìs)
  TCTL2 = 0x00; // TC2 disconnected from Pin
  TIOS |= 0x04; // TC2 is Output Compare
  TMSK1 |= 0x04; // TC2 Interrupt enable
  TSCR = 0x80; // Timer enable
  // enable Interrupts
  asm("cli");

so geht mal gar nix ;(

[Frank S. (franksanderdo)]

Hallo Jochen,

das die Werte negativ werden ist genau was wir wollen ;-)
Kannst Du bitte (in unserem Programm ohne Interrupt) die Tabelle 
generieren?

Definition habe ich oben schon stehen ;-)

Ich werde derweil die anderen Änderungen vorbereiten.

Grüße
Frank

[J. R. (cia_man)]

// Timer Setup
  TMSK2 = 0x07; // Prescaler = 128 (1 timer tick every 16ìs)
  TCTL2 = 0x00; // TC2 disconnected from Pin
  TIOS |= 0x04; // TC2 is Output Compare
  TSCR = 0x80; // Timer enable
  TMSK1 |= 0x04; // TC2 Interrupt enable
  // enable Interrupts
  asm("cli");

so geht es ebenfalls net :(

Es geht nur wie Frank es vorgeschlagen hat ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

Ich denke wir warten mit der Interruptroutine noch ein wenig.
Mein Vorschlag funkt ja auch net wirklich ;-)

Wenn wir für APW das ganze vorbereiten das die floating point 
Berechnungen weg sind wäre das Klasse.
Am WE werde ich versuchen mich in den Timer einzulesen.

Grüße Frank

[J. R. (cia_man)]

So Arbeit erledigt.... bitte lass mich sowas nicht wieder machen :)
War übelst nervig^^

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;

const long SinusWerte[] = {0,915,1830,2744,3657,4569,5480,6389,7297,8202,9104,10004,10901,11794,12684,13570,14451,15329,
                           16201,17069,17932,18789,19640,20485,21325,22157,22983,23802,24614,25418,26214,27003,27783,
                           28555,29318,30072,30817,31552,32278,32994,33700,34396,35082,35756,36420,37073,37714,38344,38962,
                           39568,40163,40745,41314,41871,42416,42947,43465,43970,44462,44940,45404,45855,46292,46714,47123,
                           47516,47896,48261,48611,48946,49267,49572,49863,50138,50398,50642,50871,51085,51283,51465,51632,51783,
                           51918,52038,52141,52229,52301,52357,52397,52421,52429,52421,52397,52357,52301,52229,52141,52038,
                           51918,51783,51632,51465,51283,51085,50871,50642,50398,50138,49863,49572,49267,48946,48611,48261,
                           47896,47516,47123,46714,46292,45855,45404,44940,44462,43970,43465,42947,42416,41871,41314,40745,
                           40163,39568,38962,38344,37714,37073,36420,35756,35082,34396,33700,32994,32278,31552,30817,30072,
                           29318,28555,27783,27003,26214,25418,24614,23802,22983,22157,21325,20485,19640,18789,17932,17069,
                           16201,15329,14451,13570,12684,11794,10901,10004,9104,8202,7297,6389,5480,4569,3657,2744,1830,915,0,
                           -915,-1830,-2744,-3657,-4569,-5480,-6389,-7297,-8202,-9104,-10004,-10901,-11794,-12684,-13570,-14451,
                           -15329,-16201,-17069,-17932,-18789,-19640,-20485,-21325,-22157,-22983,-23802,-24614,-25418,-26214,
                           -27003,-27783,-28555,-29318,-30072,-30817,-31552,-32278,-32994,-33700,-34396,-35082,-35756,-36420,
                           -37073,-37714,-38344,-38962,-39568,-40163,-40745,-41314,-41871,-42416,-42947,-43465,-43970,-44462,
                           -44940,-45404,-45855,-46292,-46714,-47123,-47516,-47896,-48261,-48611,-48946,-49267,-49572,-49863,
                           -50138,-50398,-50642,-50871,-51085,-51283,-51465,-51632,-51783,-51918,-52038,-52141,-52229,-52301,
                           -52357,-52397,-52421,-52429,-52421,-52397,-52357,-52301,-52229,-52141,-52038,-51918,-51783,-51632, 
               -51465,-51283,-51085,-50871,-50642,-50398,-50138,-49863,-49572,-49267,-48946,-48611,-48261,-47896,
                           -47516,-47123,-46714,-46292,-45855,-45404,-44940,-44462,-43970,-43465,-42947,-42416,-41871,-41314,
                           -40745,-40163,-39568,-38962,-38344,-37714,-37073,-36420,-35756,-35082,-34396,-33700,-32994,-32278,
                           -31552,-30817,-30072,-29318,-28555,-27783,-27003,-26214,-25418,-24614,-23802,-22983,-22157,-21325,
                           -20485,-19640,-18789,-17932,-17069,-16201,-15329,-14451,-13570,-12684,-11794,-10901,-10004,-9104,-8202,
                           -7297,-6389,-5480,-4569,-3657,-2744,-1830,-915,-0};



void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = (VoltValue / DACStepWidth); /* typeconversion added */

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= HalfRange) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 1;
  double GradZaehler = 1;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    VValueTo18BitDAC(myVValue);
    myVValue = 2.5 + sin(GradZaehler * 0.017453293);
     GradZaehler += 1;
    if (GradZaehler == 360)
    {
       GradZaehler = 0;
    }
  }


  
  return 0;    
}

Das frisst er soweit ohne Fehler!

Danke!

[Frank S. (franksanderdo)]

Hallo Jochen,

ich hab da mal was vorbereitet "Jean Pütz" ;-)
Da fehlt jetzt noch die SinusTabelle  von Dir und ein Testlauf.

Grüße
Frank

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>

const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;

void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(unsigned long VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = VoltValue;
  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= 0x1ffff) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 0;

  int GradZaehler = 0;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    myVValue = (2.5 / DACStepWidth) + SinusTabelle[GradZaehler++];    
    VValueTo18BitDAC(myVValue);
    if (GradZaehler > 360)
      GradZaehler = 0;
  }
  return 0;    
}

[Frank S. (franksanderdo)]

Sorry Jochen,

muss leider manchmal sein ;-)
Deswegen hab ich das ja net selber gemacht.

Grüße Frank

[Frank S. (franksanderdo)]

Ach ja, mit welchem SPI Takt rennen wir denn eigentlich gerade?

[J. R. (cia_man)]

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;

const long SinusWerte[] = {0,915,1830,2744,3657,4569,5480,6389,7297,8202,9104,10004,10901,11794,12684,13570,14451,15329,
                           16201,17069,17932,18789,19640,20485,21325,22157,22983,23802,24614,25418,26214,27003,27783,
                           28555,29318,30072,30817,31552,32278,32994,33700,34396,35082,35756,36420,37073,37714,38344,38962,
                           39568,40163,40745,41314,41871,42416,42947,43465,43970,44462,44940,45404,45855,46292,46714,47123,
                           47516,47896,48261,48611,48946,49267,49572,49863,50138,50398,50642,50871,51085,51283,51465,51632,51783,
                           51918,52038,52141,52229,52301,52357,52397,52421,52429,52421,52397,52357,52301,52229,52141,52038,
                           51918,51783,51632,51465,51283,51085,50871,50642,50398,50138,49863,49572,49267,48946,48611,48261,
                           47896,47516,47123,46714,46292,45855,45404,44940,44462,43970,43465,42947,42416,41871,41314,40745,
                           40163,39568,38962,38344,37714,37073,36420,35756,35082,34396,33700,32994,32278,31552,30817,30072,
                           29318,28555,27783,27003,26214,25418,24614,23802,22983,22157,21325,20485,19640,18789,17932,17069,
                           16201,15329,14451,13570,12684,11794,10901,10004,9104,8202,7297,6389,5480,4569,3657,2744,1830,915,0,
                           -915,-1830,-2744,-3657,-4569,-5480,-6389,-7297,-8202,-9104,-10004,-10901,-11794,-12684,-13570,-14451,
                           -15329,-16201,-17069,-17932,-18789,-19640,-20485,-21325,-22157,-22983,-23802,-24614,-25418,-26214,
                           -27003,-27783,-28555,-29318,-30072,-30817,-31552,-32278,-32994,-33700,-34396,-35082,-35756,-36420,
                           -37073,-37714,-38344,-38962,-39568,-40163,-40745,-41314,-41871,-42416,-42947,-43465,-43970,-44462,
                           -44940,-45404,-45855,-46292,-46714,-47123,-47516,-47896,-48261,-48611,-48946,-49267,-49572,-49863,
                           -50138,-50398,-50642,-50871,-51085,-51283,-51465,-51632,-51783,-51918,-52038,-52141,-52229,-52301,
                           -52357,-52397,-52421,-52429,-52421,-52397,-52357,-52301,-52229,-52141,-52038,-51918,-51783,-51632, 
               -51465,-51283,-51085,-50871,-50642,-50398,-50138,-49863,-49572,-49267,-48946,-48611,-48261,-47896,
                           -47516,-47123,-46714,-46292,-45855,-45404,-44940,-44462,-43970,-43465,-42947,-42416,-41871,-41314,
                           -40745,-40163,-39568,-38962,-38344,-37714,-37073,-36420,-35756,-35082,-34396,-33700,-32994,-32278,
                           -31552,-30817,-30072,-29318,-28555,-27783,-27003,-26214,-25418,-24614,-23802,-22983,-22157,-21325,
                           -20485,-19640,-18789,-17932,-17069,-16201,-15329,-14451,-13570,-12684,-11794,-10901,-10004,-9104,-8202,
                           -7297,-6389,-5480,-4569,-3657,-2744,-1830,-915,-0};



void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = VoltValue;

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= 0x1ffff) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 0;
  int GradZaehler = 0;
  double myVValue = 0;  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    
    myVValue = (2.5 / DACStepWidth) + SinusWerte[GradZaehler++];    
    VValueTo18BitDAC(myVValue);
    if (GradZaehler > 360)
    {
       GradZaehler = 0;
    }
  }


  
  return 0;    
}

Läuft net wie es soll??? Habe mein Programm an den entsprechenden 
Stellen ausgebessert... keine Fehler gemeldet... kannst du nochmal 
drüber schauen, dass auch alles stimmt?

Oben Screen vom Oszi....

[J. R. (cia_man)]

SP0BR = 0x03; /* 0,5 MHz SPI clock */ :)

mom im Anhang mal die Tabelle: zum Nachschauen... ;)

[Frank S. (franksanderdo)]

Hallo Jochen,

kannst Du bitte mal den Printf code in das Programm stricken und 
folgenden sprintf:
Tut mich mal interessieren wo ich mich da verrechne.

...
char mycharacterarray[128]; /* This is a 128 characters long array */
...

  while (i>0) /* Endles Data sending for testing only */
  { 
    
    myVValue = (2.5 / DACStepWidth) + SinusWerte[GradZaehler++];    

    sprintf(mycharacterarray,"myValue: %f  GradZaehler %i",myValue,GradZaehler);
    sci0_puts(mycharacterarray);   
    
    VValueTo18BitDAC(myVValue);
    if (GradZaehler > 360)
    {
       GradZaehler = 0;
    }
  }

[J. R. (cia_man)]

Schlechte Nachrichten:

Das Programm gibt gar nichts aus!

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>


#define RDRF 0x20   // Receive Data Register Full Bit
#define TDRE 0x80   // Transmit Data Register Empty Bit


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;

const long SinusWerte[] = {0,915,1830,2744,3657,4569,5480,6389,7297,8202,9104,10004,10901,11794,12684,13570,14451,15329,
                           16201,17069,17932,18789,19640,20485,21325,22157,22983,23802,24614,25418,26214,27003,27783,
                           28555,29318,30072,30817,31552,32278,32994,33700,34396,35082,35756,36420,37073,37714,38344,38962,
                           39568,40163,40745,41314,41871,42416,42947,43465,43970,44462,44940,45404,45855,46292,46714,47123,
                           47516,47896,48261,48611,48946,49267,49572,49863,50138,50398,50642,50871,51085,51283,51465,51632,51783,
                           51918,52038,52141,52229,52301,52357,52397,52421,52429,52421,52397,52357,52301,52229,52141,52038,
                           51918,51783,51632,51465,51283,51085,50871,50642,50398,50138,49863,49572,49267,48946,48611,48261,
                           47896,47516,47123,46714,46292,45855,45404,44940,44462,43970,43465,42947,42416,41871,41314,40745,
                           40163,39568,38962,38344,37714,37073,36420,35756,35082,34396,33700,32994,32278,31552,30817,30072,
                           29318,28555,27783,27003,26214,25418,24614,23802,22983,22157,21325,20485,19640,18789,17932,17069,
                           16201,15329,14451,13570,12684,11794,10901,10004,9104,8202,7297,6389,5480,4569,3657,2744,1830,915,0,
                           -915,-1830,-2744,-3657,-4569,-5480,-6389,-7297,-8202,-9104,-10004,-10901,-11794,-12684,-13570,-14451,
                           -15329,-16201,-17069,-17932,-18789,-19640,-20485,-21325,-22157,-22983,-23802,-24614,-25418,-26214,
                           -27003,-27783,-28555,-29318,-30072,-30817,-31552,-32278,-32994,-33700,-34396,-35082,-35756,-36420,
                           -37073,-37714,-38344,-38962,-39568,-40163,-40745,-41314,-41871,-42416,-42947,-43465,-43970,-44462,
                           -44940,-45404,-45855,-46292,-46714,-47123,-47516,-47896,-48261,-48611,-48946,-49267,-49572,-49863,
                           -50138,-50398,-50642,-50871,-51085,-51283,-51465,-51632,-51783,-51918,-52038,-52141,-52229,-52301,
                           -52357,-52397,-52421,-52429,-52421,-52397,-52357,-52301,-52229,-52141,-52038,-51918,-51783,-51632, 
               -51465,-51283,-51085,-50871,-50642,-50398,-50138,-49863,-49572,-49267,-48946,-48611,-48261,-47896,
                           -47516,-47123,-46714,-46292,-45855,-45404,-44940,-44462,-43970,-43465,-42947,-42416,-41871,-41314,
                           -40745,-40163,-39568,-38962,-38344,-37714,-37073,-36420,-35756,-35082,-34396,-33700,-32994,-32278,
                           -31552,-30817,-30072,-29318,-28555,-27783,-27003,-26214,-25418,-24614,-23802,-22983,-22157,-21325,
                           -20485,-19640,-18789,-17932,-17069,-16201,-15329,-14451,-13570,-12684,-11794,-10901,-10004,-9104,-8202,
                           -7297,-6389,-5480,-4569,-3657,-2744,-1830,-915,-0};
               
void sci0_init(void)
{
    SC0BDH=0;  // 19200 BR=26 (MCLK=8MHz)
    SC0BDL=26; // MCLK/(16*BaudRate)
    SC0CR1=0;
    SC0CR2=0x0C; //TE+RE enable
}

void sci0_putc(char data)
{
   while ((SC0SR1 & TDRE) == 0){};
   SC0DRL = data;
}

void sci0_puts(char* data)
{
   while (*data)
       sci0_putc(*data++);
}

               


void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = VoltValue;

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= 0x1ffff) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 0;
  int GradZaehler = 0;
  double myVValue = 0;  
  
  char mycharacterarray[128]; /* This is a 128 characters long array */
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    
    myVValue = (2.5 / DACStepWidth) + SinusWerte[GradZaehler++];    
   
    sprintf(mycharacterarray,"myVValue: %f  GradZaehler %i",myVValue,GradZaehler);
    sci0_puts(mycharacterarray);   
    
    VValueTo18BitDAC(myVValue);
    if (GradZaehler > 360)
    {
       GradZaehler = 0;
    }
  }


  
  return 0;    
}

:(

[Frank S. (franksanderdo)]

lol stimmt!!!

schau mal auf den Wert i und unter welche Bedingung die while Schleife 
rennt ;)
Korrigier das bitte mal, da habe ich irgendwas verdreht :-(

[J. R. (cia_man)]

Verbessert! ;)

00>g 4000
Executing 4000...myVValue: 131071.5  GradZaehler 1myVValue: 131986.5 
GradZaehler 2myVValue: 132901.5  GradZaehler 3myVValue: 13
3815.5  GradZaehler 4myVValue: 134728.5  GradZaehler 5myVValue: 135640.5 
GradZaehler 6myVValue: 136551.5  GradZaehler 7myVValue
: 137460.5  GradZaehler 8myVValue: 138368.5  GradZaehler 9myVValue: 
139273.5  GradZaehler 10myVValue: 140175.5  GradZaehler 11my
VValue: 141075.5  GradZaehler 12myVValue: 141972.5  GradZaehler 
13myVValue: 142865.5  GradZaehler 14myVValue: 143755.5  GradZaeh
ler 15myVValue: 144641.5  GradZaehler 16myVValue: 145522.5  GradZaehler 
17myVValue: 146400.5  GradZaehler 18myVValue: 147272.5
GradZaehler 19myVValue: 148140.5  GradZaehler 20myVValue: 149003.5 
GradZaehler 21myVValue: 149860.5  GradZaehler 22myVValue: 15
0711.5  GradZaehler 23myVValue: 151556.5  GradZaehler 24myVValue: 
152396.5  GradZaehler 25myVValue: 153228.5  GradZaehler 26myVV
alue: 154054.5  GradZaehler 27myVValue: 154873.5  GradZaehler 
28myVValue: 155685.5  GradZaehler 29myVValue: 156489.5  GradZaehle
r 30myVValue: 157285.5  GradZaehler 31myVValue: 158074.5  GradZaehler 
32myVValue: 158854.5  GradZaehler 33myVValue: 159626.5  Gr
adZaehler 34myVValue: 160389.5  GradZaehler 35myVValue: 161143.5 
GradZaehler 36myVValue: 161888.5  GradZaehler 37myVValue: 1626
23.5  GradZaehler 38myVValue: 163349.5  GradZaehler 39myVValue: 164065.5 
GradZaehler 40myVValue: 164771.5  GradZaehler 41myVVal
ue: 165467.5  GradZaehler 42myVValue: 166153.5  GradZaehler 43myVValue: 
166827.5  GradZaehler 44myVValue: 167491.5  GradZaehler
45myVValue: 168144.5  GradZaehler 46myVValue: 168785.5  GradZaehler 
47myVValue: 169415.5  GradZaehler 48myVValue: 170033.5  Grad
Zaehler 49myVValue: 170639.5  GradZaehler 50myVValue: 171234.5 
GradZaehler 51myVValue: 171816.5  GradZaehler 52myVValue: 172385
.5  GradZaehler 53myVValue: 172942.5  GradZaehler 54myVValue: 173487.5 
GradZaehler 55myVValue: 174018.5  GradZaehler 56myVValue
: 174536.5  GradZaehler 57myVValue: 175041.5  GradZaehler 58myVValue: 
175533.5  GradZaehler 59myVValue: 176011.5  GradZaehler 60
myVValue: 176475.5  GradZaehler 61myVValue: 176926.5  GradZaehler 
62myVValue: 177363.5  GradZaehler 63myVValue: 177785.5  GradZa
ehler 64myVValue: 178194.5  GradZaehler 65myVValue: 178587.5 
GradZaehler 66myVValue: 178967.5  GradZaehler 67myVValue: 179332.5
  GradZaehler 68myVValue: 179682.5  GradZaehler 69myVValue: 180017.5 
GradZaehler 70myVValue: 180338.5  GradZaehler 71myVValue:
180643.5  GradZaehler 72myVValue: 180934.5  GradZaehler 73myVValue: 
181209.5  GradZaehler 74myVValue: 181469.5  GradZaehler 75my
VValue: 181713.5  GradZaehler 76myVValue: 181942.5  GradZaehler 
77myVValue: 182156.5  GradZaehler 78myVValue: 182354.5  GradZaeh
ler 79myVValue: 182536.5  GradZaehler 80myVValue: 182703.5  GradZaehler 
81myVValue: 182854.5  GradZaehler 82myVValue: 182989.5
GradZaehler 83myVValue: 183109.5  GradZaehler 84myVValue: 183212.5 
GradZaehler 85myVValue: 183300.5  GradZaehler 86myVValue: 18
3372.5  GradZaehler 87myVValue: 183428.5  GradZaehler 88myVValue: 
183468.5  GradZaehler 89myVValue: 183492.5  GradZaehler 90myVV
alue: 183500.5  GradZaehler 91myVValue: 183492.5  GradZaehler 
92myVValue: 183468.5  GradZaehler 93myVValue: 183428.5  GradZaehle
r 94myVValue: 183372.5  GradZaehler 95myVValue: 183300.5  GradZaehler 
96myVValue: 183212.5  GradZaehler 97myVValue: 183109.5  Gr
adZaehler 98myVValue: 182989.5  GradZaehler 99myVValue: 182854.5 
GradZaehler 100myVValue: 182703.5  GradZaehler 101myVValue: 18
2536.5  GradZaehler 102myVValue: 182354.5  GradZaehler 103myVValue: 
182156.5  GradZaehler 104myVValue: 181942.5  GradZaehler 105
myVValue: 181713.5  GradZaehler 106myVValue: 181469.5  GradZaehler 
107myVValue: 181209.5  GradZaehler 108myVValue: 180934.5  Gra
dZaehler 109myVValue: 180643.5  GradZaehler 110myVValue: 180338.5 
GradZaehler 111myVValue: 180017.5  GradZaehler 112myVValue: 1
79682.5  GradZaehler 113myVValue: 179332.5  GradZaehler 114myVValue: 
178967.5  GradZaehler 115myVValue: 178587.5  GradZaehler 11
6myVValue: 178194.5  GradZaehler 117myVValue: 177785.5  GradZaehler 
118myVValue: 177363.5  GradZaehler 119myVValue: 176926.5  Gr
adZaehler 120myVValue: 176475.5  GradZaehler 121myVValue: 176011.5 
GradZaehler 122myVValue: 175533.5  GradZaehler 123myVValue:
175041.5  GradZaehler 124myVValue: 174536.5  GradZaehler 125myVValue: 
174018.5  GradZaehler 126myVValue: 173487.5  GradZaehler 1
27myVValue: 172942.5  GradZaehler 128myVValue: 172385.5  GradZaehler 
129myVValue: 171816.5  GradZaehler 130myVValue: 171234.5  G
radZaehler 131myVValue: 170639.5  GradZaehler 132myVValue: 170033.5 
GradZaehler 133myVValue: 169415.5  GradZaehler 134myVValue:
 168785.5  GradZaehler 135myVValue: 168144.5  GradZaehler 136myVValue: 
167491.5  GradZaehler 137myVValue: 166827.5  GradZaehler
138myVValue: 166153.5  GradZaehler 139myVValue: 165467.5  GradZaehler 
140myVValue: 164771.5  GradZaehler 141myVValue: 164065.5
GradZaehler 142myVValue: 163349.5  GradZaehler 143myVValue: 162623.5 
GradZaehler 144myVValue: 161888.5  GradZaehler 145myVValue
: 161143.5  GradZaehler 146myVValue: 160389.5  GradZaehler 147myVValue: 
159626.5  GradZaehler 148myVValue: 158854.5  GradZaehler
 149myVValue: 158074.5  GradZaehler 150myVValue: 157285.5  GradZaehler 
151myVValue: 156489.5  GradZaehler 152myVValue: 155685.5
 GradZaehler 153myVValue: 154873.5  GradZaehler 154myVValue: 154054.5 
GradZaehler 155myVValue: 153228.5  GradZaehler 156myVValu
e: 152396.5  GradZaehler 157myVValue: 151556.5  GradZaehler 158myVValue: 
150711.5  GradZaehler 159myVValue: 149860.5  GradZaehle
r 160myVValue: 149003.5  GradZaehler 161myVValue: 148140.5  GradZaehler 
162myVValue: 147272.5  GradZaehler 163myVValue: 146400.5
  GradZaehler 164myVValue: 145522.5  GradZaehler 165myVValue: 144641.5 
GradZaehler 166myVValue: 143755.5  GradZaehler 167myVVal
ue: 142865.5  GradZaehler 168myVValue: 141972.5  GradZaehler 
169myVValue: 141075.5  GradZaehler 170myVValue: 140175.5  GradZaehl
er 171myVValue: 139273.5  GradZaehler 172myVValue: 138368.5  GradZaehler 
173myVValue: 137460.5  GradZaehler 174myVValue: 136551.
5  GradZaehler 175myVValue: 135640.5  GradZaehler 176myVValue: 134728.5 
GradZaehler 177myVValue: 133815.5  GradZaehler 178myVVa
lue: 132901.5  GradZaehler 179myVValue: 131986.5  GradZaehler 
180myVValue: 131071.5  GradZaehler 181myVValue: 130156.5  GradZaeh
ler 182myVValue: 129241.5  GradZaehler 183myVValue: 128327.5 
GradZaehler 184myVValue: 127414.5  GradZaehler 185myVValue: 126502
.5  GradZaehler 186myVValue: 125591.5  GradZaehler 187myVValue: 124682.5 
GradZaehler 188myVValue: 123774.5  GradZaehler 189myVV
alue: 122869.5  GradZaehler 190myVValue: 121967.5  GradZaehler 
191myVValue: 121067.5  GradZaehler 192myVValue: 120170.5  GradZae
hler 193myVValue: 119277.5  GradZaehler 194myVValue: 118387.5 
GradZaehler 195myVValue: 117501.5  GradZaehler 196myVValue: 11662
0.5  GradZaehler 197myVValue: 115742.5  GradZaehler 198myVValue: 
114870.5  GradZaehler 199myVValue: 114002.5  GradZaehler 200myV
Value: 113139.5  GradZaehler 201myVValue: 112282.5  GradZaehler 
202myVValue: 111431.5  GradZaehler 203myVValue: 110586.5  GradZa
ehler 204myVValue: 109746.5  GradZaehler 205myVValue: 108914.5 
GradZaehler 206myVValue: 108088.5  GradZaehler 207myVValue: 1072
69.5  GradZaehler 208myVValue: 106457.5  GradZaehler 209myVValue: 
105653.5  GradZaehler 210myVValue: 104857.5  GradZaehler 211my
VValue: 104068.5  GradZaehler 212myVValue: 103288.5  GradZaehler 
213myVValue: 102516.5  GradZaehler 214myVValue: 101753.5  GradZ
aehler 215myVValue: 100999.5  GradZaehler 216myVValue: 100254.5 
GradZaehler 217myVValue: 99519.5  GradZaehler 218myVValue: 9879
3.5  GradZaehler 219myVValue: 98077.5  GradZaehler 220myVValue: 97371.5 
GradZaehler 221myVValue: 96675.5  GradZaehler 222myVVal
ue: 95989.5  GradZaehler 223myVValue: 95315.5  GradZaehler 224myVValue: 
94651.5  GradZaehler 225myVValue: 93998.5  GradZaehler 2
26myVValue: 93357.5  GradZaehler 227myVValue: 92727.5  GradZaehler 
228myVValue: 92109.5  GradZaehler 229myVValue: 91503.5  GradZ
aehler 230myVValue: 90908.5  GradZaehler 231myVValue: 90326.5 
GradZaehler 232myVValue: 89757.5  GradZaehler 233myVValue: 89200.
5  GradZaehler 234myVValue: 88655.5  GradZaehler 235myVValue: 88124.5 
GradZaehler 236myVValue: 87606.5  GradZaehler 237myVValue
: 87101.5  GradZaehler 238myVValue: 86609.5  GradZaehler 239myVValue: 
86131.5  GradZaehler 240myVValue: 85667.5  GradZaehler 241
myVValue: 85216.5  GradZaehler 242myVValue: 84779.5  GradZaehler 
243myVValue: 84357.5  GradZaehler 244myVValue: 83948.5  GradZae
hler 245myVValue: 83555.5  GradZaehler 246myVValue: 83175.5  GradZaehler 
247myVValue: 82810.5  GradZaehler 248myVValue: 82460.5
 GradZaehler 249myVValue: 82125.5  GradZaehler 250myVValue: 81804.5 
GradZaehler 251myVValue: 81499.5  GradZaehler 2ÿ

So und oben auch der passende Screenshot ;) Juhuuu!!! Aber die Peaks :(

Oszi hat Bild leicht verschoben beim Hardcopy ;)

[Frank S. (franksanderdo)]

ok kannst die textausgabe wieder raus nehmen ;-)

[Frank S. (franksanderdo)]

Dann werden wir uns mal den Peaks widmen.

Kannst Du mal mit dem Oscar spielen das wir uns so einen Peak geaneur 
anschauen können?
Also den Peak vergößern

[J. R. (cia_man)]

#include <stdio.h>
#include <mc912d128.h>
#include <math.h>


const double HalfRange = 2.5;
const double DACStepWidth = 5.0 / 0x03ffff;

const long SinusWerte[] = {0,915,1830,2744,3657,4569,5480,6389,7297,8202,9104,10004,10901,11794,12684,13570,14451,15329,
                           16201,17069,17932,18789,19640,20485,21325,22157,22983,23802,24614,25418,26214,27003,27783,
                           28555,29318,30072,30817,31552,32278,32994,33700,34396,35082,35756,36420,37073,37714,38344,38962,
                           39568,40163,40745,41314,41871,42416,42947,43465,43970,44462,44940,45404,45855,46292,46714,47123,
                           47516,47896,48261,48611,48946,49267,49572,49863,50138,50398,50642,50871,51085,51283,51465,51632,51783,
                           51918,52038,52141,52229,52301,52357,52397,52421,52429,52421,52397,52357,52301,52229,52141,52038,
                           51918,51783,51632,51465,51283,51085,50871,50642,50398,50138,49863,49572,49267,48946,48611,48261,
                           47896,47516,47123,46714,46292,45855,45404,44940,44462,43970,43465,42947,42416,41871,41314,40745,
                           40163,39568,38962,38344,37714,37073,36420,35756,35082,34396,33700,32994,32278,31552,30817,30072,
                           29318,28555,27783,27003,26214,25418,24614,23802,22983,22157,21325,20485,19640,18789,17932,17069,
                           16201,15329,14451,13570,12684,11794,10901,10004,9104,8202,7297,6389,5480,4569,3657,2744,1830,915,0,
                           -915,-1830,-2744,-3657,-4569,-5480,-6389,-7297,-8202,-9104,-10004,-10901,-11794,-12684,-13570,-14451,
                           -15329,-16201,-17069,-17932,-18789,-19640,-20485,-21325,-22157,-22983,-23802,-24614,-25418,-26214,
                           -27003,-27783,-28555,-29318,-30072,-30817,-31552,-32278,-32994,-33700,-34396,-35082,-35756,-36420,
                           -37073,-37714,-38344,-38962,-39568,-40163,-40745,-41314,-41871,-42416,-42947,-43465,-43970,-44462,
                           -44940,-45404,-45855,-46292,-46714,-47123,-47516,-47896,-48261,-48611,-48946,-49267,-49572,-49863,
                           -50138,-50398,-50642,-50871,-51085,-51283,-51465,-51632,-51783,-51918,-52038,-52141,-52229,-52301,
                           -52357,-52397,-52421,-52429,-52421,-52397,-52357,-52301,-52229,-52141,-52038,-51918,-51783,-51632, 
               -51465,-51283,-51085,-50871,-50642,-50398,-50138,-49863,-49572,-49267,-48946,-48611,-48261,-47896,
                           -47516,-47123,-46714,-46292,-45855,-45404,-44940,-44462,-43970,-43465,-42947,-42416,-41871,-41314,
                           -40745,-40163,-39568,-38962,-38344,-37714,-37073,-36420,-35756,-35082,-34396,-33700,-32994,-32278,
                           -31552,-30817,-30072,-29318,-28555,-27783,-27003,-26214,-25418,-24614,-23802,-22983,-22157,-21325,
                           -20485,-19640,-18789,-17932,-17069,-16201,-15329,-14451,-13570,-12684,-11794,-10901,-10004,-9104,-8202,
                           -7297,-6389,-5480,-4569,-3657,-2744,-1830,-915,-0};
               
         


void mySPITrans(unsigned char myValue) /*Transmit Byte via SPI*/
{
  unsigned char mydelete; /* was zum Datenauslesen und verwerfen */
  
  SP0DR = myValue; /* Data goes to SPI data register*/
  while ((SP0SR & 0x80) == 0); /* wait for transfer to finish */ 
  mydelete = SP0DR; /* Daten auslesen und verwerfen */
}

void VValueTo18BitDAC(double VoltValue)
{
  unsigned long DACValue = 0;
  unsigned char mylowbyte = 0x00;
  unsigned char mymidbyte = 0x00;
  unsigned char myhighbyte = 0x00;

  DACValue = VoltValue;

  DACValue = DACValue << 2;  /* shift 2 needed Position in 24Bit Value */

  mylowbyte = DACValue & 0xff; /* Low Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  mymidbyte = DACValue & 0xff; /* Mid Byte preparation */
  DACValue = DACValue >> 8; /* shift the next Byte into position */
  myhighbyte = DACValue & 0xff; /* High Byte preparation */

  myhighbyte &= 0x07; /* make sure left 5 bits are empty */

  if (VoltValue <= 0x1ffff) /* Check for Halfrange */
  {
    myhighbyte |= 0x08;   /* to be able to set the MSB */
  }

  myhighbyte |= 0x10;  /* The Data Register Address Bit */

  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(myhighbyte); /* Analog Value Byte1 MSB first        */
  mySPITrans(mymidbyte); /* Analog Value Byte2 24 bit total    */
  mySPITrans(mylowbyte); /* Analog Value Byte3 LSB last         */
  PORTS |= 0x80;    /* /SS output high */
}

main()
{ 
  int i = 1;
  int GradZaehler = 0;
  double myVValue = 0;  
  
  
  /* Init for SPI Interface */
  PORTS |= 0x80;
  DDRS = DDRS | 0xF0; /* outputs */
  SP0CR1 = 0x58; /* 0b01011000 */
  SP0CR2 = 0; /* Normal mode */
  SP0BR = 0x03; /* 0,5 MHz SPI clock */

  /* Init to the DAC */
  PORTS &= ~0x80;  /* /SS output low */
  mySPITrans(0x20); /* Init DAC Control Register Byte1 MSB first      */
  mySPITrans(0x00); /* Init DAC Control Register Byte2 24 bit total  */
  mySPITrans(0x02); /* Init DAC Control Register Byte3 LSB last       */
  PORTS |= 0x80;    /* /SS output high */

  while (i>0) /* Endles Data sending for testing only */
  { 
    
    myVValue = (2.5 / DACStepWidth) + SinusWerte[GradZaehler++];    
    
    VValueTo18BitDAC(myVValue);
    if (GradZaehler > 360)
    {
       GradZaehler = 0;
    }
  }


  
  return 0;    
}

Version ohne Printf!! ;) Screenshots oben!

[Frank S. (franksanderdo)]

Stell mal nur eine Halbwelle auf dem Oscar dar

Ich will sicher stellen das es wirklich der 0 Durchlaf ist. Sieht mir 
aber ganz feste danach aus.

da tun wir mal folgende Zeile ändern:

  if (VoltValue <= 0x1ffff) /* Check for Halfrange */

wird

  if (VoltValue < 0x1ffff) /* Check for Halfrange */

[J. R. (cia_man)]

Peak in nah! Ich muss nun leider für heute Schluss machen! Hab noch 
etwas anderes zu erledigen das wichtiger ist ;) Arbeit :(

Moin geht's  von meiner Seite hier weiter!

Gruß & Danke

[Frank S. (franksanderdo)]

Ach ja ich wüsste noch gerne wie schnell wir jetzt können.
Ergo mach mal den SPI schneller ;)

[Frank S. (franksanderdo)]

Ok dann schaff mal ne Runde.

Ich werde heute Nacht noch mal ein wenig stricken ;-)

Grüße
Frank

[Frank S. (franksanderdo)]

Hallo APW

kannst Du mir bitte deine e-mail via PN schicken?
Ich hatte gestern ein längeres Gespräch mit Jochen und wir würden Dich 
gerne auch informieren, aber nicht unbedingt hier ;-)

Dank Dir

Grüße
Frank