//    - initialisation spi1 UART module -----------
void spi1_init (void)
{
    U1CTL |= CHAR + SYNC + MM + SWRST;  // 8-bit, SPI, Master
    U1TCTL |= CKPL + SSEL1 + STC;      // Polarity, SMCLK, 3-wire
    U1BR0 = 0x02;          // SPICLK = SMCLK/2 ~ 4MHz
    U1BR1 = 0x00;
    U1MCTL = 0x00;
    ME2 |= USPIE1;          // Module enable
    U1CTL &= ~SWRST;      // Restart USART SPI, SPI enable
//    IE2 |= URXIE1 + UTXIE1;        // RX and TX interrupt enable
}

//    - erasing DataFlash -------------------------
void erasing (unsigned int page_cnt)
{
    RLedOn;        // Led red anabled
    _DINT();
    while(!(P5IN & DF_RDY_BUSY));      // waite
    P5OUT &= ~DF_CHIP_SEL;    // enabled DataFlash
    TXBUF1 = PAGE_ERASE;
    while ((IFG2&UTXIFG1)!=UTXIFG1);  // USART1 TX buffer ready?
    TXBUF1 = (char)(page_cnt>>8);
    while ((IFG2&UTXIFG1)!=UTXIFG1);  // USART1 TX buffer ready?
    TXBUF1 = (char)page_cnt;
    while ((IFG2&UTXIFG1)!=UTXIFG1);  // USART1 TX buffer ready?
    TXBUF1 = 0x00;
    while ((IFG2&UTXIFG1)!=UTXIFG1);  // USART1 TX buffer ready?
    P5OUT |= DF_CHIP_SEL;    // disabled DataFlash
    _EINT();

}

  \   __code void erasing(unsigned int)
  \                     erasing:
  \   000000   B012....             CALL    #??Subroutine3_0
  \                     ??erasing_0:
  \   000004   D2B33000             BIT.B   #0x1, &0x30
  \   000008   FD2B                 JNC     ??erasing_0
  \   00000A   F2C020003100         BIC.B   #0x20, &0x31
  \   000010   F24081007F00         MOV.B   #0x81, &0x7f
  \                     ??erasing_1:
  \   000016   F2B020000300         BIT.B   #0x20, &0x3
  \   00001C   FC2B                 JNC     ??erasing_1
  \   00001E   B012....             CALL    #??Subroutine6_0
  \                     ??erasing_2:
  \   000022   F2B020000300         BIT.B   #0x20, &0x3
  \   000028   FC2B                 JNC     ??erasing_2
  \   00002A   C24C7F00             MOV.B   R12, &0x7f
  \                     ??erasing_3:
  \   00002E   F2B020000300         BIT.B   #0x20, &0x3
  \   000034   FC2B                 JNC     ??erasing_3
  \   000036   ....                 JMP     ??Subroutine0_0

// 6_0
  \                     ??Subroutine6_0:
  \   000000   0F4C                 MOV.W   R12, R15
  \   000002   8F10                 SWPB    R15
  \   000004   C24F7F00             MOV.B   R15, &0x7f
  \   000008   3041                 RET
// 3_0
  \                     ??Subroutine3_0:
  \   000000   E2C22100             BIC.B   #0x4, &0x21
  \   000004   32C2                 DINT
  \   000006   0343                 NOP
  \   000008   3041                 RET
// 0_0
  \                     ??Subroutine0_0:
  \   00001C   C2437F00             MOV.B   #0x0, &0x7f
  \                     ??write_page_flash_4:
  \   000020   F2B020000300         BIT.B   #0x20, &0x3
  \   000026   FC2B                 JNC     ??write_page_flash_4
// 8_0
  \                     ??Subroutine8_0:
  \   000000   F2D020003100         BIS.B   #0x20, &0x31
  \   000006   32D2                 EINT
  \   000008   3041                 RET

void _init_spi0(void)
{ IE1 &=~ (URXIE0 + UTXIE0);                      // запретить прерывания для SPI0
 _DIS_SPI0;                                      // запретить функции выводов SPI0
 _RESET_FLASH_CS;                                // сбросить активн.сост. CS DataFlash
 _RESET_RTC_CS;                               // сбросить активн.сост. CS RTC
 _RESET_CNTR_CS;                              // сбросить активн.сост. CS CNTR
 U0CTL = SWRST;                                  // уст.бит прогр. сброса модуля UART0
 U0CTL |= CHAR+SYNC+MM;                          // уст.режим UART0:8бит,SPI,ведущий,3-х провод.
 U0TCTL = CKPL+SSEL0+SSEL1+STC;             // Mode3, U0CLK=SMCLK, 3-ware
 U0BR1 = 0x00;                           // уст.старший байт предделителя BITCLK
 U0BR0 = 0x07;                                   // уст.младший байт предделителя BITCLK
 U0MCTL = 0;                                     // установка регистра модуляции
 ME1 |= USPIE0;                                  // разрешаем работу модуля SPI0
 U0CTL &=~ SWRST;                                // очистим бит программного сброса
 _EN_SPI0_3;                                     // разрешим функции pin 3-пров. SPI
 spi0.bufSize = 0;                               // установим нулевой размер буфера
 spi0.cntr = 0;                                  // сбросим счетчик байт буфера SPI0
 spi0.req = 0;                                   // сбросим регистр запросов к SPI0
 spi0.status = 0;                                // сбросим статус готовности SPI0
 spi0.num = 0;                                   // инициализация номера канала SPI0
 IE1 |= URXIE0+UTXIE0;                           // разрешить прерывания для UART0
}

//    - write max page size 528byte to buffer DataFlash -
void write_to_buffer (unsigned char * sprt, unsigned char a_buff)
{
unsigned int buffer_cnt = 0;
    RLedOn;            // Led red anabled
    _DINT();
    while(!(P5IN & DF_RDY_BUSY));      // waite blok cleared
    P5OUT &= ~DF_CHIP_SEL;        // enabled DataFlash
    if (a_buff == BUFFER_1)        // if active Buffer1
 TXBUF1 = BUFFER_1_WRITE;
    else
 TXBUF1 = BUFFER_2_WRITE;
    while ((IFG2&UTXIFG1)!=UTXIFG1);
    TXBUF1 = 0x00;          // don't care 8 bits
    while ((IFG2&UTXIFG1)!=UTXIFG1);  // USART1 TX buffer empty?
    TXBUF1 = (char)(buffer_cnt>>8);      // first two byte buffer addr
    while ((IFG2&UTXIFG1)!=UTXIFG1);  // USART1 TX buffer empty?
    TXBUF1 = (char)buffer_cnt;    // buffer addr(max. 2^8 = 256 pages)
    while ((U1TCTL&TXEPT)!= TXEPT);      // USART1 TX buffer is empty?
    
    while(++buffer_cnt < (MAX_LEN+1))
    {
 TXBUF1 = *sprt++;
 while ((U1TCTL&TXEPT)!= TXEPT);  // USART1 TX buffer is empty?
    }
    P5OUT |= DF_CHIP_SEL;        // disabled DataFlash
    _EINT();
}

while ((U1TCTL&TXEPT)!= TXEPT);

int main()
{

  WDTCTL = WDTPW + WDTHOLD;
  IE1   |= OFIE + WDTIE;
  IFG1  |= OFIFG;
  
  __enable_interrupt();
  
  AT25SEL &= ~AT25LN;
  AT25DIR |= AT25LN;
  AT25CS_HI;
  
  AT45SEL &= ~AT45LN;
  AT45DIR |=  AT45LN;
  AT45CS_HI;
  
   IE2 &= ~(UTXIE1 + URXIE1);
   U1CTL = SWRST;
   U1CTL |= CHAR + SYNC + MM;
   U1TCTL = CKPL + SSEL1 + STC;
   U1BR1  = 0x00;
   U1BR0  = 0x04;
   U1MCTL = 0x00;
   ME2 |= USPIE1;
   U1CTL &= ~SWRST;
   //IE2 |= UTXIE1 + URXIE1;

   P5SEL |= 0x0E;
   P5DIR |= 0x0A;

   P1DIR = 0x10; //проверка наличия SMCLK
   P1SEL = 0x10;  


  while(1)
  {

  }

  return 0;
}

#pragma vector = NMI_VECTOR
__interrupt void OSCfault_ISR(void)
{
BCSCTL2 = SELM_0 + DIVM_0 + DIVS_0;
BCSCTL1 = DIVA_0 + RSEL2 + RSEL1 + RSEL0;
DCOCTL = DCO1 + DCO2;
while ((IFG1 & OFIFG) != 0) IFG1 &=~OFIFG;
BCSCTL2 = SELM_2 + DIVM_0 + DIVS_0 + SELS;
}