%%HP: T(3)A(D)F(.);
\<< ERASE -.05 1.05
XRNG -.05 1.05 YRNG
(0,0) (1,0) (0,1)
RAND RAND R\->C \-> N A
B C X
  \<< { # 0d # 0d }
PVIEW A C\->PX PIXON
B C\->PX PIXON C C\->PX
PIXON X C\->PX PIXON
1 N
    START { A B C }
RAND 3 * CEIL GET
RCL X + 2 / DUP
C\->PX PIXON 'X' STO
    NEXT
  \>> 7 FREEZE
\>>