by@kuromunori
AC
541ms
2a+>Ia*I+!]v v[[^$.-1;I < >[[3>[[[[[[[[???]]]?~-!~v v[[[^$.-1!-~?]]]!-~?]]] < >[[[[[?]]]]?*]]]]?*[?[[[[?*[?*+[?]]]]?*]?*+v \ :6-*?[[*?[[[[[?]-*?]]*?]]]]]?[[-*?[[*?[[?< o @
84 12 62 21 52 01 77 74 46 38 46 02
8879