Construa uma campainha inteligente com um Arduino 

Conecte um botão entre o pino de 5V e o pino de entrada analógica A0 em um Arduino. Apertando o botão aplicam-se 5V em A0. Conecte o Arduino a um computador via USB.

Faça o upload de um sketch no Arduino que repetidamente leia a tensão em A0 e escreva na porta serial se a tensão for alta.

#define SERIAL_BAUDRATE 9600

void setup()
{
  Serial.begin( SERIAL_BAUDRATE);
}

void loop()
{
  if( analogRead(0) > 800)
  {
     Serial.write(1);
  }
}

Conecte a Wolfram Language ao Arduino usando o driver serial.

In[1]:=

X dev = DeviceOpen["Serial", "/dev/tty.usbserial-A4012Z9N"]

Out[1]=

Use um ScheduledTask para verificar periodicamente a porta serial para o sinal de campainha do Arduino. Envie um e-mail com uma imagem da pessoa na porta no momento em que o botão for pressionado.

In[2]:=

X task = RunScheduledTask[ If[DeviceExecute[dev, "SerialReadyQ"], DeviceReadBuffer[dev]; Beep[]; SendMail["To" -> "info@wolfram.com", "Subject" -> "Someone is at the door.", "Body" -> CurrentImage[]]; ], 0.2 ]

Out[2]=