Mk16
#define TK16(N) Mk16(TK[2 * (N) + 1], TK[2 * (N)])
P1K[2] = Mk16(TA[1], TA[0]); /* use TA[] as little-endian */
P1K[3] = Mk16(TA[3], TA[2]);
P1K[4] = Mk16(TA[5], TA[4]);