Welcome Guest
Log In | Register )
You last visited December 11, 2016, 6:48 am
All times shown are
Eastern Time (GMT-5:00)

Parsing

Topic closed. 91 replies. Last post 12 years ago by Sedertree.

Page 2 of 7
PrintE-mailLink
Avatar
East Jordan, MI
United States
Member #2
June 1, 2001
675 Posts
Offline
Posted: January 15, 2005, 2:49 am - IP Logged

Sandy,



Yes, I'll have a regular installation file. Better to wait for this version anyway. Much better all around.



Retxx,



No, it's not finished.....

    Avatar
    East Jordan, MI
    United States
    Member #2
    June 1, 2001
    675 Posts
    Offline
    Posted: January 16, 2005, 4:51 am - IP Logged

    My next project is giving the Drawfile Editor more functionality. Currently I am working on a "Drawfile Combinator" that - you guessed it - combines midday and evening drawfiles into one combined drawfile.







    Took me about three hours to fine tune what I have here. Totally dynamic, it searches the drawfile directory and populates the checklists with all filenames ending with the .txt file extension.



    Hopefully by tommorrow I'll be able to see it run.

      CARBOB's avatar - FL LOTTERY_LOGO.png
      ORLANDO, FLORIDA
      United States
      Member #4924
      June 3, 2004
      5914 Posts
      Offline
      Posted: January 16, 2005, 6:54 am - IP Logged

      George,

       Thank you for update, waiting for final program.

       Carbob

        Avatar
        East Jordan, MI
        United States
        Member #2
        June 1, 2001
        675 Posts
        Offline
        Posted: January 17, 2005, 3:24 am - IP Logged

        Well,



        It's late and I didn't reach my goal of seeing the combination of drawfiles take place tonight.



        Wasted time earlier when I couldn't get the midday draw to load. Turns out the file was empty. Lost about 2 hours of programming for nothing. Without that I could have got it up and running.



        Looking good so far. Have to code the actual combining later. There are a couple of runtime errors that need resolved. They only pop up when the instructions are not followed. So they will be a high priority.



        The greatest thing I did tonight was set up an inspection algorithm that compares the two drawfiles for length, game type etc. I found out that there were two missing winning numbers in my evening and one in my midday drawfiles. Without the inspection algorithm I wouldn't have known. (each goes back to 1999)



        It won't be impossible to combine draws if you have, for instance, only one draw on sunday. The program will tell you if they are of unequal length. However you won't be able to tell if there are draws missing. You'll have to trust your source in that case.



        The screenshot above now says "Inspect Drawfiles" in lieu of "Merge Drawfiles".... The "Merge Drawfiles" button becomes available only after both drawfiles pass inspection.



        Both these drawfiles load very fast - under 5 seconds. My mainform takes forever to load just one. It could be because the mainform has RTB's instead of LB's. Nothing I can do to fix that though.



        Too long winded, maybe. Just wanted to share my progress.

          Avatar
          East Jordan, MI
          United States
          Member #2
          June 1, 2001
          675 Posts
          Offline
          Posted: January 17, 2005, 2:27 pm - IP Logged

          It's a pain to try and figure all the ways a person might scr** up the programs feng shui. Here is a list of errors that may happen. Any suggestions for other errors?



            Avatar

            United States
            Member #986
            January 5, 2003
            280 Posts
            Offline
            Posted: January 17, 2005, 3:39 pm - IP Logged

            "Insufficient Data" if there is a minimum of history for software to use.

              Avatar
              East Jordan, MI
              United States
              Member #2
              June 1, 2001
              675 Posts
              Offline
              Posted: January 17, 2005, 5:05 pm - IP Logged

              Maryland,



              That's a good one....



              If you're taking the time to combine two drawfiles. There should be a minimum of entries in each drawfile to make it worth the effort.



              I don't want to make the requirement too outlandish though. Maybe 250 draws is good for each drawfile. That would make a combined drawfile of at least 500 entries.



              So to code this. I'll need to check that each listcount > 250, in addition to making sure that listcount1 = listcount2.



              I'll make it an;

              "Insufficiency Error - Drawfile(s) Must Contain At Least 250 Entries"



              Thanks,

                Avatar
                East Jordan, MI
                United States
                Member #2
                June 1, 2001
                675 Posts
                Offline
                Posted: January 17, 2005, 9:18 pm - IP Logged

                Found another possible error....



                The user tries to combine the same drawfile.



                "Duplicate Error - Drawfiles Must Contain Different Data"



                (Hey, you just don't know what some people will try to do....)

                  Avatar
                  East Jordan, MI
                  United States
                  Member #2
                  June 1, 2001
                  675 Posts
                  Offline
                  Posted: January 18, 2005, 3:57 am - IP Logged

                  Pulling my hair out all night with nothing to show. How easy it should be to create a loop that alternates putting the first entry of two listboxes into one. Then deleting those first entries before the loop begins again.



                  list3.?(0) then list2.?(0) into list1(list1.listcount +1)... back and forth like a tennis game. I've tried everything..... The best I got was a bunch of 0's in listbox1.



                  Can't find any code snippets on google or the other vb sites. Tried to modify other code with no joy.   



                  Maybe I need to sleep on it. Thoughts will be clearer in the morning.

                    Avatar
                    East Jordan, MI
                    United States
                    Member #2
                    June 1, 2001
                    675 Posts
                    Offline
                    Posted: January 18, 2005, 2:17 pm - IP Logged

                    I posted the problem to a VB Help Forum....



                    Hopefully I can get a response by this weekend.



                    Planet Source Code

                      Avatar
                      East Jordan, MI
                      United States
                      Member #2
                      June 1, 2001
                      675 Posts
                      Offline
                      Posted: January 19, 2005, 2:12 am - IP Logged

                      Finally!!!!!!



                      Do While List2.ListCount > -1

                              Text1.Text = List3.List(0)

                              List3.RemoveItem (0)

                              List1.AddItem Text1.Text

                              Text1.Text = List2.List(0)

                              List2.RemoveItem (0)

                              List1.AddItem Text1.Text

                      Loop

                        Avatar
                        East Jordan, MI
                        United States
                        Member #2
                        June 1, 2001
                        675 Posts
                        Offline
                        Posted: January 19, 2005, 3:16 am - IP Logged

                        Clashing with my Inspection Algorithm so I had to make some adjustments;

                                Dim x As Integer

                        Do While x < List2.ListCount

                                Text1.Text = List3.List(x)

                                List1.AddItem Text1.Text

                                Text1.Text = List2.List(x)

                                List1.AddItem Text1.Text

                                x = x + 1

                        Loop

                          Avatar
                          East Jordan, MI
                          United States
                          Member #2
                          June 1, 2001
                          675 Posts
                          Offline
                          Posted: January 19, 2005, 4:23 am - IP Logged

                          Phew!!!! That is one loooooong file, but it worked.



                          01/17/2005 763

                          01/17/2005 488

                          01/16/2005 136

                          01/16/2005 919

                          01/15/2005 013

                          01/15/2005 176

                          01/14/2005 758

                          01/14/2005 750

                          01/13/2005 833

                          01/13/2005 608

                          01/12/2005 626

                          01/12/2005 562

                          01/11/2005 226

                          01/11/2005 551

                          01/10/2005 329

                          01/10/2005 009

                          01/09/2005 566

                          01/09/2005 301

                          <snip>



                          I've left the option open to save "weird" combinations of drawfile data. Have to add a "Compare Drawfiles" button/option so you can scroll down both drawfiles at the same time in case they are of unequal length. That usually means there is a missing entry somewhere.



                          Also need to code the rest of the error handlers to work with the "Error Summary" form.



                          Ran a quick back-test of the Biased Matrix for ten days with the combined file. Topped out at 83% hit ratio on bias setting 4.

                            Avatar

                            United States
                            Member #986
                            January 5, 2003
                            280 Posts
                            Offline
                            Posted: January 19, 2005, 4:15 pm - IP Logged

                            Stop teasing George .  Patiently waiting for the finished product.  Gratification of your own work is better than that of your job's work.  Todd knows this well, his site is awesome.

                              undress's avatar - Lottery-061.jpg
                              roseville, MI
                              United States
                              Member #5980
                              July 30, 2004
                              18205 Posts
                              Offline
                              Posted: January 19, 2005, 4:20 pm - IP Logged

                              George doing a great job would love to help test this program. Just let me know.

                              Mad ALL IN!Mad