Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 356 357 358 ... 560 561
Wyślij wiadomość do admina

Przewiń wpisy ↓

moje ... oprogramowanie

2020-05-15 (14:01)

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

1386
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
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)

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

1386
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
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)

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

1386
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)

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

1386
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
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)

status edi8
Data rejestracji: 2007-04-03
Ilość postów: 41774

2623
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)

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

1386
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)

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

1386
wpis nr 1 293 307
[ CZCIONKA MONOSPACE ]

edi8

czy to na pewno aż tyle kombinacji ?
5|5 przy 20z80 ?
2020-05-15 (15:56)

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

1386
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
wpis nr 1 293 311
[ CZCIONKA MONOSPACE ]


edi8>

Nie poradziłeś sobie ?
Bo nie widzę żadnego dopisu do "strefowych" .
2020-05-15 (16:04)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
wpis nr 1 293 312
[ CZCIONKA MONOSPACE ]


777ch>

Co to gwarancja linii ?
2020-05-15 (16:07)

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

1386
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)

status edi8
Data rejestracji: 2007-04-03
Ilość postów: 41774

2623
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)

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

1386
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)

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

1386
wpis nr 1 293 321
[ CZCIONKA MONOSPACE ]

fair_play
Jestem już .....
Czy ja coś źle tłumaczę ?
2020-05-15 (17:37)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
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)

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

1386
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8971

14865
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
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 356 357 358 ... 560 561
Wyślij wiadomość do admina