just /style

This isn't stealed from Shiny

alias style {
  var %rawr = $rand(1,37)
  if (%rawr == 1) say  8,0#0,8#14,8#8,14#1,14#14,1#0,1 $1- 14,11,14#8,14#14,8#0,8#8,0#
  if (%rawr == 2) say 13<0,13>6<13,6>2,6<6,2>1<2,1>1,1>0,1 $1- 1,1 <2,1<1,2>6,2<2,6>13,6<6,13>0,13<13,0>
  if (%rawr == 3) say 8,8\14,8\8,14\1,14\14,1\0,1 $1- 14,1/1,14/8,14/14,8/8,8/8,0/
  if (%rawr == 4) say 4§0,4§4,5§5,1§0,1 $1- 5,1§4,5§0,4§4§
  if (%rawr == 5) say 8§0,8§8,9§9,3§10,1§0,1 $1- 10,1§9,3§8,9§0,8§8,0§
  if (%rawr == 6) say 0%8,4%,12,4'%0,12%,2,12'%12,2%,1,2'%2,1%,11,14|11 4|11 $1- 4|11 1,14,1| 2,1'%1,2%,12,2'%2,12%,4,12'%12,4%,8,4'%0%0'
  if (%rawr == 7) say 11§0,11§12,11§11,12§2,12§12,2§1,2§2,1§11,1 $1- 2,1§1,2§12,2§2,12§11,12§12,11§0,11§11,0§
  if (%rawr == 8) say 1,1:2,1::12::6::4::7::9::8:: $1- 8,1::9::7::4::6::12::2::1,1::
  if (%rawr == 9) say 0,12?2,12`?12,2?1,2`?2,1?0,1 -= $1- =- 2,1`?1,2?12,2`?2,12?0,12`?
  if (%rawr == 10) say 8,1®8,14®8,15®8,0®8,15®8,14®8,1® 0 $1-  8,1®8,14®8,15®8,0®8,15®8,14®8,1®
  if (%rawr == 11) say 9¦|0,9¦|3,9¦|9,3¦|1,3¦|3,1¦| $1- 3,1|¦1,3|¦9,3|¦3,9|¦0,9|¦9,0|¦
  if (%rawr == 12) say 0,8☞8,9☞9,3☞3,1☞0 $1- 3,1☞9,3☞8,9☞0,8☞
  if (%rawr == 13) say 3|1,3|9,3|3,9|10,9|9,3|1,3 1 $1- 3,3|10,9|3,9|9,3|1,3|3,1|
  if (%rawr == 14) say 9,0æ0,9æ3,9æ9,3æ1,3æ3,1æ9 $1- 3,1æ1,3æ9,3æ3,9æ0,9æ9,0æ
  if (%rawr == 15) say 9`%16,9%,  3,9`%9,3%,  1,3`%3,1%,16,18,1 $1- 3,1`%1,3%,  9,3`%3,9%,  16,9`%9,16%, 1
  if (%rawr == 16) say 3,1\1,3\9,3\3,9\0,9\9,0\0,0-15,0\0,15\14,15\15,14\1,14\14,1\1,1-0,1 Rawr 1,1-14,1/1,14/15,14/14,15/0,15/15,0/0,0-9,0/0,9/3,9/9,3/1,3/3,1/ 
  if (%rawr == 17) say 0`%8,4%,12,4'%0,12%,2,12'%12,2%,1,2'%2,1%,11,14|11 4|11 $1- 4|11 1,14,1| 2,1'%1,2%,12,2'%2,12%,4,12'%12,4%,8,4'%0%0'
  if (%rawr == 18) say 0,11☞11,12☞12,2☞2,1☞0 $1- 2,1☞12,2☞11,12☞0,11☞
  if (%rawr == 19) say 11§0,11§12,11§11,12§2,12§12,2§1,2§2,1§11,1 $1- 2,1§1,2§12,2§2,12§11,12§12,11§0,11§11,0§
  if (%rawr == 20) say 1,1::2,1::12::6::4::7::9::8:: $1- 8,1::9::7::4::6::12::2::1,1::
  if (%rawr == 21) say 0,12?2,12`?12,2?1,2`?2,1?0,1 -= $1- =- 2,1`?1,2?12,2`?2,12?0,12`?12
  if (%rawr == 22) say 4,1\1,4\7,4\4,7\8,7\7,8\0,8\8,0\0,0-15,0\0,15\14,15\15,14\1,14\14,1\1,1-0,1 $1- 1,1-14,1/1,14/15,14/14,15/0,15/15,0/0,0-8,0/0,8/7,8/8,7/4,7/7,4/1,4/4,1//
  if (%rawr == 23) say 8,0|0,8¦|7,8¦|8,7¦|4,7¦|7,4¦|5,4¦|4,5¦|1,5¦|5,1¦|9,1 $1- 5,1|¦1,5|¦4,5|¦5,4|¦7,4|¦4,7|¦8,7|¦7,8|¦0,8|¦8,0|¦
  if (%rawr == 24) say 11`8°11¤8ø11,8¸11¸8,11ø8¤11°8´11`8°11¤8ø11,8¸11¸8,11ø8¤11°8´11 $1- 11`8°11¤8ø11,8¸11¸8,11ø8¤11°8´11`8°11¤8ø11,8¸11¸8,11ø8¤11°8´
  if (%rawr == 25) say 8,%%0,8%`7,8,%8,7%`4,7,%7,4%`8 $1- 7,4`%4,7%,8,7`%7,8%,0,8`%8%%,
  if (%rawr == 26) say 1,5@1,4@1,7@1,8@1,7@1,4@1,5@8 $1- 1,5@1,4@1,7@1,8@1,7@1,4@1,5@
  if (%rawr == 27) say 0,8|7,8|8,7|4,7|7,4|5,4|4,5|1,5|5,1| 9,1 $1- 5,1 |1,5|4,5|5,4|7,4|4,7|8,7|7,8|
  if (%rawr == 28) say 15,0¦|0,15¦|13,15¦|6,13¦|13,6¦|14,6¦|6,14¦|0,1 $1- 6,14|¦14,6|¦13,6|¦6,13|¦13,15|¦0,15|¦15,0|¦
  if (%rawr == 29) say 9,3<1>13,6<1>9,3<1>13,6<1>9,3<1>13,6<1>1,13 $1- 9,3<1>13,6<1>9,3<1>13,6<1>9,3<1>13,6<1>
  if (%rawr == 30) say 1,1.12,12.11,11.0,0.11,11.12,12.1,1...7,7.8,8.0,0.8,8.7,7.1,1...4,4.13,13.0,0.13,13.4,4.1,1...3,3.9,9.0,0.9,9.3,3.2,2.13,1 $1-  2,2.3,3.9,9.0,0.9,9.3,3.1,1...4,4.13,13.0,0.13,13.4,4.11,1...7,7.8,8.0,0.8,8.7,7.1,1...12,12.11,11.0,0.11,11.12,12.1,1.
  if (%rawr == 31) say 0,6☞6,12☞12,10☞10,3☞3,9☞9,8☞8,7☞7,4☞15,1 $1- 7,4☞8,7☞9,8☞3,9☞10,3☞12,10☞6,12☞0,6☞
  if (%rawr == 32) say 1,11,21,31,41,51,61,71,81,91,108,1  $1-  1,101,91,81,71,61,51,41,31,2
  if (%rawr == 33) say 4,7æ7,4æ5,4æ4,5æ1,5æ5,1æ8,1 7¤(~~~~0,1 10 $1- 7 ~~~~7,1)¤ 4,15,1æ1,5æ4,5æ5,4æ7,4æ4,7æ 
  if (%rawr == 34) say 4,7<8>4<8>4<8>2 $1- 4<8>4<8>4<8>
  if (%rawr == 35) say 15,15 0<14>1515,15 0<14>1515,15 0<14>1,15 $1- 15,15 0<14>15 0<14>15 0<14>15 
  if (%rawr == 36) say 8,1®8,14®8,15®8,0®8,15®8,14®8,1® 0 $1-  8,1®8,14®8,15®8,0®8,15®8,14®8,1® 
  if (%rawr == 37) say 4,2«2,4»13,2«2,13»15,2« $1- 2,15»8,2«2,8»
}