p
SETB  p
ZBIT  p
IBIT  @0IBIT  H-77
7777 X
-
*(
2
 `06ZBIT  67F-
	 7 `
?
S0ISETB  G-IJ
	A7 `k