RPN.2.a-4
{t}h(d1)Ct#'90'UTUd;
[t]ThVv#'12'>xa!&(v#'12'-:v)Tm#'100'/+Ts#'10000'/+;
[d]TY#'10000'*TM#'100'*+TD+#'10000'/;
{o}CdCt#'21'UT;
{c}h(d1)h(d1)Ud;
"Clock"
"Clock"D'Choose time format:|\12-hour|24-hour|'Xa;