mirror/sointu
1
0
Fork 0
mirror of https://github.com/vsariola/sointu.git synced 2025-05-28 03:10:24 -04:00
Code Issues Packages Projects Releases Wiki Activity

use output-sound template

Browse Source
This commit is contained in:
Peter Salomonsen 2023-03-19 21:12:58 +01:00 committed by Peter Salomonsen
parent 2da616e0ff
commit 451b638af2
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
templates/wasm/player.wat
View File

@ -794,9 +794,10 @@
;;------------------------------------------------------------------------------ ;;------------------------------------------------------------------------------
(func $render_128_samples (param) (func $render_128_samples (param)
(local $rendersamplecount i32) (local $rendersamplecount i32)
(i32.const 0) (i32.const 0)
(local.set $rendersamplecount) (local.set $rendersamplecount)
{{- if .Output16Bit }} (local $channel i32) {{- end }}
(loop $sample_loop (loop $sample_loop
(if (i32.eq (global.get $sample) (i32.const 0)) (if (i32.eq (global.get $sample) (i32.const 0))
(then (then
@ -816,9 +817,7 @@
(global.set $delayWRK (i32.const {{index .Labels "su_delaylines"}})) (global.set $delayWRK (i32.const {{index .Labels "su_delaylines"}}))
{{- end}} {{- end}}
(call $su_run_vm) (call $su_run_vm)
(i64.store (global.get $outputBufPtr) (i64.load (i32.const 1440))) ;; load the sample from left & right channels as one 64bit int and store it in the address pointed by outputBufPtr {{- template "output_sound.wat" .}}
(global.set $outputBufPtr (i32.add (global.get $outputBufPtr) (i32.const 8))) ;; advance outputbufptr
(i64.store (i32.const 1440) (i64.const 0)) ;; clear the left and right ports
(global.set $sample (i32.add (global.get $sample) (i32.const 1))) (global.set $sample (i32.add (global.get $sample) (i32.const 1)))
(global.set $globaltick (i32.add (global.get $globaltick) (i32.const 1))) (global.set $globaltick (i32.add (global.get $globaltick) (i32.const 1)))
(if (i32.eq (global.get $sample) (i32.const {{.Song.SamplesPerRow}})) (if (i32.eq (global.get $sample) (i32.const {{.Song.SamplesPerRow}}))
@ -835,7 +834,7 @@
(global.set $row (i32.const 0)) (global.set $row (i32.const 0))
(global.set $pattern (i32.add (global.get $pattern) (i32.const 1))) (global.set $pattern (i32.add (global.get $pattern) (i32.const 1)))
) )
) )
) )
(export "render_128_samples" (func $render_128_samples)) (export "render_128_samples" (func $render_128_samples))