Like you already stateed, it's random. Odds are odds, flip a penny and it comes up tails 8 times in a row... the odds of it coming up haeads the next ti,e is still 50/50. It's a lot of work putting all that data in, consider that. There have always been "gambling systems" but they are more like fishing lures than anything that will give you an advantage. I consider them to be more of money mis-management systems. They provide you with thoughtful ways of losing your money. With alomst all gambling, the only true system is: The more you play, the more you pay. In terms of coding, what you are really ranking is the balls that haven't come up or have come up the least.YOu can use a smallest swap to obtain that amount. ----------------------- RANDOMIZE TIMER CLS balls = 49 plays = 15000 drawn = 6 DIM array$(drawn), total(plays), ballnum(balls) FOR i = 1 TO plays FOR j = 1 TO 6 array(j) = INT(RND * balls) + 1 FOR k = 1 TO j - 1 IF array(j) = array(k) THEN j = j - 2: EXIT FOR NEXT k, j FOR l = 1 TO drawn total(array(l)) = total(array(l)) + 1 NEXT NEXT FOR u = 1 TO balls ballnum(u) = u LOCATE (u - 1) MOD 23 + 1, ((u - 1) \ 23) * 26 + 1 PRINT u; total(u) NEXT REM get 6 lowest FOR i = 1 TO balls FOR j = 1 TO balls IF total(i) < total(j) THEN SWAP total(i), total(j): SWAP ballnum(i), ballnum(j) NEXT NEXT LOCATE (u - 1) MOD 23 + 1, ((u - 1) \ 23) * 26 + 1 PRINT " ------------ Results" FOR i = 1 TO drawn LOCATE (u + i - 1) MOD 23 + 1, ((u + i - 1) \ 23) * 26 + 1 PRINT ballnum(i); total(i) NEXT ----------------------- Posted on Dec 21, 2009, 3:50 AMRespond to this message Return to Index |

Response Title | Author and Date |

Fot those who are not english | unseenmachine on Dec 21 |

* I thought for the lottery the order doesn't matter though | qbguy on Dec 21 |

* Up with disorderly balls the Engish will not put! | Sir Winston on Dec 21 |

* Just switch < to > 'get the lowest' to 'get the highest' and 1 to 10 for results. | Pete on Dec 21 |

Done, well to a fashion | unseenmachine on Dec 21 |

* Well I think that is more than 50 numbers. |
on Dec 21 |

Re. more than 50 numbers | unseenmachine on Dec 21 |

Of course! | Solitaire on Dec 22 |

Copyright © 1999-2014 Network54. All rights reserved. Terms of Use Privacy Statement |