r591io.c

Canopen 最小实现源码, 只支持最小的CANOPEN功能

/**************************************************************************
NAME:    r591io.c                                                    
INFO:    In/Out module for the PHYTEC training board equipped with   
         PHYTEC phyCORE 591 and Philips P8x591 Microcontroller       
RIGHTS:  Embedded Systems Academy   www.esacademy.com                
---------------------------------------------------------------------------
HISTORY: V1.02    AA    17-OCT-2003 Clean up
         V1.01    Pf    07-OCT-2002 For MCO, changed include file    
         V1.00    Pf    21-FEB-2000                                  
         $LastChangedDate: 2005-01-12 12:04:36 -0700 (Wed, 12 Jan 2005) $
         $LastChangedRevision: 45 $
**************************************************************************/

#include <reg591.h>
#include "mco.h"

#define ADDR_DIP_INPUT_PORT 0xFF80
#define ADDR_INPUT_PORT     0xFFA0
#define ADDR_OUTPUT_PORT    0xFFA0

/*-------------------------- LOCAL DATA --------------------------------*/

// D1 used to display analog value?
UNSIGNED8 D1InUse = 0;
// reload values for ON and OFF
UNSIGNED16 T0VALON, T0VALOFF;
// LED 1 = ON, 0 = OFF
UNSIGNED8 statusD1;
// pointer to address of ext. Port D
char xdata *pPD;

/*----------------------- GLOBAL SUBROUTINES ---------------------------*/

/**************************************************************************
DOES:    Reading the status of push button S1 or S2               
RETURNS: 0, if button SX is not pushed down                       
         0xFF, if button is pushed down                           
**************************************************************************/
UNSIGNED8 check_button
  (
  UNSIGNED8 Sx  // 1 or 2 for reading button S1 or S2
  )
{
  UNSIGNED8  button;

  // set pointer to external port address
  pPD = (char xdata *)ADDR_INPUT_PORT;

  // read external port
  button = *pPD & Sx;

  if (button == 0)
    return (0);
  else
    return (0xFF);
}

/**************************************************************************
DOES:    Read the settings of the 8 DIP switches S5               
RETURNS: Current value of the DIP switches S5                     
**************************************************************************/
UNSIGNED8 read_dip_switches
  (
  void
  )
{
  // pointer to address of ext. Port D
  char xdata *loc_pPD;

  // set pointer to external port address
  loc_pPD = (char xdata *)ADDR_DIP_INPUT_PORT;
  return (*loc_pPD);
}

/**************************************************************************
DOES:    Read an analog input value at P1.2 - Potentiometer       
CAUTION: Starts a A/D conversion and WAITS until it is completed  
RETURNS: Current value of the DIP switches S5                     
**************************************************************************/
UNSIGNED8 read_poti
  (
  void
  )
{
  int poti;

  // select POTI on P1.2
  ADCON &= 0xF8;
  // set ADCS to start conversion
  ADCON |= 0x08;
  // wait for int flag
  while(!(ADCON == (ADCON | 0x10)));
  // clear int flag
  ADCON &= 0xEF;
  poti = (0xFF - ADCH);
  // return 0 - 100
  return (poti);
}

/**************************************************************************
DOES:    Switches LED D1 and D2 on or off                         
         Will not use LED D1 if init_timer0_dim_d1 was called     
RETURNS: none                                                     
**************************************************************************/
void switch_leds
  (
  UNSIGNED8 on_off  // 0 switches both LEDs off,
               // 1 switches LED D1 on, D2 off
               // 2 switches LED D1 off, D2 on
               // 3 switches both LEDs on 
  )
{
  // set pointer to external port address
  pPD = (char xdata *)ADDR_INPUT_PORT;
  if (D1InUse)
  {
    on_off &= 2;
    if (on_off > 0)
      *pPD |= 0x20;
    else
      *pPD &= 0xDF;
  }
  else
  {
    // write to external port
    *pPD = (on_off << 4);
  }
}

/**************************************************************************
DOES:    If a program discovers a fatal error, this routine can   
         be used to display an error code to the user.            
         THIS FUNCTION NEVER RETURNS! ONLY A RESET WILL RECOVER   
         THE BOARD!
RETURNS: none                                                     
**************************************************************************/
void error_state
  (
  UNSIGNED8 error  // Error value to be displayed on both LEDs as a blinking
              // pattern. Only values from 1-12 can be "reasonably"
              // recognized by counting the "blinks"
  )
{
  UNSIGNED16 i,j;

  // disable all interrupts
  EA = 0;
  while (1)
  {
    for (j = 1; j <= error; j++)
    {
      for (i = 0; i <= 20000; i++)
        // both LEDs on
        switch_leds(0x03);
      for (i = 0; i <= 20000; i++)
        // both LEDs off
        switch_leds(0x00);
    }
    for (i = 0; i <= 50000; i++)
      // both LEDs off
      switch_leds(0x00);
  }
}