function playnext()
  abc = {}
  def = {}
  hgm = {}
  len = #mem.melody[mem.current]
  for i = 1, len do
    --ASCII value of character
    byte = string.byte(mem.melody[mem.current], i)
    if(byte < 100) then
       abc[#abc+1] = byte
    elseif(byte < 103) then
       def[#def+1] = byte
    else
       hgm[#hgm+1] = byte
    end
  end

  digiline_send("ch_abc", abc)
  digiline_send("ch_def", def)
  digiline_send("ch_hgm", hgm)
end