un metodo da 899

[baikal]

a tecnica lunare di marco e lio del'ambo uguale
All'uscita di un ambo uguale in una qualsiasi estrazione su due ruote diverse si
faranno i seguente calcoli per mettere in gioco un ambo secco e due terni secchi
sortito l'ambo ripetuto si sommerano i due elemente che lo compongono ( con il fuori
90 se il risultato dovesse essere superiore a 90) e successivamente si calcola il
suo diametrale.I due capigiochi si giocheranno per ambo secco.
Per la formazione del primo terno si sommeranno per si stessi gli elementi dell'ambo
uguale e gli si abbina il primo capogioco che costruisci dalla somma tra questi due.
L'altro terno sara formato invece dai diametrale dei due elementi e gli si abbina
il secondo capogioco che costruisce come numero diametrale della somma

ESEMPIO: 20/01/09
FIRENZE-TORINO si verifeca l'ambo uguale 44-79

e nel nostro caso ambo 43.88..terno 43.88(88) terno 88.44.89

sperando di aver fatto cosa gradita.

- Sommiamo i numeri cge formano l'ambo repetuto
44+79= 33

- Calcoliamo il diametrale del risultato ottenuto, ovvero dell'33
33+45 = 78

il 33 e il 78 formeranno l'ambo principale

-CALCOLO PRIMO TERNO:
Sommeremo per si stessi gli elementi dell'ambo abbinandoli alla somma dei due

44 + 44 = 88
79 + 79 = 68

- primo terno
capogioco e i suoi due abbinamenti: 33/ + 68-88

-CALCOLO SECONDO TERNO:
Calcoliamo i diametrali dei due elementi dell'ambo abbinandoli al diametrali
della loro somma

44 + 45 = 89
79 - 45 = 34
-secondo terno
capogioco e i suoi due abbinamenti: 78/+34-89

PREVISIONE
AMBO SECCO: 33-78
TERNI:
33/+68-88
78/+34-89

AL primo colpo ambo 33-68 su firenze

 

[DjNomade]

Prova cosi....

Ciauz

'http://forum.lottoced.com/f12/un-metodo-da-899-a-117729/
Scrivi
ColoreTesto 2
Scrivi String(17,32) & "TECNICA LUNARE DI MARCO E LIO  ",1
Scrivi String(45,32) & "List. by DjNomade",1
ColoreTesto 0
Sub Main()
	Dim numeri(2)
	Dim numeri1(5)
	Dim numeri2(7)
	Dim ruota(2)
	Dim poste(5)
	Dim posta(5)
	posta(2) = 1
	poste(2) = 1.5
	poste(3) = .5
	fin = EstrazioneFin
	ini = fin - 50
	For es = ini To fin
		AvanzamentoElab ini,fin,es
		For r = 1 To 10
			For p = 1 To 4
				For q = p + 1 To 5
					a = Estratto(es,r,p)
					b = Estratto(es,r,q)
					For r1 = r + 1 To 12
						If r1 = 11 Then r1 = 12
						p1 = Posizione(es,r1,a)
						q1 = Posizione(es,r1,b)
						If p1 > 0 And q1 > 0 Then
							ruota(1) = r
							ruota(2) = r1
							z = Fuori90(a + b)
							z1 = Fuori90(b*2)
							z3 = Fuori90(a*2)
							z2 = Diametrale(z)
							z4 = Diametrale(a)
							z5 = Diametrale(b)
							n1 = z
							n2 = z1
							n3 = z3
							n4 = z2
							n5 = z4
							n6 = z5
							casi = casi + 1:Scrivi String(65,"=") & " caso n° " &(casi),1
							Scrivi : Scrivi
							Scrivi DataEstrazione(es) & " " &(SiglaRuota(r)) & " " & StringaEstratti(es,r) & " ----->" & Format2(a) & " " & Format2(b)
							Scrivi DataEstrazione(es) & " " &(SiglaRuota(r1)) & " " & StringaEstratti(es,r1) & " ----->" & Format2(a) & " " & Format2(b)
							numeri(1) = n1
							numeri(2) = n4
							ImpostaGiocata 1,numeri,ruota,posta,9,2
							numeri2(1) = n1
							numeri2(2) = n2
							numeri2(3) = n3
							ImpostaGiocata 2,numeri2,ruota,poste,9,3
							numeri2(1) = n4
							numeri2(2) = n5
							numeri2(3) = n6
							ImpostaGiocata 3,numeri2,ruota,poste,9,3
							Gioca es
						End If
					Next : Next : Next : Next : Next : ScriviResoconto : End Sub

 

[baikal]

grazie djnomade ho pubblicato il metodo per far capire agli utenti che gli 899 non servono a vincere