//****************************************************************************
//  MSP430-TEST44X Demo - Flash In-System Programming 
//
//  Description; This program first erases flash seg A, then it increments all
//  values in seg A, then it erases seg B, then  copies seg A to seg B.
//  Assumed MCLK 550kHz - 900kHz.
//
//               MSP430F449
//            -----------------
//        /|\|              XIN|-  
//         | |                 | 
//         --|RST          XOUT|-
//           |                 |
//
//  Yang Rui
//  Lierda, Inc
//  NOVEMBER 2003
//  Built with IAR Embedded Workbench Version: 1.26B
//******************************************************************************

#include  <msp430x44x.h>

char  value;                      // 8-bit value to write to segment A

// Function prototypes
void  write_SegA (char value);
void  copy_A2B (void);

void main(void)
{ 
  WDTCTL = WDTPW + WDTHOLD;       // Stop watchdog timer
  FCTL2 = FWKEY + FSSEL0 + FN0;   // MCLK/2 for Flash Timing Generator
  value = 0;                      // initialize value

  while(1)                        // Repeat forever
  {
    write_SegA(value++);          // Write segment A, increment value
    copy_A2B();                   // Copy segment A to B
  }
}

void write_SegA (char value)
{
  char *Flash_ptr;                // Flash pointer
  unsigned int i;

  Flash_ptr = (char *) 0x1080;    // Initialize Flash pointer  
  FCTL1 = FWKEY + ERASE;          // Set Erase bit
  FCTL3 = FWKEY;                  // Clear Lock bit
  *Flash_ptr = 0;                 // Dummy write to erase Flash segment
  
  FCTL1 = FWKEY + WRT;            // Set WRT bit for write operation

  for (i=0; i<128; i++)
  {
    *Flash_ptr++ = value;         // Write value to flash
  }
  
  FCTL1 = FWKEY;                  // Clear WRT bit
  FCTL3 = FWKEY + LOCK;           // Reset LOCK bit
}


void copy_A2B (void)
{
  char *Flash_ptrA;               // Segment A pointer
  char *Flash_ptrB;               // Segment B pointer
  unsigned int i;

  Flash_ptrA = (char *) 0x1080;   // Initialize Flash segment A pointer
  Flash_ptrB = (char *) 0x1000;   // Initialize Flash segment B pointer  
  FCTL1 = FWKEY + ERASE;          // Set Erase bit
  FCTL3 = FWKEY;                  // Clear Lock bit
  *Flash_ptrB = 0;                // Dummy write to erase Flash segment B
  FCTL1 = FWKEY + WRT;            // Set WRT bit for write operation 

  for (i=0; i<128; i++)
  {
    *Flash_ptrB++ = *Flash_ptrA++; // copy value segment A to segment B
  }
  
  FCTL1 = FWKEY;                  // Clear WRT bit
  FCTL3 = FWKEY + LOCK;           // Reset LOCK bit
}