moje ... oprogramowanie

Przewiń wpisy ↓	moje ... oprogramowanie
2020-05-15 (14:34) fair_play Data rejestracji: 2016-05-12 00:00:00 Ilość postów: 8590	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 00:00:00 Ilość postów: 22649	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 00:00:00 Ilość postów: 22649	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 00:00:00 Ilość postów: 8590	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 ---
2020-05-15 (15:51) edi8 Data rejestracji: 2007-04-03 00:00:00 Ilość postów: 41774	wpis nr 1 293 304 [ CZCIONKA MONOSPACE ] 777ch, jak nie jak tak? https://zachowajto.pl/!mymNX8UUysKn/c-80-5-5-20-20730-txt
2020-05-15 (15:52) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 306 [ CZCIONKA MONOSPACE ] Fair play sender to jakby to samo co self.button.click; czyli wywołanie procesu czyli jakiejś procedury
2020-05-15 (15:53) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 307 [ CZCIONKA MONOSPACE ] edi8 czy to na pewno aż tyle kombinacji ? 5\|5 przy 20z80 ?
2020-05-15 (15:56) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 309 [ CZCIONKA MONOSPACE ] fair_play petla nie petla może być np . badana=33; ok tyle że ja to muszę i tak gdzieś doprowadzić do --> tam i z powrotem czyli tez zapętlę --- wpis edytowano 2020-05-15 15:56 ---
2020-05-15 (16:02) fair_play Data rejestracji: 2016-05-12 00:00:00 Ilość postów: 8590	wpis nr 1 293 311 [ CZCIONKA MONOSPACE ] edi8> Nie poradziłeś sobie ? Bo nie widzę żadnego dopisu do "strefowych" .
2020-05-15 (16:04) fair_play Data rejestracji: 2016-05-12 00:00:00 Ilość postów: 8590	wpis nr 1 293 312 [ CZCIONKA MONOSPACE ] 777ch> Co to gwarancja linii ?
2020-05-15 (16:07) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 313 [ CZCIONKA MONOSPACE ] Fair play sender to jakby to samo co self.button.click; czyli wywołanie procesu czyli jakiejś procedury odpowiedziałem wyżej a Sprawdzenie gwarancji badanej linni to proces w którym musimy cos pozmieniać czyli np xxx to wszystkie adresy z linii badana if maska{xxx)>= then maska{badana)=maska(xxx)-1 teraz nasz -->aktualny brak to tylko Bestbrak- [te adresy które poodjęciu -1 dały --> 0] i dopiero teraz wprowadzamy zmiany w linni budując linię nowa w oparciu o starą ale wprowadzamy różne zmiany po wprowadzeniu kazdej zmiany musimy sprawdzić ponownie akt braknow czy to jasne bo jeśli zmiana nie idzie na lepsze to sie cofamy do tyłu a jak na lepsze to zostawiamy zmieniona liczbę zawsze jedna liczba w tym przypadku ale nie koniecznie po kolei czy potem podstawiamy liczby lub
2020-05-15 (16:09) edi8 Data rejestracji: 2007-04-03 00:00:00 Ilość postów: 41774	wpis nr 1 293 314 [ CZCIONKA MONOSPACE ] Zamieściłem na włoskim forum w wątku o grze Eurojackpot info o tym systemie na 35 liczb z warunkową gwarancją N-0 czyli 5 if 5x 1from7 wraz z Twoim makrem, bo stamtąd miałem o to zapytanie a że rozpis to kobyła na 2520 linii to mi się nie chce tego na serwer wrzucać aby linka podawać. --- wpis edytowano 2020-05-15 16:10 ---
2020-05-15 (16:09) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 315 [ CZCIONKA MONOSPACE ] pisałem wszystko ad hoc luźne myśli....... ale teraz przez ok 3 godziny nie będzie mnie
2020-05-15 (17:31) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 321 [ CZCIONKA MONOSPACE ] fair_play Jestem już ..... Czy ja coś źle tłumaczę ?
2020-05-15 (17:37) fair_play Data rejestracji: 2016-05-12 00:00:00 Ilość postów: 8590	wpis nr 1 293 324 [ CZCIONKA MONOSPACE ] "bo liczenie szóstek w pętli to co najmniej 1,5 s dla sprawdzenia Stan a to 10x za długo" Chyba tego co wysłałem nie sprawdziłeś, bo u mnie procedura test() zajmuje 90ms w excelu. Oczywiście pomijając pierwszą linię tej procedury, bo to początkowa analiza rozpisu z listingiem braków. Sub test() gwarancje6 ' początkowa analiza z listingiem braków stoper1 = Timer linia = 11 ' podmiana w 11-tej linii brak_przed = brak Cells(10, 41) = brak_przed a = przed_podmianą(linia) 'podmiana liczba = mat(linia, 25) ' podmiana 25 liczby w linii mat(linia, 25) = 46 '46 liczba podstawiana a = po_podmianie(linia) brak_po = brak Cells(11, 41) = brak_po czas1 = Format(Timer - stoper1, "00.0000000") & "sek." Cells(12, 41) = czas1 If brak_po >= brak_przed Then mat(linia, 25) = liczba ' przywrócenia stanu sprzed podmiany Else ' podmiana z sukcesem brak = 0 ' tutaj ponowny listing braków For y = 1 To adr0 If maska(y) = 0 Then brak = brak + 1 a = liczby_6(y, brak) End If Next End If End Sub --- wpis edytowano 2020-05-15 17:51 ---
2020-05-15 (18:36) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 340 [ CZCIONKA MONOSPACE ] fair_play Chyba tego co wysłałem nie sprawdziłeś, no nie sprawdziłem................... ale przyjmij moje uwagi poniżej ============================= czy to jest to co już mam bo rzeczywiście nie miałem czasu sprawdzić tego chodziło mi o to abyś rozdzielił sprawdzanie gwarancji -->jedna procedura sprawdzanie jednej linni --> druga osobna procedura zależy mi na tym bo skoki w moich procedurach są zastosowaniem starej sekwencji ze zmianami lub w innych przypadkach losowa zmiana liczb na pozycji czyli np zmieniam tabbest [badana][37]=0 na 1 ale również zmieniam jednocześnie jedna losowo tabbest [badana][1]=1 na 0 oczywiście o ile w pierwszym przypadku mam 0 a w drugim mam w tablicy 1 inaczej by mi się skracały lub wydłużały sekwencje......... dlatego proszę o propozycję procedurę sprawdzenia gdy wybrałem jakaś linię dlaczego ją wybrałem to .......słodka tajemnica skacze do niej zmieniam w linii badana co chcę czasem dwie,czasem trzy czasem 5,czasem tylko jedną liczbę ale zmiana jednej liczby to jak nadmieniałem wcześniej: czyli np zmieniam tabbest [badana][37]=0 na 1 ale również zmieniam jednocześnie jedna losowo tabbest [badana][1]=1 na 0 stad potrzebny nieustanny proces weryfikacji ale w oparciu o stan całości plus lub minus ........... dane gwarancji dla tej linii w której.......grzebiemy czy to jasne czy nie ? --- wpis edytowano 2020-05-15 18:38 ---
2020-05-15 (19:24) fair_play Data rejestracji: 2016-05-12 00:00:00 Ilość postów: 8590	wpis nr 1 293 349 [ CZCIONKA MONOSPACE ] Nie rozumiem w jaki sposób zamianę 0 na 1 czy odwrotną odnieść do tablicy adresów ? Rozumiałbym zamianę liczby 22 na liczbę 33. Teraz ja opiszę słowami: 1. Wybierasz linię do podmiany wg ... słodkiej tajemnicy. 2. zapamiętujesz aktualną ilość braków: brak_przed=brak 3. w tablicy adresów odejmujesz wszystkie szóstki z wybranej linii. Funkcja przed_podmianą(linia), która jednocześnie koryguje liczbę braków. 4. Zamieniasz w wybranej linii tyle liczb ile chcesz, ale zapamiętujesz pozycje i wartość tych liczb sprzed podmiany. 5. Po podmianie zapisujesz wszystkie szóstki ze zmodyfikowanej linii w tablicy adresów modyfikując jednocześnie ilość braków: Funkcja po_podmianie(linia) i zapisujesz ich ilość w brak_po=brak 6. Teraz porównujesz brak_przed z brak_po - Jeśli brak_po<brak przed co oznacza pozytywną podmianę to pozostawiasz podmienioną linię bez zmian i wywołujesz nowy listing braków. - W przeciwnym razie (negatywna podmiana) przywracasz stan linii sprzed podmiany przywracając zapamiętane liczby na ich zapamiętanych pozycjach. To jeden cykl podmiany. Teraz mnie nie będzie przez pewien czas
2020-05-15 (20:02) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 357 [ CZCIONKA MONOSPACE ] Zaraz dotrę do domu to ci odpowiem 😏 10-min. 📲
2020-05-15 (20:51) 777ch Data rejestracji: 2005-11-07 00:00:00 Ilość postów: 22649	wpis nr 1 293 373 [ CZCIONKA MONOSPACE ] Nie rozumiem w jaki sposób zamianę 0 na 1 czy odwrotną odnieść do tablicy adresów ? Rozumiałbym zamianę liczby 22 na liczbę 33. --> tak własnie próbujemy ale technicznie to jest wstawienie 0 do tabbest[linia][22] z jednoczesnym wstawieniem 1 do tabbest[linia][33] to jest moja zamiana 22 na 33 jak się nie powiedzie to cofam ale ........ najpierw to-->sprawdzenie gwarancji dla linii albo całośc jak dotychczas to tak ad hoc tabrand[linia][kolejna liczba]......... przyjmuje liczby tylko celem pokazania danych w zółtku co tylko spowalnia proces oraz do wpisu do plików txt już resztę przeczytam....... ale widzę Teraz ja opiszę słowami: 1. Wybierasz linię do podmiany wg ... słodkiej tajemnicy. 2. zapamiętujesz aktualną ilość braków: brak_przed=brak 3. w tablicy adresów odejmujesz wszystkie szóstki z wybranej linii. Funkcja przed_podmianą(linia), która jednocześnie koryguje liczbę braków. 4. Zamieniasz w wybranej linii tyle liczb ile chcesz, ale zapamiętujesz pozycje i wartość tych liczb sprzed podmiany. i tu mamy problem jeden algorytm zmienia jedną liczbę inny dwie ...... zawsze po komendzie zmiany jest wywołana gwarall(sender)--> czyli sprawdzenie gwarancji ale ........ wywołanie gwarall to 1,5 s 5. Po podmianie zapisujesz wszystkie szóstki ze zmodyfikowanej linii w tablicy adresów modyfikując jednocześnie ilość braków: Funkcja po_podmianie(linia) i zapisujesz ich ilość w brak_po=brak 6. Teraz porównujesz brak_przed z brak_po - Jeśli brak_po<brak przed co oznacza pozytywną podmianę to pozostawiasz podmienioną linię bez zmian i wywołujesz nowy listing braków. - W przeciwnym razie (negatywna podmiana) przywracasz stan linii sprzed podmiany przywracając zapamiętane liczby na ich zapamiętanych pozycjach. To jeden cykl podmiany. Teraz mnie nie będzie przez pewien czas Ja wiem jak to zrobić....... ale wolałem abyś pomyślał i napisał to sam tak abym mógł to--> zagnieździć w miejscu gdzie chciałbym wywołać sprawdzenie dla linni badanej bo tak ja napisałem w przypadku zmiany całej linii ....... pyk sprawdź w przypadku zmiany jednej liczby ..pyk sprawdź osobna procedura zagnieżdżona jak makro w makrze była by bardzo przydatna .... do jutra --- wpis edytowano 2020-05-15 20:52 ---
2020-05-15 (21:04) fair_play Data rejestracji: 2016-05-12 00:00:00 Ilość postów: 8590	wpis nr 1 293 380 [ CZCIONKA MONOSPACE ] "ale ........ wywołanie gwarall to 1,5 s" to Twoja procedura gwarall - co ona robi ? Moja jest inna i nie zależy od ilości podmienianych liczb. Jedno istotne pytanie: Czy po podmianie liczby w linii pozostają uporządkowane rosnąco ? Czytając to co piszesz odnoszę wrażenie, że chciałbyś pozostać przy swoim byle by było szybciej --- wpis edytowano 2020-05-15 21:14 ---


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

Forum strony www.multipasko.pl [Regulamin]