Subversion Repositories openrisc

/** ###################################################################

**     THIS BEAN MODULE IS GENERATED BY THE TOOL. DO NOT MODIFY IT.

**     Filename  : TickTimer.C

**     Project   : RTOSDemo

**     Processor : MC9S12DP256BCPV

**     Beantype  : TimerInt

**     Version   : Bean 02.063, Driver 01.05, CPU db: 2.87.283

**     Compiler  : Metrowerks HC12 C Compiler

**     Date/Time : 18/06/2005, 16:21

**     Abstract  :

**         This bean "TimerInt" implements a periodic interrupt.

**         When the bean and its events are enabled, the "OnInterrupt"

**         event is called periodically with the period that you specify.

**         TimerInt supports also changing the period in runtime.

**         The source of periodic interrupt can be timer compare or reload

**         register or timer-overflow interrupt (of free running counter).

**     Settings  :

**         Timer name                  : ECT (16-bit)

**         Compare name                : TC0

**         Counter shared              : No

**

**         High-speed CPU mode

**             Prescaler               : divide-by-8

**             Clock                   : 3124000 Hz

**           Initial period/frequency

**             Xtal ticks              : 16000

**             microseconds            : 1000

**             milliseconds            : 1

**             seconds (real)          : 0.0010000

**             Hz                      : 1000

**             kHz                     : 1

**

**         Runtime setting             : period/frequency interval (continual setting)

**             ticks                   : 16000 to 320000 ticks

**             microseconds            : 1000 to 20000 microseconds

**             milliseconds            : 1 to 20 milliseconds

**             seconds (real)          : 0.0010000 to 0.0200000 seconds

**             Hz                      : 50 to 1000 Hz

**

**         Initialization:

**              Timer                  : Enabled

**              Events                 : Enabled

**

**         Timer registers

**              Counter                : TCNT      [68]

**              Mode                   : TIOS      [64]

**              Run                    : TSCR1     [70]

**              Prescaler              : TSCR2     [77]

**

**         Compare registers

**              Compare                : TC0       [80]

**

**         Flip-flop registers

**              Mode                   : TCTL2     [73]

**     Contents  :

**         Enable           - byte TickTimer_Enable(void);

**         SetPeriodTicks16 - byte TickTimer_SetPeriodTicks16(word Ticks);

**         SetPeriodTicks32 - byte TickTimer_SetPeriodTicks32(dword Ticks);

**         SetPeriodUS      - byte TickTimer_SetPeriodUS(word Time);

**         SetPeriodMS      - byte TickTimer_SetPeriodMS(word Time);

**         SetFreqHz        - byte TickTimer_SetFreqHz(word Freq);

**

**     (c) Copyright UNIS, spol. s r.o. 1997-2002

**     UNIS, spol. s r.o.

**     Jundrovska 33

**     624 00 Brno

**     Czech Republic

**     http      : www.processorexpert.com

**     mail      : info@processorexpert.com

** ###################################################################*/

/* MODULE TickTimer. */

#include "Events.h"

#include "TickTimer.h"

/* Definition of DATA and CODE segments for this bean. User can specify where

   these segments will be located on "Build options" tab of the selected CPU bean. */

#pragma DATA_SEG TickTimer_DATA        /* Data section for this module. */

#pragma CODE_SEG TickTimer_CODE        /* Code section for this module. */

static word CmpHighVal;                /* Compare register value for high speed CPU mode */

/*

** ===================================================================

**     Method      :  SetCV (bean TimerInt)

**

**     Description :

**         This method is internal. It is used by Processor Expert

**         only.

** ===================================================================

*/

static void SetCV(word Val)

{

  if (Val == 0)                        /* If the given value is zero */

    Val = 65535;                       /* then change it to the maximal one */

  TC0 = Val;                           /* Store given value to the compare register */

  TC7 = Val;                           /* Store given value to the modulo register */

}

/*

** ===================================================================

**     Method      :  SetPV (bean TimerInt)

**

**     Description :

**         This method is internal. It is used by Processor Expert

**         only.

** ===================================================================

*/

static void SetPV(byte Val)

{

  TSCR2_PR = Val;                      /* Store given value to the prescaler */

}

/*

** ===================================================================

**     Method      :  HWEnDi (bean TimerInt)

**

**     Description :

**         This method is internal. It is used by Processor Expert

**         only.

** ===================================================================

*/

static void HWEnDi(void)

{

    TFLG1 = 1;                         /* Reset interrupt request flag */

    TIE_C0I = 1;                       /* Enable interrupt */

}

/*

** ===================================================================

**     Method      :  TickTimer_Enable (bean TimerInt)

**

**     Description :

**         Enable the bean - it starts the timer. Events may be

**         generated ("DisableEvent"/"EnableEvent").

**     Parameters  : None

**     Returns     :

**         ---             - Error code, possible codes:

**                           ERR_OK - OK

**                           ERR_SPEED - This device does not work in

**                           the active speed mode

** ===================================================================

*/

byte TickTimer_Enable(void)

{

  HWEnDi();                            /* Enable the device */

  return ERR_OK;                       /* OK */

}

/*

** ===================================================================

**     Method      :  TickTimer_SetPeriodTicks16 (bean TimerInt)

**

**     Description :

**         This method sets the new period of the generated events.

**         The period is expressed in Xtal ticks as a 16-bit unsigned

**         integer number.

**         This method is available only if runtime setting type

**         'from interval' is selected in the Timing dialog box in

**         Runtime setting area.

**     Parameters  :

**         NAME            - DESCRIPTION

**         Ticks           - Period to set [in Xtal ticks]

**                      (16000 to 65535 ticks)

**     Returns     :

**         ---             - Error code, possible codes:

**                           ERR_OK - OK

**                           ERR_SPEED - This device does not work in

**                           the active speed mode

**                           ERR_MATH - Overflow during evaluation

**                           ERR_RANGE - Parameter out of range

** ===================================================================

*/

byte TickTimer_SetPeriodTicks16(word Ticks)

{

  dlong rtval;                         /* Result of two 32-bit numbers multiplication */

  word rtword;                         /* Result of 64-bit number division */

  if (Ticks < 16000)                   /* Is the given value out of range? */

    return ERR_RANGE;                  /* If yes then error */

  PE_Timer_LngMul((dword)Ticks,838592365,&rtval); /* Multiply given value and high speed CPU mode coefficient */

  if (PE_Timer_LngHi4(rtval[0],rtval[1],&rtword)) /* Is the result greater or equal than 65536 ? */

    rtword = 65535;                    /* If yes then use maximal possible value */

  CmpHighVal = rtword;                 /* Store result (compare register value for high speed CPU mode) to the variable CmpHighVal */

  SetCV(CmpHighVal);                   /* Store appropriate value to the compare register according to the selected high speed CPU mode */

  return ERR_OK;                       /* OK */

}

/*

** ===================================================================

**     Method      :  TickTimer_SetPeriodTicks32 (bean TimerInt)

**

**     Description :

**         This method sets the new period of the generated events.

**         The period is expressed in Xtal ticks as a 32-bit unsigned

**         integer number.

**         This method is available only if runtime setting type

**         'from interval' is selected in the Timing dialog box in

**         Runtime setting area.

**     Parameters  :

**         NAME            - DESCRIPTION

**         Ticks           - Period to set [in Xtal ticks]

**                      (16000 to 320000 ticks)

**     Returns     :

**         ---             - Error code, possible codes:

**                           ERR_OK - OK

**                           ERR_SPEED - This device does not work in

**                           the active speed mode

**                           ERR_MATH - Overflow during evaluation

**                           ERR_RANGE - Parameter out of range

** ===================================================================

*/

byte TickTimer_SetPeriodTicks32(dword Ticks)

{

  dlong rtval;                         /* Result of two 32-bit numbers multiplication */

  word rtword;                         /* Result of 64-bit number division */

  if ((Ticks > 320000) || (Ticks < 16000)) /* Is the given value out of range? */

    return ERR_RANGE;                  /* Range error */

  PE_Timer_LngMul(Ticks,838592365,&rtval); /* Multiply given value and high speed CPU mode coefficient */

  if (PE_Timer_LngHi4(rtval[0],rtval[1],&rtword)) /* Is the result greater or equal than 65536 ? */

    rtword = 65535;                    /* If yes then use maximal possible value */

  CmpHighVal = rtword;                 /* Store result (compare register value for high speed CPU mode) to the variable CmpHighVal */

  SetCV(CmpHighVal);                   /* Store appropriate value to the compare register according to the selected high speed CPU mode */

  return ERR_OK;                       /* OK */

}

/*

** ===================================================================

**     Method      :  TickTimer_SetPeriodUS (bean TimerInt)

**

**     Description :

**         This method sets the new period of the generated events.

**         The period is expressed in microseconds as a 16-bit

**         unsigned integer number.

**         This method is available only if runtime setting type

**         'from interval' is selected in the Timing dialog box in

**         Runtime setting area.

**     Parameters  :

**         NAME            - DESCRIPTION

**         Time            - Period to set [in microseconds]

**                      (1000 to 20000 microseconds)

**     Returns     :

**         ---             - Error code, possible codes:

**                           ERR_OK - OK

**                           ERR_SPEED - This device does not work in

**                           the active speed mode

**                           ERR_MATH - Overflow during evaluation

**                           ERR_RANGE - Parameter out of range

** ===================================================================

*/

byte TickTimer_SetPeriodUS(word Time)

{

  dlong rtval;                         /* Result of two 32-bit numbers multiplication */

  word rtword;                         /* Result of 64-bit number division */

  if ((Time > 20000) || (Time < 1000)) /* Is the given value out of range? */

    return ERR_RANGE;                  /* If yes then error */

  PE_Timer_LngMul((dword)Time,52412023,&rtval); /* Multiply given value and high speed CPU mode coefficient */

  if (PE_Timer_LngHi3(rtval[0],rtval[1],&rtword)) /* Is the result greater or equal than 65536 ? */

    rtword = 65535;                    /* If yes then use maximal possible value */

  CmpHighVal = rtword;                 /* Store result (compare register value for high speed CPU mode) to the variable CmpHighVal */

  SetCV(CmpHighVal);                   /* Store appropriate value to the compare register according to the selected high speed CPU mode */

  return ERR_OK;                       /* OK */

}

/*

** ===================================================================

**     Method      :  TickTimer_SetPeriodMS (bean TimerInt)

**

**     Description :

**         This method sets the new period of the generated events.

**         The period is expressed in miliseconds as a 16-bit

**         unsigned integer number.

**         This method is available only if runtime setting type

**         'from interval' is selected in the Timing dialog box in

**         Runtime setting area.

**     Parameters  :

**         NAME            - DESCRIPTION

**         Time            - Period to set [in miliseconds]

**                      (1 to 20 milliseconds)

**     Returns     :

**         ---             - Error code, possible codes:

**                           ERR_OK - OK

**                           ERR_SPEED - This device does not work in

**                           the active speed mode

**                           ERR_MATH - Overflow during evaluation

**                           ERR_RANGE - Parameter out of range

** ===================================================================

*/

byte TickTimer_SetPeriodMS(word Time)

{

  dlong rtval;                         /* Result of two 32-bit numbers multiplication */

  word rtword;                         /* Result of 64-bit number division */

  if ((Time > 20) || (Time < 1))       /* Is the given value out of range? */

    return ERR_RANGE;                  /* If yes then error */

  PE_Timer_LngMul((dword)Time,204734464,&rtval); /* Multiply given value and high speed CPU mode coefficient */

  if (PE_Timer_LngHi2(rtval[0],rtval[1],&rtword)) /* Is the result greater or equal than 65536 ? */

    rtword = 65535;                    /* If yes then use maximal possible value */

  CmpHighVal = rtword;                 /* Store result (compare register value for high speed CPU mode) to the variable CmpHighVal */

  SetCV(CmpHighVal);                   /* Store appropriate value to the compare register according to the selected high speed CPU mode */

  return ERR_OK;                       /* OK */

}

/*

** ===================================================================

**     Method      :  TickTimer_SetFreqHz (bean TimerInt)

**

**     Description :

**         This method sets the new frequency of the generated

**         events. The frequency is expressed in Hz as a 16-bit

**         unsigned integer number.

**         This method is available only if runtime setting type

**         'from interval' is selected in the Timing dialog box in

**         Runtime setting area.

**     Parameters  :

**         NAME            - DESCRIPTION

**         Freq            - Frequency to set [in Hz]

**                      (50 to 1000 Hz)

**     Returns     :

**         ---             - Error code, possible codes:

**                           ERR_OK - OK

**                           ERR_SPEED - This device does not work in

**                           the active speed mode

**                           ERR_MATH - Overflow during evaluation

**                           ERR_RANGE - Parameter out of range

** ===================================================================

*/

byte TickTimer_SetFreqHz(word Freq)

{

  dlong rtval;                         /* Result of two 32-bit numbers division */

  word rtword;                         /* Result of 64-bit number division */

  if ((Freq > 1000) || (Freq < 50))    /* Is the given value out of range? */

    return ERR_RANGE;                  /* If yes then error */

  rtval[1] = 799744000 / (dword)Freq;  /* Divide high speed CPU mode coefficient by the given value */

  rtval[0] = 0;                        /* Convert result to the type dlong */

  if (PE_Timer_LngHi1(rtval[0],rtval[1],&rtword)) /* Is the result greater or equal than 65536 ? */

    rtword = 65535;                    /* If yes then use maximal possible value */

  CmpHighVal = rtword;                 /* Store result (compare register value for high speed CPU mode) to the variable CmpHighVal */

  SetCV(CmpHighVal);                   /* Store appropriate value to the compare register according to the selected high speed CPU mode */

  return ERR_OK;                       /* OK */

}

/*

** ===================================================================

**     Method      :  TickTimer_Init (bean TimerInt)

**

**     Description :

**         This method is internal. It is used by Processor Expert

**         only.

** ===================================================================

*/

void TickTimer_Init(void)

{

  CmpHighVal = 3124;                   /* Compare register value for high speed CPU mode */

  SetCV(CmpHighVal);                   /* Store appropriate value to the compare register according to the selected high speed CPU mode */

  SetPV(3);                            /* Set prescaler register according to the selected high speed CPU mode */

  HWEnDi();                            /* Enable/disable device according to status flags */

}

/*

** ===================================================================

**     Method      :  TickTimer_Interrupt (bean TimerInt)

**

**     Description :

**         This method is internal. It is used by Processor Expert

**         only.

** ===================================================================

*/

#pragma CODE_SEG __NEAR_SEG NON_BANKED /* Interrupt section for this module. Placement will be in NON_BANKED area. */

__interrupt void TickTimer_Interrupt(void)

{

  TFLG1 = 1;                           /* Reset interrupt request flag */

  TickTimer_OnInterrupt();             /* Invoke user event */

}

#pragma CODE_SEG TickTimer_CODE        /* Code section for this module. */

/* END TickTimer. */

/*

** ###################################################################

**

**     This file was created by UNIS Processor Expert 03.33 for

**     the Motorola HCS12 series of microcontrollers.

**

** ###################################################################

*/