This repository has been archived on 2023-11-05. You can view files and clone it, but cannot push or open issues or pull requests.
FreeRTOS-Kernel/Demo/PIC18_WizC/ParTest/ParTest.c

147 lines
5.3 KiB
C
Raw Normal View History

2006-05-02 17:39:15 +08:00
/*
FreeRTOS V6.1.0 - Copyright (C) 2010 Real Time Engineers Ltd.
2006-05-02 17:39:15 +08:00
2009-10-13 19:05:41 +08:00
***************************************************************************
* *
* If you are: *
* *
* + New to FreeRTOS, *
* + Wanting to learn FreeRTOS or multitasking in general quickly *
* + Looking for basic training, *
* + Wanting to improve your FreeRTOS skills and productivity *
* *
* then take a look at the FreeRTOS books - available as PDF or paperback *
2009-10-13 19:05:41 +08:00
* *
* "Using the FreeRTOS Real Time Kernel - a Practical Guide" *
* http://www.FreeRTOS.org/Documentation *
* *
* A pdf reference manual is also available. Both are usually delivered *
* to your inbox within 20 minutes to two hours when purchased between 8am *
* and 8pm GMT (although please allow up to 24 hours in case of *
* exceptional circumstances). Thank you for your support! *
* *
***************************************************************************
This file is part of the FreeRTOS distribution.
2006-05-02 17:39:15 +08:00
2009-10-13 19:05:41 +08:00
FreeRTOS is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License (version 2) as published by the
2009-10-13 19:05:41 +08:00
Free Software Foundation AND MODIFIED BY the FreeRTOS exception.
***NOTE*** The exception to the GPL is included to allow you to distribute
a combined work that includes FreeRTOS without being obliged to provide the
source code for proprietary components outside of the FreeRTOS kernel.
2009-10-13 19:05:41 +08:00
FreeRTOS is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
2009-10-13 19:05:41 +08:00
more details. You should have received a copy of the GNU General Public
License and the FreeRTOS license exception along with FreeRTOS; if not it
can be viewed here: http://www.freertos.org/a00114.html and also obtained
by writing to Richard Barry, contact details for whom are available on the
FreeRTOS WEB site.
2009-03-15 03:20:12 +08:00
1 tab == 4 spaces!
2007-04-02 04:47:49 +08:00
http://www.FreeRTOS.org - Documentation, latest information, license and
contact details.
2008-02-04 03:45:58 +08:00
http://www.SafeRTOS.com - A version that is certified for use in safety
critical systems.
2008-02-04 03:45:58 +08:00
http://www.OpenRTOS.com - Commercial support, development, porting,
licensing and training services.
2006-05-02 17:39:15 +08:00
*/
/*
Changes from V3.0.0
Changes from V3.0.1
*/
/* Scheduler include files. */
#include "FreeRTOS.h"
#include <task.h>
#include "partest.h"
/*-----------------------------------------------------------
* Simple parallel port IO routines for the FED 40pin demo board.
* The four LED's are connected to D4 to D7.
*-----------------------------------------------------------*/
#define partstBIT_AS_OUTPUT ( ( unsigned short ) 0 )
#define partstSET_OUTPUT ( ( unsigned short ) 1 )
#define partstCLEAR_OUTPUT ( ( unsigned short ) 0 )
2006-05-02 17:39:15 +08:00
#define partstENABLE_GENERAL_IO ( ( unsigned char ) 7 )
2006-05-02 17:39:15 +08:00
/*-----------------------------------------------------------*/
void vParTestInitialise( void )
{
/* Set the top four bits of port D to output. */
bTRD7 = partstBIT_AS_OUTPUT;
bTRD6 = partstBIT_AS_OUTPUT;
bTRD5 = partstBIT_AS_OUTPUT;
bTRD4 = partstBIT_AS_OUTPUT;
/* Start with all bits off. */
bRD7 = partstCLEAR_OUTPUT;
bRD6 = partstCLEAR_OUTPUT;
bRD5 = partstCLEAR_OUTPUT;
bRD4 = partstCLEAR_OUTPUT;
/* Enable the driver. */
ADCON1 = partstENABLE_GENERAL_IO;
bTRE2 = partstBIT_AS_OUTPUT;
bRE2 = partstSET_OUTPUT;
}
/*-----------------------------------------------------------*/
void vParTestSetLED( unsigned char ucLED, char cValue )
2006-05-02 17:39:15 +08:00
{
/* We are only using the top nibble, so LED 0 corresponds to bit 4. */
vTaskSuspendAll();
{
switch( ucLED )
{
case 3 : bRD7 = ( short ) cValue;
2006-05-02 17:39:15 +08:00
break;
case 2 : bRD6 = ( short ) cValue;
2006-05-02 17:39:15 +08:00
break;
case 1 : bRD5 = ( short ) cValue;
2006-05-02 17:39:15 +08:00
break;
case 0 : bRD4 = ( short ) cValue;
2006-05-02 17:39:15 +08:00
break;
default : /* There are only 4 LED's. */
break;
}
}
xTaskResumeAll();
}
/*-----------------------------------------------------------*/
void vParTestToggleLED( unsigned char ucLED )
2006-05-02 17:39:15 +08:00
{
/* We are only using the top nibble, so LED 0 corresponds to bit 4. */
vTaskSuspendAll();
{
switch( ucLED )
{
case 3 : bRD7 = !bRD7;
break;
case 2 : bRD6 = !bRD6;
break;
case 1 : bRD5 = !bRD5;
break;
case 0 : bRD4 = !bRD4 );
break;
default : /* There are only 4 LED's. */
break;
}
}
xTaskResumeAll();
}