hp_select_id
WR_HARPOON(ioport + hp_select_id,
WR_HARPOON(port + hp_select_id, target);
our_target = (unsigned char)(RD_HARPOON(port + hp_select_id) >> 4);
WR_HARPOON(p_port + hp_select_id, targ_id);