Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 22 23 24 ... 56 57
Wyślij wiadomość do admina

Przewiń wpisy ↓

Gra precyzyjna DL + ML

2008-05-11 (15:26)

status narkoman
Data rejestracji: 2008-04-16
Ilość postów: 21

3389
wpis nr 136 697
[ CZCIONKA MONOSPACE ]

Witaj cymbał vel jasnowidz,w czym Ci przeszkadza obecność nas dwojga,że używasz aż wykrzyknika?

Jestem w stanie wyobrazić sobie,że miałeś 5 trafnych w 20 liczbach i nie ma powodu nie wierzyć.Jest mały problem.Otóż wyraziłem nieśmiałą prośbę o Twoje dalsze prognozy.Ty natomiast mówisz o sprawie po fakcie czyli po losowaniu.Dlatego jeszcze raz zachęcam do podzielenia się swoimi prognozami co by było czarno na białym.Nie stoimy po różnych stronach.

Cel jest jeden-wiadomy.

Pozdrawiam
2008-05-11 (15:30)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 698
[ CZCIONKA MONOSPACE ]

cymbał > forum jest dla wszystkich,więc jak masz coś sensownego do napisania to pisz,tylko bez \"wyrazów niesmacznych\" proszę



W jednej z kolejnych gier, będzie w naszych zakładach od 20 do 35x 3/6 oraz od 1 do kilku 4/6 ...... to jest widoczne przy optymalnym \"zdarzeniu\" na które czekamy ,oczywiście .....\"coś więcej \" to już zależy od przypadku .

pozdrawiam



leszek
2008-05-11 (15:37)

status zen
Data rejestracji: 2004-03-02
Ilość postów: 1742

190
wpis nr 136 699
[ CZCIONKA MONOSPACE ]

Cymbał wobec powyższego ja stanę w opozycji do siebie .Czyli idę w drugą skrajność .

Pisz Cymbał, pisz; niech się Twoje słowa w złoto obracają



Szkoda że takiego człowieka nie mamy w obozie Expressa już byśmy siedzieli okrakiem na torbach z forsą a tak to na razie idziemy z....

torbami .



Nerka



P.o.z
2008-05-11 (15:50)

status cymbał
Data rejestracji: 2008-03-22
Ilość postów: 139

3293
wpis nr 136 701
[ CZCIONKA MONOSPACE ]

Wiem, że forum jest dla wszystkich. Zanim coś napiszę mniej lub bardziej sensownego proszę o wskazanie mi w moich wpisach \"wyrazów niesmacznych\". Będę wiedział których wyrazów mam się wystrzegać. Powodzenia



2008-05-11 (16:03)

status cymbał
Data rejestracji: 2008-03-22
Ilość postów: 139

3293
wpis nr 136 705
[ CZCIONKA MONOSPACE ]

Zenie! Ty prześmiewco! (mam nadzieję, że nic nie masz do wykrzykników)

Express Lotek mnie nie interesuje. Pisałem o zbiegu okoliczności jaki miał miejsce wczoraj. Teraz widzę, że nie powinienem był zabierać głosu w tym wątku. Pozdrawiam



2008-05-11 (16:28)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 707
[ CZCIONKA MONOSPACE ]

witam ponownie.



Kto się bawi Excelem może się przyjrzeć \"z bliska\" ,jednej z metod składania zestawów szóstek ,oczywiście akceptacja zestawu wpisywanego może być OBARCZONA dodatkowymi warunkami ,typu odległość MIEDZY SASIADUJąCYMI LICZBAMI,SUMA LICZB, np. w kolumnie dodatkowej można umieścić czwórki nie występujące od 500 albo więcej dni ,i odwołać sie do nich ,tak aby kombinacja szóstki zawierała wszystkie 15 czwórek występujących w tej dodatkowej kolumnie,takie czwórki beż problemu generuje mój i inne programy......należy tylko uzyskać zapis czwórek w postaci jednej liczby można dołożyć wiele innych odwołań .



Makro podstawowe, które należy uruchomić to makro nazwa >> znajdowanie



Wszystko co poniżej wstawię,należy wstawić do modułu Visual Basic ,wynik to zapis kombinacji szóstek bez powtórek czwórek w szóstkach,kto potrafi może sobie poulepszać ,dokładając odwołania do ilości par czy trójek w aktualnie występującym zapisie.



Jeśli KORZYSTACIE Z EXCELA 2007 to 65500 trzeba zmienić na 211876 ,bo tyle czwórek można utworzy z 49 liczb .



Miłego experymentowania ,może co jakiś czas wstawię coś ciekawego.



*******************

\'makro główne

Sub znajdowanie()

\'ActiveWorkbook.PrecisionAsDisplayed = False

\'Application.ScreenUpdating = False

\'Arkusz2.Activate

Range(\"M7\").Select

ActiveWindow.FreezePanes = True







Columns(\"A:F\").Select

Selection.ColumnWidth = 2

Columns(\"G:H\").Select

Selection.ColumnWidth = 7

Columns(\"I:J\").Select

Selection.ColumnWidth = 2

Columns(\"K:K\").Select

Selection.ColumnWidth = 6

Columns(\"L:P\").Select

Selection.ColumnWidth = 2

Columns(\"Q:IV\").Select

Selection.ColumnWidth = 0.1

Cells.Select

Selection.Font.Size = 8

ActiveWindow.Zoom = 75

ILE_KAZDA_LICZBA

For I = 1 To 100000000

\'Gen

Gen_specjal

SORT_KOMBINACJI

If Application.CountIf(Range(Cells(3, 1), Cells(3, 6)), Cells(4, 9).Value) _

>= 1 Then GĘSTOŚĆ

\'If Cells(6, 12).Value = 0 Then zapisz_zestawione

\' If Cells(4, 12).Value = Cells(5, 12).Value Then Exit For

\'porównanie

\'porównanie_system

Next I

\'Application.ScreenUpdating = True

End Sub





\'makra pomocnicze

Sub SORT_KOMBINACJI()



Range(Cells(3, 1), Cells(3, 6)).Select

Selection.Sort Key1:=ActiveCell, Order1:=xlAscending, Header:=xlGuess, _

OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight











End Sub



Sub porównanie()

\'1 czwórka

If Cells(3, 10) = 600 Then Exit Sub

czw1 = Cells(3, 1).Value & Cells(3, 2).Value & Cells(3, 3).Value & Cells(3, 4).Value \'1 > 1 2 3 4



If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw1) > 0 Then Exit Sub

\'druga czwórka

czw2 = Cells(3, 1).Value & Cells(3, 2).Value & Cells(3, 3).Value & Cells(3, 5).Value \' 2 > 1 2 3 5

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw2) > 0 Then Exit Sub

\'3 czwórka

czw3 = Cells(3, 1).Value & Cells(3, 2).Value & Cells(3, 3).Value & Cells(3, 6).Value \' 3 > 1 2 3 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw3) > 0 Then Exit Sub

\'4 czwórka

czw4 = Cells(3, 1).Value & Cells(3, 2).Value & Cells(3, 4).Value & Cells(3, 5).Value \' 4 > 1 2 4 5

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw4) > 0 Then Exit Sub



\'5 czwórka

czw5 = Cells(3, 1).Value & Cells(3, 2).Value & Cells(3, 4).Value & Cells(3, 6).Value \' 5 > 1 2 4 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw5) > 0 Then Exit Sub



\'6 czwórka

czw6 = Cells(3, 1).Value & Cells(3, 2).Value & Cells(3, 5).Value & Cells(3, 6).Value \' 6 > 1 2 5 6



If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw6) > 0 Then Exit Sub

\'7 czwórka

czw7 = Cells(3, 1).Value & Cells(3, 3).Value & Cells(3, 4).Value & Cells(3, 5).Value \' 7 > 1 3 4 5

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw7) > 0 Then Exit Sub



\'

\'8 czwórka

czw8 = Cells(3, 1).Value & Cells(3, 3).Value & Cells(3, 4).Value & Cells(3, 6).Value \' 8 > 1 3 4 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw8) > 0 Then Exit Sub



\'9 czwórka

czw9 = Cells(3, 1).Value & Cells(3, 3).Value & Cells(3, 5).Value & Cells(3, 6).Value \' 9 > 1 3 5 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw9) > 0 Then Exit Sub

\'10 czwórka

czw10 = Cells(3, 1).Value & Cells(3, 4).Value & Cells(3, 5).Value & Cells(3, 6).Value \' 10 > 1 4 5 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw10) > 0 Then Exit Sub



\'11 czwórka

czw11 = Cells(3, 2).Value & Cells(3, 3).Value & Cells(3, 4).Value & Cells(3, 5).Value \' 11 > 2 3 4 5

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw11) > 0 Then Exit Sub

\'12 czwórka

czw12 = Cells(3, 2).Value & Cells(3, 3).Value & Cells(3, 4).Value & Cells(3, 6).Value \' 12 > 2 3 4 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw12) > 0 Then Exit Sub



\'13 czwórka

czw13 = Cells(3, 2).Value & Cells(3, 3).Value & Cells(3, 5).Value & Cells(3, 6).Value \' 13 > 2 3 5 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw13) > 0 Then Exit Sub



\'14 czwórka

czw14 = Cells(3, 2).Value & Cells(3, 4).Value & Cells(3, 5).Value & Cells(3, 6).Value \' 14 > 2 4 5 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw14) > 0 Then Exit Sub



\'15 czwórka

czw15 = Cells(3, 3).Value & Cells(3, 4).Value & Cells(3, 5).Value & Cells(3, 6).Value \' 15 > 3 4 5 6

If Application.CountIf(Range(Cells(4, 7), Cells(65500, 7)), czw15) > 0 Then Exit Sub



NNN = Application.WorksheetFunction.CountA(Range(\"A4:A65500\")) + 4

MMM = Application.WorksheetFunction.CountA(Range(\"G4:G65500\")) + 4

DUBELczw1 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw1)

DUBELczw2 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw2)

DUBELczw3 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw3)

DUBELczw4 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw4)

DUBELczw5 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw5)

DUBELczw6 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw6)

DUBELczw7 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw7)

DUBELczw8 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw8)

DUBELczw9 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw9)

DUBELczw10 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw10)

DUBELczw11 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw11)

DUBELczw12 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw12)

DUBELczw13 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw13)

DUBELczw14 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw14)

DUBELczw15 = Application.CountIf(Range(Cells(4, 7), Cells(MMM + 16, 7)), czw15)



totalDUBEL = DUBELczw1 + DUBELczw2 + DUBELczw3 + DUBELczw4 + DUBELczw5 + DUBELczw6 + DUBELczw7 + DUBELczw8 + DUBELczw9 + DUBELczw10 + DUBELczw11 + DUBELczw12 + DUBELczw13 + DUBELczw14 + DUBELczw15

If totalDUBEL > 0 Then Exit Sub





If totalDUBEL = 0 Then _

Range(Cells(NNN, 1), Cells(NNN, 6)) = Range(Cells(3, 1), Cells(3, 6)).Value

If totalDUBEL = 0 Then Cells(MMM, 7) = czw1

If totalDUBEL = 0 Then Cells(MMM + 1, 7) = czw2

If totalDUBEL = 0 Then Cells(MMM + 2, 7) = czw3

If totalDUBEL = 0 Then Cells(MMM + 3, 7) = czw4

If totalDUBEL = 0 Then Cells(MMM + 4, 7) = czw5

If totalDUBEL = 0 Then Cells(MMM + 5, 7) = czw6

If totalDUBEL = 0 Then Cells(MMM + 6, 7) = czw7

If totalDUBEL = 0 Then Cells(MMM + 7, 7) = czw8

If totalDUBEL = 0 Then Cells(MMM + 8, 7) = czw9

If totalDUBEL = 0 Then Cells(MMM + 9, 7) = czw10

If totalDUBEL = 0 Then Cells(MMM + 10, 7) = czw11

If totalDUBEL = 0 Then Cells(MMM + 11, 7) = czw12

If totalDUBEL = 0 Then Cells(MMM + 12, 7) = czw13

If totalDUBEL = 0 Then Cells(MMM + 13, 7) = czw14

If totalDUBEL = 0 Then Cells(MMM + 14, 7) = czw15



Cells(1, 7) = NNN - 4

Cells(1, = MMM - 4



ILE_KAZDA_LICZBA

End Sub



Sub Gen_specjal()





Dim wylosowane(49) As Single

Dim a, b, indeks, wiersz, kolumna As Single



Dim powtórzenia As Boolean



30

Range(\"A3:F3\") = \"\"

indeks = 1

Randomize

For wiersz = 3 To 3

For kolumna = 1 To 6

Do

powtórzenia = False

wzór = Cells(5, 12).Value

STAN = Application.CountIf(Range(Cells(4, 10), Cells(52, 10)), wzór)

dalej = 49 - STAN

If dalej >= 30 Then dalej = 24

If dalej <= 18 Then dalej = 24

Cells(1, 13) = dalej

a = Int(Rnd * dalej) + 1

For b = 1 To indeks

If a = wylosowane(b) Then powtórzenia = True: Exit For



Next b

Loop While powtórzenia = True

liczba = Cells(a + 3, 9).Value

Cells(wiersz, kolumna) = liczba

wylosowane(indeks) = a

indeks = indeks + 1

Next kolumna

Next wiersz



End Sub

Sub ILE_KAZDA_LICZBA()

V = Application.WorksheetFunction.CountA(Range(\"A4:A20000\")) + 4

For liczba = 1 To 49

Cells(liczba + 3, 9) = liczba

Cells(liczba + 3, 10) = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), liczba)

Next liczba

Cells(4, 11) = \"MIN\"

Cells(4, 12) = Application.Min(Range(Cells(4, 10), Cells(52, 10)))

Cells(5, 11) = \"MAX\"

Cells(5, 12) = Application.Max(Range(Cells(4, 10), Cells(52, 10)))

Cells(6, 11) = \"Bilans\"

Cells(6, 12) = Cells(5, 12).Value - Cells(4, 12).Value

Range(\"J4\", Cells(Rows.Count, 9).End(xlUp).Offset(1, 0)).Sort Key1:=Range(\"J4\"), Order1:=xlAscending, Header:=xlNo, _

OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom



End Sub



Sub GĘSTOŚĆ()



V = Application.WorksheetFunction.CountA(Range(\"A4:A20000\")) + 4



STAN1 = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), Cells(3, 1).Value)

Cells(3, 11) = STAN1

STAN2 = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), Cells(3, 2).Value)

Cells(3, 12) = STAN2

STAN3 = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), Cells(3, 3).Value)

Cells(3, 13) = STAN3

STAN4 = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), Cells(3, 4).Value)

Cells(3, 14) = STAN4

STAN5 = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), Cells(3, 5).Value)

Cells(3, 15) = STAN5

STAN6 = Application.CountIf(Range(Cells(4, 1), Cells(V, 6)), Cells(3, 6).Value)

Cells(3, 16) = STAN6

STAN = Application.Max(Range(Cells(3, 11), Cells(3, 16)))

Cells(3, 10) = STAN

\'If stan < Cells(5, 12).Value And stan <= 600 Then porównanie

If STAN <= 600 Then porównanie \'ograniczenie do do 600x każda liczba

End Sub



















\'makro zapisujące kombinacje do notatnika



Sub zapisz_zestawione()

Dim Fname As String

Dim Path, ILE, V



V = Application.WorksheetFunction.CountA(Range(\"A4:A65000\"))



Fname = \"Kombinacje leo \" & V





Fname = Fname & \".txt\"

Fname = UCase(Fname)

Range(Cells(4, 1), Cells(V + 1, 6)).Select

Path = ThisWorkbook.Path

ChDir Path

Selection.Copy

Workbooks.Add

ActiveSheet.Paste

Application.CutCopyMode = False

Application.DisplayAlerts = False

If k < 11 Then

ActiveWorkbook.SaveAs Filename:=Path & \"\\\" & Fname, FileFormat:=xlText, CreateBackup:=False

Else

ActiveWorkbook.SaveAs Filename:=Path & \"\\\" & Fname, FileFormat:=xlCSV, CreateBackup:=False

End If

ActiveWindow.Close

Application.DisplayAlerts = False



\'scrON

\'On Error GoTo 0

Cells(3, 1).Select

ActiveWorkbook.Save







End Sub





pozdrawiam

leszek
2008-05-11 (16:41)

status zen
Data rejestracji: 2004-03-02
Ilość postów: 1742

190
wpis nr 136 709
[ CZCIONKA MONOSPACE ]

777CH dziękujemy i to bardzo dziękujemy .



==-------->>



Cymbał popatrz no jak tu nie iść na współpracę z 777CH jakoś należało by mu się odwdzięczyć Twoja branża ..



Mój poprzedni wpis był jak najbardziej serio ba nawet nie chciałem użyć Twojego nicka by było to źle odebrane bo jak by to brzmiało

Szkoda że takiego .....nie mamy.... itd

Myślę że wszelkie uwagi ludzi z zewnątrz potrzebne są 777CH byle by nie wprowadziły zamieszania



Nerka



P.o.z

2008-05-11 (16:46)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 711
[ CZCIONKA MONOSPACE ]

cymbał> logiczne jest jakie wybrałeś 20 skoro w moich było 1/29 , ta szósta liczba to ta oczywiście ,



nam prognoza nie wchodzi na zakłady ,czyli zakłady nie są tworzone na bazie liczb prognozy,jest tylko jednym elementem punktującym zestawy,nasze zestawy są stałe ,ale aby z nich wybrać,

zastosowałem automat punktujący ,ten sam wybiera,prognoza podkłada się automatycznie jak wiele innych odwołań , problemem jest pewniak ,bo on drastycznie ogranicza trafienia ,ale i odwrotnie ,ta jedna liczba dobrze wybrana ,może bardzo pomóc i bardzo zaszkodzić ,bo wpływa na ustawienie w decydującym %.
2008-05-11 (17:42)

status cymbał
Data rejestracji: 2008-03-22
Ilość postów: 139

3293
wpis nr 136 717
[ CZCIONKA MONOSPACE ]

Do Zena

Może to i szkoda, że nie macie takiego cymbała ...

Nick dobrałem specjalnie, by mający inne zdanie mogli sobie poużywać.

Ja uwag czynił nie będę. Wierzę, że 777CH wie co robi.

Co do mojej wdzięczności za to co powyżej napisał 777CH - uważam, że jest zbędna. Mógłbym ewentualnie podziękować za te \"wyrazy niesmaczne\" o które prosiłem. Ale się nie doczekałem.

Nie znam Excela tak znakomicie jak 777CH, a szkoda.



Do 777CH



A z tym się nie zgodzę:



\"cymbał> logiczne jest jakie wybrałeś 20 skoro w moich było 1/29 , ta szósta liczba to ta oczywiście\"



Przecież ja Twoich liczb nie znam. W mojej 20 mogło być 15 Twoich liczb. Po prostu to losowanie pokryło się z moimi założeniami. Nic poza tym. Dodatkowo tak jakoś dziwnie się \"dopełniło\" z Waszymi typami.

Życzę powodzenia.

Pozdrawiam



2008-05-11 (18:03)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 719
[ CZCIONKA MONOSPACE ]

cymbał > faktycznie ,masz rację co do tej 20-tki .



Nawiązując do tego makra powyżej,to każdy kto go uruchomi uzyska inne zestawy szóstek ,z uwagi na losowy dobór liczb ,więc x osób złoży np. 5000 szóstek bez powtórek czwórek ,a każda osoba będzie miała inne zestawy.

Można oczywiście zamiast losowego doboru podłożyć generowanie kolejnych kombinacji,albo zastosować GENEROWANIE z ustawionych zbiorów liczbowych.

Można również wymusić GENEROWANIE z dodatkowymi warunkami.

Ale jedno jest pewne......

tylko jedna kombinacja z 13983816 daje wygraną.

No i oczywiście kombinacje można sobie sprawdzać do woli,pod dowolnym względem,albo w excelu,dokładając parę makr,albo wczytując plik do dowolnego programu.



pozdrawiam
2008-05-11 (20:37)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 756
[ CZCIONKA MONOSPACE ]

cymbał> zapomniałem Ci podziękować ,za życzenia ,skoro życzysz nam powodzenia, natomiast co do tych \"wyrazów niesmacznych\" ,to proszę mi darować ,że pisząc konkretnie do Ciebie,tak się wyraziłem,chodziło mi o to by nie używać wyrazów ogólnie zwanych\"wulgaryzmami\" ,mnie to osobiście bardzo boli,że ludzie zapisują myśli wplatając w nie takie wyrazy ,

które rozumiesz ,maja podnieść \"Rangę\" ich wypowiedzi,ja traktuję to za brak

....rozumu ,ale to moje subiektywne podejście,mam do niego prawo.

Jeszcze raz przepraszam,bo nie pamiętam akurat abym zauważył w Twoich

postach jakieś\"niesmaczne\".





Jak się czymś chcesz podzielić TU Z NAMI W TYM TEMACIE ,to dziękujemy z góry

Każdy pogląd to również jakaś informacja ,

a informacja to rzecz cenna.



to tyle ,i również życzę powodzenia

leszek



2008-05-12 (12:32)

status wiktor 444
Data rejestracji:
Ilość postów:

wpis nr 136 846
[ CZCIONKA MONOSPACE ]

Witam >



Mam pytanie :



Leo dlaczego pewniakiem nie jest liczba gorąca tzn. taka która była losowana najwięcej razy w ciągu np. 12 losowań.



Ostatnio na 12 ostatnich losowań liczba 32 była losowana 5 razy i weszła jak w masło 6 raz ?????



2008-05-12 (20:24)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 918
[ CZCIONKA MONOSPACE ]

wiktor 444 > nie wiem co mam odpowiedzieć ,W ZASADZIE obojętne jest jakie kryterium,byle by weszła liczba .

Ale kryteriów może być ...

2008-05-12 (21:02)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 928
[ CZCIONKA MONOSPACE ]

wiktor 444> mój program może dokonać SYMULACJI dla dowolnej gry ,

dla dowolnego założenia,

czyli na przykład ustalamy że gramy na liczby które wchodziły tyle i tyle razy w ciągu jakiegoś zakresu,a nawet istnieje możliwość podziału na cztery podzakresy,

Masz poniżej symulacje wyboru liczby ,przy założeniu 5x w ciągu 12 dni.

* *
2008-05-12 (21:06)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 929
[ CZCIONKA MONOSPACE ]

widać KOLOR

6 X taki wybór na 100 losowań był prawidłowy.
2008-05-12 (21:19)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 935
[ CZCIONKA MONOSPACE ]

poniżej symulacja 50 gier ,założenie : liczby brak wystąpienia od min.20 dni



* *



pozdrawiam
2008-05-12 (21:24)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 936
[ CZCIONKA MONOSPACE ]

jak widać KANDYDATóW jest 6-ciu ,widać również przerwę ,czyli od 5 gier takie

założenie nie dało sukcesu.

Zatem .....czas na zmiany ,ale nie powinniśmy raczej

pokazywać SZCZEGółóW.

2008-05-12 (21:28)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 937
[ CZCIONKA MONOSPACE ]

Widać doskonale kandydata bardzo już długo \"kandydującego \" w tej kategorii.
2008-05-12 (22:15)

status PARTNER
Data rejestracji: 2008-03-10
Ilość postów: 747

3260
wpis nr 136 948
[ CZCIONKA MONOSPACE ]

Aktualna ilość osób 36 = 288 zakładów.



Prognozy niebawem wejdą na Wasze skrzynki.



Kolejnych zainteresowanych wspólną precyzyjną grą zapraszamy.



Kontakt - baza-partner@wp.pl



Pozdrawiam PARTNER Waldi
2008-05-12 (22:31)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 22656

1386
wpis nr 136 951
[ CZCIONKA MONOSPACE ]

Prognozy niebawem ,potwierdzam.
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 22 23 24 ... 56 57
Wyślij wiadomość do admina