rudus/sandbox.ld

13 lines
352 B
Plaintext
Raw Normal View History

let command = (:forward, 100)
match command with {
(:goto, (x, y)) -> "goto: {x} and {y}"
(:home) -> "go home!"
& (:clear) -> "clear the screen"
& (:right, turns) -> "make {turns} to the right"
& (:left, turns) -> "turn left! by {turns}"
(:forward, steps) -> "forward {steps} turtle paces"
(:back, steps) -> "flip it and reverse it {steps}"
}