winsumloosesum's Blog

Page 10 of 20

Pick 3 Selections - Saturday 8/25/12

Straight and Boxed Winners from Friday 8/24/12 in far right hand column.

Top line = Straight Sets for Saturdaty 8/25/12

Bottom Line = Boxed Sets for Saturday 8/25/12

Look for repeat winners for Saturday where states that had either a Box or Straight located on right hand side.

Key States to Play for Saturday 8/25/12:

California - Evening Draw

Georgia - Evening & Midday Draws

D.C - Midday Draw

Marykand - Midday Draw

Arizona/Evening   
617,560,467,610,670,637,619,615,618,564,510,457,417,817,635,630,614,570,690,450,267,850,710,638,590   
019,129,018,016,189,169,029,128,015,017,126,089,069,168,125,127,138,136,079,149,269,178,289,158,156   
Arkansas/Midday   
016,056,960,916,910,156,150,067,416,216,167,063,017,186,163,180,964,950,456,256,057,054,926,914,250   
458,045,459,245,345,456,145,358,348,058,489,148,158,258,457,478,469,049,346,059,149,146,368,038,235    BOXED
Arkansas/Evening   
625,654,165,653,650,764,725,763,726,964,925,761,760,754,623,164,125,963,926,750,634,621,523,163,961    STRAIGHT
018,019,189,128,129,148,168,089,169,178,016,029,158,138,289,017,126,015,049,069,078,079,058,489,127   
California/Midday   
823,812,253,152,813,723,712,293,219,216,623,852,254,052,892,728,613,853,814,803,752,724,702,294,259   
089,029,289,049,019,489,059,249,129,189,079,259,039,069,149,018,389,279,459,239,058,479,269,025,128   
California/Evening   
726,827,926,736,706,927,836,928,816,807,764,724,723,720,716,326,126,837,823,784,721,526,906,821,817   
456,458,058,358,457,057,056,356,156,158,258,257,256,459,467,145,059,478,078,168,378,368,067,367,345   
Connecticut/Midday   
910,908,970,930,905,960,920,918,904,810,938,912,619,928,914,894,870,805,710,510,972,925,830,610,974   
156,056,256,016,456,168,126,356,167,146,015,169,136,158,125,067,069,145,036,269,368,058,467,267,018   
Connecticut/Evening   
980,498,928,983,981,870,801,490,920,906,830,805,478,970,901,821,483,481,278,930,905,871,836,825,823   
126,127,129,125,128,136,239,236,237,017,029,167,027,235,015,279,238,138,267,156,025,019,147,249,169    BOXED
Delaware/Midday   
780,170,790,370,187,180,783,720,570,380,190,980,760,728,580,784,740,390,198,127,729,590,183,176,174   
019,029,089,018,059,069,039,015,016,049,129,079,189,025,058,038,017,169,289,056,035,259,149,128,078   
Delaware/Evening   
621,721,521,129,631,128,671,726,651,632,732,652,641,619,471,752,729,618,601,532,472,451,239,138,071   
348,378,347,478,345,237,238,349,138,038,346,247,278,358,489,367,389,037,178,368,147,457,078,458,479   
Florida/Midday   
504,354,564,503,584,574,560,154,954,563,254,580,364,150,950,904,583,502,407,384,374,360,164,964,562   
019,016,049,069,029,017,079,018,015,089,059,149,169,129,039,189,047,146,036,067,469,045,027,025,126   
Florida/Evening   
621,610,217,921,641,251,821,617,107,910,417,150,810,691,651,627,207,941,920,681,631,451,427,250,841   
236,269,267,256,126,369,239,367,356,368,136,235,237,346,238,279,169,469,129,257,249,467,146,456,289   
Georgia/Midday   
291,218,198,108,109,271,178,518,501,194,107,814,298,251,138,209,174,908,514,278,508,297,294,261,207   
029,129,239,279,019,039,237,027,269,249,127,126,079,236,259,289,267,037,069,025,149,017,016,125,169   
Georgia/Evening   
692,690,619,298,297,918,693,672,649,592,970,670,618,617,590,219,098,290,910,612,610,562,560,498,497   
236,238,128,126,237,239,127,129,138,136,235,267,269,278,289,279,368,256,367,029,369,178,389,168,167   
Idaho/Midday   
950,901,051,904,960,920,054,970,930,350,061,056,520,071,057,980,954,850,801,961,921,360,952,370,076   
457,456,245,458,467,247,145,459,478,257,147,345,045,479,347,256,146,047,469,249,258,148,267,156,346   
Idaho/Evening   
549,950,948,952,548,942,940,918,938,908,850,258,928,910,749,649,542,540,518,943,930,912,541,538,970    STRAIGHT
125,245,025,247,345,127,145,249,147,146,035,259,347,235,156,149,027,045,349,457,237,256,346,456,128   
Illinois/Iowa/Midday   
910,920,950,930,906,921,980,940,907,520,510,916,610,952,926,923,810,506,350,306,017,941,928,927,918   
236,237,367,346,235,238,267,356,368,136,378,347,036,239,037,369,247,256,126,345,035,257,278,127,467   
Illinois/Iowa/Evening   
453,450,458,350,954,483,463,904,564,452,358,154,493,457,950,903,563,407,360,352,308,984,964,850,560   
126,156,127,267,167,256,125,016,169,257,467,168,136,147,129,128,279,017,067,158,456,145,247,237,178    BOXED
Indiana/Midday   
071,807,801,901,907,871,073,809,803,075,027,981,903,805,407,076,061,905,873,501,906,827,821,471,921   
059,045,049,057,459,015,069,025,047,079,035,149,039,089,056,016,259,457,145,479,019,017,067,469,245   
Indiana/Evening   
726,167,746,186,763,683,187,126,728,706,623,487,163,146,783,643,127,625,427,165,147,723,653,645,128   
489,478,389,038,089,458,148,479,047,049,348,378,078,368,058,467,238,189,018,289,469,249,358,138,039   
Kansas/Evening   
871,807,981,827,487,908,928,861,387,185,984,907,805,801,485,927,825,821,481,167,983,467,385,368,107   
049,349,348,346,039,038,489,149,469,249,347,146,148,138,019,018,045,047,389,345,069,029,089,036,479   
Kentucky/Midday   
415,425,914,924,435,417,416,325,215,495,427,394,925,814,437,329,327,316,219,217,497,465,457,436,405   
067,078,267,367,027,278,167,057,047,079,368,378,257,037,069,478,178,017,056,247,256,168,058,237,036   
Kentucky/Evening   
910,610,360,920,390,361,350,015,923,710,621,326,325,025,960,720,380,370,961,950,318,215,963,721,650   
467,456,479,047,347,367,067,057,478,147,459,345,167,469,045,356,079,056,146,037,458,247,145,257,156   
Louisiana/Evening   
273,532,172,521,263,932,542,247,238,162,128,072,921,520,942,572,163,920,543,267,147,138,073,972,562   
126,125,256,128,236,129,258,267,025,269,156,127,235,245,168,016,257,259,146,136,289,238,278,029,169   
Maryland/Midday   
890,891,829,780,728,498,781,790,784,729,839,825,821,861,810,794,738,580,485,481,815,290,960,830,720   
238,236,237,239,125,128,138,235,126,127,136,129,025,368,258,029,256,036,389,289,278,018,257,027,259   
Maryland/Evening   
148,948,845,847,810,908,843,870,805,740,918,812,618,405,817,815,803,145,945,942,914,645,614,610,947   
278,128,127,247,238,258,178,478,267,237,289,257,148,126,378,168,279,158,147,027,458,348,138,125,078   
Massachusettes Front 3/Midday   
845,825,245,835,645,625,275,235,847,827,815,745,238,045,025,834,805,635,247,215,145,841,836,821,345   
289,089,189,389,128,029,489,258,238,129,259,278,018,239,279,158,269,039,249,178,058,168,069,059,038   
Massachusettes Back 3/Midday   
354,465,754,459,425,364,154,450,374,485,365,764,349,469,384,350,325,164,724,479,725,704,429,385,265   
089,289,078,489,189,079,058,069,478,178,479,168,018,389,059,029,019,278,279,067,458,158,469,169,049    BOXED
Massachusettes Front 3/Evening   
190,105,095,170,790,705,160,045,503,490,096,092,065,890,805,502,180,145,740,703,196,165,760,495,491   
238,236,239,235,237,126,249,348,128,247,129,127,245,346,136,349,289,138,125,347,269,029,278,368,038   
Massachusettes Back 3/Evening   
065,075,952,905,165,465,076,962,906,475,265,058,052,035,972,954,936,907,752,176,105,762,476,405,365   
348,346,478,458,347,345,489,349,238,358,368,148,389,378,245,038,247,249,236,459,456,047,045,278,258   
Michigan/Midday   
136,126,326,138,836,160,036,196,186,830,536,436,146,128,390,328,190,180,530,329,296,156,129,736,526   
125,128,126,129,015,138,127,235,156,145,025,136,016,258,158,256,245,168,148,018,146,236,017,259,238   
Michigan/Evening   
983,982,293,093,980,952,963,853,092,950,819,493,283,083,984,972,962,912,863,852,097,960,873,813,492   
059,089,259,079,049,459,029,019,489,289,189,058,069,039,129,479,279,249,149,057,045,025,389,169,469   
Minnesota/Evening   
456,651,467,056,652,637,617,536,067,627,457,057,527,469,461,436,639,631,619,069,061,036,632,621,459   
127,126,129,027,125,136,019,128,236,017,016,018,147,037,029,267,237,025,138,015,169,178,039,239,036    BOXED
Missouri/Midday   
843,263,253,853,258,863,823,643,653,543,273,256,254,813,218,063,053,873,854,803,293,278,250,249,943   
389,489,089,189,479,039,378,289,349,348,358,079,459,049,478,038,138,059,149,458,369,368,019,178,239   
Missouri/Evening   
276,127,926,176,526,327,287,128,376,328,247,186,927,527,386,270,146,136,125,928,346,325,187,165,160   
089,019,049,079,039,029,069,059,018,078,038,017,489,189,037,047,149,289,389,058,027,015,479,349,129    BOXED
Nebraska/Evening   
483,473,543,874,873,485,481,382,183,943,583,472,380,643,489,471,470,983,542,475,372,872,540,415,370   
245,129,125,126,249,235,149,145,259,128,146,256,345,239,258,459,247,025,127,456,349,458,236,136,045    BOXED
New Jersey/Midday   
654,605,764,651,761,754,652,365,964,706,705,762,614,961,954,681,601,485,405,906,905,784,763,752,451   
278,378,289,078,258,478,238,389,178,279,089,358,038,128,257,027,368,267,237,489,058,348,138,037,247   
New Jersey/Evening   
190,610,290,170,690,510,180,612,291,691,502,390,360,270,670,590,490,097,560,512,361,271,692,671,614   
456,345,245,457,145,045,346,458,356,347,146,235,467,256,459,156,348,147,247,047,056,035,125,148,025   
New Mexico/Evening   
901,801,051,701,601,907,905,981,980,906,941,940,902,691,903,921,807,607,605,057,851,681,651,407,405   
238,348,378,368,358,389,236,138,346,347,239,367,345,349,237,038,235,478,289,356,369,278,458,128,136   
New York/Midday   
980,984,950,904,690,390,983,920,910,970,380,850,394,982,954,914,870,810,694,693,981,974,924,923,854   
456,356,156,056,169,256,167,469,369,467,367,067,368,168,146,136,269,459,036,016,059,267,457,236,126   
New York/Evening   
925,526,653,528,926,495,456,156,963,950,853,523,506,928,496,458,196,158,983,906,527,508,425,125,923   
237,236,239,267,367,238,235,257,278,279,247,027,037,256,136,126,378,125,369,269,128,259,129,356,289   
North Carolina/Midday   
932,372,326,832,924,912,352,274,216,172,972,934,926,920,812,374,316,276,982,936,872,834,634,270,254   
278,178,389,378,078,289,279,258,358,368,138,189,478,038,237,079,127,058,158,128,089,257,168,489,239    BOXED
North Carolina/Evening   
453,943,843,643,473,954,854,475,451,654,974,948,941,874,853,841,471,450,674,653,641,964,940,938,873   
056,156,057,356,015,158,058,145,045,059,067,456,256,016,167,136,036,125,025,069,358,168,459,345,169   
Ohio/Midday   
921,721,281,216,901,251,106,701,081,902,136,051,981,916,914,716,714,702,186,184,781,416,381,236,156   
356,256,358,367,257,456,056,156,368,258,267,457,057,235,369,259,378,458,058,467,067,236,345,035,158   
Ohio/Evening   
607,609,907,627,605,720,705,630,807,637,629,601,927,920,905,761,704,930,809,764,639,961,904,901,625   
167,168,267,467,169,178,067,367,269,278,368,156,126,469,478,146,189,279,069,369,078,378,127,256,136   
Oklahoma/Evening   
760,736,764,761,635,560,386,762,780,630,570,564,561,387,681,960,936,784,730,634,574,562,781,631,580   
456,457,345,245,145,459,458,045,467,346,146,469,356,256,156,347,247,056,148,479,478,147,349,149,047   
Ontario CAN/Midday   
732,726,972,728,720,712,736,752,724,738,730,716,326,932,670,970,926,734,718,710,328,216,780,974,928   
078,378,178,278,189,389,089,079,289,478,368,489,168,058,018,279,358,138,038,067,479,238,367,017,167   
Ontario CAN/Evening   
621,271,218,921,632,215,273,238,072,672,631,932,472,278,235,138,071,018,016,926,902,671,618,025,972   
078,378,178,278,189,389,089,079,289,478,368,489,168,058,018,279,358,138,038,067,479,238,367,017,167    BOXED
Pennsylvania/Midday   
872,847,871,807,972,947,907,873,982,948,762,746,981,908,761,742,706,741,407,983,861,763,745,712,702   
238,239,236,235,349,346,237,345,249,368,389,369,347,358,245,138,136,356,289,269,378,247,258,128,126   
Pennsylvania/Evening   
980,981,928,870,983,948,081,970,871,580,091,083,920,873,821,728,590,581,478,096,940,841,816,528,093   
178,078,128,378,189,138,089,038,278,368,238,168,127,037,027,367,267,478,389,148,017,289,067,237,167   
Puerto Rico/Evening   
097,087,098,073,076,297,093,072,017,873,096,075,047,947,287,092,083,019,983,817,095,049,847,736,298   
056,356,256,069,456,369,269,469,368,059,258,058,367,067,156,459,259,358,089,057,036,389,289,267,257   
Quebec CAN/Evening   
187,708,783,287,107,709,784,705,279,207,703,607,275,273,217,189,174,749,704,673,617,185,183,108,754   
289,189,089,128,389,178,078,018,129,238,158,168,258,029,058,269,278,038,368,378,489,079,239,358,259   
South Carolina/Midday   
093,690,490,890,092,091,083,063,693,493,095,893,053,790,496,293,081,061,691,492,491,073,891,692,650   
167,067,367,467,267,168,156,056,036,368,078,169,136,069,356,456,126,016,178,469,346,146,256,057,269   
South Carolina/Evening   
237,236,267,367,167,037,127,126,036,536,235,160,067,837,530,437,265,247,207,147,107,836,527,436,297   
456,457,256,356,467,156,056,257,245,345,458,057,459,045,267,259,367,346,167,067,469,145,235,258,247   
Tennessee/Midday   
187,710,217,617,180,780,287,218,918,618,138,738,910,610,417,207,907,607,267,237,216,215,980,637,615   
067,167,016,036,017,367,136,056,037,069,057,467,156,079,169,015,126,027,146,267,047,019,078,369,168   
Tennessee/Evening   
780,782,089,289,790,784,781,729,189,783,720,760,489,180,794,710,281,029,721,580,389,069,750,740,724   
145,125,015,156,149,158,245,459,146,148,456,045,259,458,345,256,147,129,019,457,126,258,025,169,059   
Texas/Midday   
708,187,784,107,907,706,108,908,783,198,186,782,704,167,794,703,184,106,984,508,308,183,906,764,702   
125,126,156,256,015,235,145,025,129,136,016,245,236,128,259,356,158,169,056,258,127,269,019,456,168   
Texas/Evening   
714,416,734,436,914,016,814,631,514,074,934,036,017,834,764,724,716,534,831,712,612,054,018,015,964   
017,167,127,016,067,147,047,027,126,178,267,146,156,037,136,018,015,079,169,078,168,467,367,057,247   
Tri-State/Midday   
362,672,372,823,162,962,923,872,673,172,863,562,472,360,270,163,972,963,643,523,182,982,942,129,920   
238,289,239,389,236,269,368,369,249,138,349,278,348,237,235,129,029,378,358,038,128,189,279,259,039   
Tri-State/Evening   
980,982,780,498,198,983,790,782,180,920,850,830,792,784,783,187,490,190,182,950,930,852,832,794,492   
049,079,069,029,047,059,089,027,067,479,019,045,039,057,249,078,489,279,469,037,056,058,017,269,459   
Virginia/Midday   
453,349,459,483,456,346,154,854,489,457,419,347,254,946,853,450,356,184,429,416,389,253,947,409,350   
039,029,035,235,037,049,345,129,149,045,348,245,238,059,389,349,019,038,027,136,347,237,138,079,127   
Virginia/Evening   
490,489,439,495,419,794,089,039,389,790,694,095,092,019,982,485,483,932,784,734,690,639,435,189,792   
256,456,356,267,269,467,056,236,469,259,257,245,369,367,156,235,459,069,346,126,025,067,457,036,249   
Washington/Evening   
762,782,612,962,764,618,761,752,712,632,582,076,072,972,763,742,718,654,638,078,982,784,651,619,614   
389,378,347,369,349,138,367,237,479,239,039,358,348,368,238,037,489,189,279,079,478,178,038,345,346   
D. C./Midday   
564,754,560,504,453,563,854,764,594,451,561,463,750,524,503,265,461,964,853,850,760,704,590,501,763   
049,059,015,045,149,089,019,058,018,459,145,489,148,056,047,189,039,158,458,035,079,069,146,016,017   
D. C./Evening   
328,932,128,928,532,348,326,942,528,138,920,732,542,308,921,728,152,952,943,742,538,520,148,126,948   
238,237,239,348,235,236,378,358,389,138,278,347,368,289,038,345,128,258,349,346,249,279,037,247,245   
West Virginia/Evening   
728,762,328,732,720,362,708,128,742,738,721,368,162,972,962,763,752,748,528,764,562,168,761,308,932   
039,049,349,239,079,469,479,037,036,069,249,059,019,029,149,047,459,035,346,389,279,347,089,367,237   
Western Canada/Evening   
894,891,807,784,781,398,387,908,827,794,928,907,184,854,851,801,384,381,927,850,358,308,821,754,704   
345,348,458,346,456,245,347,358,457,045,349,356,145,235,459,035,478,148,047,467,038,489,368,238,258    BOXED
Wisconsin/Evening   
261,921,362,271,962,521,923,821,562,372,523,361,972,961,924,823,592,982,672,572,561,524,274,164,963   
456,458,356,345,145,245,459,358,256,156,346,457,056,146,045,235,158,258,348,469,368,148,125,259,349

Entry #155

Excel VBA - Generate Pairs & Trips to a Text File

1.  Create a new folder on your C: Drive and name it Lotto543 (c:\Lotto543)

2.  Open Excel and right-click any Tab at the bottom and select "ViewCode"

3.  When the Window opens go to the top Main Menu and select > Insert > Module

4.  Copy and paste the following code into the right workspace where you see the blinking cursor.

Sub Generate43C2()

Open "c:\Lotto543\L543.txt" For Output As #1

For i1 = 1 To 43 - 1
    For i2 = i1 + 1 To 43 - 0
       
                    LexiNum = LexiNum + 1
                    Print #1, Format(LexiNum, "000") & " " & Format(i1, "0") & "," & Format(i2, "0")
               
    Next
Next
Close #1


End Sub

=======================================================================

This generates all 903 Pairs for the 5/43 Lottery Game to a text file named L43.txt located at C:\Lotto543

If your drive designation is different from "C:\" then you will need to change the following code to reflect the code:

For example if your drive designation is the letter D:\ you would change th following line of code to the following:

Open "d:\Lotto543\L543.txt" For Output As #1

============================================================================

If your Lottery Game is a 5/39 game you can change or create a new folder and name the folder c:\Lotto539

and change the following code:

Sub Generate39C2()

Open "c:\Lotto539\L539.txt" For Output As #1

For i1 = 1 To 39 - 1
    For i2 = i1 + 1 To 39 - 0
       
                    LexiNum = LexiNum + 1
                    Print #1, Format(LexiNum, "000") & " " & Format(i1, "0") & "," & Format(i2, "0")
               
    Next
Next
Close #1


End Sub

=======================================================================

The "LexiNum" is actually the Lexicographic Pairs designation number.

The Excel formula for calculating the number of pairs in your lottery game is =COMBIN(43,2)  where "X" is the total number of balls (43) and "N" is the number of digits = 903 for a 5/43 game

or =COMBIN(39/2) = 741 Pairs for a 5/39 lottery game.

=======================================================================

For creating 3 Number Combinations (9,139) for a 5/39 Game =COMBIN(39,3).  This code below will generate all 9,139 trips to your folder C:\Lotto539.  If you open the folder you should see a text file L539Trips.txt inside the folder.  Remember to create your new folder c:\Lotto539 first before running the code.

Sub Generate39C3()

Open "c:\Lotto539\L539Trips.txt" For Output As #1

For i1 = 1 To 39 - 2

    For i2 = i1 + 1 To 39 - 1

        For i3 = i2 + 1 To 39 - 0


       
                    LexiNum = LexiNum + 1
                    Print #1, Format(LexiNum, "000") & " " & Format(i1, "0") & "," & Format(i2, "0") & "," & Format(i3, "0")


        Next               
    Next
Next


Close #1


End Sub

======================================================================================

Good Luck!!

Entry #153

Excel - Creating Pick 3 and Pick 4 Combinations VBA

Below is a link for creating 1,000 Pick 3 combinations and 10,000 Pick 4 combinations:

http://www.box.net/shared/t9ktq6klm5

Thanks to GillesD at lotto649 forum.

=====================================================

Pick 4 Code:

Option Explicit
Dim A As Integer, B As Integer, C As Integer, D As Integer
Dim X As Double

Sub CombininationsPick4()

Columns("A:E").Select
    Selection.ClearContents
    Range("G1").Select
   
' Generates all combinations for a pick-4 lottery

Range("A1").Select

X = 1

For A = 0 To 9
For B = 0 To 9
For C = 0 To 9
For D = 0 To 9

ActiveCell.Offset(X, 0).Value = X
ActiveCell.Offset(X, 1).Value = A
ActiveCell.Offset(X, 2).Value = B
ActiveCell.Offset(X, 3).Value = C
ActiveCell.Offset(X, 4).Value = D

X = X + 1

Next D
Next C
Next B
Next A

End Sub

===============================================

Pick 3 Code:

Option Explicit
Dim A As Integer, B As Integer, C As Integer

Dim X As Double

Sub CombininationsPick3()

Columns("A:D").Select
    Selection.ClearContents
    Range("G1").Select
   
' Generates all combinations for a pick-3 lottery

Range("A1").Select

X = 1

For A = 0 To 9
For B = 0 To 9
For C = 0 To 9


ActiveCell.Offset(X, 0).Value = X
ActiveCell.Offset(X, 1).Value = A
ActiveCell.Offset(X, 2).Value = B
ActiveCell.Offset(X, 3).Value = C


X = X + 1


Next C
Next B
Next A

End Sub

===========================================================

Entry #151

Excel File - Lottery Positions - Totals By Digit By Position

Below is a download link to an Excel file that will show how many times a certain digit appears in a position for a particular lottery.

http://www.box.net/shared/bj59rq4laf

In the image above you can see that the Digit 1 (Cell D5) appears a total of 111930 times (Cell E5) in Position 1 (Cell E4)

You can change the number of balls drawn in your lottery in cell D2 (5) and the total number of balls in your lottery in cell D3 (43)

The maximum value you can enter in cell D2 is 10 and the maximum value you can enter in cell D3 is 80

In cell D1 (962,598 combinations) will display the total number of combinations for your lottery.

This matrix does not account for lotteries with bonus draws i.e. Powerball and Mega Millions.

Entry #150

Excel File - Calculate Combinations From Sums

Here is a cool Excel file that will generate combinations based on the Sum you request.

Thanks to GillesD at Lotto649 for the code.

Download link:

http://www.box.net/shared/zv69zkn75e

The example below is using the 5/59 game with no bonus ball and selecting the Sum 150 (52662 total combinations)

You can change the Sum 150 (see image above) to any number between 15 and 285

You can also change the number 55 through 59 to your Pick 5 game. e.g. 5/43

Entry #149

Excel File - Calculate Lottery Sums and Combinations

Thanks to a member of lotto649ws for providing the VBA Code for this file.

Here is the download link:

http://www.box.net/shared/esa76kfd1b

To change the VBA Code just right-click on either the "Sums5" or "Sums6" Tab (see below)

Then click "view code"

The VBA window will open.

In the right side locate the "Modules".  Click the small "+" sign to expand the files

 

Double click the "Module 1"

In the right hand side of the window you will see the following code:

If you want to change the parameters from a Lottery game that uses a 6 / 39 game to a new 6 digit game you will need to change the code above.

So for example, if you wanted to change the 6/39 game to a 6/43 game you would need to know the Sums values of 1, 2, 3, 4, 5, 6 and 43, 42, 41, 40, 39, 38

Go to the Tab labeled Sums6 (6 draw game) and scroll over to cell range L2 through Q2 and enter the numbers 43 through 38 in cells L2 thorugh Q2.  You see the totals in cells R1 and R2 of 21 and 243.

Next, go to the code window (see image abobe and change the following lines:

Next, we need to change the following values:

Save your work by clicking the Save icon.

Next, close the Code Window

Click the Tab labeled "Sums6" and select cell columns A and B to highlight both columns and then click the delete key on your keyboard.  This will delete the calculations.

Go to the main menu at the top and select > Tools > Macros > Macro

A window will open and you will see 2 macros to choose from:

Select "SumAll6" macro and on the right side click the "Run" button

The new calculations will appear in cell columns A and B

The "Total Number of Combinations" will appear in cell G1 and also the highest number of combinations for a Sum in cell G2.

You can scroll down cell column B2 to locate the highlighted combinations and corresponding Sum from cell G1 and G2.

Good Luck!!

Entry #148

Excel Formula - Count Number Even & Odd in Cell Range

These Excel formulas will count the number of Even Numbers and Odd Numbers in a cell range.

For example: Pick 3

You have Position 1 (A1), Position 2 (B1), Position 3 (C1)

Enter the following formula in cell D1 to count the number of "Even Digits in cell range A1 through C1

=COUNT(A1:C1)-SUMPRODUCT(MOD(A1:C1,2)) 

Enter the following formula in cell E1 to count the number of "Odd Digits in cell range A1 through C1

=SUMPRODUCT(MOD(A1:C1,2))  ODD

Entry #147

Sume of Digits In 1 Cell

Using the Morefunc Add-In formula for Excel 2002:

=EVAL(SUBSTITUTE(A1,"-","+"))

Where cell A1 has the following: 1,2,3,4,5

Sum would equal 15

Google "Morefunc" English version to download Free Morefunc Add-In

Entry #146

Instructions For Updating Excel File P3StateDraws.xls

Below are instructions in Word and Pdf format on how to update the excel file "P3StateDraws.xls".

The Word doc and Pdf have the exact same instructions.  Their is a download link in both the Word doc and Pdf for the Excel file P3StateDraws.xls for those who are interested.

The main purpose I created this excel file is to have a history of all Pick 3 drawings for each state.  Hopefully in the near future we can place online bets.  For those who live in a country that allows online betting maybe this file will help.  If you have a good handle on using Excel you can create other workbooks for analyzing the Pick 3 games and use the draw history from this Excel file. 

The Excel file is version 2002 so I don't know how it will behave in other versions newer or older.

Word doc download link:

http://www.box.net/shared/vzfozaucc5

PDF doc download link:

http://www.box.net/shared/36i199rsbj

Excel file download link in both the Word doc and PDF:

http://www.box.net/shared/liqqovu76y

Post any questions or comments!! (or PM me)

I will update my copy of the Excel file P3StateDraws.xls file and post the download links in the comments of this blog posting.

Good Luck!!

Entry #144

Thanks to DavidT

This is a thank you to DavidT from Compulotto and as a member of the old lottery forum "eLotteryUniverse".

The "neighbors" and "VTRAC" Excel files was David's idea.  I just modified it a bit.

Again the thanks goes to DavidT for explaining VTRACs a number of years ago.

Entry #142
Page 10 of 20