The One Over None

· 1 / 0 ·

Monday, April 27, 2009

 

When I was Tree...

When I was tree years old I was Jammin' to this one.


Monday, April 27, 2009

 

JADE LSGA last update test

There is a Required Update now available.

This is the last test of the Update System.

From here on out will be the deployment of different features in JADE LSGA.

These Updates will occur throughout the year as the program is translated from VB6 to VS2008.

Please contact us here at the Lottery Post via a Private Message for any problems, first.

Try a Blog next and then finally a Posted Topic.

Thank you, JADE.


Sunday, April 26, 2009

 

JADE LSGA test updates

We'll be conducting two different kinds of Updates for JADE LSGA.

The first will be an Optional Update where you have the choice to do the Update now or wait till another time.

The second will be a Required Update where the Update will be downloaded and you must install the update.

Each of these have their uses and reasons for use.

This is just to test your ability to get the update and apply it.

We'll do the Optional one today and the Required one tomorrow.

There's still a lot of planning on interface, implementation, documentation, and other aspects of deployment to be worked out for the full version.

The coding translations from VB6 to VS2008 are an interesting problem to solve.

Many of the programming styles used in VB6 have to be reworked for VS2008, but it's moving along smoothly.


Saturday, April 25, 2009

 

JADE LSGA Test Deployment now available

You can test your system to see if you can use the Microsoft ClickOnce Deployment for JADE Lottery System Generator Analyzer.

Test Deployment Link - http://home.mchsi.com/~jadelottery001/publish.htm

In addition, when JADE LSGA implementation is begun, all you'll have to do is click 'Check for Update' in the test deployment.

We'll be making the changes to the test program if all goes reasonably well and will become the full application when ready.

Please review our previous blog, also.


Saturday, April 25, 2009

 

JADE LSGA Deployment Test

We will be conducting a deployment test of JADE Lottery System Generator Analyzer in a few days or so.

Anyone that would like to help test the deployment scheme we have come up with can send a PM to JADELottery here at the Lottery Post or you can post a reply here in the blog.

Please keep in mind this is just a test of the deployment, not the full version program.

If you would like to send feedback about the deployment, please send a PM to us here at the Lottery Post.

We will review the feedback, however, we will reply to them at our discretion.

If this does not work out well for most of everyone, then we'll find a different way.

This first try, it is the easiest way for everyone to get JADE LSGA.

It works using Microsoft ClickOnce Deployment and will also allow for online updates, either automagic or user requested; we have to plan that one yet.

As Always, JADE LSGA was, is, and will be freeware.


Sunday, April 12, 2009

 

Combinatoric Permutation Capacity

Through clever bit manipulation, we can have a maximum capacity for the following lottery types.

Combination - (i.e. 6/18, 6/49, 5/15, 5/31, 7/20, 10/25, 10/80, single combination up to 100 numbers)
---------------------------------------------------------------------------------------------------------------------
2.147483648e+9
2.147483648 x 10^9
2,147,483,648

Combinatoric Permutation - (i.e. 5/12 · 1/4, 5/59 · 1/39, 1/3 · 1/7 · 1/9, 1/10 · 1/10 · 1/10, up to 10 different combinations)
------------------------------------------------------------------------------------------------------------------------------------------------------------
2.0859248397665137523388883849312e93
2.0859248397665137523388883849312 x 10^93
2,085,924,839,766,513,752,338,888,384,931,200,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000

This is a temporary limitation and can change at any time.


Saturday, April 11, 2009

 

Byte Me

Module MyFunctions

 

    '------------------------------------------------------------

    'Enumerated Bit States for CSTEBit function

    'Used with CSTEBit function

    'Example:

    '    'This will change the value of MyByte from &HF0 to &HF8

    '    Dim MyByte As Byte = &HF0

    '    Dim ChangeThisBit As Byte = &H04

    '    MyByte = CSTEBit(BitState.SetBit, MyByte, ChangeThisBit)

    '------------------------------------------------------------

 

    Enum BitState As Byte

        ClrBit = 0 'Clear bit

        SetBit = 1 'Set bit

        TogBit = 2 'Toggle bit

        ExmBit = 3 'Examine bit

    End Enum

 

    '----------------------------------------------------------------------

    'Function for changing and examining bit states within a byte

    'A byte has 8 bits to Set or Clear and each position is numbered 0 to 7

    'Each position of the bits is as follows:

    'Position - 7 6 5 4 3 2 1 0

    '     Bit - 1 0 1 0 1 1 0 1

    '          ^ ^ ^ ^ ^ ^ ^ ^

    ' Position  | | | | | | | |

    '   Values  | | | | | | | |

    '    128---+ | | | | | | |

    '     64-----+ | | | | | |

    '     32-------+ | | | | |

    '      16---------+ | | | |

    '      8-----------+ | | |

    '      4-------------+ | |

    '      2---------------+ |

    '      1-----------------+

    '-----------------------------------------------------------------------

 

    Public Function CSTEBit(ByVal CSTE As Byte, ByVal Byt As Byte, ByVal Bit As Byte) As Byte

 

        If Bit < 8 Then

 

            'Bit positon mask

            Dim Mask As Byte = 2 ^ Bit

 

            Select Case CSTE

 

                Case BitState.ExmBit

 

                    'Examine bit

                    'Returns a byte value of &H01 for set and &H00 for clear

                    If ((Byt And Mask) > 0) Then

 

                        CSTEBit = 1

 

                    Else

 

                        CSTEBit = 0

 

                    End If

 

                Case BitState.ClrBit

 

                    'Clear bit 

                    CSTEBit = Byt And Not Mask

 

                Case BitState.TogBit

 

                    'Toggle bit

                    CSTEBit = Byt Xor Mask

 

                Case BitState.SetBit

 

                    'Set bit

                    CSTEBit = Byt Or Mask

 

                Case Else

 

                    'Return same byte if CSTE out of bounds

                    CSTEBit = Byt

 

            End Select

 

        Else

 

            'Return same byte if Bit is out of bounds

            CSTEBit = Byt

 

        End If

 

    End Function

 

End Module


Archives

March 2024   February 2024   January 2024   December 2023   November 2023   August 2023   May 2023   April 2023   March 2023   March 2021   February 2021   January 2021   December 2020   November 2020   October 2020   September 2020   August 2020   July 2020   June 2020   May 2020   April 2020   March 2020   January 2020   December 2019   November 2019   October 2019   September 2019   August 2019   July 2019   June 2019   May 2019   April 2019   March 2019   February 2019   January 2019   December 2018   November 2018   October 2018   September 2018   August 2018   July 2018   June 2018   May 2018   April 2018   March 2018   February 2018   January 2018   December 2017   November 2017   October 2017   September 2017   August 2017   July 2017   June 2017   May 2017   April 2017   March 2017   February 2017   January 2017   December 2016   November 2016   October 2016   September 2016   August 2016   July 2016   June 2016   May 2016   April 2016   March 2016   February 2016   January 2016   December 2015   November 2015   October 2015   September 2015   August 2015   July 2015   June 2015   May 2015   April 2015   March 2015   February 2015   January 2015   December 2014   November 2014   October 2014   September 2014   August 2014   July 2014   June 2014   May 2014   April 2014   March 2014   February 2014   January 2014   December 2013   November 2013   October 2013   September 2013   August 2013   July 2013   June 2013   May 2013   April 2013   March 2013   February 2013   January 2013   December 2012   November 2012   October 2012   September 2012   August 2012   July 2012   June 2012   May 2012   April 2012   March 2012   February 2012   January 2012   December 2011   November 2011   October 2011   September 2011   August 2011   July 2011   June 2011   May 2011   April 2011   March 2011   February 2011   January 2011   December 2010   November 2010   October 2010   September 2010   August 2010   July 2010   June 2010   May 2010   April 2010   March 2010   February 2010   January 2010   December 2009   November 2009   October 2009   September 2009   August 2009   July 2009   June 2009   May 2009   April 2009   March 2009   February 2009   January 2009   December 2008   November 2008   October 2008   September 2008   August 2008   July 2008   June 2008   May 2008   April 2008   March 2008   February 2008   January 2008   December 2007   November 2007   October 2007   September 2007   August 2007   July 2007   June 2007   May 2007   April 2007   March 2007   February 2007   January 2007   December 2006   November 2006   January 2006   November 2005   August 2005   July 2005   June 2005   April 2005   March 2005   February 2005   January 2005   December 2004  

Powered by Lottery PostSyndicated RSS FeedSubscribe