Compare commits
2 Commits
ae0978102d
...
8abdfce09b
Author | SHA1 | Date |
---|---|---|
Rampoina | 8abdfce09b | |
Rampoina | b5b64f70a1 |
7
arc.bqn
7
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"
|
||||
|
|
Loading…
Reference in New Issue