forked from acco/chti23
Code DFT en c qui renvoie le module au carré
This commit is contained in:
parent
19fd7ae2d6
commit
fff4c2afea
11 changed files with 662 additions and 8 deletions
BIN
PjtKEIL_StepDFT.zip
Normal file
BIN
PjtKEIL_StepDFT.zip
Normal file
Binary file not shown.
345
PjtKEIL_StepDFT/Driver/DriverJeuLaser_1.h
Normal file
345
PjtKEIL_StepDFT/Driver/DriverJeuLaser_1.h
Normal file
|
|
@ -0,0 +1,345 @@
|
||||||
|
/**
|
||||||
|
* Bibliotheque DriverJeuLaser (ancienne gassp72 adaptée 2021 - TR)
|
||||||
|
*
|
||||||
|
* GPIO - ADC - Sequenceur - System Timer - PWM - 72 MHz
|
||||||
|
* Modifs :
|
||||||
|
* enlèvement de tout ce qui est inutile dans le .h
|
||||||
|
* ajout de fonctions GPIO dans le .c pour utilisation en ASM ou en C :
|
||||||
|
* - GPIOA_Set(char Broche), GPIOB_Set(char Broche), GPIOC_Set(char Broche)
|
||||||
|
* - GPIOA_Clear(char Broche), GPIOB_Clear(char Broche), GPIOC_Clear(char Broche)
|
||||||
|
*
|
||||||
|
* ajout d'une fonction qui impose une valeur de PWM (TIM3_CCR3)
|
||||||
|
* PWM_Set_Value_On_TIM3_C3( int Val)
|
||||||
|
* permet en ASM ou en C de fixer la valeur de PWM
|
||||||
|
|
||||||
|
* Ajout de commentaires
|
||||||
|
|
||||||
|
*/
|
||||||
|
#ifndef DRIVERJEULASER_H__
|
||||||
|
#define DRIVERJEULASER_H__
|
||||||
|
|
||||||
|
#include "stm32f10x.h"
|
||||||
|
|
||||||
|
//**********************************************************************************************************
|
||||||
|
//--------------------- CONFIGURATION CLOCK DU STM32 --------------------------------------
|
||||||
|
//**********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Configure l'ensemble des horloges du uC
|
||||||
|
* @note horloge systeme (config statique a 72 MHz pour le STM32F103)
|
||||||
|
* @param None
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void CLOCK_Configure(void);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//**********************************************************************************************************
|
||||||
|
//--------------------- LES TIMERS GENERAL PURPOSE TIM1 à TIM 4 ------------------------------
|
||||||
|
//**********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Configure un Timer TIM1 à TIM4 avec une périodicité donnée
|
||||||
|
* @note L' horloge des 4 timers a une fréquence de 72MHz
|
||||||
|
* @param *Timer = TIM1 ou TIM2 ou TIM3 ou TIM4
|
||||||
|
* @param Durée_ticks : nombre de pas (tick) comptés à 72 MHz pour faire déborder le timer
|
||||||
|
* La période de débordement du Timer est donc T = Durée_ticks * Tck, avec Tck = 1/72 000 000
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Timer_1234_Init_ff( TIM_TypeDef *Timer, u32 Duree_ticks );
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Macros de base pour utiliser les timers
|
||||||
|
*/
|
||||||
|
// bloque le timer
|
||||||
|
#define Bloque_Timer(Timer) Timer->CR1=(Timer->CR1)&~(1<<0)
|
||||||
|
// Lance timer
|
||||||
|
#define Run_Timer(Timer) Timer->CR1=(Timer->CR1)|(1<<0)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Associe une fonction d'interruption (callback) lors du débordement d'un timer
|
||||||
|
* @note
|
||||||
|
* @param *Timer = TIM1 ou TIM2 ou TIM3 ou TIM4
|
||||||
|
* @param Prio : niveau de priorité de l'interruption (0 -> priorité max, 15 -> priorité min)
|
||||||
|
* @param IT_function : le nom de la fonction Callback à appeler lors de l'interruption
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Active_IT_Debordement_Timer( TIM_TypeDef *Timer, char Prio, void (*IT_function)(void) );
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//*********************************************************************************************************
|
||||||
|
//--------------------- PWM TIM1 to TIM 4 ------------------------------
|
||||||
|
//*********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Configure un timer en PWM
|
||||||
|
* @note
|
||||||
|
* @param *Timer = TIM1 ou TIM2 ou TIM3 ou TIM4
|
||||||
|
* @param voie : un des 4 canaux possibles 1 à 4.
|
||||||
|
* @param Periode_ticks : nombre de pas (tick) comptés à 72 MHz pour faire déborder le timer
|
||||||
|
* La période de débordement du Timer est donc T = Durée_ticks * Tck, avec Tck = 1/72 000 000
|
||||||
|
* @retval Retourne la période en tick (normalement la même que le param d'entrée sauf si PSC utilisé
|
||||||
|
*/
|
||||||
|
unsigned short int PWM_Init_ff( TIM_TypeDef *Timer, char Voie, u32 Periode_ticks );
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Fixe une valeur de PWM, Val, en tick horloge. La rapport cyclique effectif
|
||||||
|
* est donc : rcy = Thaut_ticks / Periode_ticks
|
||||||
|
* @note spécifique Jeu Laser, PWM liée exclusivement au TIM3, chan3
|
||||||
|
* @param Thaut_ticks : durée de l'état haut d'une impulsion en Ticks
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void PWM_Set_Value_TIM3_Ch3( unsigned short int Thaut_ticks);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//**********************************************************************************************************
|
||||||
|
//--------------------- LE SYSTICK TIMER, Part of Cortex M3 ------------------------------
|
||||||
|
//**********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Configure le timer Systick avec une périodicité donnée
|
||||||
|
* @note Ce timer ne peut servir qu'à créer des temporisations ou générer des interruption
|
||||||
|
* ce n'est pas à proprement parler un périphérique, il fait partie du Cortex M3
|
||||||
|
* Ce timer est un 24 bits
|
||||||
|
* @param Periode_ticks : nombre de pas (tick) comptés à 72 MHz pour établir la périodicité
|
||||||
|
* La période de débordement du Timer est donc T = Durée_ticks * Tck, avec Tck = 1/72 000 000
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Systick_Period_ff( unsigned int Periode_ticks );
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Associe une fonction d'interruption (callback) lors du débordement du Systick
|
||||||
|
* @note
|
||||||
|
* @param Prio : niveau de priorité de l'interruption (0 -> priorité max, 15 -> priorité min)
|
||||||
|
* @param IT_function : le nom de la fonction Callback à appeler lors de l'interruption
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Systick_Prio_IT( char Prio, void (*Systick_function)(void) );
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Macros de base pour utiliser le Systick
|
||||||
|
*/
|
||||||
|
#define SysTick_On ((SysTick->CTRL)=(SysTick->CTRL)|1<<0)
|
||||||
|
#define SysTick_Off ((SysTick->CTRL)=(SysTick->CTRL)& ~(1<<0))
|
||||||
|
#define SysTick_Enable_IT ((SysTick->CTRL)=(SysTick->CTRL)|1<<1)
|
||||||
|
#define SysTick_Disable_IT ((SysTick->CTRL)=(SysTick->CTRL)& ~(1<<1))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//**********************************************************************************************************
|
||||||
|
//--------------------- LE SYSTICK TIMER, Part of Cortex M3 ------------------------------
|
||||||
|
//**********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Active l'ADC du STM32, configure la durée de prélèvement de l'échantillon (temps
|
||||||
|
* de fermeture du switch d'acquisition
|
||||||
|
* @note
|
||||||
|
* @param ADC : précise de quel ADC il s'agit, ADC1 ou ADC2
|
||||||
|
* @param Duree_Ech_ticks : dirée de fermeture du switch d'échantillonnage en Tick d'horloge CPU
|
||||||
|
* exemple pour 1µs on choisira 72.
|
||||||
|
* @retval Nombre de Tick réellement pris en compte
|
||||||
|
*/
|
||||||
|
unsigned int Init_TimingADC_ActiveADC_ff( ADC_TypeDef * ADC, u32 Duree_Ech_ticks );
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Sélectionne la voie à convertir
|
||||||
|
* @note Attention, la voie va de 0 à 15 et n'est pas directement lié au n°de GPIO
|
||||||
|
* @param ADC : précise de quel ADC il s'agit, ADC1 ou ADC2
|
||||||
|
* @param Voie_ADC : 1 à 15
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Single_Channel_ADC( ADC_TypeDef * ADC, char Voie_ADC );
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Permet lier le déclenchement au débordement d'un timer, spécifie également
|
||||||
|
* la période de débordement du timer
|
||||||
|
* @note pas besoin de régler le timer avec une autre fonction dédiée timer
|
||||||
|
* @param ADC : précise de quel ADC il s'agit, ADC1 ou ADC2
|
||||||
|
* @param Source : indique le timer qui déclenche l'ADC choix dans les define ci-dessous
|
||||||
|
* @param Periode_ticks : nombre de pas (tick) comptés à 72 MHz pour faire déborder le timer
|
||||||
|
* La période de débordement du Timer est donc T = Durée_ticks * Tck, avec Tck = 1/72 000 000
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
|
||||||
|
// param pour Source :
|
||||||
|
#define TIM1_CC1 0
|
||||||
|
#define TIM1_CC2 1
|
||||||
|
#define TIM1_CC3 2
|
||||||
|
#define TIM2_CC2 3
|
||||||
|
#define TIM4_CC4 5
|
||||||
|
void Init_Conversion_On_Trig_Timer_ff( ADC_TypeDef * ADC, char Source, u32 Periode_ticks );
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//**********************************************************************************************************
|
||||||
|
//--------------------- ANALOG INPUT ADC & DMA ------------------------------
|
||||||
|
//**********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Permer de lier l'ADC à un tableau en RAM pour une DMA
|
||||||
|
* @note
|
||||||
|
* @param Circ : circular. Si '0', en fin de DMA le ptr d'@ reste inchangé
|
||||||
|
* si '1' le ptr d'@ se recale à celle du début.
|
||||||
|
* @param Ptr_Table_DMA : contient l'@ de début de zone RAM à écrire
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Init_ADC1_DMA1(char Circ, short int *Ptr_Table_DMA);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Lance une DMA sur le nombre de points spécifie. Les resultats seront stockes
|
||||||
|
* dans la zone de RAM écrite est indiquée lors de l'appel de la fonction Init_ADC1_DMA1
|
||||||
|
* @note
|
||||||
|
* @param NbEchDMA est le nombre d'échantillons à stocker.
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Start_DMA1( u16 NbEchDMA );
|
||||||
|
|
||||||
|
// arret DMA
|
||||||
|
#define Stop_DMA1 DMA1_Channel1->CCR =(DMA1_Channel1->CCR) &~0x1;
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Attend la fin d'un cycle de DMA. la duree depend de la periode d'acquisition
|
||||||
|
* et du nombre d'echantillons
|
||||||
|
* @note fonction d'attente (bloquante)
|
||||||
|
* @param None
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
void Wait_On_End_Of_DMA1(void);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
//**********************************************************************************************************
|
||||||
|
//--------------------- GPIO ------------------------------
|
||||||
|
//**********************************************************************************************************
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Initialisation d'un GPIO (A à C), pin x.
|
||||||
|
* peut être configuré :
|
||||||
|
* -> Input ou output
|
||||||
|
* -> architecture technologique (push-pull, open drain...)
|
||||||
|
|
||||||
|
* @note
|
||||||
|
* @param Port : GPIOA, GPIOB, GPIOC
|
||||||
|
* @param Broche : 0 à 15
|
||||||
|
* @param Sens : INPUT ou OUTPUT
|
||||||
|
* @param Techno : voir define ci dessous
|
||||||
|
* @retval 1 erreur, 0 si OK
|
||||||
|
*/
|
||||||
|
|
||||||
|
// Sens
|
||||||
|
#define INPUT 'i'
|
||||||
|
#define OUTPUT 'o'
|
||||||
|
|
||||||
|
// Techno pour pin en entrée (INPUT)
|
||||||
|
#define ANALOG 0
|
||||||
|
#define INPUT_FLOATING 1
|
||||||
|
#define INPUT_PULL_DOWN_UP 2
|
||||||
|
|
||||||
|
// Techno pour pin en sortie (OUTPUT)
|
||||||
|
#define OUTPUT_PPULL 0
|
||||||
|
#define OUTPUT_OPDRAIN 1
|
||||||
|
#define ALT_PPULL 2
|
||||||
|
#define ALT_OPDRAIN 3
|
||||||
|
|
||||||
|
// Exemple :
|
||||||
|
// Port_IO_Init(GPIOB, 8, OUTPUT, OUTPUT_PPULL);
|
||||||
|
// Place le bit 8 du port B en sortie Push-pull
|
||||||
|
char GPIO_Configure(GPIO_TypeDef * Port, int Broche, int Sens, int Techno);
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Mise à 1 d'une broche GPIO
|
||||||
|
* @note Une fonction par GPIO
|
||||||
|
* @param Broche : 0 à 15
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
|
||||||
|
void GPIOA_Set(char Broche);
|
||||||
|
void GPIOB_Set(char Broche);
|
||||||
|
void GPIOC_Set(char Broche);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @brief Mise à 0 d'une broche GPIO
|
||||||
|
* @note Une fonction par GPIO
|
||||||
|
* @param Broche : 0 à 15
|
||||||
|
* @retval None
|
||||||
|
*/
|
||||||
|
|
||||||
|
void GPIOA_Clear(char Broche);
|
||||||
|
void GPIOB_Clear(char Broche);
|
||||||
|
void GPIOC_Clear(char Broche);
|
||||||
|
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
||||||
|
|
||||||
56
PjtKEIL_StepDFT/Driver/DriverJeuLaser_1.inc
Normal file
56
PjtKEIL_StepDFT/Driver/DriverJeuLaser_1.inc
Normal file
|
|
@ -0,0 +1,56 @@
|
||||||
|
|
||||||
|
; Bibliotheque DriverJeuLaser (ancienne gassp72 adaptée 2021 - TR)
|
||||||
|
; Accès en aux fonctions suivantes :
|
||||||
|
; GPIO :
|
||||||
|
; GPIOA_Set(char Broche), GPIOB_Set(char Broche), GPIOC_Set(char Broche)
|
||||||
|
; GPIOA_Clear(char Broche), GPIOB_Clear(char Broche), GPIOC_Clear(char Broche)
|
||||||
|
|
||||||
|
; PWM :
|
||||||
|
;/**
|
||||||
|
; * @brief Fixe une valeur de PWM, Val, en tick horloge. La rapport cyclique effectif
|
||||||
|
; * est donc : rcy = Thaut_ticks / Periode_ticks
|
||||||
|
; * @note spécifique Jeu Laser, PWM liée exclusivement au TIM3, chan3
|
||||||
|
; * @param Thaut_ticks : durée de l'état haut d'une impulsion en Ticks
|
||||||
|
; * @retval None
|
||||||
|
; */
|
||||||
|
|
||||||
|
;void PWM_Set_Value_TIM3_Ch3( unsigned short int Thaut_ticks);
|
||||||
|
import PWM_Set_Value_TIM3_Ch3
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;/**
|
||||||
|
; * @brief Mise à 1 d'une broche GPIO
|
||||||
|
; * @note Une fonction par GPIO
|
||||||
|
; * @param Broche : 0 à 15
|
||||||
|
; * @retval None
|
||||||
|
; */
|
||||||
|
|
||||||
|
;void GPIOA_Set(char Broche);
|
||||||
|
import GPIOA_Set
|
||||||
|
|
||||||
|
;void GPIOB_Set(char Broche);
|
||||||
|
import GPIOB_Set
|
||||||
|
|
||||||
|
;void GPIOC_Set(char Broche);
|
||||||
|
import GPIOC_Set
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;/**
|
||||||
|
; * @brief Mise à 0 d'une broche GPIO
|
||||||
|
; * @note Une fonction par GPIO
|
||||||
|
; * @param Broche : 0 à 15
|
||||||
|
; * @retval None
|
||||||
|
; */
|
||||||
|
|
||||||
|
;void GPIOA_Clear(char Broche);
|
||||||
|
import GPIOA_Clear
|
||||||
|
|
||||||
|
;void GPIOB_Clear(char Broche);
|
||||||
|
import GPIOB_Clear
|
||||||
|
|
||||||
|
;void GPIOC_Clear(char Broche);
|
||||||
|
import GPIOC_Clear
|
||||||
|
|
||||||
|
end
|
||||||
68
PjtKEIL_StepDFT/Obj/Signal.asm
Normal file
68
PjtKEIL_StepDFT/Obj/Signal.asm
Normal file
|
|
@ -0,0 +1,68 @@
|
||||||
|
AREA Signal, DATA, READONLY
|
||||||
|
export LeSignal
|
||||||
|
LeSignal
|
||||||
|
DCW 0x0fff ; 0 4095 0.99976
|
||||||
|
DCW 0x0737 ; 1 1847 0.45093
|
||||||
|
DCW 0x0027 ; 2 39 0.00952
|
||||||
|
DCW 0x0a53 ; 3 2643 0.64526
|
||||||
|
DCW 0x0f64 ; 4 3940 0.96191
|
||||||
|
DCW 0x043b ; 5 1083 0.26440
|
||||||
|
DCW 0x0159 ; 6 345 0.08423
|
||||||
|
DCW 0x0d13 ; 7 3347 0.81714
|
||||||
|
DCW 0x0da8 ; 8 3496 0.85352
|
||||||
|
DCW 0x01d1 ; 9 465 0.11353
|
||||||
|
DCW 0x038e ; 10 910 0.22217
|
||||||
|
DCW 0x0f0e ; 11 3854 0.94092
|
||||||
|
DCW 0x0b10 ; 12 2832 0.69141
|
||||||
|
DCW 0x0058 ; 13 88 0.02148
|
||||||
|
DCW 0x0670 ; 14 1648 0.40234
|
||||||
|
DCW 0x0ff6 ; 15 4086 0.99756
|
||||||
|
DCW 0x0800 ; 16 2048 0.50000
|
||||||
|
DCW 0x000a ; 17 10 0.00244
|
||||||
|
DCW 0x0990 ; 18 2448 0.59766
|
||||||
|
DCW 0x0fa8 ; 19 4008 0.97852
|
||||||
|
DCW 0x04f0 ; 20 1264 0.30859
|
||||||
|
DCW 0x00f2 ; 21 242 0.05908
|
||||||
|
DCW 0x0c72 ; 22 3186 0.77783
|
||||||
|
DCW 0x0e2f ; 23 3631 0.88647
|
||||||
|
DCW 0x0258 ; 24 600 0.14648
|
||||||
|
DCW 0x02ed ; 25 749 0.18286
|
||||||
|
DCW 0x0ea7 ; 26 3751 0.91577
|
||||||
|
DCW 0x0bc5 ; 27 3013 0.73560
|
||||||
|
DCW 0x009c ; 28 156 0.03809
|
||||||
|
DCW 0x05ad ; 29 1453 0.35474
|
||||||
|
DCW 0x0fd9 ; 30 4057 0.99048
|
||||||
|
DCW 0x08c9 ; 31 2249 0.54907
|
||||||
|
DCW 0x0000 ; 32 0 0.00000
|
||||||
|
DCW 0x08c9 ; 33 2249 0.54907
|
||||||
|
DCW 0x0fd9 ; 34 4057 0.99048
|
||||||
|
DCW 0x05ad ; 35 1453 0.35474
|
||||||
|
DCW 0x009c ; 36 156 0.03809
|
||||||
|
DCW 0x0bc5 ; 37 3013 0.73560
|
||||||
|
DCW 0x0ea7 ; 38 3751 0.91577
|
||||||
|
DCW 0x02ed ; 39 749 0.18286
|
||||||
|
DCW 0x0258 ; 40 600 0.14648
|
||||||
|
DCW 0x0e2f ; 41 3631 0.88647
|
||||||
|
DCW 0x0c72 ; 42 3186 0.77783
|
||||||
|
DCW 0x00f2 ; 43 242 0.05908
|
||||||
|
DCW 0x04f0 ; 44 1264 0.30859
|
||||||
|
DCW 0x0fa8 ; 45 4008 0.97852
|
||||||
|
DCW 0x0990 ; 46 2448 0.59766
|
||||||
|
DCW 0x000a ; 47 10 0.00244
|
||||||
|
DCW 0x0800 ; 48 2048 0.50000
|
||||||
|
DCW 0x0ff6 ; 49 4086 0.99756
|
||||||
|
DCW 0x0670 ; 50 1648 0.40234
|
||||||
|
DCW 0x0058 ; 51 88 0.02148
|
||||||
|
DCW 0x0b10 ; 52 2832 0.69141
|
||||||
|
DCW 0x0f0e ; 53 3854 0.94092
|
||||||
|
DCW 0x038e ; 54 910 0.22217
|
||||||
|
DCW 0x01d1 ; 55 465 0.11353
|
||||||
|
DCW 0x0da8 ; 56 3496 0.85352
|
||||||
|
DCW 0x0d13 ; 57 3347 0.81714
|
||||||
|
DCW 0x0159 ; 58 345 0.08423
|
||||||
|
DCW 0x043b ; 59 1083 0.26440
|
||||||
|
DCW 0x0f64 ; 60 3940 0.96191
|
||||||
|
DCW 0x0a53 ; 61 2643 0.64526
|
||||||
|
DCW 0x0027 ; 62 39 0.00952
|
||||||
|
DCW 0x0737 ; 63 1847 0.45093
|
||||||
|
END
|
||||||
68
PjtKEIL_StepDFT/Signaux/Signal.asm
Normal file
68
PjtKEIL_StepDFT/Signaux/Signal.asm
Normal file
|
|
@ -0,0 +1,68 @@
|
||||||
|
AREA Signal, DATA, READONLY
|
||||||
|
export LeSignal
|
||||||
|
LeSignal
|
||||||
|
DCW 0x0fff ; 0 4095 0.99976
|
||||||
|
DCW 0x0ff6 ; 1 4086 0.99756
|
||||||
|
DCW 0x0fd9 ; 2 4057 0.99048
|
||||||
|
DCW 0x0fa8 ; 3 4008 0.97852
|
||||||
|
DCW 0x0f64 ; 4 3940 0.96191
|
||||||
|
DCW 0x0f0e ; 5 3854 0.94092
|
||||||
|
DCW 0x0ea7 ; 6 3751 0.91577
|
||||||
|
DCW 0x0e2f ; 7 3631 0.88647
|
||||||
|
DCW 0x0da8 ; 8 3496 0.85352
|
||||||
|
DCW 0x0d13 ; 9 3347 0.81714
|
||||||
|
DCW 0x0c72 ; 10 3186 0.77783
|
||||||
|
DCW 0x0bc5 ; 11 3013 0.73560
|
||||||
|
DCW 0x0b10 ; 12 2832 0.69141
|
||||||
|
DCW 0x0a53 ; 13 2643 0.64526
|
||||||
|
DCW 0x0990 ; 14 2448 0.59766
|
||||||
|
DCW 0x08c9 ; 15 2249 0.54907
|
||||||
|
DCW 0x0800 ; 16 2048 0.50000
|
||||||
|
DCW 0x0737 ; 17 1847 0.45093
|
||||||
|
DCW 0x0670 ; 18 1648 0.40234
|
||||||
|
DCW 0x05ad ; 19 1453 0.35474
|
||||||
|
DCW 0x04f0 ; 20 1264 0.30859
|
||||||
|
DCW 0x043b ; 21 1083 0.26440
|
||||||
|
DCW 0x038e ; 22 910 0.22217
|
||||||
|
DCW 0x02ed ; 23 749 0.18286
|
||||||
|
DCW 0x0258 ; 24 600 0.14648
|
||||||
|
DCW 0x01d1 ; 25 465 0.11353
|
||||||
|
DCW 0x0159 ; 26 345 0.08423
|
||||||
|
DCW 0x00f2 ; 27 242 0.05908
|
||||||
|
DCW 0x009c ; 28 156 0.03809
|
||||||
|
DCW 0x0058 ; 29 88 0.02148
|
||||||
|
DCW 0x0027 ; 30 39 0.00952
|
||||||
|
DCW 0x000a ; 31 10 0.00244
|
||||||
|
DCW 0x0000 ; 32 0 0.00000
|
||||||
|
DCW 0x000a ; 33 10 0.00244
|
||||||
|
DCW 0x0027 ; 34 39 0.00952
|
||||||
|
DCW 0x0058 ; 35 88 0.02148
|
||||||
|
DCW 0x009c ; 36 156 0.03809
|
||||||
|
DCW 0x00f2 ; 37 242 0.05908
|
||||||
|
DCW 0x0159 ; 38 345 0.08423
|
||||||
|
DCW 0x01d1 ; 39 465 0.11353
|
||||||
|
DCW 0x0258 ; 40 600 0.14648
|
||||||
|
DCW 0x02ed ; 41 749 0.18286
|
||||||
|
DCW 0x038e ; 42 910 0.22217
|
||||||
|
DCW 0x043b ; 43 1083 0.26440
|
||||||
|
DCW 0x04f0 ; 44 1264 0.30859
|
||||||
|
DCW 0x05ad ; 45 1453 0.35474
|
||||||
|
DCW 0x0670 ; 46 1648 0.40234
|
||||||
|
DCW 0x0737 ; 47 1847 0.45093
|
||||||
|
DCW 0x0800 ; 48 2048 0.50000
|
||||||
|
DCW 0x08c9 ; 49 2249 0.54907
|
||||||
|
DCW 0x0990 ; 50 2448 0.59766
|
||||||
|
DCW 0x0a53 ; 51 2643 0.64526
|
||||||
|
DCW 0x0b10 ; 52 2832 0.69141
|
||||||
|
DCW 0x0bc5 ; 53 3013 0.73560
|
||||||
|
DCW 0x0c72 ; 54 3186 0.77783
|
||||||
|
DCW 0x0d13 ; 55 3347 0.81714
|
||||||
|
DCW 0x0da8 ; 56 3496 0.85352
|
||||||
|
DCW 0x0e2f ; 57 3631 0.88647
|
||||||
|
DCW 0x0ea7 ; 58 3751 0.91577
|
||||||
|
DCW 0x0f0e ; 59 3854 0.94092
|
||||||
|
DCW 0x0f64 ; 60 3940 0.96191
|
||||||
|
DCW 0x0fa8 ; 61 4008 0.97852
|
||||||
|
DCW 0x0fd9 ; 62 4057 0.99048
|
||||||
|
DCW 0x0ff6 ; 63 4086 0.99756
|
||||||
|
END
|
||||||
38
PjtKEIL_StepDFT/Signaux/Signal.m
Normal file
38
PjtKEIL_StepDFT/Signaux/Signal.m
Normal file
|
|
@ -0,0 +1,38 @@
|
||||||
|
clc
|
||||||
|
clear
|
||||||
|
|
||||||
|
N = 64 %input('Nombre d''échantilllons pour ce signal : ');
|
||||||
|
Frel = input('Fréquence normalisée (nombre de périodes dans la durée totale) : ');
|
||||||
|
Ph0 = input('Phase a l''origine (en degrés) : ');
|
||||||
|
Ph0 = Ph0 * pi / 180.0; % a present en radian
|
||||||
|
|
||||||
|
Ampl = 2048;
|
||||||
|
Offset = 2048;
|
||||||
|
%% Création du fichier .asm
|
||||||
|
|
||||||
|
fileID = fopen(['Signalech64.asm'], 'w');
|
||||||
|
fprintf(fileID,'\tAREA Signal, DATA, READONLY\n');
|
||||||
|
fprintf(fileID,'\texport LeSignal\n');
|
||||||
|
|
||||||
|
fprintf(fileID,'LeSignal\n');
|
||||||
|
|
||||||
|
for i = 1: N
|
||||||
|
% fonction a modifier en fonction des besoins
|
||||||
|
Sig(i) = Offset + Ampl * cos( 2*pi*Frel*(i-1)/N + Ph0 );
|
||||||
|
% arrondi
|
||||||
|
iSig = int16(Sig(i));
|
||||||
|
% bornage du signal similaire a la sortie brute de l'ADC 12 bits
|
||||||
|
if ( iSig < 0 )
|
||||||
|
iSig = 0;
|
||||||
|
end
|
||||||
|
if ( iSig > 4095 )
|
||||||
|
iSig = 4095;
|
||||||
|
end
|
||||||
|
|
||||||
|
fprintf(fileID,'\tDCW\t0x%04x\t; %2d %4d %7.5f\n',iSig, i-1, iSig, double(iSig) / 4096.0 );
|
||||||
|
|
||||||
|
end
|
||||||
|
|
||||||
|
fprintf(fileID,'\tEND\n');
|
||||||
|
fclose(fileID);
|
||||||
|
plot(Sig);
|
||||||
|
|
@ -28,7 +28,8 @@
|
||||||
;Section ROM code (read only) :
|
;Section ROM code (read only) :
|
||||||
AREA Trigo, DATA, READONLY
|
AREA Trigo, DATA, READONLY
|
||||||
; codage fractionnaire 1.15
|
; codage fractionnaire 1.15
|
||||||
|
export TabCos
|
||||||
|
export TabSin
|
||||||
TabCos
|
TabCos
|
||||||
DCW 32767 ; 0 0x7fff 0.99997
|
DCW 32767 ; 0 0x7fff 0.99997
|
||||||
DCW 32610 ; 1 0x7f62 0.99518
|
DCW 32610 ; 1 0x7f62 0.99518
|
||||||
|
|
|
||||||
|
|
@ -1,8 +1,21 @@
|
||||||
|
|
||||||
|
|
||||||
#include "DriverJeuLaser.h"
|
#include "DriverJeuLaser.h"
|
||||||
|
#include "stdio.h"
|
||||||
|
|
||||||
|
extern short int LeSignal[];
|
||||||
|
extern short int TabCos[];
|
||||||
|
extern short int TabSin[];
|
||||||
|
|
||||||
|
int DFT_ModuleAuCarre( short int * Signal64ech, char k){
|
||||||
|
int acumReel = 0;
|
||||||
|
int acumImag = 0;
|
||||||
|
for (int i= 0; i< 64; i++){
|
||||||
|
acumReel += Signal64ech[i]*TabCos[(i*k)%64];
|
||||||
|
acumImag += Signal64ech[i]*TabSin[(i*k)%64];
|
||||||
|
}
|
||||||
|
return acumReel*acumReel + acumImag*acumImag;
|
||||||
|
}
|
||||||
|
|
||||||
int main(void)
|
int main(void)
|
||||||
{
|
{
|
||||||
|
|
@ -15,7 +28,9 @@ int main(void)
|
||||||
CLOCK_Configure();
|
CLOCK_Configure();
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
printf("%d\n", DFT_ModuleAuCarre(LeSignal,17));
|
||||||
|
|
||||||
|
|
||||||
//============================================================================
|
//============================================================================
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,7 @@
|
||||||
<TargetName>Simu</TargetName>
|
<TargetName>Simu</TargetName>
|
||||||
<ToolsetNumber>0x4</ToolsetNumber>
|
<ToolsetNumber>0x4</ToolsetNumber>
|
||||||
<ToolsetName>ARM-ADS</ToolsetName>
|
<ToolsetName>ARM-ADS</ToolsetName>
|
||||||
<pCCUsed>5060750::V5.06 update 6 (build 750)::.\ARMCC</pCCUsed>
|
<pCCUsed>5060960::V5.06 update 7 (build 960)::.\ARMCC</pCCUsed>
|
||||||
<uAC6>0</uAC6>
|
<uAC6>0</uAC6>
|
||||||
<TargetOption>
|
<TargetOption>
|
||||||
<TargetCommonOption>
|
<TargetCommonOption>
|
||||||
|
|
@ -388,6 +388,16 @@
|
||||||
<FileType>1</FileType>
|
<FileType>1</FileType>
|
||||||
<FilePath>.\Src\principal.c</FilePath>
|
<FilePath>.\Src\principal.c</FilePath>
|
||||||
</File>
|
</File>
|
||||||
|
<File>
|
||||||
|
<FileName>Signal.asm</FileName>
|
||||||
|
<FileType>2</FileType>
|
||||||
|
<FilePath>.\Obj\Signal.asm</FilePath>
|
||||||
|
</File>
|
||||||
|
<File>
|
||||||
|
<FileName>DFT.s</FileName>
|
||||||
|
<FileType>2</FileType>
|
||||||
|
<FilePath>.\Src\DFT.s</FilePath>
|
||||||
|
</File>
|
||||||
</Files>
|
</Files>
|
||||||
</Group>
|
</Group>
|
||||||
<Group>
|
<Group>
|
||||||
|
|
@ -797,6 +807,16 @@
|
||||||
<FileType>1</FileType>
|
<FileType>1</FileType>
|
||||||
<FilePath>.\Src\principal.c</FilePath>
|
<FilePath>.\Src\principal.c</FilePath>
|
||||||
</File>
|
</File>
|
||||||
|
<File>
|
||||||
|
<FileName>Signal.asm</FileName>
|
||||||
|
<FileType>2</FileType>
|
||||||
|
<FilePath>.\Obj\Signal.asm</FilePath>
|
||||||
|
</File>
|
||||||
|
<File>
|
||||||
|
<FileName>DFT.s</FileName>
|
||||||
|
<FileType>2</FileType>
|
||||||
|
<FilePath>.\Src\DFT.s</FilePath>
|
||||||
|
</File>
|
||||||
</Files>
|
</Files>
|
||||||
</Group>
|
</Group>
|
||||||
<Group>
|
<Group>
|
||||||
|
|
@ -1275,6 +1295,16 @@
|
||||||
<FileType>1</FileType>
|
<FileType>1</FileType>
|
||||||
<FilePath>.\Src\principal.c</FilePath>
|
<FilePath>.\Src\principal.c</FilePath>
|
||||||
</File>
|
</File>
|
||||||
|
<File>
|
||||||
|
<FileName>Signal.asm</FileName>
|
||||||
|
<FileType>2</FileType>
|
||||||
|
<FilePath>.\Obj\Signal.asm</FilePath>
|
||||||
|
</File>
|
||||||
|
<File>
|
||||||
|
<FileName>DFT.s</FileName>
|
||||||
|
<FileType>2</FileType>
|
||||||
|
<FilePath>.\Src\DFT.s</FilePath>
|
||||||
|
</File>
|
||||||
</Files>
|
</Files>
|
||||||
</Group>
|
</Group>
|
||||||
<Group>
|
<Group>
|
||||||
|
|
@ -1323,11 +1353,6 @@
|
||||||
<Layers>
|
<Layers>
|
||||||
<Layer>
|
<Layer>
|
||||||
<LayName><Project Info></LayName>
|
<LayName><Project Info></LayName>
|
||||||
<LayDesc></LayDesc>
|
|
||||||
<LayUrl></LayUrl>
|
|
||||||
<LayKeys></LayKeys>
|
|
||||||
<LayCat></LayCat>
|
|
||||||
<LayLic></LayLic>
|
|
||||||
<LayTarg>0</LayTarg>
|
<LayTarg>0</LayTarg>
|
||||||
<LayPrjMark>1</LayPrjMark>
|
<LayPrjMark>1</LayPrjMark>
|
||||||
</Layer>
|
</Layer>
|
||||||
|
|
|
||||||
38
PjtKEIL_StepDFT/rep_questions.md
Normal file
38
PjtKEIL_StepDFT/rep_questions.md
Normal file
|
|
@ -0,0 +1,38 @@
|
||||||
|
1. Déterminer les 6 valeurs de k (k1 à k6) correspondant aux 6 fréquences des pistolets ( voir votre
|
||||||
|
rapport intermédiaire ou le sujet signal de la partie I, sur Moodle)
|
||||||
|
|
||||||
|
Les valeurs de k qui nous interessent sont :
|
||||||
|
|
||||||
|
Fréquence (en kHz) | 85 | 90 | 95 | 100 | 115| 120 |
|
||||||
|
|---|---|---|---|---|---|---|
|
||||||
|
| K | 17 | 18 | 19 | 20 | 23 | 24 |
|
||||||
|
|
||||||
|
La graduation des fréquence est donnée par
|
||||||
|
$$
|
||||||
|
\delta \omega = \frac{1}{T} = 5000 kHz
|
||||||
|
$$
|
||||||
|
|
||||||
|
ainsi:
|
||||||
|
|
||||||
|
$$
|
||||||
|
k_n = \frac{f_n}{5000 kHz}
|
||||||
|
$$
|
||||||
|
|
||||||
|
2. Le codage fonctionne de la même maniére que le complément à deux avec des valeur fractionnaire.
|
||||||
|
Considérons un codage A.B sur x bits
|
||||||
|
Les nombre de ce codage étant représentés par :
|
||||||
|
$b_{x-1}b_{x-2} \dots b_2b_1b_0$
|
||||||
|
|
||||||
|
Si le nombre est compris entre 00000...0 et 0111...1
|
||||||
|
La valeur décimale du nombre est donnée par :
|
||||||
|
$$\sum_{i=0}^{x-1} b_i \times 2^{i-B}$$
|
||||||
|
Et si le nombre est compris entre 100..00 et 11...111
|
||||||
|
|
||||||
|
La valeur décimale du nombre est donnée par :
|
||||||
|
$$-\sum_{i=0}^{x-1} (b_i-1) \times 2^{i-B}$$
|
||||||
|
|
||||||
|
$$0x02C1 \to 0b 0000 0010 1100 0001 \to 2^{-3}+2^{-5}+2^{-6}+2^{-12}= 0.172119140625$$
|
||||||
|
|
||||||
|
$$0xFE01 \to 0b 1111 1110 0000 0001 \to \sum^{-4}_{i=-11} 2^{i} \text{car nombre négatif} = -0.124755859375$$
|
||||||
|
|
||||||
|
|
||||||
0
PjtKEIL_StepDFT/rep_questions.txt
Normal file
0
PjtKEIL_StepDFT/rep_questions.txt
Normal file
Loading…
Reference in a new issue