あなごる「Steps line FIXED」を空白で
相変わらずスマートでもなんでもないな・・・
http://golf.shinh.org/p.rb?Steps+line+FIXED
Push(0); Push(0); Label("Loop"); //ci Swap(); Dup(); JmpEq('.', "End"); Discard(); Push(0); //ip Dup(); //ipp IChar(); //ip HRetrieve(); //ic Dup(); // icc JmpEq(' ', "Next"); Copy(1); //ici JmpN("Vertical"); Jmp("Horizonal"); Label("Next"); //ic Swap(); //ci Call("Invert"); Dup(); //cii JmpN("LoopH"); //ci Print("\n"); Add(1); //ci+ Dup(); //ci+i+ Call("Invert"); // ci+i- Call("PrintIndent"); Jmp("Loop"); Label("LoopH"); Print(" "); Jmp("Loop"); Label("End"); End(); Label("Horizonal"); //ic Dup(); PChar(); Swap(); Add(1); Jmp("Loop"); Label("Vertical"); //ic Print("\n"); Copy(1); Call("PrintIndent"); Dup(); PChar(); Swap(); Jmp("Loop"); Label("Invert"); Push(0); Swap(); Sub(); Return(); Label("PrintIndent"); Dup(); JmpN("PIndent_Loop"); Discard(); Return(); Label("PIndent_Loop"); Print(" "); Add(1); Dup(); JmpN("PIndent_Loop"); Discard(); Return();