PROC P (CHAN OF BYTE in, keyboard, out) SKIP :