+ Reply to Thread
Results 1 to 10 of 10

Thread: Keurig Auto Fill with BS1 and Milone eTape

  1. #1

    Default Keurig Auto Fill with BS1 and Milone eTape

    Here is how I automated refilling my Keurig coffee pot with a BS1 and a 8" Milone eTape.


    The BS1 polls the eTape using the "POT" command and opens a 12vDC solenoid through a PN2222 transistor if it is low. It also flashes the LED quickly while filling. To try and prevent an over fill and making a mess while it is filling the BS1 keeps count through the fill loop. If the count limit is reached it will close the solenoid and no longer automatically fill the reservoir untill the power is toggled, the LED is also toggled slowly. If you want to fill the reservoir before it is low you can just press the fill button and it will top off the tank. To get the water to the Keurig I tapped into my refrigerator water supply. I used all 1/4" push to connect fittings and a shut off valve at the T connection.


    Click image for larger version

Name:	IMG_0245.jpg
Views:	771
Size:	131.1 KB
ID:	101813 Click image for larger version

Name:	IMG_0244.jpg
Views:	704
Size:	89.0 KB
ID:	101812 Click image for larger version

Name:	IMG_0243.jpg
Views:	584
Size:	56.4 KB
ID:	101811 Click image for larger version

Name:	IMG_0246.jpg
Views:	591
Size:	109.0 KB
ID:	101814

    Click image for larger version

Name:	IMG_0250.jpg
Views:	506
Size:	125.2 KB
ID:	101818 Click image for larger version

Name:	IMG_0249.jpg
Views:	528
Size:	99.7 KB
ID:	101817 Click image for larger version

Name:	IMG_0248.jpg
Views:	650
Size:	143.1 KB
ID:	101816 Click image for larger version

Name:	IMG_0247.jpg
Views:	563
Size:	126.6 KB
ID:	101815

    Code:
    ' {$STAMP BS1}
    ' {$PBASIC 1.0}
    
    ' -----[ I/O Definitions ]-------------------------------------------------
    
    SYMBOL Pbtn   = PIN0
    SYMBOL Led    = 1
    SYMBOL Sensor = 2
    SYMBOL Valve  = 3
    SYMBOL scale  = 100
    
    '-----[Variables]---------------------------------------------------------
    
    SYMBOL level = B0
    SYMBOL count = W1       '0 to 65535
    SYMBOL CountLimit = W2
    
    CountLimit=200 '0 to 65535
    
    '-----[ Initialization ]-----------------------------------------------------
      'DEBUG CLS                    'Debug info for checking fill level.
      'GOSUB Var_Data
      GOSUB Get_Level
      'GOSUB Var_Data
    
      HIGH Led                     'Turn the LED on to inidacte power is on.
    
    '-----[Main Code]---------------------------------------------------------
    
    Main_Loop:
      GOSUB Get_Level
      'GOSUB Var_Data
      IF Pbtn=1 AND level>19  THEN Fill
      IF level>=38 THEN Fill
      PAUSE 100
      GOTO Main_Loop
    
    
    
    
    ' -----[ Subroutines ]-----------------------------------------------------
    
    Get_Level:
      POT Sensor,scale,level       'Check Fluid level
      RETURN
    
    Fill:
      HIGH Valve                   'Open solenoid valve to start filling.
      FOR count = 1 TO CountLimit  'If count limit is reached the tank maybe over filling.
        GOSUB Get_Level            'Check fill level
        'GOSUB Var_Data             'Debug values if needed.
        IF Level<=19 THEN close    'If full goes to the Close solenoid routine.
        GOSUB Flash                'Goes to the LED flashing routine.
      NEXT                         'Loop and add one to the counter.
      GOTO Alarm                   'Goes into error to prevent over filling the tank.
    
    Close:
      LOW Valve                    'Close solenoid valve.
      HIGH Led                     'Turn the LED on to inidacte power is on.
      'GOSUB Var_Data               'Debug values if needed.
      GOTO Main_Loop
    
    Flash:                         'This will flash the LED to indicate the solenoid is open.
      HIGH Led
      PAUSE 100
      LOW Led
      PAUSE 100
      RETURN
    
    Alarm:                         'This will stop and flash a warning light in case of error.
      'GOSUB Var_Data             'Debug values if needed.
      LOW Valve
      LOW Led
      PAUSE 1000
      HIGH Led
      PAUSE 1000
      GOTO Alarm                   'If error occures the power to the Basic Stamp must be reset or powered off before it will work again.
    
    Var_Data:                      'For Debuging Purposes.
      'DEBUG "level = ", #level
      'DEBUG " Count = ", #Count, CR
      RETURN
    Keurig Auto-Fill.bs1 Keurig Button-Fill.bs1
    Last edited by eod_punk; 05-25-2013 at 05:02 AM. Reason: Spelling
    There is no problem that can't be solved with a suitable amount of explosives!
    EOD Memorial

  2. #2

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    Very cool Mr. Punk.

    I am pleased to see another BS1 project! Seems to be fewer and fewer these days.

    Doc
    Some times my mind seems to wander..... these days I just tag along.

  3. #3

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    ...very clever!
    Well-written documentation requires no explanation.

  4. #4
    Parallax Engineering

    Chris Savage's Avatar
    Location
    Rocklin, CA
    Posts
    12,211
    Blog Entries
    8

    Thumbs up Re: Keurig Auto Fill with BS1 and Milone eTape

    Very nice project! Thanks for sharing!
    Chris Savage
    Engineering Tech, Parallax Inc.
    (916) 624-8333 x3005
    Website / Twitter / Google+

  5. #5

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    Great project! What part do you use for the Solenoid valve?

  6. #6

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    I used a ASCO Model #U8256A002V 24v solenoid that I had laying around from swapping parts with people.
    http://goo.gl/KX1Mq (Link to Grainger) I’m powering it with 12v with a pn2222a transistor.
    There is no problem that can't be solved with a suitable amount of explosives!
    EOD Memorial

  7. #7

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    @eod_punk,

    Great project - my Dad is hooked on his Keurig and we are always refilling it!

    Thanks also for the link to the EOD Memorial - learned something new...
    Whit+

    "We keep moving forward, opening new doors, and doing new things, because we're curious and curiosity keeps leading us down new paths." - Walt Disney

  8. #8

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    This is awesome....I think my Keurig has an appointment with destiny this weekend!

  9. #9

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    Great idea! They do need to be filled with water every morning...
    I fought hard against getting one of these coffee makers, I thought it was a gimmick first time I saw one in the store,
    We got had to use one for a weekend, Now I don't want to be without my Keurig.

    Thanks for sharing, and congrats on making 'project of the week'.


    -Tommy

  10. #10

    Default Re: Keurig Auto Fill with BS1 and Milone eTape

    FANTASTIC! Love the BS1 and this is a great application. BRAVO!
    "Give a man an inch, and right away he thinks he's a ruler." Maxwell Smart

+ Reply to Thread

Similar Threads

  1. Milone eTape problems
    By cloudsword in forum Sensors
    Replies: 1
    Last Post: 07-13-2012, 01:29 AM
  2. [unsolved] Spin Code for eTape Liquid Level Sensor (Parallax Item: 29131)
    By SEL in forum Propeller 1 Multicore Microcontroller
    Replies: 5
    Last Post: 11-29-2011, 06:34 PM
  3. eTape sensor
    By KARIM102 in forum Learn
    Replies: 5
    Last Post: 02-08-2011, 01:45 PM
  4. eTape Liquid Level Sensor-In gasoline
    By $WMc% in forum General Discussion
    Replies: 9
    Last Post: 07-11-2010, 02:19 AM
  5. using BS2 with the eTape
    By Matt180 in forum BASIC Stamp
    Replies: 5
    Last Post: 01-31-2010, 02:51 AM

Tags for this Thread

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts