Shop OBEX P1 Docs P2 Docs Learn Events
Sand Blast Controller Update to this project in the works — Parallax Forums

Sand Blast Controller Update to this project in the works

sam_sam_samsam_sam_sam Posts: 2,286
edited 2009-09-26 15:20 in Robotics
Hi EveryOne

This is a project that I have been ·ask to do·by employer

Here Is the project that·I have been working on for months

·I only work on this project when we have·not been real busy doing other thing and ·as my employer has given me time to work on it
Most of this project has been done at work
Some of this time was used to testing the controller

The Sand Silo hold 50,000·Pound of sand

We have a process that we do that we need to keep track of how much product·is left in the ·silo
so we can call the vendor to order more product there is NO WAY to put a scale to weight the Silo

The only way to know how much Sand was in the Silo was for Some Poor Soul to clime to the top of the Silo and look in it

There was one more thing that they want to keep track of·was how sand was being used for each job #

Then there was it would nice to know the Percentage of Product that has been·Used
Then I told them that there was no more room on the LCD Display for·any thing else

The only way is to do this is time how much ·product is used in one minute and keep track of it that way

·I· took the amount of product that is used in one minute by the Hopper

So this what we did was put 300 pound of sand in the hopper and timed how long it took to use up 300 pounds of sand

It took 4 minutes· and 8 seconds to run out the sand so it came out to 248 seconds

300 / 248 = 1.20967741935

▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
··Thanks for any·idea.gif·that you may have and all of your time finding them smile.gif

·
·
·
·
Sam

Post Edited (sam_sam_sam) : 9/26/2009 3:24:05 PM GMT
1232 x 1632 - 585K
1232 x 1632 - 693K

Comments

  • sam_sam_samsam_sam_sam Posts: 2,286
    edited 2009-07-24 21:20
    Here is where·the first·Post started this·Project

    There are a few people that I want to thank for all of there help in this Project

    ·Beau Schwabe··· ·P Basic Math
    ·Unsoundcode····· Saving data to the DS1302 Time Chip
    ·Leon················ ·P Basic Math
    ·Tracy Allen·········P Basic Math
    ·Mike Green········ Where to look for different thing on Parallax Site and point me in the right direction

    http://forums.parallax.com/showthread.php?p=804217

    There where a few problem to over come

    One······ Was how to save data in the DS1302 in Case of Power Failure

    Two····· Doing P Basic Math to Calculate Flow rate

    Three··· Doing P Basic Math to Calculate Percentage of Product that was used out of the Sand Silo

    http://forums.parallax.com/showthread.php?p=805223

    ▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
    ··Thanks for any·idea.gif·that you may have and all of your time finding them smile.gif

    ·
    ·
    ·
    ·
    Sam

    Post Edited (sam_sam_sam) : 7/25/2009 8:48:24 AM GMT
  • MoskogMoskog Posts: 554
    edited 2009-07-25 08:12
    Sam, thats a kind of project I like to read about! When you make something that can be helpful, something you can really use and not only for fun.
    Do you have some additional pictures of the project and the display during runtime?
    I notice you said your LCD ran out of space for additoinal information, I sometimes use to let the LCD change between different informations with a clearscreen in between, like say show time for 2 secs, then CLS, then show amount of precipitation for 2 secs, then CLS and back to time again, if you understand.
  • sam_sam_samsam_sam_sam Posts: 2,286
    edited 2009-07-25 08:31
    ·Moskog

    Thank You for your reply

    These are the only photo of this Project that I can·share with you These photo where cleared by my employer to be shared on the Forum
    Sorry about this sad.gif

    I notice you said your LCD ran out of space for additional information, I sometimes use to let the LCD change between different informations with a clear-screen in between, like say show time for 2 secs, then CLS, then show amount of precipitation for 2 secs, then CLS and back to time again, if you understand.

    Do you have a routine that you can share with me on how you would do this

    ▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
    ··Thanks for any·idea.gif·that you may have and all of your time finding them smile.gif

    ·
    ·
    ·
    ·
    Sam

    Post Edited (sam_sam_sam) : 7/25/2009 8:40:35 AM GMT
  • MoskogMoskog Posts: 554
    edited 2009-07-25 09:28
    ' {$STAMP BS2pe}
    ' {$PBASIC 2.5}
    'weatherRX_precip.bpe
    ' -----[noparse][[/noparse] I/O Definitions ]-------------------------------------------------
    RX              CON     7               ' RX from receiver module 27981
    LCD             PIN     1               ' serial output to LCD
    lysSwitch       PIN     2               ' Light switch PIN 2
    RxLED           CON     0               ' Blinking LED when receiving data
    ' -----[noparse][[/noparse] Constants ]-------------------------------------------------------
    #SELECT $STAMP
      #CASE BS2, BS2E, BS2PE
        T2400       CON     396
        T9600       CON     84
        T19K2       CON     32
      #CASE BS2SX, BS2P
        T2400       CON     1021
        T9600       CON     240
        T19K2       CON     110
    #ENDSELECT
    LcdBaud         CON     T19K2           ' Or..: LcdBaud CON 32
    LcdCls          CON     $0C             ' clear LCD (use PAUSE 5 after)
    LcdBLon         CON     $11             ' backlight on
    LcdBLoff        CON     $12             ' backlight off
    LcdOn1          CON     $16             ' LCD on; cursor off, blink off
    LcdOn3          CON     $18             ' LCD on; cursor on, blink off
    LcdLine0        CON     $80             ' move to line 0, column 0
    LcdLine1        CON     $94             ' move to line 1, column 0
    LcdLine0P7      CON     $87             ' move to line 0, column 7
    LcdLine0P8      CON     $88             ' move to line 0, column 8
    LcdLine0P9      CON     $89             ' move to line 0, column 9
    LcdLine1P12     CON     $A0             ' move to line 1, column 12
    LcdLine1P13     CON     $A1             ' move to line 1, column 13
    LcdLine1P14     CON     $A2             ' move to line 1, column 14
    LcdLine2P0      CON     $A8             ' move to line 2, column 0
    LcdLine2P13     CON     $B5             ' move to line 2, column 13
    LcdLine3P0      CON     $BC             ' move to line 3, column 0
    LcdLine3P10     CON     $C6             ' move to line 3, column 10
    RainI           VAR     Byte
    RainT           VAR     Byte
    LastRainI       VAR     Byte
    LastRainT       VAR     Byte
    Humid           VAR     Byte
    LCDCount        VAR     Nib
     
    main:
     GOSUB ReadData
     'DEBUG DEC RainI,".",DEC RainT, CR
      IF LCDCount = 1 THEN GOSUB Display_Precip
      IF LCDCount = 2 THEN GOSUB Display_LastPrecip
      IF LCDCount = 3 THEN GOSUB Display_Humid
     RUN 1
     
    ReadData:
     GET 6, RainI
     GET 7, RainT
     GET 8, LastRainI
     GET 9, LastrainT
     GET 10, Humid
     GET 28, LCDcount
    RETURN
     
    Display_Precip:
      SEROUT LCD, LcdBaud, [noparse][[/noparse]LcdLine2P13,DEC RainI,".",DEC RainT,"mm  "] ' Display today's precip.  so far.
      PAUSE 10
    RETURN
     
    Display_Humid:
      SEROUT LCD, LcdBaud, [noparse][[/noparse]LcdLine2P13,DEC Humid,"%RH "] ' Display humidity
      PAUSE 10
    RETURN
     
    Display_LastPrecip:
      SEROUT LCD, LcdBaud, [noparse][[/noparse]LcdLine2P13,DEC LastRainI,".",DEC LastRainT,"mm* "] ' Display last day's precip.
      PAUSE 10
    RETURN
    

    Well, Sam, the above code is a part of one of my projects, written for my favourite BS, the BS2pe but it should give you some ideas. I use a simple counter (LCDCount) that increase by one for every program loop and go back to 1 after reaching 3.
    Thats because I need three different things to be written from the same place on the LCD.
    To get a readable display the loop have to run slowly, perhaps·with a pause in between. In this example the display overwrites with no CLS without problem, but sometimes I need to put in a ClearScreen or a simple empty string to clear one single line, like:

    SEROUT LCD, LcdBaud, [noparse][[/noparse]LcdLine2P0,"·················· "]

    This is a simple solution, some ppl may have better ways.





    ·
  • sam_sam_samsam_sam_sam Posts: 2,286
    edited 2009-07-25 12:02
    ·Moskog

    Thanks for sharing that routine I see how you do that

    ▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
    ··Thanks for any·idea.gif·that you may have and all of your time finding them smile.gif

    ·
    ·
    ·
    ·
    Sam
  • sam_sam_samsam_sam_sam Posts: 2,286
    edited 2009-09-26 15:20
    Up-Date

    I am working on add·a pressure transducers to calculate the flow rate and thinking about using this part

    http://search.digikey.com/scripts/DkSearch/dksus.dll?Detail&name=287-1117-ND

    One note

    This project has help the company that I work for

    Not to run out of sand and have to use the 50 pound bags of sand which cost more money and take more time to load the hopper

    Also to·keep ·Some Poor Soul·from climbing to the top of the Silo and look in it to know how much Sand was in the Silo

    More to come later............smile.gif

    ▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
    ··Thanks for any·idea.gif·that you may have and all of your time finding them smile.gif

    ·
    ·
    ·
    ·
    Sam

    Post Edited (sam_sam_sam) : 9/26/2009 3:45:22 PM GMT
Sign In or Register to comment.