//ICC-AVR application builder  
// Target : ATxmega128A1
/// Crystal: 14.7456Mhz

#include <ioxm128A1v.h>
#include <AVRdef.h>

// Прерывание по окончанию счета
#pragma interrupt_handler iv_TCE1_OVF_isr:54
void iv_TCE1_OVF_isr(void)
{
TCE1.CTRLA=0x00; // stop Timer 1 порта Е
TCE1.CNT.i=0x8F80;   // установка значения для счета
flag_rs232=1;
TCE1.CTRLA|=0x07; //start Timer 1 порта Е
}

//TIMER1 initialize - prescale: 1,  actual value:  1,000 Sec (0,0%)
// Тактовая частота таймера 29491200 Гц
//Деление на 1024
// Установка для счета  0x8F80
void timerE1_init(void)
{
TCE1.CTRLA=0x00; // stop Timer 1 порта Е
TCE1.CNT.i=0x8F80;   // установка значения для счета  
TCE1.INTCTRLA = 0x01; // Разрешение прерывания по переполнению - уровень низкий.
TCE1.CTRLA|=0x07; //start Timer 1 порта Е
}

void clock (void)// Функция установки тактирования от кварцевого генератора с умножением частоты в 2 раза
{
//Настраиваем тактирование
//Кварц 16МГц, умножение на 2
OSC.XOSCCTRL=0xc3; //Кварц(12-16),16К циклов (сb) или 256К -  (с3)
OSC.CTRL|=0x08; //Включаем кварцевый генератор
do{} while ((OSC.STATUS & 0x08)==0); //ожидаем готовности кв. генератора
OSC.PLLCTRL=0xc2;// PLL от кварца, К=2
OSC.CTRL|=0x10;//Включаем PLL
do{} while ((OSC.STATUS & 0x10)==0); //Ожидаем готовности PLL
//переключаемся на тактирование от PLL
asm ("ldi r16,0xd8");
asm ("ldi r17,0x04");
asm ("out 0x34,r16");
asm ("sts 64,r17");
OSC.CTRL&=~BIT(0); //выключаем внутренний генератор на 2 МГц, работаем от внешнего кварца
}

void PMIC_SET (void)
{
    // Разрешение прерывания и установка какие прерывания разрешены
      CLI();
    PMIC.CTRL |= 0x07;   // Enable interrupts in the PMIC.
    SEI(); // Enable the global interrupt flag.

}