moje ... oprogramowanie

Przewiń wpisy ↓	moje ... oprogramowanie
2020-05-15 (00:40) sindbad Data rejestracji: 2008-10-13 Ilość postów: 20531	wpis nr 1 293 168 [ CZCIONKA MONOSPACE ] Polecam Lazarus
2020-05-15 (10:41) edi8 Data rejestracji: 2007-04-03 Ilość postów: 41774	wpis nr 1 293 227 [ CZCIONKA MONOSPACE ] fair_play, nie wiem czy teraz jako do rekordzisty świata mogę się z tym do Ciebie zwrócić, ale gdy będziesz miał wolne moce przerobowe na 1z2 komputerów, to rozważ proszę rozszerzenie Twego autorstwa kolekcji rozpisów dla N-0 z warunkiem braku powtórek w kolumnach na tych samych miejscach, także dla systemu strefowego na 35 liczb w 5 strefach po 7 Strefy: 01 02 03 04 05 06 07 strefa I min/max=1 08 09 10 11 12 13 14 strefa II min/max=1 15 16 17 18 19 20 21 strefa III min/max=1 22 23 24 25 26 27 28 strefa IV min/max=1 29 30 31 32 33 34 35 strefa V min/max=1 .................... a wtedy dołączę go do zbioru w wątku "Systemy strefowe by 777ch" z oczywistym podaniem Ciebie jako autora, a także za Twoją ew. zgodą zamieszczę go na włoskim i brazylijskim forum. Pozdrawiam
2020-05-15 (11:06) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 234 [ CZCIONKA MONOSPACE ] edi8> Kpiarzu Taki rozpis to 2520 zakładów. Nie chcę tyle tego tutaj wstawiać, ale podpowiem jak sam możesz taki wygenerować w excelu i wkleić go tam. A zatem: w komórkach A1:G5 arkusza wstawiasz matrycę: 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 i uruchamiasz takie makro: Sub makro7() x = 0 margines = 10 For n1 = 1 To 7 For n2 = 1 To 7 If n2 <> n1 Then For n3 = 1 To 7 If n3 <> n1 And n3 <> n2 Then For n4 = 1 To 7 If n4 <> n1 And n4 <> n2 And n4 <> n3 Then For n5 = 1 To 7 If n5 <> n1 And n5 <> n2 And n5 <> n3 And n5 <> n4 Then x = x + 1 Cells(x, margines + 1) = Cells(1, n1) Cells(x, margines + 2) = Cells(2, n2) Cells(x, margines + 3) = Cells(3, n3) Cells(x, margines + 4) = Cells(4, n4) Cells(x, margines + 5) = Cells(5, n5) End If Next End If Next End If Next End If Next Next End Sub Pozdrawiam
2020-05-15 (11:42) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 244 [ CZCIONKA MONOSPACE ] fair_play jak tam , skończyłeś na -1
2020-05-15 (12:17) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 257 [ CZCIONKA MONOSPACE ] Licho nie śpi ...skasowałem to bo jestem od wczoraj na -1 i tak czasem bywa w tym przypadku trzeba dokonać niemiłego zabiegu ........ powrotu wstecz bo czasem tak się ułoży że nie zrobisz jednej pozytywnej zmiany tylko potrzeba kilka zamian jakby szach mat w 3..4 ruchach
2020-05-15 (12:19) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 258 [ CZCIONKA MONOSPACE ] skoro skasowałeś to dlaczego widzę ? przekreślone, ale widzę. a jak dokonujesz kroków wstecz ?
2020-05-15 (12:39) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 263 [ CZCIONKA MONOSPACE ] Bo widzi tylko autor no chyba że ktoś inny widzi ......to wtedy kicha
2020-05-15 (12:56) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 267 [ CZCIONKA MONOSPACE ] 1 2 3 4 10 15 19 20 24 29 31 32 33 35 37 39 40 42 46 47 48 50 51 1 2 3 5 6 9 11 16 17 18 20 21 24 26 31 32 33 35 36 39 41 47 49 1 2 4 5 8 10 15 16 17 19 20 23 25 30 31 32 34 35 38 40 45 48 49 1 2 5 7 12 13 14 16 17 20 22 27 28 29 31 32 35 37 42 43 44 46 49 1 3 4 7 9 14 15 16 18 19 22 24 29 30 31 33 34 37 39 44 45 47 48 1 3 5 9 10 12 13 17 18 23 27 28 29 30 31 34 40 43 45 47 49 50 51 1 3 8 9 10 12 13 16 18 23 24 25 27 28 31 33 38 39 40 42 43 46 47 1 4 6 11 12 13 15 16 19 21 26 27 28 30 31 34 36 41 42 43 45 46 48 1 6 7 8 10 11 14 16 21 22 23 25 26 29 31 36 37 38 40 41 44 50 51 2 3 4 6 7 10 12 17 18 19 21 22 25 27 32 33 34 36 37 40 42 47 48 2 3 5 6 13 14 15 16 18 21 24 25 28 32 34 36 39 42 43 44 49 50 51 2 3 6 8 13 14 15 17 18 21 23 28 29 30 32 33 36 38 43 44 45 46 47 2 4 9 10 11 13 14 17 19 24 25 26 28 29 32 34 39 40 41 43 44 46 48 2 7 8 9 11 12 15 17 22 23 24 26 27 30 32 37 38 39 41 42 45 50 51 3 4 5 7 8 11 18 19 20 22 26 28 33 35 37 38 41 46 47 48 49 50 51 3 5 10 11 12 14 15 18 20 25 26 27 29 30 33 35 40 41 42 44 45 47 49 4 5 6 8 9 12 14 19 20 21 23 24 27 29 34 35 36 38 39 42 44 48 49 4 5 7 8 11 13 19 20 22 23 26 28 33 34 35 37 38 41 43 46 47 48 51 4 6 9 12 14 16 17 19 20 21 25 27 30 33 35 36 44 45 46 47 48 50 51 5 6 7 9 10 13 15 20 21 22 24 25 28 30 35 36 37 39 40 43 45 46 49 na tym potestuj cofkę ustaw gwarancję dla t=3 m=3 trzy elementy odgrywaja rolę oba checkboxy muszą być zaznaczone oba pod buttonem restart to spowoduje losową podmianę jednej linii co pewien interwał interwał jest liczony pokrętnie jest to mój wskaźnik w rodzaju iloczynu ilości liczb losowych [tam zaznacz 2 czyli dwie losowe ] do wartości na spinedicie w prawo od buttona z napisem --> change ustaw wartość na 20 i stopniowo zmniejszaj lub zwiększaj w zależności od progeresu zmian na lepsze albo częstotliwości dublowania linii Czy to jest zrozumiałe...... Proponuję z naciskiem test na tym co wstawiłem bo dla gw 6if 6 to będzie bardzo czasochłonne........... jest też druga opcja ...... ale o niej nie wspomnę bo to bardziej złożone ustawienie , uwierz mi na słowo
2020-05-15 (13:03) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 268 [ CZCIONKA MONOSPACE ] takie ustawienie klikasz button 1 --- wpis edytowano 2020-05-15 13:04 ---
2020-05-15 (13:22) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 270 [ CZCIONKA MONOSPACE ] haha no fajnie, tylko co jest istotne w tym screenie ? to "0" w not ? ten ptaszek w Change" ? Poza tym widzę pewną sprzeczność z tym co kiedyś pisałeś, że w czerwonym polu losowych musi być ustawione co najmniej tyle ile w niebieskim LINES. Tymczasem tam jest tylko 2 podczas gdy w LINES jest 6 .
2020-05-15 (13:41) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 276 [ CZCIONKA MONOSPACE ] button 1 nie bierze pod uwagę własne stąd nie regulowałem ilości własnych jeśli jednak koło repaint w lewo zaznaczysz motylek to wtedy będzie pobierało najpierw liczby własne wtedy jak najbardziej zmieniasz .regulujesz własne...... co innego algorytm 5\|6 czy 2\|3 czy co tam w compare ustawisz tu jak błędnie poustawiasz to leci na pusto....... jak poniżej czyli to samo na ziemi co na niebie ustaw gwarancję dla t=3 m=3 trzy elementy odgrywaja rolę oba checkboxy muszą być zaznaczone oba pod buttonem restart to spowoduje losową podmianę jednej linii co pewien interwał interwał jest liczony pokrętnie jest to mój wskaźnik w rodzaju iloczynu ilości liczb losowych [tam zaznacz 2 czyli dwie losowe ] do wartości na spinedicie w prawo od buttona z napisem --> change ustaw wartość na 20 --- wpis edytowano 2020-05-15 13:44 ---
2020-05-15 (13:43) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 278 [ CZCIONKA MONOSPACE ] to "0" w not ? to odliczanie do zmiany tam się musi pokazać tyle ile ustawione w białym spinedicie poniżej to tylko miała być próba objasnienia jednego z wielu tricków......
2020-05-15 (13:47) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 280 [ CZCIONKA MONOSPACE ] ale nie odpowiedziałeś co jest istotnego w tych ustawieniach oprócz "button1", bo chyba sprawdzasz 3 if 6, więc to jakoś nie koreluje z tym co robiliśmy dotychczas. --- wpis edytowano 2020-05-15 13:49 ---
2020-05-15 (14:01) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 282 [ CZCIONKA MONOSPACE ] oprócz tego co wskazałem do ustawienia inne ustawienia są przypadkowe --> [nie ważne]-->dla algorytmu pod buttonem 1 więc to jakoś nie koreluje z tym co robiliśmy dotychczas bo --> to co innego niż skok do linii o zawartości min x\|y wtedy ustawialiśmy udział własnych czyli braków a tu jest losowa ...... układanka --- wpis edytowano 2020-05-15 14:03 ---
2020-05-15 (14:09) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 283 [ CZCIONKA MONOSPACE ] chyba się napiję Nie znając algorytmów, procedur i mając checkboxów ile gwiazd na niebie to jest nie do opanowania zadam Ci pytanie odnośnie idei podmiany, ale muszę je przygotować opierając się na wiedzy, którą już przekazałeś. Ale to trochę potrwa.
2020-05-15 (14:23) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 287 [ CZCIONKA MONOSPACE ] fair_play jak mam ci tłumaczyć coś co powstawało przez 8 lat to się wolę napić co nieco tak ,a sprawdzałeś Ont ? randomizer przy ustawieniu gw. 0 0 to co Sieger kombinował a co sie dzieje przy ustawieniu innych motylków..... skupmy się na 6if6 na kasowaniu adresów i ich przywracaniu do stanu przed zmianą czyli w locie ...... bo obliczenie wartości dla linii + STAN bez tej linii da przyspieszenie czasu obliczeń tylko pamiętaj że adres XXL WYSTĘPUJE w wielu liniach ...... a przy podmianie ,nie można tylko brać pod uwagę adres=0 podmiana podmianą .......według moich rozwiazań a samo sprawdzenie gwarancji tylko raz na początku a potem jazda tylko dla jednej linii gdzie .......coś zmieniamy To co dostałem od Ciebie to nie to chodzi jeden zamknięty sposób przeliczeń gwarancji dla badana=0 albo petla=true całość dla badana>0 albo petla=false tylko Stan + StanBadana tego brakuje do testów bo liczenie szóstek w pętli to co najmniej 1,5 s dla sprawdzenia Stan a to 10x za długo
2020-05-15 (14:34) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 290 [ CZCIONKA MONOSPACE ] "skupmy się na 6if6 na kasowaniu adresów i ich przywracaniu do stanu przed zmianą" wyjąłeś mi to z ust Ale do tego potrzebny jest precyzyjny opis CYKLU podmiany tzn co się dzieje pomiędzy dwoma kolejnymi sprawdzeniami. I tego będzie dotyczyło moje pytanie, które wkrótce zadam.
2020-05-15 (14:48) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 294 [ CZCIONKA MONOSPACE ] fair_play to zacznijmy tak badana :to linia ilegen :to wszystkie linie begin gwarall(sender); //sprawdzamy gwarancję startową IF BESTBRAK> BRAK THEN BESTBRAK:=BRAK; // NASZ HIT BRAKÓW Repeat //petla poliniach coveru IDEA(SENDER); // tu co tam chcemy gwarBADANA(sender); //sprawdzamy gwarancję linni BADANA IF BESTBRAK> BRAK THEN BESTBRAK:=BRAK; // NASZ HIT BRAKÓW until(badana>ilegen); --------------------------------------------- procedura dla gwarBADANA procedura dla IDEA napisz w VBA a ja przerobię na paskal --- wpis edytowano 2020-05-15 14:49 ---
2020-05-15 (15:19) 777ch Data rejestracji: 2005-11-07 Ilość postów: 22780	wpis nr 1 293 298 [ CZCIONKA MONOSPACE ] edi8 Czy Ty nie podawałeś czasem kiedyś rozpisu dla gwarancji 5\5 if hit=20\|80 ? --- wpis edytowano 2020-05-15 15:19 ---
2020-05-15 (15:23) fair_play Data rejestracji: 2016-05-12 Ilość postów: 8857	wpis nr 1 293 300 [ CZCIONKA MONOSPACE ] Co rozumiesz przez "gwarancja linii" ?? Co to SENDER ?? Trochę to sprzeczne z tym co kiedyś pisałeś, a mniej więcej brzmiało tak: "Wybieramy z coveru do podmiany tylko te linie, które zawierają n liczb (np 4), zawartych w danej linii braków"). A teraz piszesz że pętla po całym coverze. --- wpis edytowano 2020-05-15 15:37 ---


\| Dodaj wpis w tym temacie \| Spis tematów \| Wyniki lotto	Strona: 1 2 ... 355 356 357 ... 559 560 Wyślij wiadomość do admina Czcionka o stałej szerokości

Forum strony www.multipasko.pl [Regulamin]