Use MathGL to generate piano sound using OpenAL in Kolin

Submitted by Dickens A S on Sun, 08/01/2021 - 14:05

This article demonstrates how to use MathGL to generate a sine wave and modify it using a cosine envelope and transfer that data to the OpenAL

Full Kotlin code

package plot
import kotlinx.cinterop.internal.*
import platform.posix.sleep
import kotlinx.cinterop.*
import kotlin.math.*
import openal.*
import mgl.*

fun main() {
   memScoped {

      var defname = alcGetString(null, ALC_DEFAULT_DEVICE_SPECIFIER)
      var dev = alcOpenDevice(defname?.toKString())
      var ctx = alcCreateContext(dev, null)
      var buf = alloc<ALuintVar>()
      alGenBuffers(1, buf.ptr)
      var d = 1.0f;
      var sr = 44100;
      var y = mgl_create_data_size(sr.toInt(),1,0)
      var samples = ShortArray(sr.toInt())
      for(i in {
         samples[i] = mgl_data_get_value(y,i,0,0).toInt().toShort()
      samples.usePinned {
         alBufferData(buf.value, AL_FORMAT_MONO16, it.addressOf(0), (sr * sizeOf<ShortVar>()).toInt(), sr.toInt())
      var src = alloc<ALuintVar>()
      alGenSources(1.toInt(), src.ptr)
      alSourcei(src.value, AL_BUFFER, buf.value.toInt())
      alSourcei(src.value, AL_BUFFER, 0)
      alDeleteSources(1, src.ptr)
      alDeleteBuffers(1, buf.ptr)



the mgl_data_modify C function generates 44100 values and we convert all those values to short data type and put it in an array using

samples[i] = mgl_data_get_value(y,i,0,0).toInt().toShort()

Then we play the audio , the formula almost generates a piano sound

Finished !


Add new comment