script per ambi integrali su tutte archivio L1

[genios]

L' Ambo Dinamico a Tutte 80.88 dell'archivio L1 ha dato il risultato a colpo

a Cagliari il 10/12/2022.

difatti come puoi vedere dalla foto





poco importano le uscite su MI nell' estrazioni successive nell' estrazione successiva il ritardo si azzera con l' uscita su CA dell' ambo 80 88 come puoi vedere dalla foto.




Difatti l ambo 80 88 non compare piu nei primi ritardatari. Come da foto

 

[joe]

E' ESATTO !

A Milano è uscito 2 volte in pochi colpi.

Proprio quando non è più in elenco ... perché dici ... che si era azzerato a Cagliari.

 

[genios]

Perché come pui vedere dalle foto in L1 il ritardo a tutte di 331 estrazioni dell ambo 80 88 con l uscita a CA si è azzerato il 09 12 2022 gli ambi successivi a questa data usciti su MI non c'entrano nulla.

 

[genios]

Esempio non veriterio
Ritardo Ambo su archivio reale
BA AMBO 10 30 RIT. 300 ESTRAZIONI
CA AMBO 10 30 RIT. 0 ESTRAZIONI
FI AMBO 10 30 RIT. 300 ESTRAZIONI
GE AMBO 10 30 RIT. 300 ESTRAZIONI
MI AMBO 10 30 RIT. 300 ESTRAZIONI
NA AMBO 10 30 RIT. 300 ESTRAZIONI
PA AMBO 10 30 RIT. 300 ESTRAZIONI
RO AMBO 10 30 RIT. 300 ESTRAZIONI
TO AMBO 10 30 RIT. 300 ESTRAZIONI
VE AMBO 10 30 RIT. 300 ESTRAZIONI

Quale è il ritardo dell' ambo 10 30 su tutte le ruote ?

 

[genios]

E' ESATTO !

A Milano è uscito 2 volte in pochi colpi.

Proprio quando non è più in elenco ... perché dici ... che si era azzerato a Cagliari.

Perché stiamo parlando di tutte le ruote .

 

[joe]

Questo Ritardo 331 sul quale insisti da dove arriva ?

Come lo hai calcolato ?

Perché come pui vedere dalle foto in L1 il ritardo a tutte di 331 estrazioni dell ambo 80 88 con l uscita a CA si è azzerato il 09 12 2022 gli ambi successivi a questa data usciti su MI non c'entrano nulla.

"tutte", cosa vuole dire, che significato ha?

Io ho questi dati/risultati e sto 331 non lo vedo :

10169-06.12.2022
BA 48.22 rit 210
CA 02.47 rit 602
FI 16.30 rit 933
GE 37.63 rit 572
MI 14.33 rit 252
NA 27.16 rit 391
PA 13.50 rit 585
RO 35.44 rit 641
TO 27.07 rit 260
VE 68.72 rit 1154
-----------------
10170-09.12.2022
BA 90.74 rit 211
CA 32.90 rit 0
FI 37.86 rit 934
GE 27.06 rit 573
MI 89.40 rit 253
NA 25.52 rit 392
PA 65.89 rit 586
RO 58.02 rit 642
TO 61.71 rit 261
VE 23.86 rit 1155
-----------------
10171-10.12.2022
BA 54.70 rit 212
CA 27.08 rit 1
FI 77.76 rit 935
GE 70.04 rit 574
MI 36.30 rit 254
NA 66.81 rit 393
PA 10.55 rit 587
RO 34.12 rit 643
TO 88.17 rit 262
VE 30.85 rit 1156
-----------------
10172-13.12.2022
BA 15.57 rit 213
CA 02.59 rit 2
FI 48.01 rit 936
GE 65.06 rit 575
MI 81.51 rit 0
NA 06.87 rit 394
PA 29.11 rit 588
RO 86.65 rit 644
TO 42.19 rit 263
VE 71.36 rit 1157
-----------------

Mi vuoi accecato, perso tra gli archivi, alla ricerca dell'introvabile ?

 

[i legend]

ciao a tutti
credo che eugenio faccia riferimento a questi dati

 

[i legend]

ciao eugenio
questi sono i dati che ho al momento ho , ma non so se siano esatti .
spero possano esserti utili

 

[i legend]

ecco alcuni massimali, ma non so se sono esatti

 

[genios]

Lo trovi in foto ritardo ambo a tutte le ruote nell' archivio L1 all' estrazione del 06/12/2022

 

[joe]

Ok. vi ringrazio.

E' un problema che si può presentare nella ricerca fatta con gli script.

Usando l'istruzione posizione, come dimostrato è possibile che si ottengano conteggi diversi.

Dunque al netto del classico +/- 1 sembra coincidere al meglio.

10.08.2019 VE 88.10.80.82.23 Rit 115
31.08.2019 CA 80.28.70.88.44 Rit 9
11.01.2020 PA 88.24.52.15.80 Rit 57
29.09.2020 TO 45.20.88.82.80 Rit 94
24.10.2020 FI 88.80.44.02.13 Rit 11
09.12.2022 CA 88.05.45.80.23 Rit 332
13.12.2022 MI 80.41.25.36.88 Rit 2
31.12.2022 MI 45.80.43.73.88 Rit 8
10.01.2023 Att = 4

Devo verificare il perché delle differenze tra i risultati dei 2 diversi script.

 

[genios]

Situazione dell' ambo 80 88 a tutte su L1 al 10 01 2023

Sembra che i dati coincidano.

 

[i legend]

Bene, felice che i dati proposti siano stati utili joe .
Ciao a tutti

 

[joe]

Si certo Ilegend ti tevo il mio grazie.

Come ho avuto modo di scrivere ad Eugenio, certe differenze si evidenziano solo con il confronto.

Dunque senza un confronto con altri dati ... non ci sono.

L' "errore" è dovuto alla concatenazione & di 2 operatori logici ... evidentemente mal scritti.

L'istruzione posizione è molto veloce e funziona anche senza un confronto con Zero o ">0"

Tuttavia se concatenata ad altro test ... "a volte" si esegue Correttamente.

IN ALTRE NO.

Dunque genera errori casuali che possono sfuggire anche ad un controllo piuttosto approfondito.

In sintesi DEVE essere spezzata come aveva suggerito Luigi altrimenti produce errori.

If Posizione(E,R,A,L) And Posizione(E,R,B,L) Then

DEVE essere scritta:

If Posizione(E,R,A,L) Then
If Posizione(E,R,B,L) Then
'...
End If
End If

Alcuni esempi di funzionamento difettoso:

07.05.2015 NA 44.88.65.22.80 Rit 1
23.06.2015 TO 41.88.65.11.80 Rit 20
24.11.2015 MI 40.80.15.63.88 Rit 66
30.06.2016 PA 88.17.80.18.26 Rit 94
30.06.2016 PA 88.17.80.18.26

^^^ Qui con And ha saltato Na To Mi

17.09.2016 BA 80.49.88.35.68 Rit 34
17.09.2016 BA 80.49.88.35.68

24.12.2016 NA 90.80.88.49.29 Rit 42
24.12.2016 NA 90.80.88.49.29

29.12.2016 PA 88.49.51.16.80 Rit 2
29.12.2016 PA 88.49.51.16.80

14.01.2017 BA 25.80.21.88.51 Rit 7
10.06.2017 GE 05.23.55.88.80 Rit 63
10.06.2017 GE 05.23.55.88.80

^^^ Qui, con And ha saltato Ba

08.07.2017 CA 60.80.28.88.90 Rit 12
02.01.2018 RO 12.54.80.88.01 Rit 76
19.05.2018 PA 03.80.88.01.79 Rit 59
19.05.2018 PA 03.80.88.01.79

15.11.2018 MI 88.74.20.03.80 Rit 77
15.11.2018 MI 88.74.20.03.80

10.08.2019 VE 88.10.80.82.23 Rit 115
10.08.2019 VE 88.10.80.82.23

31.08.2019 CA 80.28.70.88.44 Rit 9
11.01.2020 PA 88.24.52.15.80 Rit 57
11.01.2020 PA 88.24.52.15.80

^^^ Qui, con And ha saltato Ca

29.09.2020 TO 45.20.88.82.80 Rit 94
29.09.2020 TO 45.20.88.82.80

24.10.2020 FI 88.80.44.02.13 Rit 11
09.12.2022 CA 88.05.45.80.23 Rit 332
13.12.2022 MI 80.41.25.36.88 Rit 2
13.12.2022 MI 80.41.25.36.88

^^^ Qui, con And ha saltato Firenze e Cagliari.

 

[i legend]

Ciao joe grazie a te
Se ti tornano anche gli altri risultati dell immagine metto a nanna lo script.

Ciao a tutti.

 

[LuigiB]

ciao Joe la forma

If Posizione(E,R,A,L) And Posizione(E,R,B,L) Then

è come dire

If True and True then

in vbscript sono considerati true tutti i valori diversi da 0 .


dato che posizione mi sembra troni la posizione dell'estratto hai provato anche a scrivere

If Posizione(E,R,A,L) > 0 And Posizione(E,R,B,L) > 0 Then

ciao ... fammi sapere magari si risolve pure cosi.

 

[joe]

Ciao Luigi.

Si certo.

Restituisce 0,1,2,3,4,5.

Nella versione che hai proposto funziona.

Quello che è strano è che senza maggiore di zero sembra funzionare 'a caso' e alcune volte si altre no.

 

[LuigiB]

in vb script true è - 1 , è vero che tutti i valori diversi da 0 sono coniderati true pero siccome Posizione non torna True o False , bensi un numero intero >0 si deve testare appunto se il valore restituito è maggiore di 0 , non sottindendere il valore true.

 

[LuigiB]

la spiegazione comunque risiede nell'operazione di algebra booleana con l'operatore "AND"
Qui puoi vedere icasi dove non funziona.

un saluto anche a Legend

]
Option Explicit
Sub Main
  Dim a , b
 
  For a = 0 To 5
     For b =  0  To 5
    
       Call  Scrivi ( a & " and " & b & " = " & (a And b)  & " " & CBool( a And b ))
     Next
  Next
   
End Sub

 

[joe]

Ciao Luigi,

Ti ringrazio ed aggiungo che per un operatore logico ... è logico-strano.

In quest'ultima estrazione, effettivamente "spariscono" metà degli Ambi di Bari.

Option Explicit
Sub Main
   Dim Num,Ruota,Pos,K,Nu(5),A,B
   
   Ruota = BA_
   Scrivi NomeRuota( Ruota) & " "  & DataEstrazione (EstrazioneFin)
   

Scrivi 
   For Num = 1 To 90
      Pos = Posizione(EstrazioneFin,Ruota,Num)
      If Pos <> 0 Then
         K = K + 1
         Scrivi Num & " " & Pos & "°" : Nu(K) = Num
      End If
   Next
   

Scrivi  
   Scrivi StringaNumeri(Nu,,True)
   Scrivi 
   Scrivi "Ambi "
   Scrivi
   For A = 1 To 4
      For B = A + 1 To 5
         If Posizione(EstrazioneFin,Ruota,Nu(A)) And Posizione(EstrazioneFin,Ruota,Nu(B)) Then Scrivi Nu(A) & "." & Nu(B)
      Next
   Next
End Sub

Che produce :

Bari 10.01.2023

21 2°
36 1°
66 5°
72 4°
81 3°

21.36.66.72.81

Ambi

21.81
36.66
36.81
66.72
66.81