xmega128A1 XMEGA-A1 Xplained

//Oszillator auf 2Mhz stellen

OSC.CTRL |= OSC_RC2MEN_bm;

// Warten bis der Oszillator bereit ist

while(!(OSC.STATUS & OSC_RC2MRDY_bm));

//Schützt I/O Register, Interrupts werden ignoriert

CCP = CCP_IOREG_gc;

//aktiviert den internen Oszillator

CLK.CTRL = (CLK.CTRL & ~CLK_SCLKSEL_gm) | CLK_SCLKSEL_RC2M_gc;

//Oszillator auf 32Mhz stellen

OSC.CTRL |= OSC_RC32MEN_bm;

// Warten bis der Oszillator bereit ist

while(!(OSC.STATUS & OSC_RC32MRDY_bm));

//Schützt I/O Register, Interrupts werden ignoriert

CCP = CCP_IOREG_gc;

//aktiviert den internen Oszillator

CLK.CTRL = (CLK.CTRL & ~CLK_SCLKSEL_gm) | CLK_SCLKSEL_RC32M_gc;