eugenio.dj
Super Member >PLATINUM<
A me non importa chi mi sta seguendo, e piu importante il risultato.Spero che hai vinto qualcosa anche tu
Ultima modifica:
Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
grande luigiiiiii!!!MIKI!!!
48 ambata a palermo 48-33 ambo secco!!!!!!!!!!!
ciao
LUIGI DI ANZIO
questa sera doppia ambata e TERNO A ROMA!!!!!!!!!!!!!!!Vi tiro su questo mio metodo che funziona ininterrottamente lo potete usare semore x le vostre convergenze, in corso
ba-ve 3-48 con 33-63-18-78
ro-ve 57-12 con 27-87-42-72
ca-ve-pa 39-84 con 69-9-54-24
salutoni
grande luigi!! pensa che il 3 a venezia lo stavo giocando con il 90 che mi usciva dal metodino 90 e mi ero accorto del ( 1-31-61) così che mi ero ancora più convinto e te pare che ho giocato? uff... complimenti per questo metodo sempre trovo convergenze utili. e le ambate sono molto forti!!! ciao luigi.questa sera doppia ambata e TERNO A ROMA!!!!!!!!!!!!!!!
Grazie a Luigi per il metodo e a DjNomade per il listato;Bravi complimenti!!!.Se non ho capito male dovrebbe essere cosi' salvo errori
Ciauz
Codice:'http://forum.lottoced.com/f8/ambate-finziona-dal-1945-ininterrotamente-92813/ ColoreTesto 1 Scrivi String(27,32) & "Ambate funziona dal 1945 ininterrotamente di Luigi di Anzio",1 Scrivi Scrivi String(38,32) & "List. DjNomade",1 ColoreTesto 0 Sub Main() Dim nu1(10),nu2(10) Dim ruote(10),ruota(10) Dim posta(2),poste(2),post(3),pos(5) posta(1) = 1 posta(2) = 1 poste(2) = 1 post(2) = 0.5 post(3) = 1.5 pos(2) = 3 pos(3) = 0.8 pos(4) = 0.2 fin = EstrazioneFin ini = fin - 80 For es = ini To fin AvanzamentoElab ini,fin,es For r1 = 1 To 11 If r1 = 11 Then r1 = 12 For p1 = 1 To 4 For p2 = p1 + 1 To 5 n1 = Estratto(es,r1,p1) n2 = Estratto(es,r1,p2) ds1 = Distanza(n1,n2) For r2 = 1 To 11 If r2 = 11 Then r2 = 12 If r1 <> r2 Then For p3 = 1 To 5 n3 = Estratto(es,r2,p3) ds2 = Distanza(n3,n1) ds3 = Distanza(n3,n2) If ds1 = 30 And ds2 = 30 And ds3 = 30 And(p1 = p3 Or p2 = p3)Then casi = casi + 1 Scrivi String(75,"=") & " caso n° " &(casi),1 Scrivi DataEstrazione(es,1) & " < " & SiglaRuota(r1) & " " & StringaEstratti(es,r1) & _ " > ambo distanza < " & Format2(ds1) & " > " & Format2(n1) & "." & Format2(n2) & " >" Scrivi DataEstrazione(es,1) & " < " & SiglaRuota(r2) & " " & StringaEstratti(es,r2) & _ " > isotopo < " & Format2(ds2) & " > " & Format2(n3) Scrivi String(65,"-") ruote(1) = r1 ruote(2) = r2 k = 14 co = 0 c2 = Fuori90(n1 + n2 + n3) c3 = Diametrale(c2) nu2(1) = c2 nu2(2) = c3 co = co + 1 ImpostaGiocata co,nu2,ruote,posta,k nu2(1) = c2 nu2(2) = Fuori90(c2 + 30) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c2 nu2(2) = Fuori90(c2 + 60) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c2 nu2(2) = Fuori90(c3 + 30) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c2 nu2(2) = Fuori90(c3 + 60) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c3 nu2(2) = Fuori90(c2 + 30) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c3 nu2(2) = Fuori90(c2 + 60) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c3 nu2(2) = Fuori90(c3 + 30) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu2(1) = c3 nu2(2) = Fuori90(c3 + 60) co = co + 1 ImpostaGiocata co,nu2,ruote,poste,k nu1(1) = c2 nu1(2) = Fuori90(c2 + 30) nu1(3) = Fuori90(c2 + 60) nu1(4) = c3 nu1(5) = Fuori90(c3 + 30) nu1(6) = Fuori90(c3 + 60) co = co + 1 ImpostaGiocata co,nu1,ruote,pos,k Gioca es End If Next End If Next Next Next Next Next ScriviResoconto ColoreTesto 1 Scrivi String(27,32) & "Ambate funziona dal 1945 ininterrotamente di Luigi di Anzio",1 Scrivi Scrivi String(38,32) & "List. DjNomade",1 ColoreTesto 0 End Sub