Microtonal 1/3 tone or 1/16 tone piano in SonicPi

Two days ago I was in a microtonal concert with (among others) the piece “Balbuceos” of Julián Carrillo. They have a third-tone piano and a sixteenth note piano. I just wrote a little script for these scales in SonicPi:

# Experiments with 1/3 tone scale
# SR 25.11.2025

g_base = 440.0

# 1/16 tone intervals -> 12*16/2
g_anztonesinoct = 96.0

# 1/3 tone intervals -> 3*12/2
g_anztonesinoct = 18.0

use_synth :piano


# p_index is null based
(g_anztonesinoct+1).times do |p_index|
  print p_index
  l_factor = 2.0**(p_index/g_anztonesinoct)
  print l_factor
  l_freq = g_base * l_factor
  print l_freq
  l_midi = hz_to_midi(l_freq)
  play l_midi, decay: 1
  sleep 1
end

Here you find an image of a 1/16 note piano: https://www.sauter-pianos.de/chinese/pianos/microtone.html.

And last but not least how it sounds: