UN REGALO X TUTTI VOI...

Roby · 28 Giugno 2006

X TUTTI VOI...amici ed AMICHE del forum...

LA FAVOLOSA SOMMA 48...

è un’idea LOTTOMIMMO

Questa tecnica di origine ciclometrica ha dato, nei casi analizzati, sempre delle
ottime vincite entro i primi 5/6 colpi di gioco, ogni volta che si è presentata la
condizione richiesta.
Pertanto, conviene aspettare che le estrazioni forniscano un caso giocabile per mettere in atto questo piccolo gioiello ludologico.

ITER OPERATIVO

Rintracciare su 2 ruote qualsiasi 2 ambi di somma 48.

Fare la differenza tra i 2 ambi;

Fare la differenza dei risultati ottenuti = AMBATA

ABBINAMENTI

I diametrali in decina degli estratti che costituiscono i 2 ambi di partenza;

La radice quadrata dei 2 ambi rintracciati.

Col tempo vi renderete conto di che gioiello vi ho messo a disposizione...
Non posso "dilungarmi" troppo per alcuni criteri che sono costretto a rispettare...
In ogni caso mettoa Vostra completa disposizione...la mia privacy:

Mandate al Forum ed al sottoscritto...le copie di eventuali scontrini vincenti!!!
In bocca al lupo a tutti...

A beneficio di tutti gli utenti, vi prego di tenere su questo post...

caligo · 28 Giugno 2006

Ciao,ottimo metodo...potresti fare un'esempio per capire meglio il metodo...grazie ancora attendo ciaooooooo Diego

caligo

lottomimmo · 28 Giugno 2006

Ciao caligo...
Un esempio reale di gioco lo trovi nella sezione LottoCed Forum...
Ciao...

caligo · 28 Giugno 2006

Si grazie per avermi risposto,l'ho trovato prima ciaoo...........

caligo

Ben8 · 6 Luglio 2006

Grazie per aver postato questo metodo.

Spero che mi aiuti a recuperare qualcosina.[8)]

Ben[8] </u>

Abitte · 6 Luglio 2006

Nell'estrazione di questa sera c'è una nuova condizione su PALERMO e ROMA....quando avrò fatto i calcoli proverò a postarli nella sezione
Forum: Mi ci date un'occhiata per controllare che siano giusti[?][:I]

Abitte
___________________

«Faber quisque fortunae suae»

Ben8 · 14 Luglio 2006

Salve!
Sono riuscito a fare il listato di questo metodo.
Lo metto a disposizione di tutti, sperando di fare cosa gradita.

Codice:

Sub main()
Dim num(10)
Dim num1(5)
Dim num2(5)
Dim num3(5)
Dim num4(5)
Dim num5(5)
Dim num6(5)
Dim num7(5)
Dim ruote(10)
Dim ruota1(10)
Dim po(5)
Dim pa(5)

co=16
'k2=2
pa(1)=1
po(2)=1

For es=7604 To EstrazioneFin
Messaggio CStr (EstrazioneFin - es)

For r=1 To 12
If r=11 Then r=12
For r1=r+1 To 12
If r1=11 Then r1=12
For p=1 To 4
For p1=p+1 To 5
For pp=1 To 4
For pp1=pp+1 To 5
a=Estratto (es,r,p) 
b=Estratto (es,r,p1) 
c=Estratto (es,r1,pp) 
d=Estratto (es,r1,pp1) 
a1=Fuori90(a+b)
a2=Fuori90(c+d)
If a1=48 And a1=a2 Then

ColoreTesto 2
'Scrivi "Data"&" --> "&DataEstrazione(es)
Scrivi "Estrazione"&" --> "&StringaEstratti(es,r)&"  Ambo"&" -->"&" ["&Format2(a)&_
"]["&Format2(b)&"] Somma --> "&"["&Format2(a1)&"]"&"  "&"Ruota "&"--> "&NomeRuota(r)
Scrivi "Estrazione"&" --> "&StringaEstratti(es,r1)&"  Ambo"&" -->"&" ["&Format2(c)&_
"]["&Format2(d)&"] Somma --> "&"["&Format2(a1)&"]"&"  "&"Ruota "&"--> "&NomeRuota(r1)
ColoreTesto 0

m1=Fuori90(((b)-a)+90)
If a>b Then m1=Fuori90(((a)-b)+90)
m2=Fuori90(((d)-c)+90)
If c>d Then m2=Fuori90(((c)-d)+90)
m3=Fuori90(((m1)-m2)+90)
If m2>m1 Then m3=Fuori90(((m2)-m1)+90)

b1=(a*100)+b
b2=(c*100)+d

c1=Fuori90(Int(Sqr(b1)))
c2=Fuori90(Int(Sqr(b2)))

d1=DiametraleD(a)
d2=DiametraleD(b)
d3=DiametraleD(c)
d4=DiametraleD(d)

'ruote(1)=r
ruote(1)=11
'ruote(2)=r1

num(1)=m3
ImpostaGiocata 1,num,ruote,pa,co,k1
num1(1)=m3
num1(2)=c1
If num1(2)=num1(1) Then num1(2)=Fuori90(num1(2)+1)
ImpostaGiocata 2,num1,ruote,po,co,k2

num2(1)=m3
num2(2)=c2
If num2(2)=num2(1) Then num2(2)=Fuori90(num2(2)+1)
ImpostaGiocata 3,num2,ruote,po,co,k2

num3(1)=m3
num3(2)=d1
If num3(2)=num3(1) Then num3(2)=Fuori90(num3(2)+1)
ImpostaGiocata 4,num3,ruote,po,co,k2

num4(1)=m3
num4(2)=d2
If num4(2)=num4(1) Then num4(2)=Fuori90(num4(2)+1)
ImpostaGiocata 5,num4,ruote,po,co,k2

num5(1)=m3
num5(2)=d3
If num5(2)=num5(1) Then num5(2)=Fuori90(num5(2)+1)
ImpostaGiocata 6,num5,ruote,po,co,k2

num6(1)=m3
num6(2)=d4
If num6(2)=num6(1) Then num6(2)=Fuori90(num6(2)+1)
ImpostaGiocata 7,num6,ruote,po,co,k2

'For ax=1 To 6
'For bx=1 To 6
'ImpostaInterruzioni ax,bx,2
'Next
'Next

Gioca es
Scrivi"____________________________________________________________________________________" 

End If
Next
Next
Next
Next
Next
Next
Next
'ScriviResoconto 
End Sub








Estrazione --> 41.79.40.59.30  Ambo --> [79][59] Somma --> [48]  Ruota --> Napoli
Estrazione --> 64.01.03.68.45  Ambo --> [03][45] Somma --> [48]  Ruota --> Roma
mar 06.06.2006  [7604]
  G  1:  M    22         16/16    
     M  22               su Tu (Ro)    1° colpo   [7605/08.06.2006]
     M  22               su Tu (Ve)    1° colpo   [7605/08.06.2006]
     M  22               su Tu (Na)    6° colpo   [7610/20.06.2006]
     M  22               su Tu (Ro)    7° colpo   [7611/22.06.2006]
     M  22               su Tu (Ca)   11° colpo   [7615/01.07.2006]
     M  22               su Tu (Fi)   11° colpo   [7615/01.07.2006]
     M  22               su Tu (Pa)   13° colpo   [7617/06.07.2006]
     M  22               su Tu (Ba)   14° colpo   [7618/08.07.2006]

  G  2:  A    22.89      16/16    
     negativo
  G  3:  A    22.18      16/16    
     negativo
  G  4:  A    22.74      16/16    
     A  74.22            su Tu (Ro)    1° colpo   [7605/08.06.2006]

  G  5:  A    22.54      16/16    
     negativo
  G  6:  A    22.08      16/16    
     A  22.08            su Tu (Na)    6° colpo   [7610/20.06.2006]

  G  7:  A    22.40      16/16    
     A  40.22            su Tu (Fi)   11° colpo   [7615/01.07.2006]

____________________________________________________________________________________
Estrazion

franca46 · 14 Luglio 2006

buon giorno

grazie Ben8

imported_n/a · 14 Luglio 2006

Franca cosa si devono giocare le combinazioni con il 26?
premetto che mi sono uscite le ambate 73-62 e vertibili m-n
Come ti ho detto telefonicamente io i listati ancora non li comprendo.
ciao

P.S

j76biban · 14 Luglio 2006

GRANDE Ben ciao e grazie

jo058 · 14 Luglio 2006

se csi è allora mi scuso e faccio mille complimenti all'autore o agli autori di qt metodo .

imported_n/a · 14 Luglio 2006

Perdonatemi,ma dal listato di Ben8,si evince che ecluso il mese di giugno,il metodo non ha dato grandi risultati o sbaglio? Voi cosa ne pensate?
Pio

franca46 · 17 Luglio 2006

quote:Originally posted by n.n.

Franca cosa si devono giocare le combinazioni con il 26?
premetto che mi sono uscite le ambate 73-62 e vertibili m-n
Come ti ho detto telefonicamente io i listati ancora non li comprendo.
ciao

P.S

Estrazione --> 76.10.38.70.40 Ambo --> [10][38] Somma --> [48] Ruota --> Milano
Estrazione --> 25.45.18.23.89 Ambo --> [25][23] Somma --> [48] Ruota --> Palermo
mar 11.07.2006 [7618]
G 1: M 26 2/16
in corso (2° su 16)
G 2: A 26.32 2/16
in corso (2° su 16)
G 3: A 26.50 2/16
in corso (2° su 16)
G 4: A 26.15 2/16
in corso (2° su 16)
G 5: A 26.33 2/16
in corso (2° su 16)
G 6: A 26.20 2/16
in corso (2° su 16)
G 7: A 26.28 2/16
in corso (2° su 16)

queste sono quelle con il 26

ciao

aldo73 · 18 Luglio 2006

un aitutino mi spiegate con esempi partici come si ricavano le previsioni in questo metodo ? grazie mille

ALDO

Enplein · 18 Luglio 2006

X Aldo73

Codice:

In data --> 15.07.2006, si presentano due ambi di somma 48 su due ruote.
Estrazione --> 09.47.63.80.75  Ambo --> [63][75] Somma --> [48]  Dif. Matem. ----> [12] Ruota --> Genova
Estrazione --> 78.12.15.33.62  Ambo --> [15][33] Somma --> [48] 
Dif. Matem. ----> [18] Ruota --> Nazionale

L'ambata è data dalla differenza matematica delle differenze degli ambi base: 18-12=6

x Ambo :
1° Abbinamento Radice Quadrata di 6375 = 79
2°      "        "        "    di 1533 = 39
3°      "      Diametrale in Decina di 63+5= 68 
4°      "          "            "      75-5= 70
5°      "          "            "      15-5= 10
6°      "          "            "      33+5= 38  

PREVISIONE:
sab 15.07.2006  [7621]
  G  1:  M    06      Ge Nz    0/16    
     n.i. (16 colpi)
  G  2:  A    06.79   Ge Nz    0/16    
     n.i. (16 colpi)
  G  3:  A    06.39   Ge Nz    0/16    
     n.i. (16 colpi)
  G  4:  A    06.68   Ge Nz    0/16    
     n.i. (16 colpi)
  G  5:  A    06.70   Ge Nz    0/16    
     n.i. (16 colpi)
  G  6:  A    06.10   Ge Nz    0/16    
     n.i. (16 colpi)
  G  7:  A    06.38   Ge Nz    0/16    
     n.i. (16 colpi)

X Ben8

Mi complimento per l'impegno manifestato nel realizzare lo scritp, e per questo suggerisco un modo più semplice nel calcolo delle differenze matematiche....usando la funzione Abs, e un For....Next per per le giocate dell'ambo.

Ciao, Enplein.

Allego interamente il listato per coloro che non ne sono capaci.

Codice:

Sub main()
Dim num(2),amb(1),n(6)
Dim ruote(2)
Dim ruota(1)
Dim posta(1)
Dim poste(2)
co=16
posta(1)=1
poste(2)=1
For es=7604 To EstrazioneFin
Messaggio CStr (EstrazioneFin - es)
For r=1 To 10
For r1=r+1 To 12
If r1<>11 Then 
For p=1 To 4
For p1=p+1 To 5
For pp=1 To 4
For pp1=pp+1 To 5
a=Estratto (es,r,p) 
b=Estratto (es,r,p1) 
c=Estratto (es,r1,pp) 
d=Estratto (es,r1,pp1) 
a1=Fuori90(a+b)
a2=Fuori90(c+d)
If a1=48 And a1=a2 Then
d1=Abs (a-b)
d2=Abs (c-d)
amb(1)=Abs (d1-d2)
If amb(1)<>0 Then 
ab=(a*100)+b
cd=(c*100)+d
n(1)=Fuori90(Int(Sqr(ab)))
n(2)=Fuori90(Int(Sqr(cd)))
n(3)=DiametraleD(a)
n(4)=DiametraleD(b)
n(5)=DiametraleD(c)
n(6)=DiametraleD(d)
ruote(1)=r
ruota(1)=11
ruote(2)=r1
ColoreTesto 1
Scrivi "Data"&" --> "&DataEstrazione(es)
Scrivi "Estrazione"&" --> "&StringaEstratti(es,r)&"  Ambo"&" -->"&" ["&Format2(a)&_
"]["&Format2(b)&"] Somma --> "&"["&Format2(a1)&"]  Diff. Matem. ---> "&"["& Format2(d1)&"]"&"  "&"Ruota "&"--> "&NomeRuota(r)
Scrivi "Estrazione"&" --> "&StringaEstratti(es,r1)&"  Ambo"&" -->"&" ["&Format2(c)&_
"]["&Format2(d)&"] Somma --> "&"["&Format2(a1)&"]  Diff. Matem. ---> "&"["& Format2(d2)&"]"&"  "&"Ruota "&"--> "&NomeRuota(r1)
ColoreTesto 0
ImpostaGiocata 1,amb,ruote,posta,co,1
st=1
num(1)=amb(1)
For i=1 To 6
st=st+1
num(2)=n(i)
If num(2)=num(1) Then num(2)=Fuori90(num(2)+1)
ImpostaGiocata st,num,ruote,poste,co,2
Next 
For x=1 To 7
For z=2 To 7
ImpostaInterruzioni x,1,1
ImpostaInterruzioni x,z,2
Next
Next
Gioca es
Scrivi"_________________________________________________________________________________________________________" 
End If 
End If
Next
Next
Next
Next
End If 
Next
Next
Next
ScriviResoconto

aldo73 · 18 Luglio 2006

GRAZIE MILLE PER L'AIUTO

ALDO

aldo73 · 18 Luglio 2006

X ANPLEIN - L'AMBATA 6 SI ABBINA CON I NUMERI IN BASSO ?

ALDO

Ben8 · 19 Luglio 2006

Grazie Enplein per i complimenti ed il suggerimento che mi sarà molto utile.
Come sai le mie nozioni sul lottoscript sono ancora limitate.
Spero col tempo di migliorare.
Cordiali saluti a tutti.

Ben[8] </u>

pietro37 · 31 Ottobre 2006

QUALCUNO PUO' FARE UN PROGRAMMA CON EXCEL?
GRAZIE.

UN REGALO X TUTTI VOI...

Roby

Guest

Member

Advanced Member

Member

Advanced Member

Advanced Member >PLATINUM PLUS<

Advanced Member

Advanced Member >PLATINUM PLUS<

Advanced Premium Member

Member

Advanced Member >PLATINUM<

Advanced Premium Member

Advanced Member >PLATINUM PLUS<

Senior Member

Super Member >PLATINUM<

Senior Member

Senior Member

Advanced Member

Super Member >GOLD<