dranke/microw8
1
0
Fork 0
mirror of https://github.com/exoticorn/microw8.git synced 2026-01-20 19:26:43 +01:00
Code Issues Projects Releases Wiki Activity

add initial pulse width support

Browse Source
This commit is contained in:
Dennis Ranke
2022-03-08 22:52:12 +01:00
parent a15e796489
commit ce18a8a162
4 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
platform/src/ges.cwa
View File

@@ -63,6 +63,9 @@ export fn gesSnd(t: i32) -> f32 {
let phase = i32.load16_u(channelState, GesChannelState.Phase) << 8;
let inline pulseWidth = channelReg?1;
let phaseShift = (pulseWidth - 128) * 255;
i = 0;
let wave = ctrl >> 6;
if wave < 2 {
@@ -76,7 +79,8 @@ export fn gesSnd(t: i32) -> f32 {
else
{
loop rectLoop {
i!(GesBufferOffset + 128*4) = select(phase & 32768, -32768, 32767);
let p = (phase & 65535) + phaseShift;
i!(GesBufferOffset + 128*4) = select(p >= 32768, -32768, 32767);
phase = phase + phaseInc;
branch_if (i := i + 4) < 64*4: rectLoop;
}