Subversion Repositories NaviCtrl

Rev

Rev 70 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 ingob 1
/*#######################################################################################*/
2
/* !!! THIS IS NOT FREE SOFTWARE !!!                                                     */
3
/*#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
5
// + Copyright (c) 2008 Ingo Busker, Holger Buss
171 ingob 6
// + Nur für den privaten Gebrauch / NON-COMMERCIAL USE ONLY
1 ingob 7
// + FOR NON COMMERCIAL USE ONLY
8
// + www.MikroKopter.com
9
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
41 ingob 10
// + Es gilt für das gesamte Projekt (Hardware, Software, Binärfiles, Sourcecode und Dokumentation),
11
// + dass eine Nutzung (auch auszugsweise) nur für den privaten (nicht-kommerziellen) Gebrauch zulässig ist.
12
// + Sollten direkte oder indirekte kommerzielle Absichten verfolgt werden, ist mit uns (info@mikrokopter.de) Kontakt
13
// + bzgl. der Nutzungsbedingungen aufzunehmen.
1 ingob 14
// + Eine kommerzielle Nutzung ist z.B.Verkauf von MikroKoptern, Bestückung und Verkauf von Platinen oder Bausätzen,
15
// + Verkauf von Luftbildaufnahmen, usw.
16
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
41 ingob 17
// + Werden Teile des Quellcodes (mit oder ohne Modifikation) weiterverwendet oder veröffentlicht,
1 ingob 18
// + unterliegen sie auch diesen Nutzungsbedingungen und diese Nutzungsbedingungen incl. Copyright müssen dann beiliegen
19
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
20
// + Sollte die Software (auch auszugesweise) oder sonstige Informationen des MikroKopter-Projekts
21
// + auf anderen Webseiten oder sonstigen Medien veröffentlicht werden, muss unsere Webseite "http://www.mikrokopter.de"
22
// + eindeutig als Ursprung verlinkt werden
23
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
24
// + Keine Gewähr auf Fehlerfreiheit, Vollständigkeit oder Funktion
25
// + Benutzung auf eigene Gefahr
26
// + Wir übernehmen keinerlei Haftung für direkte oder indirekte Personen- oder Sachschäden
27
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
171 ingob 28
// + Die Portierung oder Nutzung der Software (oder Teile davon) auf andere Systeme (ausser der Hardware von www.mikrokopter.de) ist nur
1 ingob 29
// + mit unserer Zustimmung zulässig
30
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
31
// + Die Funktion printf_P() unterliegt ihrer eigenen Lizenz und ist hiervon nicht betroffen
32
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
41 ingob 33
// + Redistributions of source code (with or without modifications) must retain the above copyright notice,
1 ingob 34
// + this list of conditions and the following disclaimer.
35
// +   * Neither the name of the copyright holders nor the names of contributors may be used to endorse or promote products derived
36
// +     from this software without specific prior written permission.
41 ingob 37
// +   * The use of this project (hardware, software, binary files, sources and documentation) is only permitted
1 ingob 38
// +     for non-commercial use (directly or indirectly)
41 ingob 39
// +     Commercial use (for excample: selling of MikroKopters, selling of PCBs, assembly, ...) is only permitted
1 ingob 40
// +     with our written permission
41 ingob 41
// +   * If sources or documentations are redistributet on other webpages, out webpage (http://www.MikroKopter.de) must be
42
// +     clearly linked as origin
171 ingob 43
// +   * porting the sources to other systems or using the software on other systems (except hardware from www.mikrokopter.de) is not allowed
1 ingob 44
//
45
// +  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
46
// +  AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
47
// +  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
48
// +  ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
49
// +  LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
50
// +  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
51
// +  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
52
// +  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
53
// +  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
54
// +  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 ingob 55
// +  POSSIBILITY OF SUCH DAMAGE.
1 ingob 56
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
41 ingob 57
#include "91x_lib.h"
58
#include "timer.h"
59
#include "uart1.h"
1 ingob 60
 
61
u32 CountMilliseconds;
41 ingob 62
DateTime_t SystemTime;
1 ingob 63
 
64
//----------------------------------------------------------------------------------------------------
65
void TIM1_IRQHandler(void)
41 ingob 66
{
60 killagreg 67
        if(TIM_GetFlagStatus(TIM1, TIM_FLAG_OC1) == SET)
68
        {
69
                TIM1->OC1R += 200;    // Timerfreq is 200kHz, generate an interrupt every 1ms
70
                CountMilliseconds++;
71
                //if (GPIO_ReadBit(GPIO6, GPIO_Pin_3)) GPIO_WriteBit(GPIO6, GPIO_Pin_3, Bit_RESET);  else GPIO_WriteBit(GPIO6, GPIO_Pin_3, Bit_SET);
72
                TIM_ClearFlag(TIM1, TIM_FLAG_OC1); // clear irq pending bit
73
        }
41 ingob 74
        // write any value to VIC0 Vector address register
75
        VIC0->VAR = 0xFF;
1 ingob 76
}
77
 
78
//----------------------------------------------------------------------------------------------------
79
// 1ms Timer
80
//----------------------------------------------------------------------------------------------------
81
void TIMER1_Init(void)
82
{
41 ingob 83
        TIM_InitTypeDef   TIM_InitStructure;
1 ingob 84
 
41 ingob 85
        SerialPutString("Timer init...");
1 ingob 86
 
41 ingob 87
        #define TIM1_FREQ 200000 // 200kHz
88
        // TimerOCR set in IntHandler
1 ingob 89
 
41 ingob 90
        SCU_APBPeriphClockConfig(__TIM01, ENABLE);
1 ingob 91
 
41 ingob 92
        TIM_StructInit(&TIM_InitStructure);
93
        TIM_InitStructure.TIM_Mode = TIM_OCM_CHANNEL_1;
94
        TIM_InitStructure.TIM_OC1_Modes = TIM_TIMING;
95
        TIM_InitStructure.TIM_Clock_Source = TIM_CLK_APB;
96
        TIM_InitStructure.TIM_Prescaler = (SCU_GetPCLKFreqValue() * 1000) / TIM1_FREQ;  // is only valid up to 48 MHz !
97
        TIM_Init (TIM1, &TIM_InitStructure);
1 ingob 98
 
41 ingob 99
        TIM_ITConfig(TIM1, TIM_IT_OC1, ENABLE);
100
        TIM_CounterCmd(TIM1, TIM_START);
101
 
102
        VIC_Config(TIM1_ITLine, VIC_IRQ, 5);
103
        VIC_ITCmd(TIM1_ITLine, ENABLE);
60 killagreg 104
 
41 ingob 105
        SystemTime.Year = 0;
106
        SystemTime.Month = 0;
107
        SystemTime.Day = 0;
108
        SystemTime.Hour = 0;
109
        SystemTime.Min = 0;
110
        SystemTime.Sec = 0;
111
        SystemTime.mSec = 0;
112
        SystemTime.Valid = 0;
113
 
114
        CountMilliseconds = 0;
115
 
116
        SerialPutString("ok\n\r");
117
 
1 ingob 118
}
119
 
120
// -----------------------------------------------------------------------
121
u32 SetDelay (u32 t)
122
{
41 ingob 123
        return(CountMilliseconds + t -1);
1 ingob 124
}
125
 
126
// -----------------------------------------------------------------------
127
u8 CheckDelay(u32 t)
128
{
41 ingob 129
        return(((t - CountMilliseconds)& 0x80000000) >> 27);
1 ingob 130
}
131
 
132
// -----------------------------------------------------------------------
133
void Delay_ms(u32 w)
134
{
41 ingob 135
        static u32 akt;
136
        akt = SetDelay(w);
137
        while (!CheckDelay(akt));
1 ingob 138
}