add dc motor and servomotor examples to components page (#9)

Author: Rekkice

modules/atomvm/pages/components.adoc

@@ -11,8 +11,80 @@ y tengan una buena velocidad. Son ideales para las ruedas que dan movimiento al
 
 === Guía de Conexiones
 
+Para controlar un motor DC con una ESP32 y un driver L298N, se requiere de una fuente de alimentación externa para el motor, ya que la ESP32 no puede suministrar la corriente necesaria. El L298N actúa como un "puente H" que permite a la ESP32 controlar tanto la dirección como la velocidad del motor.
+
+*   **Conexión a la ESP32**:
+    *   `ESP32 GND` -> `L298N GND` (es importante que compartan tierra)
+    *   `ESP32 GPIO26` -> `L298N IN1`
+    *   `ESP32 GPIO27` -> `L298N IN2`
+    *   `ESP32 GPIO25` -> `L298N ENA` (si se va a usar PWM)
+
+*   **Conexión de la Fuente de Alimentación Externa**:
+    *   `Fuente Externa Positivo (+) ` -> `L298N V12`
+    *   `Fuente Externa Negativo (-) ` -> `L298N GND`
+
+*   **Conexión del Motor DC**:
+    *   `Motor Terminal 1` -> `L298N OUT1`
+    *   `Motor Terminal 2` -> `L298N OUT2`
+
+**Notas sobre el pin `ENA` y el control de velocidad (PWM):**
+
+*   El módulo L298N suele venir con un jumper de plástico preinstalado en el pin `ENA` (y `ENB`).
+*   Si este jumper está puesto, el motor estará siempre habilitado a máxima potencia y no podrás controlar su velocidad mediante software.
+*   Para poder controlar la velocidad del motor con la ESP32, se debe retirar el jumper del pin `ENA` y conectar un pin GPIO de la ESP32 (como `GPIO25`) a `ENA`.
+*   La ESP32 enviará una señal PWM (Pulse Width Modulation) a este pin `ENA`. El PWM permite simular un voltaje variable controlando el "tiempo de encendido" de la señal, lo que a su vez controla la velocidad efectiva del motor. En AtomVM, esto se gestiona mediante el módulo `LEDC`.
+
 === Código de Ejemplo
 
+[source, elixir]
+----
+defmodule MotorTest do
+  @left_motor_pin_1 26
+  @left_motor_pin_2 27
+
+  def start() do
+    :gpio.set_pin_mode(@left_motor_pin_1, :output)
+    :gpio.set_pin_mode(@left_motor_pin_2, :output)
+
+    :io.format('Setup de motor finalizado~n')
+
+    loop()
+  end
+
+  defp loop() do
+    :io.format('Moviendo hacia adelante~n')
+    set_motor_direction(:forward)
+    Process.sleep(3000)
+
+    :io.format('Deteniendo motor~n')
+    set_motor_direction(:stop)
+    Process.sleep(2000)
+
+    :io.format('Moviendo hacia atrás~n')
+    set_motor_direction(:reverse)
+    Process.sleep(3000)
+
+    loop()
+  end
+
+  defp set_motor_direction(direction) do
+    case direction do
+      :forward ->
+        :gpio.digital_write(@left_motor_pin_1, :high)
+        :gpio.digital_write(@left_motor_pin_2, :low)
+      :reverse ->
+        :gpio.digital_write(@left_motor_pin_1, :low)
+        :gpio.digital_write(@left_motor_pin_2, :high)
+      :stop ->
+        :gpio.digital_write(@left_motor_pin_1, :low)
+        :gpio.digital_write(@left_motor_pin_2, :low)
+      _ ->
+        :io.format('Dirección de motor inválida: ~p~n', [direction])
+    end
+  end
+end
+----
+
 === Ejemplo de Funcionamiento
 
 == Servomotor
@@ -22,8 +94,85 @@ En este caso se utilizará un https://mcielectronics.cl/shop/product/micro-servo
 
 === Guía de Conexiones
 
+Para conectar un servomotor SG90 a la ESP32:
+
+*   **Pines del servomotor SG90**:
+    *   `Cable Rojo`: VCC
+    *   `Cable Marrón`: GND
+    *   `Cable Naranja`: Señal PWM
+
+*   **Conexión a la ESP32**:
+    *   `VCC` (Servo) -> `ESP32 3v3`
+    *   `GND` (Servo) -> `ESP32 GND`
+    *   `Signal` (Servo) -> `ESP32 GPIO` (Ej: `GPIO13`)
+
 === Código de Ejemplo
 
+[source, elixir]
+----
+defmodule ServoTest do
+  @servomotor_pin 13
+  @servo_pwm_channel 0 # canal LEDC a usar para el servo
+  @servo_pwm_timer 0   # timer LEDC a usar para el servo
+
+  @servo_pwm_freq 50      # servos usan 50Hz
+  @servo_pwm_resolution 10 # 10 bits de resolución (0-1023)
+
+  # valores de duty cycle para ángulos comunes del SG90
+  # calculados para 10 bits de resolución (máx 1023) y 50Hz (periodo 20ms):
+  # 1ms (0 grados)  -> (1/20) * 1023 = ~51
+  # 1.5ms (90 grados) -> (1.5/20) * 1023 = ~77
+  # 2ms (180 grados) -> (2/20) * 1023 = ~102
+  @duty_0_degrees 51
+  @duty_90_degrees 77
+  @duty_180_degrees 100
+
+  def start() do
+    set_up_servo()
+
+    :io.format('Servo setup finished. Starting movement sequence...~n')
+
+    set_servo_angle(@duty_0_degrees)
+    Process.sleep(1500)
+
+    set_servo_angle(@duty_90_degrees)
+    Process.sleep(1500)
+
+    set_servo_angle(@duty_180_degrees)
+    Process.sleep(1500)
+
+    :io.format('Movement sequence completed. Entering infinite sleep.~n')
+    :timer.sleep(:infinity)
+  end
+
+  defp set_up_servo() do
+    :ok =
+      LEDC.timer_config(
+        duty_resolution: @servo_pwm_resolution,
+        freq_hz: @servo_pwm_freq,
+        speed_mode: LEDC.high_speed_mode(),
+        timer_num: @servo_pwm_timer
+      )
+
+    :ok =
+      LEDC.channel_config(
+        channel: @servo_pwm_channel,
+        duty: @duty_90_degrees, # iniciar el servo en una posición central
+        gpio_num: @servomotor_pin,
+        speed_mode: LEDC.high_speed_mode(),
+        hpoint: 0,
+        timer_sel: @servo_pwm_timer
+      )
+  end
+
+  defp set_servo_angle(duty_cycle_value) do
+    :io.format('Setting servo duty to: ~p~n', [duty_cycle_value])
+    :ok = LEDC.set_duty(LEDC.high_speed_mode(), @servo_pwm_channel, duty_cycle_value)
+    :ok = LEDC.update_duty(LEDC.high_speed_mode(), @servo_pwm_channel)
+  end
+end
+----
+
 === Ejemplo de Funcionamiento
 
 == Evitar Obstáculos