Novità

come si scrive la radice quadrata in SpazioLight

buon giovedi
grazie per i suggerimenti ho provato lo script modificato da Xeroxs ma da la radice quadrata
con tanti numeri dopo la virgola e non va bene cosi
ho provato con l'esempio di Mike e da errore lo script
ho dichiarato la Dim a(5) As Decimal ma lo script dice As Double ma che caspita si deve scrivere

Codice: 
Class Script
    Sub Main
        'Dim Nu(9),a(5),Na(10),aN(5),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim Nu(9),Na(10),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim x , y , b, c ,d, e , k, s , r , es ,Ruota As Integer
        Dim ini As Integer = EstrazioniArchivio
        Dim fin As Integer = EstrazioniArchivio
        Dim T()  As String
        Dim aN(5) As Integer
        Dim a(5) As Decimal  
        T = {" Ruota "," EE1 "," EE2 "," EE3 "," EE4 "," EE5 " ," Ruota "," Sqr1"," Sqr2"," Sqr3"," Sqr4"," Sqr5 "," Ruota ","  Data "}
        Call InitTabella(T,RGB(0,0,255),,,RGB(200,155,255),,"Dubai Light")
        For es = ini To fin
            For Ruota = 1 To 11
                aN(1) = Estratto(es,Ruota,1)
                aN(2) = Estratto(es,Ruota,2)
                aN(3) = Estratto(es,Ruota,3)
                aN(4) = Estratto(es,Ruota,4)
                aN(5) = Estratto(es,Ruota,5)
                a(1) = (math.Round( math.sqrt(aN(1),2)))   ' <-----------------------
                a(2) = Math.Sqrt(aN(2))
                a(3) = Math.Sqrt(aN(3))
                a(4) = Math.Sqrt(aN(4))
                a(5) = Math.Sqrt(aN(5))
                Rt(1) = (a(1))
                Rt(2) = (a(2))
                Rt(3) = (a(3))
                Rt(4) = (a(4))
                Rt(5) = (a(5))
                'T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),Rt(1),Rt(2),Rt(3),Rt(4),Rt(5),NomeRuota(Ruota ),DataEstrazione(es)}
                T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),a(1),a(2),a(3),a(4),a(5),NomeRuota(Ruota ),DataEstrazione(es)}
                Call AddRigaTabella(T,RGB(59,159,182),,,RGB(0,0,255),,"Dubai Light ")
                'For x = 1 To 9
                y=0
                If aN(1) And x =  Rt(1) Then Call SetColoreCellaRighe (1,RGB(255,204,0),RGB(0,0,255) )
                If aN(2) And x =  Rt(2) Then Call SetColoreCellaRighe (2,RGB(255,204,0),RGB(0,0,255) )
                If aN(3) And x =  Rt(3) Then Call SetColoreCellaRighe (3,RGB(255,204,0),RGB(0,0,255) )
                If aN(4) And x =  Rt(4) Then Call SetColoreCellaRighe (4,RGB(255,204,0),RGB(0,0,255) )
                If aN(5) And x =  Rt(5) Then Call SetColoreCellaRighe (5,RGB(255,204,0),RGB(0,0,255) )
                If Rt(1) = x Then Call SetColoreCellaRighe (7,RGB(253,233,16),RGB(0,0,255))
                If Rt(2) = x Then Call SetColoreCellaRighe (8,RGB(253,233,16),RGB(0,0,255))
                If Rt(3) = x Then Call SetColoreCellaRighe (9,RGB(253,233,16),RGB(0,0,255))
                If Rt(4) = x Then Call SetColoreCellaRighe (10,RGB(253,233,16),RGB(0,0,255))
                If Rt(5) = x Then Call SetColoreCellaRighe (11,RGB(253,233,16),RGB(0,0,255))
                If Rt(1) = y Then Call SetColoreCellaRighe (7,ColoreRosa,ColoreNero)
                If Rt(2) = y Then Call SetColoreCellaRighe (8,ColoreRosa,ColoreNero)
                If Rt(3) = y Then Call SetColoreCellaRighe (9,ColoreRosa,ColoreNero)
                If Rt(4) = y Then Call SetColoreCellaRighe (10,ColoreRosa,ColoreNero)
                If Rt(5) = y Then Call SetColoreCellaRighe (11,ColoreRosa,ColoreNero)
                If aN(1) And y =  Rt(1) Then Call SetColoreCellaRighe (1,ColoreRosa,ColoreNero)
                If aN(2) And y =  Rt(2) Then Call SetColoreCellaRighe (2,ColoreRosa,ColoreNero)
                If aN(3) And y =  Rt(3) Then Call SetColoreCellaRighe (3,ColoreRosa,ColoreNero)
                If aN(4) And y =  Rt(4) Then Call SetColoreCellaRighe (4,ColoreRosa,ColoreNero)
                If aN(5) And y =  Rt(5) Then Call SetColoreCellaRighe (5,ColoreRosa,ColoreNero)
                Call SetColoreCellaRighe(0,RGB(0,0,255),RGB(200,155,255))
                Call SetColoreCellaRighe(6,RGB(0,0,255),RGB(200,155,255))
                Call SetColoreCellaRighe(12,RGB(0,0,255),RGB(200,155,255))
                Call SetColoreCellaRighe(13,RGB(0,0,255),RGB(200,155,255))
                'Next
            Next
        Next
        CreaTabella
    End Sub
End Class
 
a(1) = (math.sqrt(aN(1)))
a(2) = (math.sqrt(aN(2)))
a(3) = (math.sqrt(aN(3)))
a(4) = (math.sqrt(aN(4)))
a(5) = (math.sqrt(aN(5)))

e qui che si deve fare una modifica magari aggiungere Left come per Spaziometria
ho provato in questo modo ma da errore lo script o puo darsi che non lo scritto bene
 
wow ci sono riuscito adesso lo script non da errore e legge anche i decimali dopo la virgola

Codice: 
Class Script
    Sub Main
        'Dim Nu(9),a(5),Na(10),aN(5),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim Nu(9),Na(10),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim x , y , b, c ,d, e , k, s , r , es ,Ruota As Integer
        Dim ini As Integer = EstrazioniArchivio
        Dim fin As Integer = EstrazioniArchivio
        Dim T()  As String
        Dim aN(5) As Integer
        Dim a(5) As  Decimal
        T = {" Ruota "," EE1 "," EE2 "," EE3 "," EE4 "," EE5 " ," Ruota "," Sqr1"," Sqr2"," Sqr3"," Sqr4"," Sqr5 "," Ruota ","  Data "}
        Call InitTabella(T,RGB(0,0,255),,,RGB(200,155,255),,"Dubai Light")
        For es = ini To fin
            For Ruota = 1 To 11
                aN(1) = Estratto(es,Ruota,1)
                aN(2) = Estratto(es,Ruota,2)
                aN(3) = Estratto(es,Ruota,3)
                aN(4) = Estratto(es,Ruota,4)
                aN(5) = Estratto(es,Ruota,5)
                a(1) = Left(math.sqrt(aN(1)),4)
                a(2) = Left(math.sqrt(aN(2)),4)
                a(3) = Left(math.sqrt(aN(3)),4)
                a(4) = Left(math.sqrt(aN(4)),4)
                a(5) = Left(math.sqrt(aN(5)),4)
                Rt(1) = (a(1))
                Rt(2) = (a(2))
                Rt(3) = (a(3))
                Rt(4) = (a(4))
                Rt(5) = (a(5))
                'T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),Rt(1),Rt(2),Rt(3),Rt(4),Rt(5),NomeRuota(Ruota ),DataEstrazione(es)}
                T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),a(1),a(2),a(3),a(4),a(5),NomeRuota(Ruota ),DataEstrazione(es)}
                Call AddRigaTabella(T,RGB(59,159,182),,,RGB(0,0,255),,"Dubai Light ")
                'For x = 1 To 9
                y=0
                If aN(1) And x =  Rt(1) Then Call SetColoreCellaRighe (1,RGB(255,204,0),RGB(0,0,255) )
                If aN(2) And x =  Rt(2) Then Call SetColoreCellaRighe (2,RGB(255,204,0),RGB(0,0,255) )
                If aN(3) And x =  Rt(3) Then Call SetColoreCellaRighe (3,RGB(255,204,0),RGB(0,0,255) )
                If aN(4) And x =  Rt(4) Then Call SetColoreCellaRighe (4,RGB(255,204,0),RGB(0,0,255) )
                If aN(5) And x =  Rt(5) Then Call SetColoreCellaRighe (5,RGB(255,204,0),RGB(0,0,255) )
                If Rt(1) = x Then Call SetColoreCellaRighe (7,RGB(253,233,16),RGB(0,0,255))
                If Rt(2) = x Then Call SetColoreCellaRighe (8,RGB(253,233,16),RGB(0,0,255))
                If Rt(3) = x Then Call SetColoreCellaRighe (9,RGB(253,233,16),RGB(0,0,255))
                If Rt(4) = x Then Call SetColoreCellaRighe (10,RGB(253,233,16),RGB(0,0,255))
                If Rt(5) = x Then Call SetColoreCellaRighe (11,RGB(253,233,16),RGB(0,0,255))
                If Rt(1) = y Then Call SetColoreCellaRighe (7,ColoreRosa,ColoreNero)
                If Rt(2) = y Then Call SetColoreCellaRighe (8,ColoreRosa,ColoreNero)
                If Rt(3) = y Then Call SetColoreCellaRighe (9,ColoreRosa,ColoreNero)
                If Rt(4) = y Then Call SetColoreCellaRighe (10,ColoreRosa,ColoreNero)
                If Rt(5) = y Then Call SetColoreCellaRighe (11,ColoreRosa,ColoreNero)
                If aN(1) And y =  Rt(1) Then Call SetColoreCellaRighe (1,ColoreRosa,ColoreNero)
                If aN(2) And y =  Rt(2) Then Call SetColoreCellaRighe (2,ColoreRosa,ColoreNero)
                If aN(3) And y =  Rt(3) Then Call SetColoreCellaRighe (3,ColoreRosa,ColoreNero)
                If aN(4) And y =  Rt(4) Then Call SetColoreCellaRighe (4,ColoreRosa,ColoreNero)
                If aN(5) And y =  Rt(5) Then Call SetColoreCellaRighe (5,ColoreRosa,ColoreNero)
                Call SetColoreCellaRighe(0,RGB(0,0,255),RGB(200,155,255))
                Call SetColoreCellaRighe(6,RGB(0,0,255),RGB(200,155,255))
                Call SetColoreCellaRighe(12,RGB(0,0,255),RGB(200,155,255))
                Call SetColoreCellaRighe(13,RGB(0,0,255),RGB(200,155,255))
                'Next
            Next
        Next
        CreaTabella
    End Sub
End Class
 
evidenzia la radice quadrata di un numero estratto

Codice: 
Class Script
    Sub Main
        'Dim Nu(9),a(5),Na(10),aN(5),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim Nu(9),Na(10),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim x , y , b, c ,d, e , k, s , r , es ,Ruota As Integer
        Dim ini As Integer = EstrazioniArchivio - 8
        Dim fin As Integer = EstrazioniArchivio
        Dim T()  As String
        For es = fin To ini Step - 1
            Dim aN(5) As Integer
            Dim a(5) As  Decimal
            T = {" Ruota "," EE1 "," EE2 "," EE3 "," EE4 "," EE5 " ," Ruota "," Sqr1"," Sqr2"," Sqr3"," Sqr4"," Sqr5 "," Ruota ","  Data "}
            Call InitTabella(T,RGB(0,0,255),,,RGB(200,155,255),,"Dubai Light")
            For Ruota = 1 To 11
                aN(1) = Estratto(es,Ruota,1)
                aN(2) = Estratto(es,Ruota,2)
                aN(3) = Estratto(es,Ruota,3)
                aN(4) = Estratto(es,Ruota,4)
                aN(5) = Estratto(es,Ruota,5)
                a(1) = Left(math.sqrt(aN(1)),4)
                a(2) = Left(math.sqrt(aN(2)),4)
                a(3) = Left(math.sqrt(aN(3)),4)
                a(4) = Left(math.sqrt(aN(4)),4)
                a(5) = Left(math.sqrt(aN(5)),4)
                Rt(1) = (a(1))
                Rt(2) = (a(2))
                Rt(3) = (a(3))
                Rt(4) = (a(4))
                Rt(5) = (a(5))
                'T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),Rt(1),Rt(2),Rt(3),Rt(4),Rt(5),NomeRuota(Ruota ),DataEstrazione(es)}
                T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),a(1),a(2),a(3),a(4),a(5),NomeRuota(Ruota ),DataEstrazione(es)}
                Call AddRigaTabella(T,RGB(59,159,182),,,RGB(0,0,255),,"Dubai Light ")
                For x = 1 To 9
                    y = 64    ' -> evidenzia numero in tabella
                    If aN(1) And x =  a(1) Then Call SetColoreCellaRighe (1,RGB(255,204,0),RGB(0,0,255) )
                    If aN(2) And x =  a(2) Then Call SetColoreCellaRighe (2,RGB(255,204,0),RGB(0,0,255) )
                    If aN(3) And x =  a(3) Then Call SetColoreCellaRighe (3,RGB(255,204,0),RGB(0,0,255) )
                    If aN(4) And x =  a(4) Then Call SetColoreCellaRighe (4,RGB(255,204,0),RGB(0,0,255) )
                    If aN(5) And x =  a(5) Then Call SetColoreCellaRighe (5,RGB(255,204,0),RGB(0,0,255) )
                    If a(1) = x Then Call SetColoreCellaRighe (7,RGB(253,233,16),RGB(0,0,255))
                    If a(2) = x Then Call SetColoreCellaRighe (8,RGB(253,233,16),RGB(0,0,255))
                    If a(3) = x Then Call SetColoreCellaRighe (9,RGB(253,233,16),RGB(0,0,255))
                    If a(4) = x Then Call SetColoreCellaRighe (10,RGB(253,233,16),RGB(0,0,255))
                    If a(5) = x Then Call SetColoreCellaRighe (11,RGB(253,233,16),RGB(0,0,255))
                    If aN(1) = y Then Call SetColoreCellaRighe (1,RGB(222,49,99),RGB(255,204,0))
                    If aN(2) = y Then Call SetColoreCellaRighe (2,RGB(222,49,99),RGB(255,204,0))
                    If aN(3) = y Then Call SetColoreCellaRighe (3,RGB(222,49,99),RGB(255,204,0))
                    If aN(4) = y Then Call SetColoreCellaRighe (4,RGB(222,49,99),RGB(255,204,0))
                    If aN(5) = y Then Call SetColoreCellaRighe (5,RGB(222,49,99),RGB(255,204,0))
                    Call SetColoreCellaRighe(0,RGB(0,0,255),RGB(200,155,255))
                    Call SetColoreCellaRighe(6,RGB(0,0,255),RGB(200,155,255))
                    Call SetColoreCellaRighe(12,RGB(0,0,255),RGB(200,155,255))
                    Call SetColoreCellaRighe(13,RGB(0,0,255),RGB(200,155,255))
                Next
            Next
            CreaTabella
        Next
    End Sub
End Class
 
Zetrix è vero ci sei riuscito, ma il codice che hai usato va anche compreso con left prendi le 4 cifre da sinistra. otterrai il risultato ma prendi sempre 4 cifre 9,999 oppure 99,99
invece il giusto modo è questo e funziona anche con il numero vettore ()
al tuo script in errore gli manca una parentesi
a(1) = ( math.Round( math.sqrt(aN(1)) ,2) ) ' corretto
'a(1) = math.Round( math.sqrt(aN(1),2)) ' tuo errore
Poi permettimi di dire che altri errori sono di concetto, non puoi e non è efficace mettere il Math.Round in fase di definizione variabile ma va messo solo in fase scrittura.
Comunque capisco che è senza aiuti non sempre è facile e purtroppo siamo troppo pochi e anche con i nostri limiti.


Codice: 
Class Script
    Sub Main
        Dim a,b,c  As Decimal
        Dim ab(3) As Decimal
        a = 88
        b = 888
        c = 88888
        ab(1) = 88
        ab(2) = 888
        ab(3) = 88888
        Scrivi (math.Round( math.sqrt(a) ,2) )
        Scrivi (math.Round( math.sqrt(b) ,2) )
        Scrivi (math.Round( math.sqrt(c) ,2) )
        Scrivi
        Scrivi (math.Round( math.sqrt(ab(1)) ,2),1 )
        Scrivi (math.Round( math.sqrt(ab(2)) ,2),1 )
        Scrivi (math.Round( math.sqrt(ab(3)) ,2),1 )
    End Sub
End Class

9,38
29,8
298,14

9,38
29,8
298,14
 
Ultima modifica:
Ciao Mike, grazie a tutti per la collaborazione e aver contribuito alla realizzazione
per scrivere la radice quadrata,sulla radice quadrata di un numero estratto si
possono sfruttare le moltiplicazioni adesso vi farò vedere un esempio di come lavorano le
moltiplicazioni sui numeri estratti

Codice: 
Class Script
    Sub Main
        'Dim Nu(9),a(5),Na(10),aN(5),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim Nu(9),Na(10),Ru(1),Rt(5),Num1,Num2,Num3,Num4,Num5,Num6,Num7,Num8,Num9,Num10 As Integer
        Dim x , y , b, c ,d, e , k, s , r ,z , j,es ,Ruota As Integer
        Dim ini As Integer = EstrazioniArchivio - 8
        Dim fin As Integer = EstrazioniArchivio
        Dim T()  As String
        For es = fin To ini Step - 1
            Dim aN(5) As Integer
            Dim a(5) As  Decimal
            T = {" Ruota "," EE1 "," EE2 "," EE3 "," EE4 "," EE5 " ," Ruota "," Sqr1"," Sqr2"," Sqr3"," Sqr4"," Sqr5 "," Ruota ","  Data "}
            Call InitTabella(T,RGB(0,0,255),,,RGB(200,155,255),,"Dubai Light")
            For Ruota = 1 To 11
                aN(1) = Estratto(es,Ruota,1)
                aN(2) = Estratto(es,Ruota,2)
                aN(3) = Estratto(es,Ruota,3)
                aN(4) = Estratto(es,Ruota,4)
                aN(5) = Estratto(es,Ruota,5)
                a(1) = Left(math.sqrt(aN(1)),4)
                a(2) = Left(math.sqrt(aN(2)),4)
                a(3) = Left(math.sqrt(aN(3)),4)
                a(4) = Left(math.sqrt(aN(4)),4)
                a(5) = Left(math.sqrt(aN(5)),4)
                Rt(1) = (a(1))
                Rt(2) = (a(2))
                Rt(3) = (a(3))
                Rt(4) = (a(4))
                Rt(5) = (a(5))
                'T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),Rt(1),Rt(2),Rt(3),Rt(4),Rt(5),NomeRuota(Ruota ),DataEstrazione(es)}
                T = {NomeRuota(Ruota),aN(1),aN(2),aN(3),aN(4),aN(5),NomeRuota(Ruota),a(1),a(2),a(3),a(4),a(5),NomeRuota(Ruota ),DataEstrazione(es)}
                Call AddRigaTabella(T,RGB(59,159,182),,,RGB(0,0,255),,"Dubai Light ")
                For x = 1 To 9
                    y = 64    ' -> evidenzia il numero della radice quadrata in tabella
                    z = 10   ' -> evidenzia 1 numero in tabella
                    j = 62  ' -> evidenzia 2 numero in tabella
                    If aN(1) And x =  a(1) Then Call SetColoreCellaRighe (1,RGB(255,204,0),RGB(0,0,255) ) ' -> color mandarino
                    If aN(2) And x =  a(2) Then Call SetColoreCellaRighe (2,RGB(255,204,0),RGB(0,0,255) )
                    If aN(3) And x =  a(3) Then Call SetColoreCellaRighe (3,RGB(255,204,0),RGB(0,0,255) )
                    If aN(4) And x =  a(4) Then Call SetColoreCellaRighe (4,RGB(255,204,0),RGB(0,0,255) )
                    If aN(5) And x =  a(5) Then Call SetColoreCellaRighe (5,RGB(255,204,0),RGB(0,0,255) )
                    If a(1) = x Then Call SetColoreCellaRighe (7,RGB(253,233,16),RGB(0,0,255))    ' -> color limone
                    If a(2) = x Then Call SetColoreCellaRighe (8,RGB(253,233,16),RGB(0,0,255))
                    If a(3) = x Then Call SetColoreCellaRighe (9,RGB(253,233,16),RGB(0,0,255))
                    If a(4) = x Then Call SetColoreCellaRighe (10,RGB(253,233,16),RGB(0,0,255))
                    If a(5) = x Then Call SetColoreCellaRighe (11,RGB(253,233,16),RGB(0,0,255))
                    If aN(1) = y Then Call SetColoreCellaRighe (1,RGB(222,49,99),RGB(255,204,0))  ' -> color cigliegia
                    If aN(2) = y Then Call SetColoreCellaRighe (2,RGB(222,49,99),RGB(255,204,0))
                    If aN(3) = y Then Call SetColoreCellaRighe (3,RGB(222,49,99),RGB(255,204,0))
                    If aN(4) = y Then Call SetColoreCellaRighe (4,RGB(222,49,99),RGB(255,204,0))
                    If aN(5) = y Then Call SetColoreCellaRighe (5,RGB(222,49,99),RGB(255,204,0))
                    If aN(1) = z Then Call SetColoreCellaRighe (1,RGB(0,214,153),RGB(0,0,255))  ' ->  color verde caraibi
                    If aN(2) = z Then Call SetColoreCellaRighe (2,RGB(0,214,153),RGB(0,0,255))
                    If aN(3) = z Then Call SetColoreCellaRighe (3,RGB(0,214,153),RGB(0,0,255))
                    If aN(4) = z Then Call SetColoreCellaRighe (4,RGB(0,214,153),RGB(0,0,255))
                    If aN(5) = z Then Call SetColoreCellaRighe (5,RGB(0,214,153),RGB(0,0,255))
                    If aN(1) = j Then Call SetColoreCellaRighe (1,RGB(0,214,153),RGB(0,0,255))
                    If aN(2) = j Then Call SetColoreCellaRighe (2,RGB(0,214,153),RGB(0,0,255))
                    If aN(3) = j Then Call SetColoreCellaRighe (3,RGB(0,214,153),RGB(0,0,255))
                    If aN(4) = j Then Call SetColoreCellaRighe (4,RGB(0,214,153),RGB(0,0,255))
                    If aN(5) = j Then Call SetColoreCellaRighe (5,RGB(0,214,153),RGB(0,0,255))
                    Call SetColoreCellaRighe(0,RGB(0,0,255),RGB(200,155,255))
                    Call SetColoreCellaRighe(6,RGB(0,0,255),RGB(200,155,255))
                    Call SetColoreCellaRighe(12,RGB(0,0,255),RGB(200,155,255))
                    Call SetColoreCellaRighe(13,RGB(0,0,255),RGB(200,155,255))
                Next
            Next
            CreaTabella
        Next
    End Sub
End Class
 
sulla estr 19/3/2022

FI _____06_________64
PA____10_________62

il nr 8 e la radice quadrata del 64 adesso elaboriamo la condizione del gioco
8x8=64 (radice quadrata)
8x7=56 (distanza)
8x9=72 (somma)
lavoriamo sulla somma
FI _____08_________64___=72
PA____10_________62___=72

8+64=72
10+62=72

ABB 6 DIAM 51

Previsione in gioco

FI-PA 8-51 E TT

oppure

ABB 6 DIAM.T. 41

Previsione in gioco

FI-PA 8-41 E TT
 

Allegati

  • 3047.PNG
    3047.PNG
    31 KB · Visite: 6
Ultima modifica:
Alien si scarica in questo link,
Ciao

www.mediafire.com

InstallazioneUtente_v_1_0_38

MediaFire is a simple to use free service that lets you put all your photos, documents, music, and video in a single place so you can access them anywhere and share them everywhere.
www.mediafire.com
 
Ciao Alien, ottimo programma ma Spaziometria e decisamente migliore non ci sono paragoni,
neanche stasera e uscito il nr 8 a Na, si vede che la lottomatica la bloccato sono 7 estr che non esce in nessuna ruota
adesso il nr 8 a chiuso l'8 ciclo con 144 estr
8 cicli x 18 estr = 144 estr
 
Questa sera ho giocato e per caso sono entrato nel discorso delle vincite il gestore mi ha risposto che è molto che la gente non vince....

E si infatti ho detto un "mini" spaziometria:unsure:😂
 
Alien ma te lo giochi l'8 a NA,il banco sta guadagnando tanti soldini con l'8 di NA E anche a TT,
molti giocano anche gli ambi a TT E il banco raccoglie tutto, puo darsi che l'8 lo mollano per sabato
ma non so se l'8 uscirà a NA..
 
Alien abbi fiducia purtroppo il banco ci a preso gusto con l'8
sono 11 estr che non esce in nessuna ruota e una situazione
abbastanza anomala..
 
Dovete aspettare il laterali dei centenerari, poi giocarli.
Altra tecnica è quella di attendere l'uscita e poi attaccarne la probabile ripetizione.
 
Alien ti scrivo l'ambo a tutte con l'8 la ruota di gioco te la scegli te
se vuoi provi a NA
59 8 a TT
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 26 luglio 2025
    Bari
    81
    09
    05
    54
    10
    Cagliari
    56
    07
    45
    69
    64
    Firenze
    39
    16
    56
    29
    09
    Genova
    67
    12
    55
    74
    04
    Milano
    40
    30
    44
    63
    27
    Napoli
    63
    07
    74
    86
    81
    Palermo
    80
    34
    16
    27
    53
    Roma
    08
    78
    43
    03
    52
    Torino
    38
    84
    47
    57
    20
    Venezia
    88
    70
    85
    65
    24
    Nazionale
    36
    09
    43
    55
    10
    Estrazione Simbolotto
    Nazionale
    25
    23
    13
    40
    35
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto