Evaluated proc WOOOHAH {{x 60}} {set out ""; foreach cum [seq 1 20] {append out [m [seq 1 $x] {x {. [^C][rand 2 13],[rand 2 13]▄}} ""]\n}; . $out}