Play the game of PONG

Author:
Raphael
Learn how to program the simple and classic game of PONG. The whole game is based on 4 points : the ball (A), the playing field (B, C) and the the playing pad (D) of length 2L
This is the script associated with the button Start SetValue[in, false] SetValue[out, false] SetValue[score, 0] SetValue[speed, 0.2] SetValue[dx, 1] SetValue[dy, 1] SetValue[A, round((B+C)/2)] StartAnimation[] This is the script associated with the slider time SetValue[A, A+v*speed] If[x(A)<=x(B), SetValue[dx, abs(dx)]] If[x(A)>=x(C), SetValue[dx, -abs(dx)]] If[y(A)>=y(C), SetValue[dy, -abs(dy)]] If[y(A)<=y(B), If[x(A)>=x(D)-L && x(A)<=x(D)+L, SetValue[in, true],SetValue[out, true]]] If[in, SetValue[dy, abs(dy)]] If[in, SetValue[score, score+1]] If[in, SetValue[speed, speed+0.1]] If[out, StartAnimation[false]] SetValue[in, false]