diff --git a/arc.bqn b/arc.bqn
index 9803a0c..02cb871 100755
--- a/arc.bqn
+++ b/arc.bqn
@@ -97,7 +97,12 @@ clear←""
   {𝕤⋄•Out "Invalid key: (hjkl or wasd) to move, u to undo, r to reset level"}⍟(¬⊑key∊"wasdhjkluqr")@
   •Out¨ (currentLevel⊑levels) Draw moves
   •Out "Moves: "∾•Repr ¯1+≠moves
-  {𝕤⋄•Out "Good job!, press any key to continue to the next level"⋄•term.CharB @⋄e∾"[H"⋄currentLevel↩currentLevel+1⋄moves↩⟨0‿0⟩}⍟(Win (currentLevel⊑levels) Step´⌽moves)@
+  {𝕤
+    •Out "Good job!, press any key to continue to the next level"
+    •term.CharB @
+    •Out e∾"[H"∾e∾"[0J"
+    currentLevel↩currentLevel+1⋄moves↩⟨0‿0⟩
+  }⍟(Win (currentLevel⊑levels) Step´⌽moves)@
 }•_While_{𝕤⋄currentLevel<≠levels}@
 •Out "Well played, you win!"
 •Out e∾"[?12l"∾e∾"[?25h"