U23 2008/Gruppe1

From C4 Wiki
< U23 2008
Revision as of 09:59, 27 August 2008 by 194.8.220.170 (talk) (→‎Sourcecode,Assembler LCD HD44780 kompatibel, 2x16 Zeichen @ 16Mhz (20Mhz funktioniert auch):)
Jump to: navigation, search

Gruppe1

Hier eine Neuerung zum Einfügen von Sourcecode:
Bisher wurde der Code zerpflückt, wenn nicht vor jeder Zeile eine "Leertaste" stand.
Nun kann man per <source lang ="language"> HIER KOMMT DER CODE REIN!</source>
wunderbar der Code eingefügt werden und er wird, wie formatiert eingefügt, dargestellt!
Für C verwendet man "c" und für assembler "asm".

Mitglieder:


-Jan (Damit ich den namen nicht vergesse )
-Maike
-skullbocks
-Gesche
-Trella
-Smasher (Brille und anthrazit-farbenes dell notebook ;) )

Projekte:

Taster

<source lang="c">

//CODE ANFANG 

#include <avr/io.h>
#include <util/delay.h>

uint8_t zeit;
uint8_t richtung;
uint8_t anaus;

uint8_t t0, temp0;

/*void lauflicht(void)
{
  
}*/ 

void main(void)
{
  DDRC &= ~(_BV(PC0)|_BV(PC1)|_BV(PC2)|_BV(PC3)); //Schalter
  DDRC &= _BV(PC4); //Lampe4
  DDRD &= _BV(PD3) | _BV(PD6) | _BV(PD7); //Lampe 1-3
  PORTC = _BV(PC0)|_BV(PC1)|_BV(PC2)|_BV(PC3); //Pullups


  t0= 0;
  anaus = 0x00; //0x00 = aus; 0xff = an

  _delay_loop_2(0); //Kurz warten, bis pullups ready

 while(1){
  	temp0 = PINC & _BV(PC0);
	_delay_loop_2(0);
	if((PINC & _BV(PC0)) == temp0){

t0 = temp0; 

	}

	if (t0 == 0)

PORTD = 128; else PORTD = 0; 


}

}



/*if( (PINC & _BV(PC0)) == 0){ _delay_loop_2(0); if( (PINC & _BV(PC0)) == 0 ){ //anaus != anaus; PORTD = 0xff; } 

 }*/

//CODE ENDE!

</source>

Sourcecode,Assembler LCD HD44780 kompatibel, 2x16 Zeichen @ 16Mhz (20Mhz funktioniert auch):

<source lang="asm">
  • W I C H T I G !
  • Das Programm wurde in AVR Studio unter Windows geschrieben.
  • Es sind kleine Anpassungen notwendig um unter AVRGCC kompiliert zu werden
  • Dies umfasst z.b. den Stackpointer ( lo8(RAMEND), hi8(RAMEND) )
  • sowie der tausch von .def in #define . #define ersetzt .equ !
  • Von Smasher

.include "m168def.inc"

LCD Pin Belegung
DB4-7 = PORT D. 0-3
ENABLE=PORT D Pin 5
RS= PORTD Pin 4

.def temp = r16 .def temp1=r20 .equ enable=5 .equ rs=4 .equ LCD_PORT = PORTD .equ LCD_DDR = DDRD

.org 0x0000 

       rjmp    main

main: 

		ldi     temp, LOW(RAMEND)     ; Stackpointer initialisieren
       out     SPL, temp
       ldi     temp, HIGH(RAMEND)
       out     SPH, temp

ldi temp,0xFF  ; Port D als Ausgang out LCD_DDR, temp


lcdinit: ldi temp, 0x00 out LCD_PORT, temp

LCD mitteilen, dass im 4 Bit Modus gearbeitet wird

rcall delay15ms ;Hier mindestens 15ms warten! rcall delay15ms ;Zur sicherheit! z.b. nach Stromeinschalten! 


         ldi temp, 0b00000011

out LCD_PORT, temp rcall enable_routine

rcall delay4ms  ;Mindestens 4,1ms warten!

ldi temp, 0b00000011 out LCD_PORT,temp rcall enable_routine


rcall short_delay  ;Mindestens 100us warten! rcall short_delay

ldi temp, 0b00000011 out LCD_PORT, temp rcall enable_routine


ldi temp, 0b00000010  ;Hier wird letztendlich 4-Bit Modus eingeschaltet out LCD_PORT, temp rcall enable_routine rcall short_delay  ;Hier zur sicherheit 60us zum abarbeiten

4 Bit Modus Mitteilung abgeschlossen
*******************************************


ldi temp, 0b00000010  ;2 Zeilig 5x8 matrix out LCD_PORT, temp rcall enable_routine ldi temp,0b00001000 out LCD_PORT, temp rcall enable_routine

rcall short_delay  ;Kurze Wartezeit zum abarbeiten rcall display_off rcall clear_display 

               ldi temp, 0b00000000; Kursor nach rechts wandernd, kein display shift

out LCD_PORT, temp rcall enable_routine ldi temp, 0b00000010 out LCD_PORT, temp rcall enable_routine rcall delay2ms

rcall display_on 

               ldi temp, 0b00000000 ; display ein, Cursor ein, Cursor Blinkend

out LCD_PORT, temp rcall enable_routine ldi temp, 0b00001111 out LCD_PORT, temp rcall enable_routine ; ferig

ldi temp, 'H' rcall lcd_print ldi temp, 'a' rcall lcd_print

ldi temp, 'l' rcall lcd_print ldi temp, 'l' rcall lcd_print

ldi temp, 'o' rcall lcd_print ldi temp, ' ' rcall lcd_print

ldi temp, 'W' rcall lcd_print ldi temp, 'e' rcall lcd_print

ldi temp, 'l' rcall lcd_print ldi temp, 't' rcall lcd_print


loop: rjmp loop lcd_print: mov temp1, temp swap temp andi temp, 0b00001111 sbr temp, 1<<rs out LCD_PORT, temp rcall enable_routine

andi temp1, 0b00001111 sbr temp1, 1<<rs out LCD_PORT, temp1 rcall enable_routine rcall short_delay ret

display_on: ldi temp, 0b00000000 out LCD_PORT, temp rcall enable_routine

ldi temp,0b00001100 out LCD_PORT, temp rcall enable_routine rcall delay2ms

ret

display_off: ldi temp, 0b00000000 out LCD_PORT, temp rcall enable_routine 

           ldi temp, 0b00001000

out LCD_PORT, temp rcall enable_routine rcall delay2ms

ret

clear_display: ldi temp, 0b00000000 out LCD_PORT, temp rcall enable_routine

ldi temp, 0b00000001 out LCD_PORT,temp rcall enable_routine rcall delay2ms

ret


enable_routine:


rcall short_delay sbi LCD_PORT,enable rcall short_delay cbi LCD_PORT, enable rcall short_delay

ret

delay15ms:

=============================
Warteschleifen-Generator
340000 Zyklen
-----------------------------
warte 339999 Zyklen
         ldi  R17, $0B

WGLOOP0: ldi R18, $33 WGLOOP1: ldi R19, $C9 WGLOOP2: dec R19 

         brne WGLOOP2
         dec  R18
         brne WGLOOP1
         dec  R17
         brne WGLOOP0
-----------------------------
warte 1 Zyklus
         nop
=============================

ret

delay4ms:

=============================
Warteschleifen-Generator
90000 Zyklen
~4,7ms
-----------------------------
warte 89997 Zyklen
         ldi  R17, $83

WALOOP0: ldi R18, $E4 WALOOP1: dec R18 

         brne WALOOP1
         dec  R17
         brne WALOOP0
-----------------------------
warte 3 Zyklen
         ldi  R17, $01

WALOOP2: dec R17 

         brne WALOOP2
=============================

ret


delay2ms:

=============================
Warteschleifen-Generator
48000 Zyklen
-----------------------------
warte 47988 Zyklen
         ldi  R17, $56

WCLOOP0: ldi R18, $B9 WCLOOP1: dec R18 

         brne WCLOOP1
         dec  R17
         brne WCLOOP0
-----------------------------
warte 12 Zyklen
         ldi  R17, $04

WCLOOP2: dec R17 

         brne WCLOOP2
=============================

ret

short_delay:

=============================
Warteschleifen-Generator
1000 Zyklen
ca. 60us laut oszi
-----------------------------
warte 999 Zyklen
         ldi  R17, $03

WDLOOP0: ldi R18, $6E WDLOOP1: dec R18 

         brne WDLOOP1
         dec  R17
         brne WDLOOP0
-----------------------------
warte 1 Zyklus
         nop
=============================

ret



</source>

Projektabend 2:

Sourcecode:

<source lang="c"> 

#include <avr/io.h>
  1. include <util/delay.h>

/* Funktionsweise: 

* das Array 'reihe' gibt die Folge der Lampen an.
* Jede uint8_t Variable enthaelt in den letzten beiden Bits die Lampe (0==1. Lampe, 1==2. Lampe, usw.)
* und in den ersten sechs Bits die Zeit in Zehntelsekunden. Die Lampen werden hierbei nicht automatisch ausgeschaltet,
* jeder Aufruf der Funktion 'schritt' toggelt den Status der Lampe und wartet um die angegebene Zeit.
*
* Die drei Makros werden benutzt um das Array zu erzeugen und auf die Daten zuzugreifen.
*/


  1. define GET_LAMPE(tl) ( (tl) & 0b11 )
  2. define GET_ZEIT(tl) ( (tl) >> 2 )
  3. define GET_TL(l,t) ( ((t)<<2) | ((l)&0b11) )
  1. define ENDE 0xFF


uint8_t reihe[] = { GET_TL(0,10), ENDE };

void lampe(uint8_t); void zehntelsekunde(uint8_t);

void main(void) { //Lampenports als Ausgaenge konfigurieren DDRC = _BV(PC4); DDRD = _BV(PD3) | _BV(PD6) | _BV(PD7);

uint8_t l=1; //Laenge der Reihe while (reihe[l] != ENDE) l++;

uint8_t i; for (i = 0 ;i < l;i++) { lampe(GET_LAMPE(reihe[i])); zehntelsekunde(GET_ZEIT(reihe[i])); }


for ( ;; ) ; //Endlos...

}

//Lampe #l toggeln void lampe(uint8_t l) { switch (l) { case 0: PORTC ^= _BV(PC4); break; case 1: PORTD ^= _BV(PD3); break; case 2: PORTD ^= _BV(PD6); break; case 3: PORTD ^= _BV(PD7); break; default: break; } }

//ca. 'f' Zehnelsekunden warten void zehntelsekunde(uint8_t f) { uint8_t i; for (i = 0; i < 8*f; i++) _delay_loop_2(0); } </source>

Projektabend 1:

Sourcecode:

<source lang="c"> //VERALTET! NEUE VERSION: WEITER OBEN, ABEND 2

/*Dieses Programm lässt ein bestimmtes Muster auf unserem Testboard ablaufen*/ 

#include <avr/io.h>
#include <util/delay.h>
void lampe(uint8_t l)
{ 
	switch (l) 
	{
		case 0: PORTC ^= _BV(PC4);
			break;
		case 1: PORTD ^= _BV(PD3);
			break;
		case 2: PORTD ^= _BV(PD6);
			break;
		case 3: PORTD ^= _BV(PD7);
			break;
		default: break;
	}
}
void main(void) {
	/* config PD7 as output */

	DDRC = _BV(PC4);
	DDRD = _BV(PD3) | _BV(PD6) | _BV(PD7); 

	uint8_t ls[] = {0, 1, 0, 2, 1, 3, 2, 1, 3};
	uint8_t p=0;

	while(1) {
		//PORTD ^= _BV(PD7);
		uint8_t i;
		
		lampe(ls[p]);
		p++;
		for (i = 0; i < 76; i++) {
			/* wait 4 * 65536 cycles */
			_delay_loop_2(0);
		}
	}
	for ( ;; ) ;

}

</source>


Sourcecode, Taster 1 entprellen und Port D inkrementieren, funktioniert gut!:

<source lang="c"> //*********************************************************************************************************** // * // * Von smasher // * //***********************************************************************************************************

// An das komplette PORTD habe ich LEDs aktiv High geschaltet (Also mit Anode an den Portpin), über // Widerstand nach Masse. An Port C, Pin0 habe ich einen Taster, der aktiv low ist. // Pullups werden an PortC Pin 0 aktiviert und im DDR auf Eingang gesetzt. //Das Port D wird komplett als Ausgang gesetzt. //Bei jedem Tastendruck wird nun status inkrementiert und auf den Leds kann man gut verfolgen, das jeweils //nur um eins erhöht wird. //Bei weglassen von entprell(); und direktem aufrufen von lcd(); (in main) sieht man sofort, dass es zum //prellen kommt und "wild" inkrementiert wird. Sprünge von 0 auf über 200 sind keine seltenheit! //*********************************************************************************************************** //* PAUSENZEITEN durch _delay_ms(x); //* Ich würde sagen, dass man es damit nicht allzu genau nehmen darf. //* Ich habe zwar noch kein Toggeln damit erzeugt und dann die frequenz mit einem oszi gemessen //* (wodurch man //* dann auf die Pausenzeit kommt) //* Aber ich denke dass die Funktion sehr ungenau arbeitet... //* Darum funktionieren Pausenzeiten von 1ms nach aufruf von entprell genauso, wie 10ms. //* Ebensogut kann es sein, dass mein Taster nur seeehr leicht Prellt und sich schnell "beruhigt"... //* Also nur ein hypothetischer Ansatz... //***********************************************************************************************************

  1. include <avr/io.h>
  2. include <util/delay.h>

uint8_t status=0;

void led (void){ status ++; PORTD = status; }

void entprell (void) { 

       _delay_ms(1);

if ( (PINC & _BV(PC0)) == 1 ) { _delay_ms(5);

if ( (PINC & _BV(PC0)) == 1){ led(); } 

     	}

}

int main(void) { 

   DDRC &= ~( _BV(PC0) );                 /* PIN PB0 auf Eingang (Taster)            */
   PORTC |= _BV(PC0);                 /* Pullup-Widerstand aktivieren            */
    DDRD =0xFF;

while(1)
{   
 if ( (PINC & _BV(PC0)) == 0 )

{ 

     entprell();
      }
 }

} </source>

Retrieved from "https://wiki.koeln.ccc.de/index.php?title=U23_2008/Gruppe1&oldid=14473"