Geeks With Blogs

News

Google My Blog

Catch me at: The List!


My InstallScript Utility Belt My Amazon Wishlist
My Standard Disclaimer


Archives
Chris G. Williams Beware: I mix tech and personal interests here.

Well, I've been playing with my firecracker today (keep your jokes to yourself) and I have to say it's pretty cool. I grabbed an X10 library dll from Brian Vallelunga's site: here

The code below took about 5 minutes to write and now I can control the two modules that came with the firecracker just by clicking on a form button.

Next step, speech control...

Imports Vallelunga.X10
Public Class Form1
   Private DeviceID As Integer

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      RadioButton1.Checked = True
   End Sub
Private Sub LampON(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click SendSignal(CM17ACommand.TurnOn) End Sub
Private Sub LampOFF(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click SendSignal(CM17ACommand.TurnOff) End Sub
Private Sub ItemSelect(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged, RadioButton2.CheckedChanged If sender.Equals(RadioButton1) Then DeviceID = 2 ElseIf sender.Equals(RadioButton1) Then DeviceID = 3 End If End Sub


Private Sub SendSignal(ByVal command As CM17ACommand) Dim firecracker As CM17A = CM17A.Instance("COM1") firecracker.SendCommand(HouseCode.B, DeviceID, command) firecracker.Dispose() End Sub End Class

Posted on Saturday, May 28, 2005 10:26 PM General Interest | Back to top


Comments on this post: playing with firecrackers

# re: playing with firecrackers
Requesting Gravatar...
Chris - nice job with Firecracker. I'm using hte same thing so far. You are actually the inspiration for my latest project which, I'm finishing up right now. yes, I was supposed to post it at midnight, but my inner geek took over and I started playing with Speech Server and the Fedex API which has turned into a Major time waster.....

As far as Charleston. Yes, I didn't know Kim was going there until Thursday. However, However, However. My parents bought some land on St. Helena to build a house. Well, after 6 months, they were still too busy to supervise building the place and the people who lived on the adjacent property put it up for sale. Anyway, they bought it too so they had somehwere to stay until they got around to building their new place.
We gotta make plans soon b/c I can take one of the boats and head over to Charleston and we can chill out. I've been to Charleston twice and loved it... would love to go hang out there again ;-)
Left by bill on May 29, 2005 4:52 AM

# re: playing with firecrackers
Requesting Gravatar...
awesome! Hmm Speech Server and FedEx API, very cool.

Let me know when you're heading this way, I'd love to hang out.
Left by Chris on May 29, 2005 9:52 AM

# re: playing with firecrackers
Requesting Gravatar...
I know this is an old post but I have been writing a program that makes use of Brian Vallelunga's X10 library dll. Do you know if there is an "All Off" or "All On" function in the library.

I'm new to VB programming and this is my first real program. Other than the tutorials I have taken online.

Any assistance would be appreciated.

Nate
Left by Nate on Feb 26, 2010 5:02 PM

# re: playing with firecrackers
Requesting Gravatar...
Never mind I figured it out. Should have looked alittle harder before I sent this out.
Left by Nate on Feb 26, 2010 5:50 PM

Your comment:
 (will show your gravatar)


Copyright © Chris G. Williams | Powered by: GeeksWithBlogs.net