Author Topic: Makeshift "mcPlug"  (Read 293 times)

EthanSpitz

  • Newbie
  • *
  • Posts: 11
    • View Profile
Makeshift "mcPlug"
« on: August 13, 2016, 10:21:04 pm »
I got inpatient waiting for the mcPlug, so I made my own simple one with a SSR! See video!

https://www.youtube.com/watch?v=hnwH1GHrNMA&feature=youtu.be

Code: [Select]
Define PinMode Pin4 As DigitalOutput Alias FloorFan

Class FloorFanSubscribe
    Shared Event Boot()
        Lplan.Subscribe("FloorFan")
        Lplan.SetMidPowerMode(500)
    End Event
   
    Shared Event SubscriptionDelivery()
        Dim msg As Message = Lplan.GetDelivery()
        If msg.Topic= "FloorFan" Then
            Dim payload As ListOfByte = msg.PayLoad
            If payload(0) = 49 Then
                FloorFan = True
            Else
                FloorFan = False
            End If
        End If
    End Event
End Class

Share on Facebook Share on Twitter

Like Like x 1 View List

mc-T2

  • Administrator
  • Sr. Member
  • *****
  • Posts: 252
  • mc-Things! The opportunities are endless!
  • Location: Canada
    • View Profile
Re: Makeshift "mcPlug"
« Reply #1 on: August 18, 2016, 04:05:19 pm »
@EthanSpitz - Awesome! That looks like an easy setup and very fast using that MQTT dashboard app. Good job!

I don't have an exact timeline for the plugs (still awaiting our plastics to arrive) but we don't expect it to be too much longer! We will announce when we are shipping the plugs out to our Kickstarter and Indiegogo clients. We are also going to make them available for purchase on our website when they are ready to go.

Keep up the good work, we're looking forward to any other project/use-case for using the mc-Modules!
Thanks,
mc-T2
Need more mc-Modules, mc-Gateways or other mc-Things? Check out our product page: www.mcthings.com/products. mc-Development kits are available too!
Check out a live Dashboard using mcThings and Losant! Click here: https://goo.gl/ST43hB