REBOL[]foreach i {^J^K^L^M^N^O^P^Q^T^V^X^_dy}[print to-integer i]print 10000