terno metodo camaleonte

Alberto Anderlini · 29 Novembre 2019

vengio ha scritto:
Ottimo Abitte, spero tu l'abbia giocata.

jordan ha scritto:
Per il 43 / 75 : somma 118-90= 28 distanza 32 61+61=122-90=32 32+dist. 32= 64 64:2=32 32-32= 0
ambo 32-0 Dove sbaglio ? grazie.

28.11.2019 BA 72.29.46.75.61 BA 61 in 5° Posizione(Ripetuto in estrazione consecutiva)
45 77 33 34 Posizione sinistra 43 e 75
26.11.2019 BA 88.26.64.43.61 BA 61 in 5° Posizione
28.11.2019 BA 72.29.46.75.61 BA 61 in 5° Posizione(Ripetuto in estrazione consecutiva)
69 53 33 34 Posizione destra 88 e 72
Estrazione generatrice del pronostico 09714 [143 - 28/11/2019]
G 0001 Numeri in gioco : 69.53 su BA TT per Ambo,Terno
In corso per altre 13 estrazioni
G 0002 Numeri in gioco : 69.53.33 su BA TT per Ambo,Terno
In corso per altre 13 estrazioni
G 0003 Numeri in gioco : 69.53.34

questa è la previsione ottenuta con programma di Vengio.
sicuramente il programma prende solo numeri a destra in questo pronostico ora chiedo a Vengio se può modificarlo e farlo per entraambi i laterali.

Alberto Anderlini · 29 Novembre 2019

26.11.2019 -- BA - 88.26.64.43.61
28.11.2019 -- BA - 72.29.46.75.61
Numeri ripetuti Isotopi in 2 estrazioni consecutive : 61 e 61 in 5° pos.
Laterali : 43 e 75 in 4° pos.
1° coppia di elementi di somma : 118 e di Distanza : 32
2° coppia di elementi di somma : 122 e di Distanza : 0

Ambo Secco : 77 - 45
1° terno : 77 - 45 - 33
2° terno : 77 - 45 - 34

vengio · 29 Novembre 2019

jordan ha scritto:
Per il 43 / 75 : somma 118-90= 28 distanza 32 / 61+61=122-90=32 / 32+dist. 32= 64 / 64:2=32 / 32-32= 0
ambo 32-0 Dove sbaglio ? grazie.

Somma: 61+61=122 distanza:75-43=32 122+32=154 154/2=77 122-77=45
Almeno io l'ho interpretato così.

vengio · 29 Novembre 2019

Comunque col fuori90 i numeri sarebbero 90 e 32, Sarebbe il caso che intervenga Alberto.

Alberto Anderlini · 29 Novembre 2019

vengio ha scritto:
Comunque col fuori90 i numeri sarebbero 90 e 32, Sarebbe il caso che intervenga Alberto.

esatto 90 o 32

baby83 · 30 Novembre 2019

Alberto Anderlini ha scritto:
28.11.2019 BA 72.29.46.75.61 BA 61 in 5° Posizione(Ripetuto in estrazione consecutiva)
45 77 33 34 Posizione sinistra 43 e 75
26.11.2019 BA 88.26.64.43.61 BA 61 in 5° Posizione
28.11.2019 BA 72.29.46.75.61 BA 61 in 5° Posizione(Ripetuto in estrazione consecutiva)
69 53 33 34 Posizione destra 88 e 72
Estrazione generatrice del pronostico 09714 [143 - 28/11/2019]
G 0001 Numeri in gioco : 69.53 su BA TT per Ambo,Terno
In corso per altre 13 estrazioni
G 0002 Numeri in gioco : 69.53.33 su BA TT per Ambo,Terno
In corso per altre 13 estrazioni
G 0003 Numeri in gioco : 69.53.34

questa è la previsione ottenuta con programma di Vengio.
sicuramente il programma prende solo numeri a destra in questo pronostico ora chiedo a Vengio se può modificarlo e farlo per entraambi i laterali.

Buongiorno Alberto..scusa..quindi i numeri sono questi da giocare su Bari?Grazie

layon · 30 Novembre 2019

Ciao Ragazzi io penso che le previsioni siano queste 69.53 con 33/34 altra 77.45con 33/34 si potrebbe pensare di fare una riunita. almeno i conteggi mi danno questi buona giornata

jordan · 30 Novembre 2019

I calcoli per l'ambo non si fanno con il fuori 90 altrimenti i numeri cambiano. Mi sembra che Aldini faccia così .

vengio · 30 Novembre 2019

Mi sono accorto che lo script aveva problemi sulla doppia verifica nella medesima estrazione. si allega di seguito con correzione.

Codice:

Sub Main()
   Dim n(5)
   Dim x(5)
   Dim y(5)
   Dim nn(5)
   Dim xx(5)
   Dim yy(5)
   Dim Ruotedigioco(12)
   Dim Poste(4)
   'Poste(1) = 3
   Poste(2) = 2
   Poste(3) = 1
   clp = 13
   Scrivi String(22," ") & " NUMERO RIPETUTO ISOTOPO IN 2 ESTRAZIONI CONSECUTIVE SULLA STESSA RUOTA"
   esaritroso = InputBox("Inserisci le estrazioni di controllo","",20)
   fin = EstrazioneFin
   ini = EstrazioneFin - esaritroso
   For es = ini To fin
      AvanzamentoElab ini,fin,es
      Messaggio(es)
      For r = 1 To 12
         If r = 11 Then r = 12
         For p = 1 To 5
            w = p - 1
            ww = p + 1
            If w = 0 Then w = 5
            If ww = 6 Then ww = 1
            a = Estratto(es - 1,r,p)
            b = Estratto(es,r,p)
            c = Estratto(es - 1,r,ww)
            d = Estratto(es,r,ww)
            e = Estratto(es - 1,r,w)
            f = Estratto(es,r,w)
            If a = b Then
               h = Differenza(c,d)
               i = a + b
               g = i + h
               k = Fuori90(g/2)
               j = Fuori90(Differenza(i,k))
               qq = Fuori90(k + j)
               ss = Fuori90(qq + 1)
               vv = Fuori90(qq + 2)
               If pari(c) = True And pari(d) = True Or dispari(c) = True And dispari(d) = True Then
                  xx(1) = j
                  xx(2) = k
                  xx(3) = ss
                  nn(1) = j
                  nn(2) = k
                  yy(1) = j
                  yy(2) = k
                  yy(4) = vv
                  Ruotedigioco(1) = r
                  Scrivi String(110,"*"),1
                  Scrivi DataEstrazione(es - 1) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es - 1,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(a) & " in " & p & "° Posizione ",1
                  ColoreTesto 1:Scrivi DataEstrazione(es) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(b) & " in " & p & "° Posizione(Ripetuto in estrazione consecutiva)",1
                  Scrivi Format2(j) & " " & Format2(k) & " " & Format2(ss) & " " & Format2(vv) & " Posizione destra  " & c & " e " & d,1
                  Scrivi String(110,"*"),1
                  ImpostaGiocata 4,nn,Ruotedigioco,Poste,clp
                  ImpostaGiocata 5,xx,Ruotedigioco,Poste,clp
                  ImpostaGiocata 6,yy,Ruotedigioco,Poste,clp
                  Gioca es,1
                  'Scrivi String(110,"*"),1
                  ' _______________________________________________________________
                  l = Differenza(e,f)
                  m = i + l
                  u = Fuori90(m/2)
                  o = Fuori90(Differenza(i,u))
                  q = Fuori90(U + o)
                  s = Fuori90(q + 1)
                  v = Fuori90(q + 2)
                  If pari(e) And pari(f) = True Or dispari(e) And dispari(f) = True Then
                     x(1) = u
                     x(2) = o
                     x(3) = s
                     n(1) = u
                     n(2) = o
                     y(1) = u
                     y(2) = o
                     y(4) = v
                     'Scrivi String(110,"*"),1
                     Scrivi DataEstrazione(es - 1) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es - 1,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(a) & " in " & p & "° Posizione ",1
                     ColoreTesto 1:Scrivi DataEstrazione(es) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(b) & " in " & p & "° Posizione(Ripetuto in estrazione consecutiva)",1
                     Scrivi Format2(u) & " " & Format2(o) & " " & Format2(s) & " " & Format2(v) & " Posizione sinistra  " & e & " e " & f,1
                     'Scrivi
                     Scrivi String(110,"*"),1
                     Ruotedigioco(1) = r
                     ImpostaGiocata 1,n,Ruotedigioco,Poste,clp
                     ImpostaGiocata 2,x,Ruotedigioco,Poste,clp
                     ImpostaGiocata 3,y,Ruotedigioco,Poste,clp
                     Gioca es,1
                  End If
               End If
            End If
         Next
      Next
      If ScriptInterrotto Then Exit For
   Next
   ScriviResoconto
End Sub

Alberto Anderlini · 30 Novembre 2019

vengio ha scritto:

Mi sono accorto che lo script aveva problemi sulla doppia verifica nella medesima estrazione. si allega di seguito con correzione.

Codice:

Sub Main()
   Dim n(5)
   Dim x(5)
   Dim y(5)
   Dim nn(5)
   Dim xx(5)
   Dim yy(5)
   Dim Ruotedigioco(12)
   Dim Poste(4)
   'Poste(1) = 3
   Poste(2) = 2
   Poste(3) = 1
   clp = 13
   Scrivi String(22," ") & " NUMERO RIPETUTO ISOTOPO IN 2 ESTRAZIONI CONSECUTIVE SULLA STESSA RUOTA"
   esaritroso = InputBox("Inserisci le estrazioni di controllo","",20)
   fin = EstrazioneFin
   ini = EstrazioneFin - esaritroso
   For es = ini To fin
      AvanzamentoElab ini,fin,es
      Messaggio(es)
      For r = 1 To 12
         If r = 11 Then r = 12
         For p = 1 To 5
            w = p - 1
            ww = p + 1
            If w = 0 Then w = 5
            If ww = 6 Then ww = 1
            a = Estratto(es - 1,r,p)
            b = Estratto(es,r,p)
            c = Estratto(es - 1,r,ww)
            d = Estratto(es,r,ww)
            e = Estratto(es - 1,r,w)
            f = Estratto(es,r,w)
            If a = b Then
               h = Differenza(c,d)
               i = a + b
               g = i + h
               k = Fuori90(g/2)
               j = Fuori90(Differenza(i,k))
               qq = Fuori90(k + j)
               ss = Fuori90(qq + 1)
               vv = Fuori90(qq + 2)
               If pari(c) = True And pari(d) = True Or dispari(c) = True And dispari(d) = True Then
                  xx(1) = j
                  xx(2) = k
                  xx(3) = ss
                  nn(1) = j
                  nn(2) = k
                  yy(1) = j
                  yy(2) = k
                  yy(4) = vv
                  Ruotedigioco(1) = r
                  Scrivi String(110,"*"),1
                  Scrivi DataEstrazione(es - 1) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es - 1,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(a) & " in " & p & "° Posizione ",1
                  ColoreTesto 1:Scrivi DataEstrazione(es) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(b) & " in " & p & "° Posizione(Ripetuto in estrazione consecutiva)",1
                  Scrivi Format2(j) & " " & Format2(k) & " " & Format2(ss) & " " & Format2(vv) & " Posizione destra  " & c & " e " & d,1
                  Scrivi String(110,"*"),1
                  ImpostaGiocata 4,nn,Ruotedigioco,Poste,clp
                  ImpostaGiocata 5,xx,Ruotedigioco,Poste,clp
                  ImpostaGiocata 6,yy,Ruotedigioco,Poste,clp
                  Gioca es,1
                  'Scrivi String(110,"*"),1
                  ' _______________________________________________________________
                  l = Differenza(e,f)
                  m = i + l
                  u = Fuori90(m/2)
                  o = Fuori90(Differenza(i,u))
                  q = Fuori90(U + o)
                  s = Fuori90(q + 1)
                  v = Fuori90(q + 2)
                  If pari(e) And pari(f) = True Or dispari(e) And dispari(f) = True Then
                     x(1) = u
                     x(2) = o
                     x(3) = s
                     n(1) = u
                     n(2) = o
                     y(1) = u
                     y(2) = o
                     y(4) = v
                     'Scrivi String(110,"*"),1
                     Scrivi DataEstrazione(es - 1) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es - 1,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(a) & " in " & p & "° Posizione ",1
                     ColoreTesto 1:Scrivi DataEstrazione(es) & "   " & SiglaRuota(r) & "  " & StringaEstratti(es,(r)) & "      " & Left(SiglaRuota(r),3) & " " & Format2(b) & " in " & p & "° Posizione(Ripetuto in estrazione consecutiva)",1
                     Scrivi Format2(u) & " " & Format2(o) & " " & Format2(s) & " " & Format2(v) & " Posizione sinistra  " & e & " e " & f,1
                     'Scrivi
                     Scrivi String(110,"*"),1
                     Ruotedigioco(1) = r
                     ImpostaGiocata 1,n,Ruotedigioco,Poste,clp
                     ImpostaGiocata 2,x,Ruotedigioco,Poste,clp
                     ImpostaGiocata 3,y,Ruotedigioco,Poste,clp
                     Gioca es,1
                  End If
               End If
            End If
         Next
      Next
      If ScriptInterrotto Then Exit For
   Next
   ScriviResoconto
End Sub

però c'è anche una previsione sempre con i 61 ma con numeri sulla sinistra.

vengio · 30 Novembre 2019

Alberto Anderlini ha scritto:
però c'è anche una previsione sempre con i 61 ma con numeri sulla sinistra.

Fammi capire, un'altro problema?

Alberto Anderlini · 1 Dicembre 2019

vengio ha scritto:
Fammi capire, un'altro problema?

se vedi l'estrazione di calcolo c'è, oltre alla previsione fatta dal programma il 61 sulla sinistra ha due numeri dispari quindi altra previsione. si possono usare sia i numeri di sinisra che di destra purche entrambi pari o dispari.
26.11.2019 -- BA - 88.26.64.43.61
28.11.2019 -- BA - 72.29.46.75.61

vengio · 1 Dicembre 2019

Ma l'errore quale è?

lupin81 · 1 Dicembre 2019

Ciao Alberto,cortesemente potresti dire quali sono i 2 pronostici scaturiti,giusto x chiarezza.
Ti ringrazio

rossonero8 · 1 Dicembre 2019

salve a tutti, complimenti per la previsione 8-24-23-14 prendendo 2 ambi con 8-24 ma volendo uno script che dia dei risultati corrispondenti al metodo non li trovo secondo i calcoli del metodo sopra descritto, cioè:
70-88--->70+88=ABBIAMO UNA SOMMA 68 CON DISTANZA 18////61+61=122-90=32 SI PRENDE LA SOMMA DEL N°
RIPETUTO CHE E' 32 E SI ADDIZIONA ALLA DISTANZA 18 CIOE' 32+18=50/////50/2=25 ABBIAMO 32-25=7 QUINDI AMBO 25-7; 25+7=32 CON +1+2 ABBIAMO 33-34 PREVISIONE AMBO 25-7 //TERNI 25-7-33/25-7-34 DAL LISTATO NON E' COSI'
O SBAGLIO?

alex645 · 1 Dicembre 2019

Buongiorno, secondo me prendendo i laterali 88 72 i calcoli fatti sono errati

layon · 1 Dicembre 2019

Ciao ragazzi le previsioni sono 69/53con 33/34 e 77/45 con 33/34 buona serata

jordan · 1 Dicembre 2019

non so con gli script,non li uso ma con carta e penna a me risulta così: 88+72=160 somma 16 distanza, 61+61=122 somma 0 distanza, 122+16= 138, 138:2=69, 122-69=53 ambo 69-53

alex645 · 1 Dicembre 2019

Scusate l'ignoranza ma non si fa il -90 alla somma?

Alberto Anderlini · 2 Dicembre 2019

vengio ha scritto:
Ma l'errore quale è?

-manca l a previsione - 43-61
75-61

terno metodo camaleonte

Super member

Super member

Super Member >GOLD<

Super Member >GOLD<

Super member

Premium Member

Junior Member

Junior Member

Super Member >GOLD<

Super member

Super Member >GOLD<

Super member

Super Member >GOLD<

Member

Member

Banned

Junior Member

Junior Member

Banned

Super member