# original 96-stroke solution
$c[$_*=.52,5.5-4.7*cos][8+7.4*sin]=($_^$`%12?o:x)&($_^$'/5?o:'}')for<>!~/:/..11;print"@$_
"for@c
# 102-stroke pack-friendly makeover
map$c[$_*=.52,5.5-4.7*cos][8+7.4*sin]=($`%12^$_?o:x)&($'/5^$_
?o:v125),0..s//<>/e./:/;print"@$_\n"for@c#```