X TUTTI,L'AMBO di LONGO.ha ripreso a funzionare ?

[francesco78]

ce anke l'estrazione del 28-2-2013 cagliari -firenze [TABLE="class: tblsUltimeEstrazioni tb100"]
[TR]
[TD]Cagliari[/TD]
[TD="class: center"] 37[/TD]
[TD="class: center"] 90[/TD]
[TD="class: center"] 26[/TD]
[TD="class: center"] 57[/TD]
[TD="class: center"] 16[/TD]
[/TR]
[TR="class: grey"]
[TD]Firenze[/TD]
[TD="class: center"] 84[/TD]
[TD="class: center"] 90[/TD]
[TD="class: center"] 57[/TD]
[TD="class: center"] 56[/TD]
[TD="class: center"] 68 potete calcolarli?[/TD]
[/TR]
[/TABLE]

 

[Lo studente]

Ciao Francesco78,il risultato è sempre 57-90.però si può fare il +1.....-1;

CA 90 57
FI 90 57

90 + 90 =180 -90= 90
57 + 57 =114 -90 =24

90 - 24 = 66 66 : 2 = 33
90 - 33 =57
33 + 24 =57
90 + 57 = 147 147 - 90 = 57
57 + 33 = 90 >>>>>>>>>>> 90
57 + 90 = 147...147 - 90 = 57 Quindi , 90-57 ........con + 1... -1.........90 56 / 90 58 / mettiamo anche il 33.......90-33/ 57-33.

In bocca al lupo ciao

 

[STINIPALE]

X LO STUDENTE

l'ambo ripetuto 26 62 perfettamente isotopi tra ROMA e TORINO del 19.01.2013 dal calcolo che ho fatto vengono 84.15 - 84.69 - 69.15- mi controlli se è giusto?
Mi sembra che ancora non c'è uscita di ambo.....

 

[Lo studente]

Ciao STINIPALE, si il conteggio è giusto.é uscito il 15 (ambata principale) al 1° colpo a TO.Poi niente ambo.Però con una piccola modifica,è uscito l'ambo nella ruota di Roma al 7° colpo.Ti spiego:
26+ 62+
26= 62=
_____ _______
52 124
124 - 52 = 72 (senza fare il - 90)
72 :2 = 36
36+52 = 88
124 - 36 = 88

88 +26 = 114 - 90 = 24
88 +62 = 150 - 90 = 60
_______
24 +60 = 84 Ambi 60.84/ 60.24 / 24.84 / poi con il numero "Bilancia" 88. 60.88 e il dividendo 36 60.36-

al 7° colpo RO 60.88..........Giocando anche sulle diametrali (che io consiglio),in questo caso GE e FI. al 15° colpo GE 60.84-è un po lunghetto,ma ne vale la pena..ciao

 

[feli]

Dall'estrazione del 19/02/2013,FI / NAZ AMBO RIPETUTO PERFETTAMENTE ISOTOPO 27 . 36.
AL 1° colpo 9.90 ambo secco.

• 

consiglio di seguire i prossimi ambi isotopi.


ciao

lo studente

Grazie a Longo a Lo studente e grazie a chi potrebbe fare lo script del metodo originale

 

[Roby]

ciao ieri sera su Ge NAZ 89/40 non perfetti isotopi ma inversi

grazie a chi mette previsione

 

[Lo studente]

Ciao Amedeo,proviamo ,Ho 2 previsioni ,una del mitico Longo e una del meno mitico (che sarei io) modificato:
La 1°..... 27-79 / 27-38 / 38 79.......
------------------------------------------li ho scritti in ordine dal piu' forte al meno ......

La 2°..... 27-34 / 27-83 / 34-83 ..... vediamo cosa esce fuori ciao.

Chiaramente sulle ruote GE /NAZ.

 

[lorelai]

ciao..posso chiederti se la previsione sopra è ricavata dall'ambo 89-40 ge nz non perfetto?...grazie

 

[Roby]

Ciao Amedeo,proviamo ,Ho 2 previsioni ,una del mitico Longo e una del meno mitico (che sarei io) modificato:
La 1°..... 27-79 / 27-38 / 38 79.......
------------------------------------------li ho scritti in ordine dal piu' forte al meno ......

La 2°..... 27-34 / 27-83 / 34-83 ..... vediamo cosa esce fuori ciao.

Chiaramente sulle ruote GE /NAZ.

 

[Lo studente]

Ciao lorelai ,la previsione è ricavata proprio da quell'ambo.speriamo bene,perchè originariamente dovrebbero essere con i numeri uguali isotopi.......ciao

 

[Lo studente]

Ciao disaronno,io sono ancora a "carta e penna",sicuramente hai fatto un buon lavoro,ma non ci capisco nulla di script.Ciao e grazie

 

[membro cancellato]

lo script non funziona, non elabora nulla....da solo la schermata iniziale con zero gioco

 

[feli]

Salve Disaronno e grazie per l'impegno e per lo script
però dà terzine non ambi
x Margot devi cancellare +8477

 

[Roby]

lo script non funziona, non elabora nulla....da solo la schermata iniziale con zero gioco

Anche a me dà lo stesso problema..io ho questo script


Sub Main()
Dim am(1),ab(2),j(2),qu(5),ruota(2),ruote(1),posta(1),poste(2)
posta(1) = 1 : poste(2) = 1
Dim prog(5,100)
prog(1,1) = 1
prog(1,2) = 1
prog(1,3) = 1
prog(1,4) = 1.50
prog(1,5) = 2
prog(1,6) = 3
prog(1,7) = 4
prog(1,8) = 5.50
prog(1,9) = 8
prog(1,10) = 11
prog(1,11) = 15.50
prog(1,12) = 21.50
prog(1,13) = 30


Rem utile min. 50% unica bolletta


For es = EstrazioneFin - 20 To EstrazioneFin
Messaggio "Estrazione: [" & es & "]ª"
For r1 = 1 To 10
For p1 = 1 To 4
For p2 = p1 + 1 To 5
a = Estratto(es,r1,p1) : b = Estratto(es,r1,p2)


For r2 = r1 + 1 To 12
If r2 = 11 Then r2 = 12
For p3 = 1 To 4
For p4 = p3 + 1 To 5
c = Estratto(es,r2,p3) : d = Estratto(es,r2,p4)


If(a = c And b = d) Or(a = d And b = c) Then


cont = cont + 1
Scrivi : ColoreTesto 2 : Scrivi String(40,32) & " Pronostico n° " & cont & "",1
ColoreTesto 0 : Scrivi


Scrivi DataEstrazione(es,1) & "" & Space(2) & _
"[" & es & "]ª" & Space(3) & "" & Left(NomeRuota(r1),3) & _
"" & Space(3) & "" & StringaEstratti(es,r1) & "" & Space(6) & _
"" & Format2(a) & "" & Space(1) & "" & Format2(b) & _
"" & Space(4) & "(" & p1 & "-" & p2 & ")"
Scrivi DataEstrazione(es,1) & "" & Space(2) & _
"[" & es & "]ª" & Space(3) & "" & Left(NomeRuota(r2),3) & _
"" & Space(3) & "" & StringaEstratti(es,r2) & "" & Space(6) & _
"" & Format2(c) & "" & Space(1) & "" & Format2(d) & _
"" & Space(4) & "(" & p3 & "-" & p4 & ")" : Scrivi


If a = c And b = d Then
a1 = Fuori90(a + c) : b1 = Fuori90(b + d)
c1 = Abs(a1 - b1) : d1 = c1\2


j(1) = a1 : j(2) = b1
e = Fuori90(Minimo(j(1),j(2)) + d1)




f = Fuori90(Massimo(j(1),j(2)) - d1)
x = Fuori90(a + e) : y = Fuori90(b + e)
If a < b Then am(1) = y
If a > b Then am(1) = x
End If


If a = d And b = c Then
a1 = Fuori90(a + d) : b1 = Fuori90(b + c)
c1 = Abs(a1 - b1) : d1 = c1\2


j(1) = a1 : j(2) = b1
e = Fuori90(Minimo(j(1),j(2)) + d1)




f = Fuori90(Massimo(j(1),j(2)) - d1)
x = Fuori90(a + e) : y = Fuori90(b + e)
am(1) = y
End If
am(1) = y
ruota(1) = r1 : ruota(2) = r2 : ruote(1) = 11
ImpostaGiocata 1,am,ruota,posta,14
ImpostaProgressione 1,prog


ab(1) = y : ab(2) = Fuori90(x + y)
ImpostaGiocata 2,ab,ruota,poste,14
ImpostaGiocata 3,ab,ruote,poste,14




Gioca es : Scrivi String(67,151)
End If
Next
Next
Next
Next
Next
Next
Next
ScriviResoconto
ColoreTesto 1
Scrivi "METODO: AMBO OLTRE",1
Scrivi "AUTORE: A. Longo-",1
ColoreTesto 2 : Scrivi "•damper•",1 : End Sub

 

[titta]

Per chi ha L8 ecco lo scipt
Sub main()
Dim nu1(10),nu4(10),nu2(10)
Dim ruote(10),ruota(10)
Dim poste(10),posta(5)
poste(1)=1
posta(2)=1
fin=EstrazioneFin
ini=fin-100
For es=ini To fin
AvanzamentoElab ini,fin,es
For r1=1 To 10
For p1=1 To 4
For p2=p1+1 To 5
n1=Estratto(es,r1,p1)
n2=Estratto(es,r1,p2)
For r2=r1+1 To 11
If r2=11 Then r2=12
For p3=1 To 4
For p4=p3+1 To 5
If (p1=p3 And p2=p4) Or (p1=p4 Or p1=p3) Or (p2=p3 Or p2=p4) Then
n3=Estratto(es,r2,p3)
n4=Estratto(es,r2,p4)
If n1=n3 And n2=n4 Then
c1=Massimo(n1,n2)
c2=Minimo(n1,n2)
c3=Fuori90(c1+c1)
c4=Fuori90(c2+c2)
c5=Abs(c3-c4)
c6=Int(c5/2)
c7=Massimo(c3,c4)
c8=Minimo(c3,c4)
c9=Fuori90(Abs(c7-c6))
c10=Fuori90(c8+c6)
If c9=c10 Then
x1=Fuori90(n1+c9)
x2=Fuori90(n2+c9)
x5=Fuori90(x1+x2)
casi=casi+1:Scrivi String(75,"="),1
Scrivi DataEstrazione(es,1)&" < "&siglaRuota(r1)& " "& StringaEstratti(es,r1)&_
" > ambo ripetuto . "&Format2(n1)&"."&Format2 (n2)&" Pos. "&Format2(p1)&"."&Format2 (p2)&" ."
Scrivi DataEstrazione(es,1)&" < "&siglARuota(r2)& " "& StringaEstratti(es,r2)&_
" > ambo ripetuto < "&Format2(n3)&"."&Format2 (n4)&" Pos. "&Format2(p3)&"."&Format2 (p4)&" ."
Scrivi String(65,"-")&" caso n° "&(casi)
ruote(1)=r1:ruote(2)=r2:k=13:co=0:ruota(1)=11:ruote(3)=12
nu4(1)=x2
poste(1)=1 : poste(p1+5)=1 : poste(p2+5)=1
co=co+1
ImpostaGiocata co,nu4,ruote,poste,k
Erase poste
nu2(1)=x2:nu2(2)=x5:nu2(3)=x1
co=co+1
ImpostaGiocata co,nu2,ruote,posta,k
co=co+1
ImpostaGiocata co,nu2,ruota,posta,k
Gioca es
End If
End If
End If
Next
Next
Next
Next
Next
Next
Next
ScriviResoconto
End Sub

 

[Lo studente]

Ciao Amedeo,hai visto che con il + 1.ed il -1 è uscito l'ambo secco 21-47 sulla ruota di Milano (tutte ) ?Aspettiamo la prossima occasione ciao

 

[rainbow]

continua a dare errore alla riga 72 sia con L8 che con Lottodesk

 

[DEAEBE]

C'e' una nuova possibilita', per favore c'e' qualcuno che fa i calcoli per vedere se ho capito? Grazie mille

 

[Roby]

ciao ieri sera quasi perfetto l'ambo ripetuto Ge To 51/25

Grazie a chi mette la previsione

 

[lorelai]

ciao Amedeo ti posto l'ambo dai numeri GE TO 51-25..........
ambata 56 ambo 56-48.....terzina 56-48-82

ciao