Update 'soft/PjtKEIL_StepDFT/Src/DFT.s'

signal/matlab/L32.m

@@ -0,0 +1,33 @@
+clc;
+clear all;
+close all;
+
+F1 = 85005.9;
+F2= 90000;
+F3 = 94986.8;
+F4 = 100000;
+F5 = 115015.9;
+F6 = 120000;
+Fe = 320000;
+F = 5000;
+
+Te = 1/Fe;
+T = 1/F ;
+M = T/Te;
+Tsim = T-Te;
+Res = sim('LG');
+
+plot(Res.Sinus_Continu);
+hold on;
+plot(Res.Sinus_Echanti,'o');
+
+%figure
+f = fft(Res.Sinus_Echanti.data, M)/M;
+%stem(linspace(0, M-1, M), abs(f),'o');
+figure
+stem(linspace(0, M-1, M) / (M*Te), abs(f),'o');
+
+figure
+bode(tf(1,[1.7483E-23 7.6663E-18 1.162E-11 3.0332E-6 1]))
+
+

signal/matlab/carre32.m

@@ -0,0 +1,27 @@
+clc;
+clear all;
+close all;
+
+F1 = 85000;
+Fe = 320000;
+F = 5000;
+
+Te = 1/Fe;
+T = 1/F ;
+M = T/Te;
+Tsim = T-Te;
+Res = sim('carre');
+
+plot(Res.Carre_Continu,'b');
+hold on;
+plot(Res.Signal_Filtre,'o');
+
+%figure
+f = fft(Res.Signal_Filtre.data, M);
+%stem(linspace(0, M-1, M), abs(f),'o');
+figure
+stem(linspace(0, M-1, M) / (M*Te), abs(f),'o');
+
+figure
+bode(tf(1,[1.7483E-23 7.6663E-18 1.162E-11 3.0332E-6 1]))
+

signal/matlab/scriptDFT.m

@@ -1,31 +1,33 @@
+clc;
 clear all;
 close all;
 
-%% Paramètres
+T = 1/5000;
-T = 0.25;               % Fenêtre d'observation
+M = 64;
-M=32;                   % Nombre d'échantillons dans la fenêtre
+Te = T/M;
-
+Tsim = T-Te;
-
+Fe = 1/Te;
-%% Paramètres déduits
+
-Te = T/M;               % Période d'échantillonnage
+%%Fsin = 4;
-Tsim = T-Te;            % Instant final de simulation
+%%Fsin = 60;
-Fsin = 4 ;
+%%Fsin = 64; shannon < Fe/2
-%% Calculs préliminaires 
+%%Fsin = 100;
-
+Fsin=85000;
-
+Res = sim('SimulDFT');
-%% Lancement de simulink
+
-out=sim("simDFT")
+plot(Res.Sinus_Continu);
-
+hold on; % permet de superposer la courbe à suivre
-%% Visualisations temporelle
+plot(Res.Sinus_Echanti,'o');
-plot(out.sin_continu,'.-');
+
-hold on;
+%figure
-plot(out.sin_echanti,'o');
+f = fft(Res.Sinus_Echanti.data, M)/M;
-grid on;
+%stem(linspace(0, M-1, M), abs(f),'o');
-
+figure
-%% Calcul DFT
+stem(linspace(0, M-1, M) / (M*Te), abs(f),'o');
-
+
-
+%%figure
-%% visualisation DFT
+%%plot(linspace(0, M-1, M) / (M*Te/100), abs(fft(Res.Sinus_Continu.data, M)/M));
-figure();
+%%hold on;
+%%plot(linspace(0, M-1, M) / (M*Te), abs(fft(Res.Sinus_Echanti.data, M)/M),'o');
 
 

soft/PjtKEIL_DFT_Signal_Reel/Driver/DriverJeuLaser.h

@@ -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
+
+

soft/PjtKEIL_DFT_Signal_Reel/Driver/DriverJeuLaser.inc

@@ -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

soft/PjtKEIL_DFT_Signal_Reel/Src/DFT.s

@@ -0,0 +1,205 @@
+PRESERVE8
+	THUMB   
+		
+
+; ====================== zone de réservation de données,  ======================================
+;Section RAM (read only) :
+	area    mesdata,data,readonly
+
+
+;Section RAM (read write):
+	area    maram,data,readwrite
+		
+
+	
+; ===============================================================================================
+	
+
+
+		
+;Section ROM code (read only) :		
+	area    moncode,code,readonly
+; écrire le code ici		
+
+ export DFT_ModuleAuCarre
+DFT_ModuleAuCarre proc
+	 push{r4-r10}; Sauvegarde des registres r4 à r10 dans la pile
+	 mov r2, #0 ;initialisation de la partie imaginaire à zero
+	 mov r3, #0 ;initialisation de la partie relle à zero
+	 mov r7 ,#0 ;initialisation de p(=n*k) à zero
+	 mov r4 ,#0 ;initialisation de l'indice n à zero
+	 ldr r5, =TabCos ; chargement de l'adresse de TabCos dans r5
+	 ldr r6, =TabSin ; chargement de l'adresse de TabCos dans r5
+	 
+	 
+Sommation
+     ;Rsom += Signal[i] * TabCos[k*i]
+	 ldrsh r8,[r0, r4, lsl#1] ; chargement du LeSignal[n] dans r8
+	 ldrsh r9,[r5, r7, lsl #1] ; chargement de TabCos[p] dans r9
+	 ldrsh r10,[r6, r7, lsl #1] ; chargement de TabSin[p] dans r10
+	 mul r9, r8, r9 ; multiplication de LeSignal[n] par TabCos[n*k]--> Format 5.27
+	 mul r10, r8, r10 ; multiplication de LeSignal[n] par TabSin[n*k] --> Format 5.27
+	 asr r9, #16 ; Réduction du format pour éviter le débordement
+	 asr r10,#16 ; Réduction du format pour éviter le débordement
+	 add r3,r3, r9 ; ajout de la partie réelle au résultat (conservation du format) --> Format 11.11
+	 add r2,r2, r10 ; ajout de la partie imaginaire au résultat (conservation du format) --> Format 11.11 
+	 
+	 add r7, r1 ; Calcul de p = (n+1) * k
+	 and r7, 63 ; modulo 64 pour ne pas depasser la taille du tableau 
+	 add r4, r4, #1 ; incrémentation de l'indice n
+	 cmp r4 ,#64 ; comparaison de n à 64
+	 blt Sommation ; si n<64 on continue la boucle
+	 
+	 asr r3, #6 ; Réduction du format de la partie réelle pour le calcul au carré --> Format 11.5 (décalage 10 bits)
+	 mul r3, r3, r3 ; Calcul du carré de la partie réelle --> Format 10.22
+	 asr r2, #6	; Réduction du format de la partie imaginaire pour le calcul au carré --> Format 11.5 (décalage 10 bits)
+	 mul r2, r2, r2 ; Calcul du carré de la partie réelle --> Format 22.10
+	 mov r0, r3 ; Copie de la partie réelle dans le registre r0
+	 add r0, r0, r2 ; Addition de la partie imaginaire dans r0 (résultat final) --> Format 22.10
+	 
+	 pop{r4-r10} ; restauration des registres depuis la pile
+	 bx lr
+	 endp
+
+
+
+
+;Section ROM code (read only) :		
+	AREA Trigo, DATA, READONLY
+; codage fractionnaire 1.15
+
+TabCos
+	DCW	32767	;  0 0x7fff  0.99997
+	DCW	32610	;  1 0x7f62  0.99518
+	DCW	32138	;  2 0x7d8a  0.98077
+	DCW	31357	;  3 0x7a7d  0.95694
+	DCW	30274	;  4 0x7642  0.92389
+	DCW	28899	;  5 0x70e3  0.88193
+	DCW	27246	;  6 0x6a6e  0.83148
+	DCW	25330	;  7 0x62f2  0.77301
+	DCW	23170	;  8 0x5a82  0.70709
+	DCW	20788	;  9 0x5134  0.63440
+	DCW	18205	; 10 0x471d  0.55557
+	DCW	15447	; 11 0x3c57  0.47141
+	DCW	12540	; 12 0x30fc  0.38269
+	DCW	 9512	; 13 0x2528  0.29028
+	DCW	 6393	; 14 0x18f9  0.19510
+	DCW	 3212	; 15 0x0c8c  0.09802
+	DCW	    0	; 16 0x0000  0.00000
+	DCW	-3212	; 17 0xf374 -0.09802
+	DCW	-6393	; 18 0xe707 -0.19510
+	DCW	-9512	; 19 0xdad8 -0.29028
+	DCW	-12540	; 20 0xcf04 -0.38269
+	DCW	-15447	; 21 0xc3a9 -0.47141
+	DCW	-18205	; 22 0xb8e3 -0.55557
+	DCW	-20788	; 23 0xaecc -0.63440
+	DCW	-23170	; 24 0xa57e -0.70709
+	DCW	-25330	; 25 0x9d0e -0.77301
+	DCW	-27246	; 26 0x9592 -0.83148
+	DCW	-28899	; 27 0x8f1d -0.88193
+	DCW	-30274	; 28 0x89be -0.92389
+	DCW	-31357	; 29 0x8583 -0.95694
+	DCW	-32138	; 30 0x8276 -0.98077
+	DCW	-32610	; 31 0x809e -0.99518
+	DCW	-32768	; 32 0x8000 -1.00000
+	DCW	-32610	; 33 0x809e -0.99518
+	DCW	-32138	; 34 0x8276 -0.98077
+	DCW	-31357	; 35 0x8583 -0.95694
+	DCW	-30274	; 36 0x89be -0.92389
+	DCW	-28899	; 37 0x8f1d -0.88193
+	DCW	-27246	; 38 0x9592 -0.83148
+	DCW	-25330	; 39 0x9d0e -0.77301
+	DCW	-23170	; 40 0xa57e -0.70709
+	DCW	-20788	; 41 0xaecc -0.63440
+	DCW	-18205	; 42 0xb8e3 -0.55557
+	DCW	-15447	; 43 0xc3a9 -0.47141
+	DCW	-12540	; 44 0xcf04 -0.38269
+	DCW	-9512	; 45 0xdad8 -0.29028
+	DCW	-6393	; 46 0xe707 -0.19510
+	DCW	-3212	; 47 0xf374 -0.09802
+	DCW	    0	; 48 0x0000  0.00000
+	DCW	 3212	; 49 0x0c8c  0.09802
+	DCW	 6393	; 50 0x18f9  0.19510
+	DCW	 9512	; 51 0x2528  0.29028
+	DCW	12540	; 52 0x30fc  0.38269
+	DCW	15447	; 53 0x3c57  0.47141
+	DCW	18205	; 54 0x471d  0.55557
+	DCW	20788	; 55 0x5134  0.63440
+	DCW	23170	; 56 0x5a82  0.70709
+	DCW	25330	; 57 0x62f2  0.77301
+	DCW	27246	; 58 0x6a6e  0.83148
+	DCW	28899	; 59 0x70e3  0.88193
+	DCW	30274	; 60 0x7642  0.92389
+	DCW	31357	; 61 0x7a7d  0.95694
+	DCW	32138	; 62 0x7d8a  0.98077
+	DCW	32610	; 63 0x7f62  0.99518
+TabSin 
+	DCW	    0	;  0 0x0000  0.00000
+	DCW	 3212	;  1 0x0c8c  0.09802
+	DCW	 6393	;  2 0x18f9  0.19510
+	DCW	 9512	;  3 0x2528  0.29028
+	DCW	12540	;  4 0x30fc  0.38269
+	DCW	15447	;  5 0x3c57  0.47141
+	DCW	18205	;  6 0x471d  0.55557
+	DCW	20788	;  7 0x5134  0.63440
+	DCW	23170	;  8 0x5a82  0.70709
+	DCW	25330	;  9 0x62f2  0.77301
+	DCW	27246	; 10 0x6a6e  0.83148
+	DCW	28899	; 11 0x70e3  0.88193
+	DCW	30274	; 12 0x7642  0.92389
+	DCW	31357	; 13 0x7a7d  0.95694
+	DCW	32138	; 14 0x7d8a  0.98077
+	DCW	32610	; 15 0x7f62  0.99518
+	DCW	32767	; 16 0x7fff  0.99997
+	DCW	32610	; 17 0x7f62  0.99518
+	DCW	32138	; 18 0x7d8a  0.98077
+	DCW	31357	; 19 0x7a7d  0.95694
+	DCW	30274	; 20 0x7642  0.92389
+	DCW	28899	; 21 0x70e3  0.88193
+	DCW	27246	; 22 0x6a6e  0.83148
+	DCW	25330	; 23 0x62f2  0.77301
+	DCW	23170	; 24 0x5a82  0.70709
+	DCW	20788	; 25 0x5134  0.63440
+	DCW	18205	; 26 0x471d  0.55557
+	DCW	15447	; 27 0x3c57  0.47141
+	DCW	12540	; 28 0x30fc  0.38269
+	DCW	 9512	; 29 0x2528  0.29028
+	DCW	 6393	; 30 0x18f9  0.19510
+	DCW	 3212	; 31 0x0c8c  0.09802
+	DCW	    0	; 32 0x0000  0.00000
+	DCW	-3212	; 33 0xf374 -0.09802
+	DCW	-6393	; 34 0xe707 -0.19510
+	DCW	-9512	; 35 0xdad8 -0.29028
+	DCW	-12540	; 36 0xcf04 -0.38269
+	DCW	-15447	; 37 0xc3a9 -0.47141
+	DCW	-18205	; 38 0xb8e3 -0.55557
+	DCW	-20788	; 39 0xaecc -0.63440
+	DCW	-23170	; 40 0xa57e -0.70709
+	DCW	-25330	; 41 0x9d0e -0.77301
+	DCW	-27246	; 42 0x9592 -0.83148
+	DCW	-28899	; 43 0x8f1d -0.88193
+	DCW	-30274	; 44 0x89be -0.92389
+	DCW	-31357	; 45 0x8583 -0.95694
+	DCW	-32138	; 46 0x8276 -0.98077
+	DCW	-32610	; 47 0x809e -0.99518
+	DCW	-32768	; 48 0x8000 -1.00000
+	DCW	-32610	; 49 0x809e -0.99518
+	DCW	-32138	; 50 0x8276 -0.98077
+	DCW	-31357	; 51 0x8583 -0.95694
+	DCW	-30274	; 52 0x89be -0.92389
+	DCW	-28899	; 53 0x8f1d -0.88193
+	DCW	-27246	; 54 0x9592 -0.83148
+	DCW	-25330	; 55 0x9d0e -0.77301
+	DCW	-23170	; 56 0xa57e -0.70709
+	DCW	-20788	; 57 0xaecc -0.63440
+	DCW	-18205	; 58 0xb8e3 -0.55557
+	DCW	-15447	; 59 0xc3a9 -0.47141
+	DCW	-12540	; 60 0xcf04 -0.38269
+	DCW	-9512	; 61 0xdad8 -0.29028
+	DCW	-6393	; 62 0xe707 -0.19510
+	DCW	-3212	; 63 0xf374 -0.09802
+
+
+		
+		
+	END	

soft/PjtKEIL_DFT_Signal_Reel/Src/Signal.asm

@@ -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

soft/PjtKEIL_DFT_Signal_Reel/Src/Signal.m

@@ -0,0 +1 @@
+.

soft/PjtKEIL_DFT_Signal_Reel/Src/principal.c

@@ -0,0 +1,51 @@
+
+#include "DriverJeuLaser.h"
+
+
+extern int DFT_ModuleAuCarre(short int* Signal64ech, char k);
+extern short LeSignal;
+
+int test[64];
+short int dma_buf[64] ;
+
+void Systick_function(void){
+	Start_DMA1(64);
+	Wait_On_End_Of_DMA1();
+	Stop_DMA1;
+	
+	for (int k = 0; k < 64; k++) {
+	test[k] = DFT_ModuleAuCarre((short*)&dma_buf, k);
+}
+}
+
+
+int main(void)
+{  
+// ===========================================================================
+// ============= INIT PERIPH (faites qu'une seule fois)  =====================
+// ===========================================================================
+
+// Après exécution : le coeur CPU est clocké à 72MHz ainsi que tous les timers
+CLOCK_Configure();
+
+//systick
+Systick_Period_ff( 360000 );
+Systick_Prio_IT( 1, Systick_function );
+SysTick_On ;	
+SysTick_Enable_IT ;
+	
+//ADC
+Init_TimingADC_ActiveADC_ff( ADC1, 72 );
+Single_Channel_ADC( ADC1, 2 );
+Init_Conversion_On_Trig_Timer_ff( ADC1, TIM2_CC2, 225 );
+Init_ADC1_DMA1( 0, dma_buf );
+
+	
+
+//============================================================================	
+	 
+while	(1)
+	{
+	}
+}
+

soft/PjtKEIL_DFT_Signal_Reel/Src/startup-rvds.s

@@ -0,0 +1,335 @@
+;******************** (C) COPYRIGHT 2011 STMicroelectronics ********************
+;* File Name          : startup_stm32f10x_md.s
+;* Author             : MCD Application Team
+;* Version            : V3.5.0
+;* Date               : 11-March-2011
+;* Description        : STM32F10x Medium Density Devices vector table for MDK-ARM 
+;*                      toolchain.  
+;*                      This module performs:
+;*                      - Set the initial SP
+;*                      - Set the initial PC == Reset_Handler
+;*                      - Set the vector table entries with the exceptions ISR address
+;*                      - Configure the clock system
+;*                      - Branches to __main in the C library (which eventually
+;*                        calls main()).
+;*                      After Reset the CortexM3 processor is in Thread mode,
+;*                      priority is Privileged, and the Stack is set to Main.
+;* <<< Use Configuration Wizard in Context Menu >>>   
+;*******************************************************************************
+; THE PRESENT FIRMWARE WHICH IS FOR GUIDANCE ONLY AIMS AT PROVIDING CUSTOMERS
+; WITH CODING INFORMATION REGARDING THEIR PRODUCTS IN ORDER FOR THEM TO SAVE TIME.
+; AS A RESULT, STMICROELECTRONICS SHALL NOT BE HELD LIABLE FOR ANY DIRECT,
+; INDIRECT OR CONSEQUENTIAL DAMAGES WITH RESPECT TO ANY CLAIMS ARISING FROM THE
+; CONTENT OF SUCH FIRMWARE AND/OR THE USE MADE BY CUSTOMERS OF THE CODING
+; INFORMATION CONTAINED HEREIN IN CONNECTION WITH THEIR PRODUCTS.
+;*******************************************************************************
+
+; Amount of memory (in bytes) allocated for Stack
+; Tailor this value to your application needs
+; <h> Stack Configuration
+;   <o> Stack Size (in Bytes) <0x0-0xFFFFFFFF:8>
+; </h>
+
+Stack_Size      EQU     0x00000400
+
+                AREA    STACK, NOINIT, READWRITE, ALIGN=3
+Stack_Mem       SPACE   Stack_Size
+__initial_sp
+
+
+; <h> Heap Configuration
+;   <o>  Heap Size (in Bytes) <0x0-0xFFFFFFFF:8>
+; </h>
+
+Heap_Size       EQU     0x00000200
+
+                AREA    HEAP, NOINIT, READWRITE, ALIGN=3
+__heap_base
+Heap_Mem        SPACE   Heap_Size
+__heap_limit
+
+                PRESERVE8
+                THUMB
+
+
+; Vector Table Mapped to Address 0 at Reset
+                AREA    RESET, DATA, READONLY
+                EXPORT  __Vectors
+                EXPORT  __Vectors_End
+                EXPORT  __Vectors_Size
+
+__Vectors       DCD     __initial_sp               ; Top of Stack
+                DCD     Reset_Handler              ; Reset Handler
+                DCD     NMI_Handler                ; NMI Handler
+                DCD     HardFault_Handler          ; Hard Fault Handler
+                DCD     MemManage_Handler          ; MPU Fault Handler
+                DCD     BusFault_Handler           ; Bus Fault Handler
+                DCD     UsageFault_Handler         ; Usage Fault Handler
+                DCD     0                          ; Reserved
+                DCD     0                          ; Reserved
+                DCD     0                          ; Reserved
+                DCD     0                          ; Reserved
+                DCD     SVC_Handler                ; SVCall Handler
+                DCD     DebugMon_Handler           ; Debug Monitor Handler
+                DCD     0                          ; Reserved
+                DCD     PendSV_Handler             ; PendSV Handler
+                DCD     SysTick_Handler            ; SysTick Handler
+
+                ; External Interrupts
+                DCD     WWDG_IRQHandler            ; Window Watchdog
+                DCD     PVD_IRQHandler             ; PVD through EXTI Line detect
+                DCD     TAMPER_IRQHandler          ; Tamper
+                DCD     RTC_IRQHandler             ; RTC
+                DCD     FLASH_IRQHandler           ; Flash
+                DCD     RCC_IRQHandler             ; RCC
+                DCD     EXTI0_IRQHandler           ; EXTI Line 0
+                DCD     EXTI1_IRQHandler           ; EXTI Line 1
+                DCD     EXTI2_IRQHandler           ; EXTI Line 2
+                DCD     EXTI3_IRQHandler           ; EXTI Line 3
+                DCD     EXTI4_IRQHandler           ; EXTI Line 4
+                DCD     DMA1_Channel1_IRQHandler   ; DMA1 Channel 1
+                DCD     DMA1_Channel2_IRQHandler   ; DMA1 Channel 2
+                DCD     DMA1_Channel3_IRQHandler   ; DMA1 Channel 3
+                DCD     DMA1_Channel4_IRQHandler   ; DMA1 Channel 4
+                DCD     DMA1_Channel5_IRQHandler   ; DMA1 Channel 5
+                DCD     DMA1_Channel6_IRQHandler   ; DMA1 Channel 6
+                DCD     DMA1_Channel7_IRQHandler   ; DMA1 Channel 7
+                DCD     ADC1_2_IRQHandler          ; ADC1_2
+                DCD     USB_HP_CAN1_TX_IRQHandler  ; USB High Priority or CAN1 TX
+                DCD     USB_LP_CAN1_RX0_IRQHandler ; USB Low  Priority or CAN1 RX0
+                DCD     CAN1_RX1_IRQHandler        ; CAN1 RX1
+                DCD     CAN1_SCE_IRQHandler        ; CAN1 SCE
+                DCD     EXTI9_5_IRQHandler         ; EXTI Line 9..5
+                DCD     TIM1_BRK_IRQHandler        ; TIM1 Break
+                DCD     TIM1_UP_IRQHandler         ; TIM1 Update
+                DCD     TIM1_TRG_COM_IRQHandler    ; TIM1 Trigger and Commutation
+                DCD     TIM1_CC_IRQHandler         ; TIM1 Capture Compare
+                DCD     TIM2_IRQHandler            ; TIM2
+                DCD     TIM3_IRQHandler            ; TIM3
+                DCD     TIM4_IRQHandler            ; TIM4
+                DCD     I2C1_EV_IRQHandler         ; I2C1 Event
+                DCD     I2C1_ER_IRQHandler         ; I2C1 Error
+                DCD     I2C2_EV_IRQHandler         ; I2C2 Event
+                DCD     I2C2_ER_IRQHandler         ; I2C2 Error
+                DCD     SPI1_IRQHandler            ; SPI1
+                DCD     SPI2_IRQHandler            ; SPI2
+                DCD     USART1_IRQHandler          ; USART1
+                DCD     USART2_IRQHandler          ; USART2
+                DCD     USART3_IRQHandler          ; USART3
+                DCD     EXTI15_10_IRQHandler       ; EXTI Line 15..10
+                DCD     RTCAlarm_IRQHandler        ; RTC Alarm through EXTI Line
+                DCD     USBWakeUp_IRQHandler       ; USB Wakeup from suspend
+__Vectors_End
+
+__Vectors_Size  EQU  __Vectors_End - __Vectors
+
+                AREA    |.text|, CODE, READONLY
+
+; Reset handler
+Reset_Handler    PROC
+                 EXPORT  Reset_Handler             [WEAK]
+     IMPORT  __main
+     
+                 LDR     R0, =SystemInit
+                 BLX     R0
+
+;
+; Enable UsageFault, MemFault and Busfault interrupts
+;
+_SHCSR			EQU     0xE000ED24		; SHCSR is located at address 0xE000ED24
+				LDR.W	R0, =_SHCSR				
+				LDR 	R1, [R0]				; Read CPACR
+				ORR 	R1, R1, #(0x7 << 16)	; Set bits 16,17,18 to enable usagefault, busfault, memfault interrupts
+				STR 	R1, [R0]				; Write back the modified value to the CPACR
+				DSB								; Wait for store to complete
+
+;
+; Set priority grouping (PRIGROUP) in AIRCR to 3 (16 levels for group priority and 0 for subpriority)
+;
+_AIRCR			EQU		0xE000ED0C
+_AIRCR_VAL		EQU		0x05FA0300
+				LDR.W	R0, =_AIRCR
+				LDR.W	R1, =_AIRCR_VAL
+				STR		R1,[R0]
+		
+;
+; Finaly, jump to main function (void main (void))
+;
+                LDR     R0, =__main
+                BX      R0
+                ENDP
+
+SystemInit		PROC				 
+				EXPORT  SystemInit                    [WEAK]    
+				BX		LR
+				ENDP
+
+; Dummy Exception Handlers (infinite loops which can be modified)
+
+NMI_Handler     PROC
+                EXPORT  NMI_Handler                [WEAK]
+                B       .
+                ENDP
+HardFault_Handler\
+                PROC
+                EXPORT  HardFault_Handler          [WEAK]
+                B       .
+                ENDP
+MemManage_Handler\
+                PROC
+                EXPORT  MemManage_Handler          [WEAK]
+                B       .
+                ENDP
+BusFault_Handler\
+                PROC
+                EXPORT  BusFault_Handler           [WEAK]
+                B       .
+                ENDP
+UsageFault_Handler\
+                PROC
+                EXPORT  UsageFault_Handler         [WEAK]
+                B       .
+                ENDP
+SVC_Handler     PROC
+                EXPORT  SVC_Handler                [WEAK]
+                B       .
+                ENDP
+DebugMon_Handler\
+                PROC
+                EXPORT  DebugMon_Handler           [WEAK]
+                B       .
+                ENDP
+PendSV_Handler  PROC
+                EXPORT  PendSV_Handler             [WEAK]
+                B       .
+                ENDP
+SysTick_Handler PROC
+                EXPORT  SysTick_Handler            [WEAK]
+                B       .
+                ENDP
+
+Default_Handler PROC
+
+                EXPORT  WWDG_IRQHandler            [WEAK]
+                EXPORT  PVD_IRQHandler             [WEAK]
+                EXPORT  TAMPER_IRQHandler          [WEAK]
+                EXPORT  RTC_IRQHandler             [WEAK]
+                EXPORT  FLASH_IRQHandler           [WEAK]
+                EXPORT  RCC_IRQHandler             [WEAK]
+                EXPORT  EXTI0_IRQHandler           [WEAK]
+                EXPORT  EXTI1_IRQHandler           [WEAK]
+                EXPORT  EXTI2_IRQHandler           [WEAK]
+                EXPORT  EXTI3_IRQHandler           [WEAK]
+                EXPORT  EXTI4_IRQHandler           [WEAK]
+                EXPORT  DMA1_Channel1_IRQHandler   [WEAK]
+                EXPORT  DMA1_Channel2_IRQHandler   [WEAK]
+                EXPORT  DMA1_Channel3_IRQHandler   [WEAK]
+                EXPORT  DMA1_Channel4_IRQHandler   [WEAK]
+                EXPORT  DMA1_Channel5_IRQHandler   [WEAK]
+                EXPORT  DMA1_Channel6_IRQHandler   [WEAK]
+                EXPORT  DMA1_Channel7_IRQHandler   [WEAK]
+                EXPORT  ADC1_2_IRQHandler          [WEAK]
+                EXPORT  USB_HP_CAN1_TX_IRQHandler  [WEAK]
+                EXPORT  USB_LP_CAN1_RX0_IRQHandler [WEAK]
+                EXPORT  CAN1_RX1_IRQHandler        [WEAK]
+                EXPORT  CAN1_SCE_IRQHandler        [WEAK]
+                EXPORT  EXTI9_5_IRQHandler         [WEAK]
+                EXPORT  TIM1_BRK_IRQHandler        [WEAK]
+                EXPORT  TIM1_UP_IRQHandler         [WEAK]
+                EXPORT  TIM1_TRG_COM_IRQHandler    [WEAK]
+                EXPORT  TIM1_CC_IRQHandler         [WEAK]
+                EXPORT  TIM2_IRQHandler            [WEAK]
+                EXPORT  TIM3_IRQHandler            [WEAK]
+                EXPORT  TIM4_IRQHandler            [WEAK]
+                EXPORT  I2C1_EV_IRQHandler         [WEAK]
+                EXPORT  I2C1_ER_IRQHandler         [WEAK]
+                EXPORT  I2C2_EV_IRQHandler         [WEAK]
+                EXPORT  I2C2_ER_IRQHandler         [WEAK]
+                EXPORT  SPI1_IRQHandler            [WEAK]
+                EXPORT  SPI2_IRQHandler            [WEAK]
+                EXPORT  USART1_IRQHandler          [WEAK]
+                EXPORT  USART2_IRQHandler          [WEAK]
+                EXPORT  USART3_IRQHandler          [WEAK]
+                EXPORT  EXTI15_10_IRQHandler       [WEAK]
+                EXPORT  RTCAlarm_IRQHandler        [WEAK]
+                EXPORT  USBWakeUp_IRQHandler       [WEAK]
+
+WWDG_IRQHandler
+PVD_IRQHandler
+TAMPER_IRQHandler
+RTC_IRQHandler
+FLASH_IRQHandler
+RCC_IRQHandler
+EXTI0_IRQHandler
+EXTI1_IRQHandler
+EXTI2_IRQHandler
+EXTI3_IRQHandler
+EXTI4_IRQHandler
+DMA1_Channel1_IRQHandler
+DMA1_Channel2_IRQHandler
+DMA1_Channel3_IRQHandler
+DMA1_Channel4_IRQHandler
+DMA1_Channel5_IRQHandler
+DMA1_Channel6_IRQHandler
+DMA1_Channel7_IRQHandler
+ADC1_2_IRQHandler
+USB_HP_CAN1_TX_IRQHandler
+USB_LP_CAN1_RX0_IRQHandler
+CAN1_RX1_IRQHandler
+CAN1_SCE_IRQHandler
+EXTI9_5_IRQHandler
+TIM1_BRK_IRQHandler
+TIM1_UP_IRQHandler
+TIM1_TRG_COM_IRQHandler
+TIM1_CC_IRQHandler
+TIM2_IRQHandler
+TIM3_IRQHandler
+TIM4_IRQHandler
+I2C1_EV_IRQHandler
+I2C1_ER_IRQHandler
+I2C2_EV_IRQHandler
+I2C2_ER_IRQHandler
+SPI1_IRQHandler
+SPI2_IRQHandler
+USART1_IRQHandler
+USART2_IRQHandler
+USART3_IRQHandler
+EXTI15_10_IRQHandler
+RTCAlarm_IRQHandler
+USBWakeUp_IRQHandler
+
+                B       .
+
+                ENDP
+
+                ALIGN
+
+;*******************************************************************************
+; User Stack and Heap initialization
+;*******************************************************************************
+                 IF      :DEF:__MICROLIB           
+                
+                 EXPORT  __initial_sp
+                 EXPORT  __heap_base
+                 EXPORT  __heap_limit
+                
+                 ELSE
+                
+                 IMPORT  __use_two_region_memory
+                 EXPORT  __user_initial_stackheap
+                 
+__user_initial_stackheap
+
+                 LDR     R0, =  Heap_Mem
+                 LDR     R1, =(Stack_Mem + Stack_Size)
+                 LDR     R2, = (Heap_Mem +  Heap_Size)
+                 LDR     R3, = Stack_Mem
+                 BX      LR
+
+                 ALIGN
+
+                 ENDIF
+
+                 END
+
+;******************* (C) COPYRIGHT 2011 STMicroelectronics *****END OF FILE*****

soft/PjtKEIL_StepDFT/Src/DFT.s

@@ -2,7 +2,7 @@
 	THUMB   
 		
 
-; ====================== zone de réservation de données,  ======================================
+; ====================== zone de réservation de données,  ======================================
 ;Section RAM (read only) :
 	area    mesdata,data,readonly
 
@@ -19,8 +19,47 @@
 		
 ;Section ROM code (read only) :		
 	area    moncode,code,readonly
-; écrire le code ici		
+; écrire le code ici		
 
+ export DFT_ModuleAuCarre
+DFT_ModuleAuCarre proc
+	 push{r4-r10}; Sauvegarde des registres r4 à r10 dans la pile
+	 mov r2, #0 ;initialisation de la partie imaginaire à zero
+	 mov r3, #0 ;initialisation de la partie relle à zero
+	 mov r7 ,#0 ;initialisation de p(=n*k) à zero
+	 mov r4 ,#0 ;initialisation de l'indice n à zero
+	 ldr r5, =TabCos ; chargement de l'adresse de TabCos dans r5
+	 ldr r6, =TabSin ; chargement de l'adresse de TabCos dans r5
+	 
+	 
+Sommation
+     ;Rsom += Signal[i] * TabCos[k*i]
+	 ldrsh r8,[r0, r4, lsl#1] ; chargement du LeSignal[n] dans r8
+	 ldrsh r9,[r5, r7, lsl #1] ; chargement de TabCos[p] dans r9
+	 ldrsh r10,[r6, r7, lsl #1] ; chargement de TabSin[p] dans r10
+	 mul r9, r8, r9 ; multiplication de LeSignal[n] par TabCos[n*k]--> Format 5.27
+	 mul r10, r8, r10 ; multiplication de LeSignal[n] par TabSin[n*k] --> Format 5.27
+	 asr r9, #16 ; Réduction du format pour éviter le débordement --> Format 5.11
+	 asr r10,#16 ; Réduction du format pour éviter le débordement
+	 add r3,r3, r9 ; ajout de la partie réelle au résultat (conservation du format) --> Format 11.11
+	 add r2,r2, r10 ; ajout de la partie imaginaire au résultat (conservation du format) --> Format 11.11 
+	 
+	 add r7, r1 ; Calcul de p = (n+1) * k
+	 and r7, 63 ; modulo 64 pour ne pas depasser la taille du tableau 
+	 add r4, r4, #1 ; incrémentation de l'indice n
+	 cmp r4 ,#64 ; comparaison de n à 64
+	 blt Sommation ; si n<64 on continue la boucle
+	 
+	 asr r3, #6 ; Réduction du format de la partie réelle pour le calcul au carré --> Format 11.5 (décalage 10 bits)
+	 mul r3, r3, r3 ; Calcul du carré de la partie réelle --> Format 10.22
+	 asr r2, #6	; Réduction du format de la partie imaginaire pour le calcul au carré --> Format 11.5 (décalage 10 bits)
+	 mul r2, r2, r2 ; Calcul du carré de la partie réelle --> Format 22.10
+	 mov r0, r3 ; Copie de la partie réelle dans le registre r0
+	 add r0, r0, r2 ; Addition de la partie imaginaire dans r0 (résultat final) --> Format 22.10
+	 
+	 pop{r4-r10} ; restauration des registres depuis la pile
+	 bx lr
+	 endp
 
 
 

soft/PjtKEIL_StepDFT/Src/Signal.m

@@ -0,0 +1 @@
+.

soft/PjtKEIL_StepDFT/Src/principal.c

@@ -1,17 +1,19 @@
 
-
 #include "DriverJeuLaser.h"
 
 
+extern int DFT_ModuleAuCarre(short int* Signal64ech, char k);
+extern short LeSignal;
+
+int test[64];
 
 int main(void)
 {  
-
 // ===========================================================================
 // ============= INIT PERIPH (faites qu'une seule fois)  =====================
 // ===========================================================================
 
-// Après exécution : le coeur CPU est clocké à 72MHz ainsi que tous les timers
+// Après exécution : le coeur CPU est clocké à 72MHz ainsi que tous les timers
 CLOCK_Configure();
 
 
@@ -20,6 +22,9 @@ CLOCK_Configure();
 
 //============================================================================	
 	
+for (int k = 0; k < 64; k++) {
+	test[k] = DFT_ModuleAuCarre(&LeSignal, k);
+}
  
 while	(1)
 	{

soft/PjtKEIL_StepDFT/StepDFT.uvoptx

@@ -75,7 +75,7 @@
       <OPTFL>
         <tvExp>1</tvExp>
         <tvExpOptDlg>0</tvExpOptDlg>
-        <IsCurrentTarget>0</IsCurrentTarget>
+        <IsCurrentTarget>1</IsCurrentTarget>
       </OPTFL>
       <CpuCode>18</CpuCode>
       <DebugOpt>
@@ -154,13 +154,38 @@
         </SetRegEntry>
       </TargetDriverDllRegistry>
       <Breakpoint/>
+      <WatchWindow1>
+        <Ww>
+          <count>0</count>
+          <WinNumber>1</WinNumber>
+          <ItemText>test</ItemText>
+        </Ww>
+        <Ww>
+          <count>1</count>
+          <WinNumber>1</WinNumber>
+          <ItemText>test[k]</ItemText>
+        </Ww>
+        <Ww>
+          <count>2</count>
+          <WinNumber>1</WinNumber>
+          <ItemText>\\StepDFT\Src/principal.c\test[32]</ItemText>
+        </Ww>
+      </WatchWindow1>
+      <MemoryWindow1>
+        <Mm>
+          <WinNumber>1</WinNumber>
+          <SubType>9</SubType>
+          <ItemText>test</ItemText>
+          <AccSizeX>0</AccSizeX>
+        </Mm>
+      </MemoryWindow1>
       <Tracepoint>
         <THDelay>0</THDelay>
       </Tracepoint>
       <DebugFlag>
         <trace>0</trace>
         <periodic>1</periodic>
-        <aLwin>1</aLwin>
+        <aLwin>0</aLwin>
         <aCover>0</aCover>
         <aSer1>0</aSer1>
         <aSer2>0</aSer2>
@@ -200,7 +225,7 @@
         <Wi>
           <IntNumber>0</IntNumber>
           <FirstString>((portb &amp; 0x00000002) &gt;&gt; 1 &amp; 0x2) &gt;&gt; 1</FirstString>
-          <SecondString>FF000000000000000000000000000000E0FFEF400100000000000000000000000000000028706F7274622026203078303030303030303229203E3E2031000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000100000001000000000000000000F03F160000000000000000000000000000000000000096020008</SecondString>
+          <SecondString>FF000000000000000000000000000000E0FFEF400100000000000000000000000000000028706F7274622026203078303030303030303229203E3E2031000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000100000001000000000000000000F03F110000000000000000000000000000000000000096020008</SecondString>
         </Wi>
       </LogicAnalyzers>
       <DebugDescription>
@@ -267,7 +292,7 @@
       <OPTFL>
         <tvExp>1</tvExp>
         <tvExpOptDlg>0</tvExpOptDlg>
-        <IsCurrentTarget>1</IsCurrentTarget>
+        <IsCurrentTarget>0</IsCurrentTarget>
       </OPTFL>
       <CpuCode>18</CpuCode>
       <DebugOpt>
@@ -624,6 +649,30 @@
       <RteFlg>0</RteFlg>
       <bShared>0</bShared>
     </File>
+    <File>
+      <GroupNumber>1</GroupNumber>
+      <FileNumber>2</FileNumber>
+      <FileType>2</FileType>
+      <tvExp>0</tvExp>
+      <tvExpOptDlg>0</tvExpOptDlg>
+      <bDave2>0</bDave2>
+      <PathWithFileName>.\Src\DFT.s</PathWithFileName>
+      <FilenameWithoutPath>DFT.s</FilenameWithoutPath>
+      <RteFlg>0</RteFlg>
+      <bShared>0</bShared>
+    </File>
+    <File>
+      <GroupNumber>1</GroupNumber>
+      <FileNumber>3</FileNumber>
+      <FileType>2</FileType>
+      <tvExp>0</tvExp>
+      <tvExpOptDlg>0</tvExpOptDlg>
+      <bDave2>0</bDave2>
+      <PathWithFileName>.\Src\Signal.asm</PathWithFileName>
+      <FilenameWithoutPath>Signal.asm</FilenameWithoutPath>
+      <RteFlg>0</RteFlg>
+      <bShared>0</bShared>
+    </File>
   </Group>
 
   <Group>
@@ -634,7 +683,7 @@
     <RteFlg>0</RteFlg>
     <File>
       <GroupNumber>2</GroupNumber>
-      <FileNumber>2</FileNumber>
+      <FileNumber>4</FileNumber>
       <FileType>2</FileType>
       <tvExp>0</tvExp>
       <tvExpOptDlg>0</tvExpOptDlg>
@@ -654,7 +703,7 @@
     <RteFlg>0</RteFlg>
     <File>
       <GroupNumber>3</GroupNumber>
-      <FileNumber>3</FileNumber>
+      <FileNumber>5</FileNumber>
       <FileType>4</FileType>
       <tvExp>0</tvExp>
       <tvExpOptDlg>0</tvExpOptDlg>

soft/PjtKEIL_StepDFT/StepDFT.uvprojx

@@ -388,6 +388,16 @@
               <FileType>1</FileType>
               <FilePath>.\Src\principal.c</FilePath>
             </File>
+            <File>
+              <FileName>DFT.s</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\DFT.s</FilePath>
+            </File>
+            <File>
+              <FileName>Signal.asm</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\Signal.asm</FilePath>
+            </File>
           </Files>
         </Group>
         <Group>
@@ -797,6 +807,16 @@
               <FileType>1</FileType>
               <FilePath>.\Src\principal.c</FilePath>
             </File>
+            <File>
+              <FileName>DFT.s</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\DFT.s</FilePath>
+            </File>
+            <File>
+              <FileName>Signal.asm</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\Signal.asm</FilePath>
+            </File>
           </Files>
         </Group>
         <Group>
@@ -1275,6 +1295,16 @@
               <FileType>1</FileType>
               <FilePath>.\Src\principal.c</FilePath>
             </File>
+            <File>
+              <FileName>DFT.s</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\DFT.s</FilePath>
+            </File>
+            <File>
+              <FileName>Signal.asm</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\Signal.asm</FilePath>
+            </File>
           </Files>
         </Group>
         <Group>
@@ -1322,7 +1352,7 @@
   <LayerInfo>
     <Layers>
       <Layer>
-        <LayName>&lt;Project Info&gt;</LayName>
+        <LayName>StepDFT</LayName>
         <LayTarg>0</LayTarg>
         <LayPrjMark>1</LayPrjMark>
       </Layer>

soft/PjtKEIL_StepDeb_1/BacASable.uvoptx

@@ -10,7 +10,7 @@
     <aExt>*.s*; *.src; *.a*</aExt>
     <oExt>*.obj; *.o</oExt>
     <lExt>*.lib</lExt>
-    <tExt>*.txt; *.h; *.inc</tExt>
+    <tExt>*.txt; *.h; *.inc; *.md</tExt>
     <pExt>*.plm</pExt>
     <CppX>*.cpp</CppX>
     <nMigrate>0</nMigrate>
@@ -75,7 +75,7 @@
       <OPTFL>
         <tvExp>1</tvExp>
         <tvExpOptDlg>0</tvExpOptDlg>
-        <IsCurrentTarget>1</IsCurrentTarget>
+        <IsCurrentTarget>0</IsCurrentTarget>
       </OPTFL>
       <CpuCode>18</CpuCode>
       <DebugOpt>
@@ -260,7 +260,7 @@
       <OPTFL>
         <tvExp>1</tvExp>
         <tvExpOptDlg>0</tvExpOptDlg>
-        <IsCurrentTarget>0</IsCurrentTarget>
+        <IsCurrentTarget>1</IsCurrentTarget>
       </OPTFL>
       <CpuCode>18</CpuCode>
       <DebugOpt>
@@ -339,11 +339,18 @@
         </SetRegEntry>
       </TargetDriverDllRegistry>
       <Breakpoint/>
+      <WatchWindow1>
+        <Ww>
+          <count>0</count>
+          <WinNumber>1</WinNumber>
+          <ItemText>VarTime</ItemText>
+        </Ww>
+      </WatchWindow1>
       <MemoryWindow1>
         <Mm>
           <WinNumber>1</WinNumber>
           <SubType>257</SubType>
-          <ItemText>r0</ItemText>
+          <ItemText>0x20000000</ItemText>
           <AccSizeX>0</AccSizeX>
         </Mm>
       </MemoryWindow1>

soft/PjtKEIL_StepDeb_1/BacASable.uvprojx

@@ -10,7 +10,7 @@
       <TargetName>Simu</TargetName>
       <ToolsetNumber>0x4</ToolsetNumber>
       <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>
       <TargetOption>
         <TargetCommonOption>
@@ -424,7 +424,7 @@
       <TargetName>CibleSondeKEIL</TargetName>
       <ToolsetNumber>0x4</ToolsetNumber>
       <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>
       <TargetOption>
         <TargetCommonOption>
@@ -1338,11 +1338,6 @@
     <Layers>
       <Layer>
         <LayName>&lt;Project Info&gt;</LayName>
-        <LayDesc></LayDesc>
-        <LayUrl></LayUrl>
-        <LayKeys></LayKeys>
-        <LayCat></LayCat>
-        <LayLic></LayLic>
         <LayTarg>0</LayTarg>
         <LayPrjMark>1</LayPrjMark>
       </Layer>

soft/PjtKEIL_StepDeb_1/Src/Delay.s

@@ -12,6 +12,7 @@
 		
 VarTime	dcd 0
 
+	EXPORT VarTime
 	
 ; ===============================================================================================
 	
@@ -41,19 +42,19 @@ TimeValue	equ 900000
 
 Delay_100ms proc
 	
-	    ldr r0,=VarTime  		  
+	    ldr r0,=VarTime ; r0 prend la valeur VarTime = 0  ici la premiere adresse est 0x20000000 en RAM dans simulation 		  
 						  
-		ldr r1,=TimeValue
+		ldr r1,=TimeValue ; r1 prend la valeur TimeValue = 900000
-		str r1,[r0]
+		str r1,[r0] ;  la valeur 32bits contenue dans r1 est copiée en RAM à l'adresse spécifiée dans r0
 		
 BoucleTempo	
-		ldr r1,[r0]     				
+		ldr r1,[r0] ; la valeur 32bits située à l'adresse spécifiée dans r0 est recopiée dans r1     				
 						
-		subs r1,#1
+		subs r1,#1 ; r1 prend la valeur r1 - 1 = 899999
-		str  r1,[r0]
+		str  r1,[r0] ; la valeur 32bits contenue dans r1 est copiée en RAM à l'adresse spécifiée dans r0
-		bne	 BoucleTempo
+		bne	 BoucleTempo ; if z = 0 faire BoucleTempo; Z: Set to 1 when r1 is zero, otherwise cleared to 0
 			
-		bx lr
+		bx lr ; indirect jump to [LR]
 		endp
 		
 		

soft/PjtKEIL_StepDeb_2/BacASable.uvoptx

@@ -10,7 +10,7 @@
     <aExt>*.s*; *.src; *.a*</aExt>
     <oExt>*.obj; *.o</oExt>
     <lExt>*.lib</lExt>
-    <tExt>*.txt; *.h; *.inc</tExt>
+    <tExt>*.txt; *.h; *.inc; *.md</tExt>
     <pExt>*.plm</pExt>
     <CppX>*.cpp</CppX>
     <nMigrate>0</nMigrate>
@@ -153,7 +153,71 @@
           <Name>-U066CFF574857847167074929 -O2254 -S0 -C0 -A0 -N00("ARM CoreSight SW-DP") -D00(1BA01477) -L00(0) -TO18 -TC10000000 -TP21 -TDS8007 -TDT0 -TDC1F -TIEFFFFFFFF -TIP8 -FO7 -FD20000000 -FC800 -FN1 -FF0STM32F10x_128.FLM -FS08000000 -FL020000 -FP0($$Device:STM32F103RB$Flash\STM32F10x_128.FLM)</Name>
         </SetRegEntry>
       </TargetDriverDllRegistry>
-      <Breakpoint/>
+      <Breakpoint>
+        <Bp>
+          <Number>0</Number>
+          <Type>0</Type>
+          <LineNumber>22</LineNumber>
+          <EnabledFlag>1</EnabledFlag>
+          <Address>134220300</Address>
+          <ByteObject>0</ByteObject>
+          <HtxType>0</HtxType>
+          <ManyObjects>0</ManyObjects>
+          <SizeOfObject>0</SizeOfObject>
+          <BreakByAccess>0</BreakByAccess>
+          <BreakIfRCount>1</BreakIfRCount>
+          <Filename>.\Src\principal.c</Filename>
+          <ExecCommand></ExecCommand>
+          <Expression>\\BacASable\Src/principal.c\22</Expression>
+        </Bp>
+        <Bp>
+          <Number>1</Number>
+          <Type>0</Type>
+          <LineNumber>51</LineNumber>
+          <EnabledFlag>1</EnabledFlag>
+          <Address>134220352</Address>
+          <ByteObject>0</ByteObject>
+          <HtxType>0</HtxType>
+          <ManyObjects>0</ManyObjects>
+          <SizeOfObject>0</SizeOfObject>
+          <BreakByAccess>0</BreakByAccess>
+          <BreakIfRCount>1</BreakIfRCount>
+          <Filename>.\Src\Cligno.s</Filename>
+          <ExecCommand></ExecCommand>
+          <Expression>\\BacASable\Src/Cligno.s\51</Expression>
+        </Bp>
+        <Bp>
+          <Number>2</Number>
+          <Type>0</Type>
+          <LineNumber>59</LineNumber>
+          <EnabledFlag>1</EnabledFlag>
+          <Address>0</Address>
+          <ByteObject>0</ByteObject>
+          <HtxType>0</HtxType>
+          <ManyObjects>0</ManyObjects>
+          <SizeOfObject>0</SizeOfObject>
+          <BreakByAccess>0</BreakByAccess>
+          <BreakIfRCount>0</BreakIfRCount>
+          <Filename>.\Src\Cligno.s</Filename>
+          <ExecCommand></ExecCommand>
+          <Expression></Expression>
+        </Bp>
+      </Breakpoint>
+      <WatchWindow1>
+        <Ww>
+          <count>0</count>
+          <WinNumber>1</WinNumber>
+          <ItemText>FlagCligno</ItemText>
+        </Ww>
+      </WatchWindow1>
+      <MemoryWindow1>
+        <Mm>
+          <WinNumber>1</WinNumber>
+          <SubType>0</SubType>
+          <ItemText>r1</ItemText>
+          <AccSizeX>0</AccSizeX>
+        </Mm>
+      </MemoryWindow1>
       <Tracepoint>
         <THDelay>0</THDelay>
       </Tracepoint>

soft/PjtKEIL_StepDeb_2/BacASable.uvprojx

@@ -10,7 +10,7 @@
       <TargetName>Simu</TargetName>
       <ToolsetNumber>0x4</ToolsetNumber>
       <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>
       <TargetOption>
         <TargetCommonOption>
@@ -357,7 +357,7 @@
               <MiscControls></MiscControls>
               <Define></Define>
               <Undefine></Undefine>
-              <IncludePath></IncludePath>
+              <IncludePath>.\Driver</IncludePath>
             </VariousControls>
           </Aads>
           <LDads>
@@ -1338,11 +1338,6 @@
     <Layers>
       <Layer>
         <LayName>&lt;Project Info&gt;</LayName>
-        <LayDesc></LayDesc>
-        <LayUrl></LayUrl>
-        <LayKeys></LayKeys>
-        <LayCat></LayCat>
-        <LayLic></LayLic>
         <LayTarg>0</LayTarg>
         <LayPrjMark>1</LayPrjMark>
       </Layer>

soft/PjtKEIL_StepDeb_2/Src/Cligno.s

@@ -2,6 +2,10 @@
 	THUMB   
 		
 
+
+
+
+
 ; ====================== zone de réservation de données,  ======================================
 ;Section RAM (read only) :
 	area    mesdata,data,readonly
@@ -10,20 +14,63 @@
 ;Section RAM (read write):
 	area    maram,data,readwrite
 		
+FlagCligno dcb 0
 
+    EXPORT FlagCligno
 	
 ; ===============================================================================================
 
-
+;constantes (équivalent du #define en C)
+;char FlagCligno;	
+    EXPORT timer_callback ; la fonction timer_callback est rendue publique donc utilisable par d'autres modules.
 
 		
 ;Section ROM code (read only) :		
 	area    moncode,code,readonly
 ; écrire le code ici	
 
+;*void timer_callback(void)
+;{
+;	if (FlagCligno==1)
+;	{
+;		FlagCligno=0;
+;		GPIOB_Set(1);
+;	}
+;	else
+;	{
+;		FlagCligno=1;
+;		GPIOB_Clear(1);
+;	}
+;		
 
 
+    include DriverJeuLaser.inc
 
+timer_callback proc
+	
+	    push {lr}
+	    ldr  r1,=FlagCligno ;
+		
+	    cmp  r1,#0 ;   si r1(FlagCligno) == 0, on continue.	
+        beq  L0 ;		
+		cmp  r1,#0 ;   si r1(FlagCligno) == 0, on continue.
+        bne  L1 ;  sinon break to L1  
+		
+L0		
+        mov  r2, #1
+        str  r2, [r1]
+        mov  r0, #1 ; GPIOB_Clear("1")
+        bl   GPIOB_Clear 		
+		pop {pc} 
+       
+L1               
+		mov r2, #0 ; copie valeur "0" dans r2
+        str r2, [r1] ; la valeur 32bits contenue dans r2 est copiée en RAM à l'adresse spécifiée dans r1
+        mov r0, #1 ; GPIOB_Set(r0 = "1")
+        bl   GPIOB_Set 		
+		pop {pc} 
+		
+		endp
 			
 			
 		

soft/PjtKEIL_StepDeb_2/Src/principal.c

@@ -2,7 +2,8 @@
 
 #include "DriverJeuLaser.h"
 
-void timer_callback(void);
+extern void timer_callback(void);
+extern char FlagCligno;
 
 int main(void)
 {
@@ -18,6 +19,7 @@ CLOCK_Configure();
 	
 //** Placez votre code là ** // 
 
+Timer_1234_Init_ff(TIM4, 7200000);	
 	
 	
 // Activation des interruptions issues du Timer 4	 
@@ -25,7 +27,7 @@ CLOCK_Configure();
 // cette fonction (si écrite en ASM) doit être conforme à l'AAPCS
 	
 //** Placez votre code là ** // 	
-	
+Active_IT_Debordement_Timer(TIM4, 2, timer_callback);	
 	
 	
 // configuration de PortB.1 (PB1) en sortie push-pull
@@ -42,20 +44,4 @@ while	(1)
 	}
 }
 
-char FlagCligno;
-
-void timer_callback(void)
-{
-	if (FlagCligno==1)
-	{
-		FlagCligno=0;
-		GPIOB_Set(1);
-	}
-	else
-	{
-		FlagCligno=1;
-		GPIOB_Clear(1);
-	}
-		
-}
 

soft/PjtKEIL_StepSon/Src/GestionSon.h

@@ -0,0 +1,7 @@
+#ifndef GESTION_SON
+#define GESTION_SON
+
+void StartSon(void);
+void GestionSon(void);
+
+#endif

soft/PjtKEIL_StepSon/Src/GestionSon.s

@@ -1,8 +1,13 @@
 PRESERVE8
 	THUMB   
 
+	import LongueurSon 
+	import PeriodeSonMicroSec
+	import Son
 		
-; ====================== zone de réservation de données,  ======================================
+	include Driver/DriverJeuLaser.inc
+
+; ====================== zone de réservation de données,  ======================================
 ;Section RAM (read only) :
 	area    mesdata,data,readonly
 
@@ -11,20 +16,48 @@
 	area    maram,data,readwrite
 		
 
+Son_index dcd 0
+SortieSon dcw 0
 	
 ; ===============================================================================================
 	
 
+	EXPORT Son_index
+	EXPORT SortieSon
 
 		
 ;Section ROM code (read only) :		
 	area    moncode,code,readonly
-; écrire le code ici		
+; écrire le code ici	
-
+    EXPORT StartSon
-
+	EXPORT CallbackSon
-
-
-
 		
+StartSon proc
+    mov r0, #0 ; Charger la valeur 0 dans le registre r0
+    ldr r1, =Son_index ; Charger l'adresse de la variable Son_index dans le registre r1
+    str r0, [r1] ; Stocker la valeur de r0 dans la variable Son_index
+    bx lr ; Retourner à l'appelant
+    endp; Fin de la procédure StartSon
 
+CallbackSon proc
+	ldr r1, =LongueurSon ; Charger l'adresse de la variable LongueurSon dans le registre r1
+	ldr r0, [r1] ; Charger la valeur de LongueurSon dans le registre r0
+	ldr r1, =Son_index ; ; Charger l'adresse de la variable Son_index dans le registre r1
+	ldr r2, [r1] ; Charger la valeur de Son_index dans le registre r2
+	cmp r0, r2 ; Comparer LongueurSon et Son_index
+	bls fin ; Sauter à l'étiquette "fin" si LongueurSon <= Son_index ;
+	ldr r3, =Son ; Charger l'adresse du tableau Son dans le registre r3
+	ldrsh r0, [r3, r1, lsl #1] ; r0 = Son[Son_index] ; Charger la valeur Son[Son_index] dans le registre r0
+	add r0, #32768 ; Ajouter 32768 à r0
+	mov r3, #720 ; Charger la valeur 720 dans le registre r3
+	mul r0, r3 ; Multiplication de r0 par r3
+	lsr r0, #16 ;x in [-32768; 32767] -> x in [0; 719] // Décalage logique à droite de r0 de 16 bits (division par 65536)
+	ldr r3, =SortieSon ; Charger l'adresse de la variable SortieSon dans le registre r3
+	str r0, [r3]  ; ; Stocker la valeur de r0 dans la variable SortieSon "Sortie_son = x"
+	add r2, r2, #1 ; Incrémenter la valeur de Son_index
+	str r2, [r1]  ; Son_index++; 
+	b PWM_Set_Value_TIM3_Ch3 ; ; Appel de la fonction PWM_Set_Value_TIM3_Ch3
+fin
+	bx lr
+	endp
     END

soft/PjtKEIL_StepSon/Src/principal.c

@@ -2,19 +2,31 @@
 
 #include "DriverJeuLaser.h"
 
+extern void CallBackSon(void);
 
 
 int main(void)
 {
 	
+
 // ===========================================================================
 // ============= INIT PERIPH (faites qu'une seule fois)  =====================
 // ===========================================================================
 
-// Après exécution : le coeur CPU est clocké à 72MHz ainsi que tous les timers
+// Après exécution : le coeur CPU est clocké à 72MHz ainsi que tous les timers
-CLOCK_Configure();
+CLOCK_Configure(); #Configuration de la clock système à 72MHz
 	
 	
+  Timer_1234_Init_ff( TIM4, 6552); //Initialisation du timer TIM4 avec une période de 6552
+	
+	
+	
+  Active_IT_Debordement_Timer( TIM4, 2, CallBackSon ); //Activation de l'interruption de débordement pour le timer TIM4 avec une priorité de 2, et en utilisant la fonction "CallBackSon" comme callback
+	
+	PWM_Init_ff( TIM3, 3, 720); //Initialisation du PWM sur le timer TIM3, pour la sortie 3, avec une fréquence de 720Hz
+
+	
+	GPIO_Configure(GPIOB, 0, OUTPUT, ALT_PPULL); //Configuration de la broche PB0 en mode de sortie alternative (PWM), avec pull-up activé
 	
 
 	
@@ -25,4 +37,3 @@ while	(1)
 	{
 	}
 }
-

soft/PjtKEIL_StepSon/StepSon.uvoptx

@@ -10,7 +10,7 @@
     <aExt>*.s*; *.src; *.a*</aExt>
     <oExt>*.obj; *.o</oExt>
     <lExt>*.lib</lExt>
-    <tExt>*.txt; *.h; *.inc</tExt>
+    <tExt>*.txt; *.h; *.inc; *.md</tExt>
     <pExt>*.plm</pExt>
     <CppX>*.cpp</CppX>
     <nMigrate>0</nMigrate>
@@ -75,7 +75,7 @@
       <OPTFL>
         <tvExp>1</tvExp>
         <tvExpOptDlg>0</tvExpOptDlg>
-        <IsCurrentTarget>0</IsCurrentTarget>
+        <IsCurrentTarget>1</IsCurrentTarget>
       </OPTFL>
       <CpuCode>18</CpuCode>
       <DebugOpt>
@@ -154,6 +154,14 @@
         </SetRegEntry>
       </TargetDriverDllRegistry>
       <Breakpoint/>
+      <MemoryWindow1>
+        <Mm>
+          <WinNumber>1</WinNumber>
+          <SubType>266</SubType>
+          <ItemText>r3</ItemText>
+          <AccSizeX>0</AccSizeX>
+        </Mm>
+      </MemoryWindow1>
       <Tracepoint>
         <THDelay>0</THDelay>
       </Tracepoint>
@@ -460,7 +468,7 @@
       <OPTFL>
         <tvExp>1</tvExp>
         <tvExpOptDlg>0</tvExpOptDlg>
-        <IsCurrentTarget>1</IsCurrentTarget>
+        <IsCurrentTarget>0</IsCurrentTarget>
       </OPTFL>
       <CpuCode>18</CpuCode>
       <DebugOpt>
@@ -666,6 +674,38 @@
     </File>
   </Group>
 
+  <Group>
+    <GroupName>Son</GroupName>
+    <tvExp>1</tvExp>
+    <tvExpOptDlg>0</tvExpOptDlg>
+    <cbSel>0</cbSel>
+    <RteFlg>0</RteFlg>
+    <File>
+      <GroupNumber>4</GroupNumber>
+      <FileNumber>4</FileNumber>
+      <FileType>2</FileType>
+      <tvExp>0</tvExp>
+      <tvExpOptDlg>0</tvExpOptDlg>
+      <bDave2>0</bDave2>
+      <PathWithFileName>.\Src\bruitverre.asm</PathWithFileName>
+      <FilenameWithoutPath>bruitverre.asm</FilenameWithoutPath>
+      <RteFlg>0</RteFlg>
+      <bShared>0</bShared>
+    </File>
+    <File>
+      <GroupNumber>4</GroupNumber>
+      <FileNumber>5</FileNumber>
+      <FileType>2</FileType>
+      <tvExp>0</tvExp>
+      <tvExpOptDlg>0</tvExpOptDlg>
+      <bDave2>0</bDave2>
+      <PathWithFileName>.\Src\GestionSon.s</PathWithFileName>
+      <FilenameWithoutPath>GestionSon.s</FilenameWithoutPath>
+      <RteFlg>0</RteFlg>
+      <bShared>0</bShared>
+    </File>
+  </Group>
+
   <Group>
     <GroupName>::CMSIS</GroupName>
     <tvExp>0</tvExp>

soft/PjtKEIL_StepSon/StepSon.uvprojx

@@ -10,7 +10,7 @@
       <TargetName>Simu</TargetName>
       <ToolsetNumber>0x4</ToolsetNumber>
       <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>
       <TargetOption>
         <TargetCommonOption>
@@ -410,6 +410,21 @@
             </File>
           </Files>
         </Group>
+        <Group>
+          <GroupName>Son</GroupName>
+          <Files>
+            <File>
+              <FileName>bruitverre.asm</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\bruitverre.asm</FilePath>
+            </File>
+            <File>
+              <FileName>GestionSon.s</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\GestionSon.s</FilePath>
+            </File>
+          </Files>
+        </Group>
         <Group>
           <GroupName>::CMSIS</GroupName>
         </Group>
@@ -819,6 +834,21 @@
             </File>
           </Files>
         </Group>
+        <Group>
+          <GroupName>Son</GroupName>
+          <Files>
+            <File>
+              <FileName>bruitverre.asm</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\bruitverre.asm</FilePath>
+            </File>
+            <File>
+              <FileName>GestionSon.s</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\GestionSon.s</FilePath>
+            </File>
+          </Files>
+        </Group>
         <Group>
           <GroupName>::CMSIS</GroupName>
           <GroupOption>
@@ -897,7 +927,7 @@
       <TargetName>CibleSondeST</TargetName>
       <ToolsetNumber>0x4</ToolsetNumber>
       <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>
       <TargetOption>
         <TargetCommonOption>
@@ -1297,6 +1327,21 @@
             </File>
           </Files>
         </Group>
+        <Group>
+          <GroupName>Son</GroupName>
+          <Files>
+            <File>
+              <FileName>bruitverre.asm</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\bruitverre.asm</FilePath>
+            </File>
+            <File>
+              <FileName>GestionSon.s</FileName>
+              <FileType>2</FileType>
+              <FilePath>.\Src\GestionSon.s</FilePath>
+            </File>
+          </Files>
+        </Group>
         <Group>
           <GroupName>::CMSIS</GroupName>
         </Group>
@@ -1322,12 +1367,7 @@
   <LayerInfo>
     <Layers>
       <Layer>
-        <LayName>&lt;Project Info&gt;</LayName>
+        <LayName>StepSon</LayName>
-        <LayDesc></LayDesc>
-        <LayUrl></LayUrl>
-        <LayKeys></LayKeys>
-        <LayCat></LayCat>
-        <LayLic></LayLic>
         <LayTarg>0</LayTarg>
         <LayPrjMark>1</LayPrjMark>
       </Layer>