src/pocket39.c implementing pitch