//pedometer action
action pedometer()
| var steps := 0
| while (not engduino -> button was pressed) do
| | var p := engduino -> acceleration
| | var x := p -> x
| | var y := p -> y
| | var z := p -> z
| | var movement := z * z + y * y + x * x
| | movement := math -> sqrt(movement)
| | if (movement > 1.1) then
| | | steps := addStep(steps)
| | else do nothing end if
| end while
end action


//addStep action
private action addStep (
| p: Number)
returns (
| r: Number)
do
| r := p+1
| r -> post to wall
end action