deumier/chti23
1
0
Fork 0
forked from acco/chti23
Code Issues Pull requests Releases Wiki Activity

Stepson fini

Browse source
This commit is contained in:
Artus13 2023-04-11 17:17:59 +02:00
parent 1052fd89ef
commit 5eb4a91b33
2 changed files with 29 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
soft/PjtKEIL_StepSon/Src/GestionSon.s
View file

@ -30,23 +30,24 @@ CallbackSon
ldr r1, =index ldr r1, =index
ldr r2, [r1] ldr r2, [r1]
ldr r3, =Son ldr r3, =Son
push {r6} ldr r0, LongueurSon
ldr r6, LongueurSon
cmp r2, r6 cmp r2, r0
ble notEqual ble notEqual
pop {r6}
bx lr
notEqual notEqual
mov r6, #2 mov r0, #2
mul r6, r2 mul r0, r2
LDRSH r0, [r3, r6] ldrsh r0, [r3, r0]
add r0, #32768 add r0, #32768
push {r4} push {r4}
mov r4, #719 mov r4, #719
mul r0, r4 mul r0, r4
mov r4, #65535 mov r4, #65535
udiv r0, r4 udiv r0, r4
pop {r4}
push {r7} push {r7}
ldr r7, =SortieSon ldr r7, =SortieSon
str r0, [r7] str r0, [r7]
@ -58,6 +59,7 @@ notEqual
str r2, [r5] str r2, [r5]
pop {r5} pop {r5}
pop {r4}
END bx lr
END

18
soft/PjtKEIL_StepSon/StepSon.uvoptx
View file

@ -170,6 +170,22 @@
<ExecCommand></ExecCommand> <ExecCommand></ExecCommand>
<Expression>\\StepSon\Src/GestionSon.s\30</Expression> <Expression>\\StepSon\Src/GestionSon.s\30</Expression>
</Bp> </Bp>
<Bp>
<Number>1</Number>
<Type>0</Type>
<LineNumber>64</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\GestionSon.s</Filename>
<ExecCommand></ExecCommand>
<Expression></Expression>
</Bp>
</Breakpoint> </Breakpoint>
<WatchWindow1> <WatchWindow1>
<Ww> <Ww>
@ -185,7 +201,7 @@
<Ww> <Ww>
<count>2</count> <count>2</count>
<WinNumber>1</WinNumber> <WinNumber>1</WinNumber>
<ItemText>r3,0x0A</ItemText> <ItemText>r3,0x10</ItemText>
</Ww> </Ww>
<Ww> <Ww>
<count>3</count> <count>3</count>