// Remote control Coolpix shutter release. A touch sensor connected to SENSOR_2
// is used to trigger the camera

// The shutter release is pressed as long as the touch sensor is pressed to enable 
// continuous mode shooting.

// Shutter release definitions
#define ReleaseMotor OUT_A
#define ReleaseTouch SENSOR_1
#define Trigger SENSOR_2
#define PressWait 5
#define PressedWait 5
#define ReleaseWait 15

task main()
{
  
  SetSensor(ReleaseTouch ,SENSOR_TOUCH);
  SetSensor(Trigger ,SENSOR_TOUCH);
  while (true)
  {
    until (Trigger==1);
    PlaySound(1);
    // Shoot photo
    OnRev(ReleaseMotor);
    until (ReleaseTouch == 1);
    Wait(PressWait);
    Off(ReleaseMotor);
    Wait(PressedWait);
    until (Trigger==0);
    OnFwd(ReleaseMotor);
    until (ReleaseTouch == 0);
    Wait(ReleaseWait);
    Off(ReleaseMotor);
  }
}