adjusted {B,D,H,P}hook.sc
fix phook