Für User, die in C einteigen möchten, hat jetzt RN-User Corone das gleiche Programm auch für C umgesetzt und hier bereitgestellt. Einige zusätzliche Grundfunktionen in der Header-Datei erleichtern die Umsetzung.
Inhaltsverzeichnis
Die C Header-Datei
/* ################################################### RNControl-Test.c Aufgabe: Dieses Testprogramm testet gleich mehrere Eigenschaften auf dem Board Den verschiedenen Tasten sind bestimmte Funktionen zugeordnet Taste 1: Zeigt Batteriespannung über RS232 an Taste 2: Angeschlossene Motoren beschleunigen und abbremsen Taste 3: Einige Male Lauflicht über LED´s anzeigen. Am I2C-Bus darf in diesem Moment nichts angeschlossen sein Taste 4: Zeigt analoge Messwerte an allen Port A PIN´s über RS232 an Taste 5: Zeigt digitalen I/O Zustand von PA0 bis PA5 an Sehr gut kann man aus dem Demo auch entnehmen wie Sound ausgegeben wird, wie Tasten abgefragt werden und wie Subroutinen und Funktionen angelegt werden Autor: Georg Richter ####################################################### */ #include <stdlib.h> #include <avr/io.h> #include "rncontrol.h" /*### Variablen ###*/ const float referenzspannung = 0.0048828125; //Referenzwert zur Multiplikation mit den Werten der Analogports (0...1023), um auf die Voltzahl zu kommen (0...5). Ergibt sich aus 5/1024. uint16_t analog; //Variable für jeweils an einem Analogport gemessenen Wert, um nicht für eine Ausgabe mehrere Messungen durchführen zu müssen. char wort[5]; //Zahlen (Integer und Float) müssen vor der Ausgabe per RS232 in ASCII-Zeichen konvertiert werden, für die ein Speicher benötigt wird. /*### Batteriespannung ###*/ void Batteriespannung(void) { sendUSART("Analog6 = "); analog = adcwert(6); utoa(analog, wort, 10); sendUSART(wort); sendUSART(" = "); dtostrf(analog*referenzspannung, 11, 8, wort); sendUSART(wort); sendUSART(" Volt\r\n"); dtostrf(adcwert(6)*referenzspannung*5.66804, 11, 8, wort); sendUSART("Batteriespannung = "); sendUSART(wort); sendUSART(" Volt\r\n\n\n\n"); waitms(300); } /*### Motortest ###*/ void Motortest(void) { uint8_t i;//"initial declaration error" fix Mlinksvor(); Mrechtsvor(); setPWMlinks(0); setPWMrechts(0); waitms(40); //for(uint8_t i=0; i<255; i=i+5) for(i=0; i<255; i=i+5)//"initial declaration error" fix { setPWMlinks(i); setPWMrechts(i); waitms(40); } setPWMlinks(255); setPWMrechts(255); waitms(40); for(i=255; i>0; i=i-5) { setPWMlinks(i); setPWMrechts(i); waitms(40); } setPWMlinks(0); setPWMrechts(0); Mlinksstop(); Mrechtsstop(); waitms(300); } /*### LED-Lauflicht ###*/ void Lauflicht(void) { uint8_t i;//"initial declaration error" fix //for(uint8_t i=0; i<10; i++) for(i=0; i<10; i++)//"initial declaration error" fix { setportcoff(0); waitms(150); setportcon(0); setportcoff(1); waitms(150); setportcon(1); setportcoff(2); waitms(150); setportcon(2); setportcoff(3); waitms(150); setportcon(3); setportcoff(4); waitms(150); setportcon(4); setportcoff(5); waitms(150); setportcon(5); waitms(300); } } /*### Analogwerte ###*/ void Analogwerte(void) { uint8_t i;//"initial declaration error" fix //Alle internen Pullups an, ausgenommen Port A3 und Batteriespannung/Taster (A6 und A7). Da A3 aber nun auch nicht auf GND liegt, ergibt sich ein "Rauschen", der Wert variiert mit jeder Messung mehr oder weniger stark. setportaon(0); setportaon(1); setportaon(2); setportaoff(3); setportaon(4); setportaon(5); //for(uint8_t i=0; i<8; i++) for(i=0; i<8; i++)//"initial declaration error" fix { analog = adcwert(i); //Messung Analogport [i] utoa(i, wort, 10); sendUSART("Analog"); sendUSART(wort); sendUSART(" = "); //Ausgabe: "Analog[i] = " utoa(analog, wort, 10); sendUSART(wort); sendUSART(" = "); //Ausgabe: "[Analogwert] = " dtostrf(analog*referenzspannung, 11, 8, wort); sendUSART(wort); sendUSART(" Volt\r\n"); //AUsgabe: "[Reale Voltzahl] Volt[Umbruch]" } sendUSART("\n\n\n"); waitms(300); } /*### Digitalwerte ###*/ void Digitalwerte(void) { uint8_t i;//"initial declaration error" fix //Einige interne Pullups an, andere aus -> gibt bei einigen "Rauscheffekt", mal misst er "high", mal "low" und mal irgendwas dazwischen "?". //Ein kleines Stückchen Draht an einem der Ports wirkt wahre Wunder, was das Rauschen betrifft -> viel öfter "low" dabei als ohne. Nachteil: Die Tastenerkennung funktioniert kaum noch. setportaoff(0); setportaon(1); setportaoff(2); setportaon(3); setportaon(4); setportaon(5); //for(uint8_t i=0; i<8; i++) for(i=0; i<8; i++)//"initial declaration error" fix { utoa(i, wort, 10); sendUSART("Digital"); sendUSART(wort); sendUSART(" = "); //Ausgabe: "Digital[i] = " if (PINA & (1<<PINA0)) {sendUSART("high");} else {sendUSART("low");} //Abgleich des Zustandes - Ausgabe: "high" oder "low" sendUSART("\r\n"); } sendUSART("\n\n\n"); waitms(300); } /*### Hauptschleife ###*/ int main(void) { /*###Initialisierungsphase###*/ //Pins bzw. Ports als Ein-/Ausgänge konfigurieren DDRA |= 0x00; //00000000 -> alle Analogports als Eingänge DDRB |= 0x03; //00000011 -> PORTB.0 und PORTB.1 sind Kanäle des rechten Motors DDRC |= 0xFF; //11111111 -> PORTC.6 und PORTC.7 sind Kanäle des linken Motors, Rest sind LEDs für Lauflicht DDRD |= 0xB0; //10110000 -> PORTD.4 ist PWM-Kanal des linken Motors, PORTD.5 des rechten //Initialisierungen setportcon(0); setportcon(1); setportcon(2); setportcon(3); setportcon(4); setportcon(5); //LEDs ausschalten setportdoff(7); //Speaker aus init_timer1(); //Initialisierung Timer für PWM init_USART(); //USART konfigurieren /*###Hauptschleife###*/ sound(6, 270); //Startmelodie sound(8, 270); sound(11, 270); sound(7, 270); waitms(10); sound(7, 270); sound(6, 270); sound(11, 540); sendUSART("\r\n\n\n"); //Sendet einen kleinen Begrüßungstext. "\r" setzt den Cursor wieder auf Zeilenanfag, "\n" beginnt dann die nächste Zeile sendUSART("**** RN-CONTROL 1.4 *****\r\n"); sendUSART(" \r\n"); sendUSART("Fuer C umgeschrieben Version des mitgelieferten\r\n"); sendUSART("Bascom-BASIC Beispielprogramms inkl. eigener\r\n"); sendUSART("Header-Datei mit wichtigen Grundfunktionen.\r\n"); sendUSART(" \r\n"); sendUSART("Vielen Dank an die RN-Community fuer ihre Hilfe!\r\n\n\n\n"); Mlinksstop(); Mrechtsstop(); setPWMlinks(0); setPWMrechts(0); while(1) { switch(button()) { case 1: Batteriespannung(); break; case 2: Motortest(); break; case 3: Lauflicht(); break; case 4: Analogwerte(); break; case 5: Digitalwerte(); break; default: break; } } return 0; }
Das C Demoprogramm
/* ################################################### RNControl-Test.c Aufgabe: Dieses Testprogramm testet gleich mehrere Eigenschaften auf dem Board Den verschiedenen Tasten sind bestimmte Funktionen zugeordnet Taste 1: Zeigt Batteriespannung über RS232 an Taste 2: Angeschlossene Motoren beschleunigen und abbremsen Taste 3: Einige Male Lauflicht über LED´s anzeigen. Am I2C-Bus darf in diesem Moment nichts angeschlossen sein Taste 4: Zeigt analoge Messwerte an allen Port A PIN´s über RS232 an Taste 5: Zeigt digitalen I/O Zustand von PA0 bis PA5 an Sehr gut kann man aus dem Demo auch entnehmen wie Sound ausgegeben wird, wie Tasten abgefragt werden und wie Subroutinen und Funktionen angelegt werden Autor: Georg Richter ####################################################### */ #include <stdlib.h> #include <avr/io.h> #include "rncontrol.h" /*### Variablen ###*/ const float referenzspannung = 0.0048828125; //Referenzwert zur Multiplikation mit den Werten der Analogports (0...1023), um auf die Voltzahl zu kommen (0...5). Ergibt sich aus 5/1024. uint16_t analog; //Variable für jeweils an einem Analogport gemessenen Wert, um nicht für eine Ausgabe mehrere Messungen durchführen zu müssen. char wort[5]; //Zahlen (Integer und Float) müssen vor der Ausgabe per RS232 in ASCII-Zeichen konvertiert werden, für die ein Speicher benötigt wird. /*### Batteriespannung ###*/ void Batteriespannung(void) { sendUSART("Analog6 = "); analog = adcwert(6); utoa(analog, wort, 10); sendUSART(wort); sendUSART(" = "); dtostrf(analog*referenzspannung, 11, 8, wort); sendUSART(wort); sendUSART(" Volt\r\n"); dtostrf(adcwert(6)*referenzspannung*5.66804, 11, 8, wort); sendUSART("Batteriespannung = "); sendUSART(wort); sendUSART(" Volt\r\n\n\n\n"); waitms(300); } /*### Motortest ###*/ void Motortest(void) { uint8_t i;//"initial declaration error" fix Mlinksvor(); Mrechtsvor(); setPWMlinks(0); setPWMrechts(0); waitms(40); //for(uint8_t i=0; i<255; i=i+5) for(i=0; i<255; i=i+5)//"initial declaration error" fix { setPWMlinks(i); setPWMrechts(i); waitms(40); } setPWMlinks(255); setPWMrechts(255); waitms(40); for(i=255; i>0; i=i-5) { setPWMlinks(i); setPWMrechts(i); waitms(40); } setPWMlinks(0); setPWMrechts(0); Mlinksstop(); Mrechtsstop(); waitms(300); } /*### LED-Lauflicht ###*/ void Lauflicht(void) { uint8_t i;//"initial declaration error" fix //for(uint8_t i=0; i<10; i++) for(i=0; i<10; i++)//"initial declaration error" fix { setportcoff(0); waitms(150); setportcon(0); setportcoff(1); waitms(150); setportcon(1); setportcoff(2); waitms(150); setportcon(2); setportcoff(3); waitms(150); setportcon(3); setportcoff(4); waitms(150); setportcon(4); setportcoff(5); waitms(150); setportcon(5); waitms(300); } } /*### Analogwerte ###*/ void Analogwerte(void) { uint8_t i;//"initial declaration error" fix //Alle internen Pullups an, ausgenommen Port A3 und Batteriespannung/Taster (A6 und A7). Da A3 aber nun auch nicht auf GND liegt, ergibt sich ein "Rauschen", der Wert variiert mit jeder Messung mehr oder weniger stark. setportaon(0); setportaon(1); setportaon(2); setportaoff(3); setportaon(4); setportaon(5); //for(uint8_t i=0; i<8; i++) for(i=0; i<8; i++)//"initial declaration error" fix { analog = adcwert(i); //Messung Analogport [i] utoa(i, wort, 10); sendUSART("Analog"); sendUSART(wort); sendUSART(" = "); //Ausgabe: "Analog[i] = " utoa(analog, wort, 10); sendUSART(wort); sendUSART(" = "); //Ausgabe: "[Analogwert] = " dtostrf(analog*referenzspannung, 11, 8, wort); sendUSART(wort); sendUSART(" Volt\r\n"); //AUsgabe: "[Reale Voltzahl] Volt[Umbruch]" } sendUSART("\n\n\n"); waitms(300); } /*### Digitalwerte ###*/ void Digitalwerte(void) { uint8_t i;//"initial declaration error" fix //Einige interne Pullups an, andere aus -> gibt bei einigen "Rauscheffekt", mal misst er "high", mal "low" und mal irgendwas dazwischen "?". //Ein kleines Stückchen Draht an einem der Ports wirkt wahre Wunder, was das Rauschen betrifft -> viel öfter "low" dabei als ohne. Nachteil: Die Tastenerkennung funktioniert kaum noch. setportaoff(0); setportaon(1); setportaoff(2); setportaon(3); setportaon(4); setportaon(5); //for(uint8_t i=0; i<8; i++) for(i=0; i<8; i++)//"initial declaration error" fix { utoa(i, wort, 10); sendUSART("Digital"); sendUSART(wort); sendUSART(" = "); //Ausgabe: "Digital[i] = " if (PINA & (1<<PINA0)) {sendUSART("high");} else {sendUSART("low");} //Abgleich des Zustandes - Ausgabe: "high" oder "low" sendUSART("\r\n"); } sendUSART("\n\n\n"); waitms(300); } /*### Hauptschleife ###*/ int main(void) { /*###Initialisierungsphase###*/ //Pins bzw. Ports als Ein-/Ausgänge konfigurieren DDRA |= 0x00; //00000000 -> alle Analogports als Eingänge DDRB |= 0x03; //00000011 -> PORTB.0 und PORTB.1 sind Kanäle des rechten Motors DDRC |= 0xFF; //11111111 -> PORTC.6 und PORTC.7 sind Kanäle des linken Motors, Rest sind LEDs für Lauflicht DDRD |= 0xB0; //10110000 -> PORTD.4 ist PWM-Kanal des linken Motors, PORTD.5 des rechten //Initialisierungen setportcon(0); setportcon(1); setportcon(2); setportcon(3); setportcon(4); setportcon(5); //LEDs ausschalten setportdoff(7); //Speaker aus init_timer1(); //Initialisierung Timer für PWM init_USART(); //USART konfigurieren /*###Hauptschleife###*/ sound(6, 270); //Startmelodie sound(8, 270); sound(11, 270); sound(7, 270); waitms(10); sound(7, 270); sound(6, 270); sound(11, 540); sendUSART("\r\n\n\n"); //Sendet einen kleinen Begrüßungstext. "\r" setzt den Cursor wieder auf Zeilenanfag, "\n" beginnt dann die nächste Zeile sendUSART("**** RN-CONTROL 1.4 *****\r\n"); sendUSART(" \r\n"); sendUSART("Fuer C umgeschrieben Version des mitgelieferten\r\n"); sendUSART("Bascom-BASIC Beispielprogramms inkl. eigener\r\n"); sendUSART("Header-Datei mit wichtigen Grundfunktionen.\r\n"); sendUSART(" \r\n"); sendUSART("Vielen Dank an die RN-Community fuer ihre Hilfe!\r\n\n\n\n"); Mlinksstop(); Mrechtsstop(); setPWMlinks(0); setPWMrechts(0); while(1) { switch(button()) { case 1: Batteriespannung(); break; case 2: Motortest(); break; case 3: Lauflicht(); break; case 4: Analogwerte(); break; case 5: Digitalwerte(); break; default: break; } } return 0; }
Autoren
- RN-User Corone
- Frank (nur Gestaltung und Übernahme)
- CsT (Verbesserung von kleinen Fehlern)