Subversion Repositories openrisc

/*

 * Copyright (c) 20010 IAR Systems AB.

 *

 * Permission to use, copy, modify, and distribute this software for any

 * purpose with or without fee is hereby granted, provided that the above

 * copyright notice and this permission notice appear in all copies.

 *

 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES

 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF

 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR

 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES

 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN

 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF

 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

 */

/*

 * IAR Embedded Workbench tutorial

 *

 * Test Program for the RSKRX62N Board.

 * LED's perform different display according to

 * which switch is pressed.

 * Used to check that all the LED's, switches,

 * clock function and AD trigger are working fine.

 *

 * $Revision: 2 $

 */

#include "iorx62n.h"

#include "intrinsics.h"

void ScrollLedsLowHigh(void);

void ScrollLedsHighLow(void);

unsigned long pause;

unsigned long off_set;

#define ON  0

#define OFF 1

#define LED0 PORT0.DR.BIT.B2  // P02 LED0

#define LED1 PORT0.DR.BIT.B3  // P03 LED1

#define LED2 PORT0.DR.BIT.B5  // P05 LED2

#define LED3 PORT3.DR.BIT.B4  // P34 LED3

#define LED4 PORT6.DR.BIT.B0  // P50 LED4

#define LED5 PORT7.DR.BIT.B3  // P73 LED5

/* defined words used in this program */

enum {

  SW1,

  SW2,

  SW3,

  NONE

}GetKey;

/* SW1 ISR */

#pragma vector = 72

__interrupt void isr_sw1(void)

{

  GetKey=SW1;

  CMT.CMSTR0.BIT.STR0 = 0; // stop timer

  ICU.IR[72].BIT.IR = 0;   // clear interrupt request flag 

}

/* SW2 ISR */

#pragma vector = 73

__interrupt void isr_sw2(void)

{

  GetKey=SW2;

  CMT.CMSTR0.BIT.STR0 = 0; // stop timer

  ICU.IR[73].BIT.IR = 0;   // clear interrupt request flag  

}

/* SW3 ISR */

#pragma vector = 79

__interrupt void isr_sw3(void)

{

  GetKey=SW3;

  CMT.CMSTR0.BIT.STR0 = 1; // start timer

  ICU.IR[79].BIT.IR = 0;   // clear interrupt request flag    

}

/* Timer ISR */

#pragma vector = 0x1c

__interrupt void isr_cmt0(void)

{

  // Toggle LED's

  LED0 = ~LED0;

  LED1 = ~LED1;

  LED2 = ~LED2;

  LED3 = ~LED3;

  LED4 = ~LED4;

  LED5 = ~LED5;

  ICU.IR[70].BIT.IR = 0;         // clear interrupt request flag

}

/* Main program. */

void main (void)

{

  // enable modules

  SYSTEM.MSTPCRA.BIT.MSTPA23 = 0; // A/D Converter (Unit 0) Module

  // Set up RV1 (potentiometer)

  AD0.ADCR.BIT.MODE = 2;  // Continuous scan mode

  AD0.ADCSR.BIT.CH = 0;   // only AD0

  AD0.ADCSR.BIT.ADST = 1; // Start A/D

  // Set up SW1, SW2, SW3

  PORT0.DDR.BIT.B0 = 0; // SW1 input on P00

  PORT0.DDR.BIT.B1 = 0; // SW2 input on P01

  PORT0.DDR.BIT.B7 = 0; // SW3 input on P07  

  PORT0.ICR.BIT.B0 = 1; // Enable input buffer

  PORT0.ICR.BIT.B1 = 1; // Enable input buffer

  PORT0.ICR.BIT.B7 = 1; // Enable input buffer

  // IRQ8-A used for SW1

  IOPORT.PF8IRQ.BIT.ITS8 = 0; // P00 is designated as the IRQ8-A input pin.

  IEN(ICU,IRQ8) = 1;

  IPR(ICU,IRQ8) = 3;

  // IRQ9-A used for SW2

  IOPORT.PF8IRQ.BIT.ITS9 = 0; // P01 is designated as IRQ9-A input pin.

  IEN(ICU,IRQ9) = 1;

  IPR(ICU,IRQ9) = 3;

  // IRQ15-A used for SW3

  IOPORT.PF8IRQ.BIT.ITS15 = 0; // P07 is designated as the IRQ15-A input pin.

  IEN(ICU,IRQ15) = 1;

  IPR(ICU,IRQ15) = 3;

  // Set up LED's

  PORT0.DDR.BIT.B2 = 1;   // P02 LED0 

  PORT0.DDR.BIT.B3 = 1;   // P03 LED1

  PORT0.DDR.BIT.B5 = 1;   // P05 LED2

  PORT3.DDR.BIT.B4 = 1;   // P34 LED3

  PORT6.DDR.BIT.B0 = 1;   // P50 LED4

  PORT7.DDR.BIT.B3 = 1;   // P73 LED5

  // Turn al LED's off

  LED0 = LED1 = LED2 = LED3 = LED4 = LED5 = OFF;

  // Set up Timer

  SYSTEM.MSTPCRA.BIT.MSTPA15 = 0; // CMT timers 0, 

  CMT0.CMCR.BIT.CKS = 3;          // 25MHz/512 = 48.8kHz

  CMT0.CMCR.BIT.CMIE = 1;         // enable peripheral interrupt source

  CMT0.CMCOR = 12212;             // 4 Hz operation

  ICU.IER[3].BIT.IEN4 = 1;        // enable timer 0 interrupt  

  IPR(CMT0,CMI0) = 1;             // LED level 1

  __enable_interrupt();

  GetKey=SW1;

  for (;;)

  {

    switch (GetKey)

    {

      case SW1:

        ScrollLedsLowHigh();

        break;

      case SW2:

        ScrollLedsHighLow();

        break;

      case SW3:

        GetKey=NONE;

        break;

    }

  }

}

/* scrolls the LED's from low to high */

void ScrollLedsLowHigh()

{

  char led_number = 0;

  while (GetKey == SW1)

  {

    if (led_number > 5)

      led_number = 0;

    switch(led_number)

    {

    case 0:

      LED0=ON;

      LED1=LED2=LED3=LED4=LED5=OFF;

      break;

    case 1:

      LED1=ON;

      LED0=LED2=LED3=LED4=LED5=OFF;

      break;

    case 2:

      LED2=ON;

      LED0=LED1=LED3=LED4=LED5=OFF;

      break;

    case 3:

      LED3=ON;

      LED0=LED1=LED2=LED4=LED5=OFF;

      break;

    case 4:

      LED4=ON;

      LED0=LED1=LED2=LED3=LED5=OFF;

      break;

    case 5:

      LED5=ON;

      LED0=LED1=LED2=LED3=LED4=OFF;

      break;

    }

    led_number++;

    off_set = AD0.ADDRA*1000;

    for (pause = off_set; pause != 0; pause --);

  }

}

/* scrolls the LED's from high to low */

void ScrollLedsHighLow()

{

  signed char led_number = 3;

  while (GetKey == SW2)

  {

    if (led_number < 0)

      led_number = 5;

    switch(led_number)

    {

    case 0:

      LED0=ON;

      LED1=LED2=LED3=LED4=LED5=OFF;

      break;

    case 1:

      LED1=ON;

      LED0=LED2=LED3=LED4=LED5=OFF;

      break;

    case 2:

      LED2=ON;

      LED0=LED1=LED3=LED4=LED5=OFF;

      break;

    case 3:

      LED3=ON;

      LED0=LED1=LED2=LED4=LED5=OFF;

      break;

    case 4:

      LED4=ON;

      LED0=LED1=LED2=LED3=LED5=OFF;

      break;

    case 5:

      LED5=ON;

      LED0=LED1=LED2=LED3=LED4=OFF;

      break;

    }

    led_number--;

    off_set = AD0.ADDRA*1000;

    for (pause = off_set; pause != 0; pause --);

  }

}