src/pocket39.c implementing modulation