diff --git a/soft/PjtKEIL_StepDFT/Src/DFT.s b/soft/PjtKEIL_StepDFT/Src/DFT.s
index c4248f7..95bbc31 100644
--- a/soft/PjtKEIL_StepDFT/Src/DFT.s
+++ b/soft/PjtKEIL_StepDFT/Src/DFT.s
@@ -24,20 +24,23 @@ DFT_ModuleAuCarre proc
push{r4, r5, r6, r7, r8, r9, r10, r11, r12}
- mov r0, #0 ; index
+ mov r10, #0 ; index
mov r7, #0 ; resultat cos
mov r8, #0 ; resultat sin
Boucle
ldr r4, =LeSignal
- ldrsh r4, [r4,r0, lsl#1]
+ ldrsh r4, [r4,r10, lsl#1]
+
+ mul r9, r0, r10
+ and r11, r9, #63
ldr r5, =TabCos
- ldrsh r5, [r5,r0, lsl#1]
+ ldrsh r5, [r5,r11, lsl#1]
ldr r6, =TabSin
- ldrsh r6, [r6,r0, lsl#1]
+ ldrsh r6, [r6,r11, lsl#1]
mul r5,r5,r4
add r7, r7, r5
@@ -45,12 +48,18 @@ Boucle
mul r6,r6,r4
add r8,r8,r6
- add r0, #1
+ add r10, #1
- cmp r0, #64
+ cmp r10, #64
blt Boucle
+ ;Format 5.27
+ smull r9,r10,r7,r7
+ smlal r9,r10,r8,r8
+ mov r0,r10
+
+ ;Format 10.22
pop{r4, r5, r6, r7, r8, r9, r10, r11, r12}
diff --git a/soft/PjtKEIL_StepDFT/StepDFT.uvoptx b/soft/PjtKEIL_StepDFT/StepDFT.uvoptx
index 78263b0..c102e2f 100644
--- a/soft/PjtKEIL_StepDFT/StepDFT.uvoptx
+++ b/soft/PjtKEIL_StepDFT/StepDFT.uvoptx
@@ -157,18 +157,18 @@
0
0
- 30
+ 60
1
- 134218370
+ 134218478
0
0
0
0
0
1
- .\Src\principal.c
+ .\Src\DFT.s
- \\StepDFT\Src/principal.c\30
+ \\StepDFT\Src/DFT.s\60