new subroutine VOICE and other small modifications