Novità

Cortesemente un aiuto per questo script

joe

Advanced Member >PLATINUM PLUS<
Grazie ad Ilegend -anche- per la conferma.

Effettivamente la Nazionale io non la considererei perché il gestore non la paga come ambo a tutte.

Più ancora perché obbliga a raddoppiare il costo delle giocate.

In ultimo perché creando un "diviso 11" crea un periodico pari a 0.9999 ... che "complica"

ed obbliga di fatto agli arrotondamenti tanto inutili quanto altrettanto dannosi nell'introdurre errori.

Herat ... come dicevo tutto è possibile e tutto è lecito.

Escludere le presenze-multiple sicuramente sinonimo di "Frequenza"

da una ricerca dei "Frequenti" appare quasi una contraddizione in termini. comunque sia ...

Come ho intuito sin dal principio i contorni della ricerca essendo incerti,

fanno si che anche i risultati possano essere altrettanto incerti.

Pertanto ho già scritto alcune versioni totalmente differenti per questa ricerca ed in quest'ultima,

si tenta escludere le coppie di estratti isotopi che producono PIU' DI UNA "coppia per ambo".

Ma ... l'aleatorietà dei confini di ogni singola condizione e dell'interpretazione che si da della stessa,

rendono fortemente aleatoria la seguente tabella dei risultati ottenuti.

:)

Aggiornato e da verificare:

Codice:
Inizio[10054] 12.03.2022
Fine  [10071] 21.04.2022
Estr. [18]

E.Iso Pres
27.65  5
31.62  5
56.85  5
 

joe

Advanced Member >PLATINUM PLUS<
Ciao Filotto.

Si è una immagine dunque il contenuto deve essere trascritto in VBScript.

:)
 

herat

Senior Member
Altra cosa Joe, se è possibile, si può mettere anche la parte riguardante "imposta giocata" e resoconto per vedere statisticamente cosa è successo in passato?
 

Enplein

Super Member >PLATINUM<
ALTRO ESEMPIO REALE ATTUALMENTE IN GIOCO
36 ESTRAZIONI DAL 20/01/2022 AL 12/04/2022

20/01/2022 NZ 39 - MI 54 ISOTOPI IN SECONDA POSIZIONE
25/01/2022 VE 39 - TO 54 ISOTOPI IN SECONDA POSIZIONE
01/02/2022 PA 39 - TO 54 ISOTOPI IN SECONDA POSIZIONE
02/04/2022 MI 39 - VE 54 ISOTOPI IN QUINTA POSIZIONE
12/04/2022 NA 39 - PA 54 ISOTOPI IN QUINTA POSIZIONE

NELL'ARCO DELLE 36 ESTRAZIONI DAL 20/01/2022 AL 12/04/2022 I NUMERI 39-54 NON SI SONO MAI UNITI IN AMBO SU TUTE LE 11 RUOTE E PERTANTO DAL 14 APRILE è IN GIOCO L'AMBO 39-54 SU TT-NZ
Ambi ripetuti in isotopia.jpg
 

joe

Advanced Member >PLATINUM PLUS<
Nel ringranziare anche Enplein, Ilegend e Salvo,

per il supporto e nell'augurare il buon Week-End a tutte/i ...

... Mi sembra di rilevare dall'output postato ad esempio che:

le istruzioni "nelle ultime 36 estrazioni senza mai legarsi in ambo"

siano state interpretate come "non meno di 180 Estrazioni senza ...".

Questo tipo di riduzione delle quantità di ambi del tutto legittimo (specie per un ritardista)

rende tuttavia molto diversa l'impostazione dello script

la quantità e la qualità degli ambi sottopposti all'eventuale test di gioco.

Tuttavia, se ci sono risultati ... ben vengano.

:)
 

i legend

Premium Member
Ciao a tutti:)
Enplain ho visto che hai utilizzato un altro programma, rispetto spaziometria è più veloce? Solo curiosità.
Cuao e buon weekend a tutti
 

Enplein

Super Member >PLATINUM<
Buon pomeriggio.
Anche se il programma di LuigiB "Spaziometria" è più completo,
personalmente uso Lottodesk.
Lo script realizzato gira anche su Spaziometria che impiega circa 3 minuti,
invece con il programma che uso, impiega 1'38''.
Buon Week-End a tutte/i , Enplein.


'Evidenzia le coppie di numeri che sono usciti almeno 5 volte nelle stesse posizioni
'e nelle stesse estrazioni (isocroni e isotopi ) sulle 11 ruote nelle ultime 36 estrazioni
'senza mai legarsi in ambo
'Lo script deve mettere in gioco per 18 colpi la coppia rilevata


Sub Main() Dim ee(36),ru(36),po(36),rtt(2),ab(2),poste(2) poste(2)=1 cl=CInt(InputBox("Di Quante Estrazioni componiamo il Ciclio ?","ESTRAZIONI",36)) fine=CInt(InputBox("Con quale estrazione vuoi iniziare?","Estrazione ",10067)) test=(cl-1) Scrivi "Ricerca dall'estrazione del "& DataEstrazione (fine)&"/"&fine&" Listed by Enplein",1 Scrivi co=0 es=fine Messaggio es For j1=1 To 89 n1=j1 For j2=j1+1 To 90 n2=j2 g1=0 : g=0 : ex=0 : Erase ee : Erase ru : Erase po For x=0 To test ex=es-x For p=1 To 5 For r1=1 To 10 po1=Posizione (ex,r1,n1) : po2=Posizione (ex,r1,n2) If (po1>0 And po1=p) Or (po2>0 And po2=p)Then If po1>0 Then nn1=n1 Else nn1=n2 For r2=r1+1 To 11 If r2=11 Then r2=12 If nn1=n1 Then nn2=n2 Else nn2=n1 po3=Posizione (ex,r2,nn2) If (po3>0 And po3=p) Then g1=g1+1 : ee(g1)=ex : po(g1)=p g=g+1 : ru(g)=r1 : g=g+1 : ru(g)=r2 End If Next End If Next Next Next If g1=>5 Then ab(1)=n1 : ab(2)=n2 rtt(1)=11 : rtt(2)=12 ra=SerieRitardo (es-400,es,ab,rtt,2) If ra=>36 Then co=co+1 Scrivi Scrivi "Coppia in posizione isotopa "& Format2 (n1)&"."& Format2 (n2)&_ " Prs. "&g1&" Rit. su Tutte + Nz "&ra,1 j=0 For i=1 To g1 j=j+1 Scrivi DataEstrazione (ee(i))&" ",0,0 Scrivi SiglaRuota (ru(j))&"/",0,0 j=j+1 Scrivi SiglaRuota (ru(j))&" Pos. "&po(i)&"^" Next Scrivi Scrivi "----------------------------Giocata n°"&co,1 ImpostaGiocata 1,ab,rtt,poste,18,2 Gioca es End If End If Next Next ScriviResoconto End Sub
 

i legend

Premium Member
Grazie enplain per la risposta. vedo che il tuo script è diverso da quello di joe
Complimenti anche a te :)ciao:)
 

Enplein

Super Member >PLATINUM<
...per il tipo di ricerca le modifiche sono complicate, vi chiedo
gentilmente di accettare quello che ho realizzato.
Grazie , Enplein.
 

Enplein

Super Member >PLATINUM<
le istruzioni "nelle ultime 36 estrazioni senza mai legarsi in ambo"

siano state interpretate come "non meno di 180 Estrazioni senza ...".

Questo tipo di riduzione delle quantità di ambi del tutto legittimo (specie per un ritardista)

rende tuttavia molto diversa l'impostazione dello script
Ciao Joe, per precisare...lo script filtra la condizione che nel ciclo di 36 estrazioni,
non si sia verificata la sortita dell'ambo; quindi il ritardo di 180 estrazioni
o più, dimostra che tale valore rispetta la condizione.
Con stima, Enplein.
 

joe

Advanced Member >PLATINUM PLUS<
Grazie Enplein hai fatto bene a correggere.

Quando ho scritto non era ancora presente lo script in cui leggere,

la fondatezza delle tue ragioni, mentre per contro nell'immagine al post #28

erano presenti (forse casualmente) 3 grandi ritardi (180-182-183).

Dunque ho riferito erroneamente di una ipotesi di riduzione ... che non c'è.

Per il resto ho cercato di uniformare i risultati del tuo script con quelli ricavati

dal programma che ho inserito qui. Qualche messaggio fa.

Coincidono quasi perfettamente.

Non so se cercherò di capire il perché di queste piccole ed ininfluenti differenze.

:)
 

joe

Advanced Member >PLATINUM PLUS<
Buona Serata a tutte/i.

Modificando lo script che ho già proposto affinché

* NON consideri la Nazionale,

* ricerchi nelle 36 Estrazioni

* Le Coppie-Isotope che abbiano:

* una sola presenza nella posizione per ogni Estrazione

* abbiano totalizzato almeno 5 casi

* NON abbiano prodotto nessun Ambo a tutte (nel medesimo periodo),

le coppie-isotope trovate sono riassunte S.E.&O. in questa tabella:

Immagine.png

:) Vedremo se produrrà qualcosa di redditizio.
 
Ultima modifica:

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 23 giugno 2022
    Bari
    55
    88
    23
    22
    72
    Cagliari
    42
    26
    57
    62
    67
    Firenze
    05
    34
    23
    65
    66
    Genova
    67
    75
    19
    47
    40
    Milano
    79
    80
    69
    01
    03
    Napoli
    34
    40
    81
    47
    29
    Palermo
    74
    06
    13
    21
    01
    Roma
    37
    51
    67
    05
    75
    Torino
    69
    26
    85
    46
    60
    Venezia
    36
    07
    51
    50
    34
    Nazionale
    47
    12
    84
    13
    74
    Estrazione Simbolotto
    Napoli
    41
    02
    32
    13
    23
Alto