KRITSADA

TM1637 and HC-SR04 power by micro:bit

Sep 5th, 2018
300
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. let distance = 0
  2. let TM16372: TM1637.TM1637LEDs = null
  3. let Cnt = 0
  4. Cnt = 0
  5. TM16372 = TM1637.create(
  6. DigitalPin.P13,
  7. DigitalPin.P14,
  8. 7,
  9. 4
  10. )
  11. basic.forever(() => {
  12.     pins.digitalWritePin(DigitalPin.P16, 0)
  13.     control.waitMicros(2)
  14.     pins.digitalWritePin(DigitalPin.P16, 1)
  15.     control.waitMicros(10)
  16.     pins.digitalWritePin(DigitalPin.P16, 0)
  17.     distance = pins.pulseIn(DigitalPin.P15, PulseValue.High)
  18.     TM16372.showNumber(distance / 38)
  19.     basic.pause(300)
  20. })
Advertisement
Add Comment
Please, Sign In to add comment