# variables for state var state[4] = [0,0,0,0] var new_state[4] = [0,0,0,0] # reset outputs call sound.system(-1) call leds.top(0,0,0) call leds.bottom.left(0,0,0) call leds.bottom.right(0,0,0) call leds.circle(0,0,0,0,0,0,0,0) # subroutine to display the current state sub display_state call leds.circle(0,state[1]*32,0,state[3]*32,0,state[2]*32,0,state[0]*32) onevent prox when prox.ground.delta[0] > 450 and prox.ground.delta[1] < 400 do if state[0] == 0 and state[1] == 0 and state[2] == 0 and state[3] == 0 then motor.left.target = 200 motor.right.target = 100 end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] > 450 do if state[0] == 0 and state[1] == 0 and state[2] == 0 and state[3] == 0 then motor.left.target = 100 motor.right.target = 200 end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] < 400 do if state[0] == 0 and state[1] == 0 and state[2] == 0 and state[3] == 0 then motor.left.target = 0 motor.right.target = 0 new_state[0] = 1 new_state[1] = 1 new_state[2] = 1 new_state[3] = 1 end end when prox.ground.delta[0] > 450 and prox.ground.delta[1] < 400 do if state[0] == 1 and state[1] == 0 and state[2] == 0 and state[3] == 0 then motor.left.target = 150 motor.right.target = 50 end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] > 450 do if state[0] == 0 and state[1] == 1 and state[2] == 0 and state[3] == 0 then motor.left.target = 50 motor.right.target = 150 end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] < 400 do if state[0] == 1 then motor.left.target = 0 motor.right.target = 350 end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] < 400 do if state[0] == 0 and state[1] == 1 and state[2] == 0 and state[3] == 0 then motor.left.target = 350 motor.right.target = -100 end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] > 450 do if state[0] == 1 then motor.left.target = 50 motor.right.target = 300 new_state[0] = 0 new_state[1] = 0 new_state[2] = 0 new_state[3] = 0 end end when prox.ground.delta[0] > 450 and prox.ground.delta[1] < 400 do if state[0] == 0 and state[1] == 1 and state[2] == 0 and state[3] == 0 then motor.left.target = 250 motor.right.target = 50 new_state[0] = 0 new_state[1] = 0 new_state[2] = 0 new_state[3] = 0 end end when prox.ground.delta[0] > 450 and prox.ground.delta[1] < 400 do if state[0] == 1 and state[1] == 1 and state[2] == 0 and state[3] == 0 then new_state[0] = 0 new_state[1] = 0 new_state[2] = 0 new_state[3] = 0 motor.left.target = 200 motor.right.target = 100 call leds.top(32,0,0) end end when prox.ground.delta[0] < 400 and prox.ground.delta[1] > 450 do if state[0] == 1 and state[1] == 1 and state[2] == 0 and state[3] == 0 then new_state[0] = 0 new_state[1] = 0 new_state[2] = 0 new_state[3] = 0 motor.left.target = 100 motor.right.target = 200 call leds.top(0,32,0) end end when prox.ground.delta[1] < 400 do if state[2] == 1 and state[3] == 1 then motor.left.target = 200 motor.right.target = 100 new_state[0] = 0 new_state[1] = 0 new_state[2] = 0 new_state[3] = 0 end end call math.copy(state, new_state) callsub display_state onevent buttons when button.right == 1 do if state[0] == 1 and state[1] == 1 and state[2] == 1 and state[3] == 1 then motor.left.target = 400 motor.right.target = 0 new_state[0] = 0 new_state[1] = 1 new_state[2] = 0 new_state[3] = 0 end end when button.left == 1 do if state[0] == 1 and state[1] == 1 and state[2] == 1 and state[3] == 1 then motor.left.target = 0 motor.right.target = 500 new_state[0] = 1 new_state[1] = 0 new_state[2] = 0 new_state[3] = 0 end end when button.forward == 1 do if state[0] == 1 and state[1] == 1 and state[2] == 1 and state[3] == 1 then motor.left.target = 150 motor.right.target = 150 new_state[0] = 1 new_state[1] = 1 new_state[2] = 0 new_state[3] = 0 end end when button.backward == 1 do if state[0] == 1 and state[1] == 1 and state[2] == 1 and state[3] == 1 then motor.left.target = -300 motor.right.target = 300 new_state[2] = 1 new_state[3] = 1 end end call math.copy(state, new_state) callsub display_state