$T = vec( pack( 'C', $i ), 0, 4 ) +
	 vec( pack( 'b*', $_{65} ), $offset, 1 ) * (1<<4) +
	 (1<<5);