added pins->on pulsed

libs/microbit/pins.cpp

@@ -31,6 +31,11 @@ enum class AnalogPin {
     P10 = MICROBIT_ID_IO_P10,
 };
 
+enum class PulseValue {
+    High = MICROBIT_PIN_EVT_PULSE_HI,
+    Low = MICROBIT_PIN_EVT_PULSE_LO
+};
+
 MicroBitPin *getPin(int id) {
     switch (id) {
         case MICROBIT_ID_IO_P0: return &uBit.io.P0;
@@ -75,7 +80,6 @@ namespace pins {
         return getPin(id);
     }
 
-
     /**
      * Read the specified pin or connector as either 0 or 1
      * @param name pin to read from
@@ -129,6 +133,29 @@ namespace pins {
     void analogSetPeriod(AnalogPin name, int micros) { 
         PINOP(setAnalogPeriodUs(micros));
     }
+    
+    /**
+    * Configures this pin to a digital input, and generates events where the timestamp is the duration that this pin was either ``high`` or ``low``.
+    */
+    //% help=pins/on-pulsed weight=22 blockGap=8
+    //% blockId=pins_on_pulsed block="on|pin %pin|pulsed %pulse"
+    void onPulsed(DigitalPin name, PulseValue pulse, Action body) {
+        MicroBitPin* pin = getPin((int)name);
+        if (!pin) return;
+        
+        pin->eventOn(MICROBIT_PIN_EVENT_ON_PULSE);        
+        registerWithDal((int)name, (int)pulse, body);
+    }
+    
+    /**
+    * Gets the duration of the last pulse in micro-seconds. This function should be called from a ``onPulse`` handler.
+    */
+    //% help=pins/pulse-micros
+    //% blockId=pins_pulse_duration block="pulse duration (us)"
+    //% weight=21
+    int pulseDuration() {
+        return pxt::lastEvent.timestamp;
+    }
 
     /**
      * Writes a value to the servo, controlling the shaft accordingly. On a standard servo, this will set the angle of the shaft (in degrees), moving the shaft to that orientation. On a continuous rotation servo, this will set the speed of the servo (with ``0`` being full-speed in one direction, ``180`` being full speed in the other, and a value near ``90`` being no movement).