extern fint usercharu_c(fchar,fint *,fint *,fchar,fchar);