Novità

Estrazione del Lotto

Su LottoCED puoi seguire le estrazioni del lotto in diretta tra

URGE SCRIPT

Ciao Marco-elle ti chiedevo la tua "BARI alla 6° mensile, gioca 6 terni " non ha calcolato la sesta estrazione di questo mese, come posso fare per ricavare le giocate ?
PS. intendo giocarla ,grazie intanto!
 

Alien.

Advanced Premium Member
Ma non credo se uno si scorda una cosa ,"sia un cretino" non sottovalutarti Mai.Ognuno di Noi ha Pregi e Difetti.
 
Grazie Alien ne farò tesoro della tua lusinga!
Ps. fa piacere sentirselo dire cosi facendo uno non perde la propria identità , grazie dinuovo!
 

Alien.

Advanced Premium Member
E' siamo felici in due, siamo Italiani diamoci una mano ,vedi siamo come un ramoscello che con due dita si può spezzare ma prova a spezzare 100 ramoscelli con due dita !!
Un 'abbraccio.
 

Marco-elle

Advanced Member
Ambo zerato sortito su TT....Gioca previsione su ruote più congeniali

Codice:
Sub Main()
   ColoreTesto 2
   Scrivi "AMBO ZERATO SORTITO SU TT "
   Scrivi "GIOCA PREVISIONE SU RUOTE CONGENIALI "
   Scrivi "METODO E LIST BY Marco"
   ColoreTesto 0
   Dim poste(2)
   Dim ruota(2)
   Dim a1(4)
   poste(2) = 1
   clp = 12
   ini = EstrazioneFin - 350
   fin = EstrazioneFin
   co = 0
   For es = ini To fin
      Messaggio es
      Call AvanzamentoElab(Ini,Fin,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)
               ok = 0
               If a = 10 And b = 20 Or a = 2 And b = 10 Then
                  a1(1) = 6
                  a1(2) = 13
                  a1(3) = 15
                  a1(4) = 47
                  ruota(1) = 2
                  ruota(2) = 9
                  ok = 1
               End If
               If a = 10 And b = 30 Or a = 30 And b = 10 Then
                  a1(1) = 2
                  a1(2) = 12
                  a1(3) = 13
                  a1(4) = 40
                  ruota(1) = 1
                  ruota(2) = 5
                  ok = 1
               End If
               If a = 10 And b = 40 Or a = 40 And b = 10 Then
                  a1(1) = 1
                  a1(2) = 5
                  a1(3) = 7
                  a1(4) = 77
                  ruota(1) = 2
                  ruota(2) = 6
               End If
               If a = 10 And b = 50 Or a = 50 And b = 10 Then
                  a1(1) = 8
                  a1(2) = 26
                  a1(3) = 56
                  a1(4) = 73
                  ruota(1) = 3
                  ruota(2) = 7
                  ok = 1
               End If
               If a = 10 And b = 60 Or a = 60 And b = 10 Then
                  a1(1) = 13
                  a1(2) = 16
                  a1(3) = 26
                  a1(4) = 82
                  ruota(1) = 2
                  ruota(2) = 8
                  ok = 1
               End If
               If a = 10 And b = 70 Or a = 70 And b = 10 Then
                  a1(1) = 4
                  a1(2) = 26
                  a1(3) = 40
                  a1(4) = 44
                  ruota(1) = 1
                  ruota(2) = 9
                  ok = 1
               End If
               If a = 10 And b = 80 Or a = 80 And b = 10 Then
                  a1(1) = 4
                  a1(2) = 10
                  a1(3) = 16
                  a1(4) = 66
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If a = 10 And b = 90 Or a = 90 And b = 10 Then
                  a1(1) = 19
                  a1(2) = 69
                  a1(3) = 83
                  a1(4) = 88
                  ruota(1) = 1
                  ruota(2) = 6
                  ok = 1
               End If
               If a = 20 And b = 30 Or a = 30 And b = 20 Then
                  a1(1) = 7
                  a1(2) = 20
                  a1(3) = 30
                  a1(4) = 45
                  ruota(1) = 1
                  ruota(2) = 6
                  ok = 1
               End If
               If a = 20 And b = 40 Or a = 40 And b = 20 Then
                  a1(1) = 4
                  a1(2) = 34
                  a1(3) = 48
                  a1(4) = 77
                  ruota(1) = 1
                  ruota(2) = 9
                  ok = 1
               End If
               If a = 20 And b = 50 Or a = 50 And b = 20 Then
                  a1(1) = 1
                  a1(2) = 25
                  a1(3) = 70
                  a1(4) = 84
                  ruota(1) = 1
                  ruota(2) = 2
                  ok = 1
               End If
               If a = 20 And b = 60 Or a = 60 And b = 20 Then
                  a1(1) = 6
                  a1(2) = 12
                  a1(3) = 18
                  a1(4) = 52
                  ruota(1) = 3
                  ruota(2) = 9
                  ok = 1
               End If
               If a = 20 And b = 70 Or a = 70 And b = 20 Then
                  a1(1) = 16
                  a1(2) = 44
                  a1(3) = 52
                  a1(4) = 66
                  ruota(1) = 1
                  ruota(2) = 2
                  ok = 1
               End If
               If a = 20 And b = 80 Or a = 80 And b = 20 Then
                  a1(1) = 16
                  a1(2) = 20
                  a1(3) = 22
                  a1(4) = 59
                  ruota(1) = 1
                  ruota(2) = 7
                  ok = 1
               End If
               If a = 20 And b = 90 Or a = 20 And b = 90 Then
                  a1(1) = 2
                  a1(2) = 6
                  a1(3) = 7
                  a1(4) = 27
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If a = 30 And b = 40 Or a = 40 And b = 30 Then
                  a1(1) = 3
                  a1(2) = 12
                  a1(3) = 15
                  a1(4) = 26
                  ruota(1) = 1
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 30 And b = 50 Or a = 50 And b = 30 Then
                  a1(1) = 14
                  a1(2) = 22
                  a1(3) = 47
                  a1(4) = 87
                  ruota(1) = 2
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 30 And b = 60 Or a = 60 And b = 30 Then
                  a1(1) = 9
                  a1(2) = 31
                  a1(3) = 47
                  a1(4) = 54
                  ruota(1) = 1
                  ruota(2) = 6
                  ok = 1
               End If
               If a = 30 And b = 70 Or a = 70 And b = 30 Then
                  a1(1) = 17
                  a1(2) = 24
                  a1(3) = 31
                  a1(4) = 54
                  ruota(1) = 1
                  ruota(2) = 2
                  ok = 1
               End If
               If a = 30 And b = 80 Or a = 80 And b = 30 Then
                  a1(1) = 9
                  a1(2) = 20
                  a1(3) = 58
                  a1(4) = 86
                  ruota(1) = 1
                  ruota(2) = 2
                  ok = 1
                  If a = 30 And b = 90 Or a = 30 And b = 90 Then
                     a1(1) = 5
                     a1(2) = 17
                     a1(3) = 34
                     a1(4) = 47
                     ruota(1) = 1
                     ruota(2) = 3
                     ok = 1
                  End If
               End If
               If a = 40 And b = 50 Or a = 50 And b = 40 Then
                  a1(1) = 6
                  a1(2) = 12
                  a1(3) = 13
                  a1(4) = 66
                  ruota(1) = 1
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 40 And b = 60 Or a = 60 And b = 40 Then
                  a1(1) = 6
                  a1(2) = 11
                  a1(3) = 16
                  a1(4) = 43
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If a = 40 And b = 70 Or a = 70 And b = 40 Then
                  a1(1) = 3
                  a1(2) = 7
                  a1(3) = 14
                  a1(4) = 22
                  ruota(1) = 1
                  ruota(2) = 5
                  ok = 1
               End If
               If a = 40 And b = 80 Or a = 80 And b = 40 Then
                  a1(1) = 16
                  a1(2) = 35
                  a1(3) = 61
                  a1(4) = 67
                  ruota(1) = 1
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 40 And b = 90 Or a = 90 And b = 40 Then
                  a1(1) = 1
                  a1(2) = 5
                  a1(3) = 30
                  a1(4) = 83
                  ruota(1) = 1
                  ruota(2) = 2
                  ok = 1
               End If
               If a = 50 And b = 60 Or a = 60 And b = 50 Then
                  a1(1) = 1
                  a1(2) = 28
                  a1(3) = 48
                  a1(4) = 63
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If a = 50 And b = 70 Or a = 70 And b = 50 Then
                  a1(1) = 47
                  a1(2) = 55
                  a1(3) = 67
                  a1(4) = 83
                  ruota(1) = 1
                  ruota(2) = 2
                  ok = 1
               End If
               If a = 50 And b = 80 Or a = 80 And b = 50 Then
                  a1(1) = 13
                  a1(2) = 14
                  a1(3) = 41
                  a1(4) = 52
                  ruota(1) = 2
                  ruota(2) = 9
                  ok = 1
               End If
               If a = 50 And b = 90 Or a = 90 And b = 50 Then
                  a1(1) = 9
                  a1(2) = 35
                  a1(3) = 47
                  a1(4) = 70
                  ruota(1) = 1
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 60 And b = 70 Or a = 70 And b = 60 Then
                  a1(1) = 1
                  a1(2) = 10
                  a1(3) = 16
                  a1(4) = 61
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If a = 60 And b = 80 Or a = 80 And b = 60 Then
                  a1(1) = 5
                  a1(2) = 22
                  a1(3) = 40
                  a1(4) = 47
                  ruota(1) = 1
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 60 And b = 90 Or a = 90 And b = 60 Then
                  a1(1) = 6
                  a1(2) = 47
                  a1(3) = 54
                  a1(4) = 89
                  ruota(1) = 1
                  ruota(2) = 3
                  ok = 1
               End If
               If a = 70 And b = 80 Or a = 80 And b = 70 Then
                  a1(1) = 21
                  a1(2) = 22
                  a1(3) = 31
                  a1(4) = 77
                  ruota(1) = 1
                  ruota(2) = 6
                  ok = 1
               End If
               If a = 70 And b = 90 Or a = 90 And b = 70 Then
                  a1(1) = 8
                  a1(2) = 25
                  a1(3) = 26
                  a1(4) = 40
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If a = 90 And b = 80 Or a = 80 And b = 90 Then
                  a1(1) = 20
                  a1(2) = 51
                  a1(3) = 65
                  a1(4) = 78
                  ruota(1) = 1
                  ruota(2) = 4
                  ok = 1
               End If
               If ok = 1 Then
                  co = co + 1
                  ColoreTesto 1
                  Scrivi String(80,"^") & " Caso n°" & co,1
                  Scrivi DataEstrazione(es) & "   ambo zerato spia sortito su TT    " & a & " - " & b,1
                  Scrivi String(80,"^"),1
                  ColoreTesto 0
                  ImpostaGiocata 1,a1,ruota,poste,clp
                  Gioca es,1
               End If
            Next
         Next
      Next
   Next
   ScriviResoconto
End Sub
 

toon

Member
Marco....Ricercatore da Paura, hai sempre degli script ad alto rendimento...Grazie..
Mi hai regalato un' Ambo con "AMBI SPIA CON I NUMERETTI USCITI SU RO"
V N. [55.46.64.51 ] [RO] [51 46 .. .. ..] C. 12 Ambo 09874 [ 7 - 16/01/2021]
Grazie...
 

Marco-elle

Advanced Member
Marco....Ricercatore da Paura, hai sempre degli script ad alto rendimento...Grazie..
Mi hai regalato un' Ambo con "AMBI SPIA CON I NUMERETTI USCITI SU RO"
V N. [55.46.64.51 ] [RO] [51 46 .. .. ..] C. 12 Ambo 09874 [ 7 - 16/01/2021]
Grazie...
Bravo!....io da pirla non lo ho continuato e me lo sono perso ma confido nelle prossime previsioni ,Stay Tuned
 

boris

Advanced Member
visto i risultati ho insistito, vabbe che tu ne hai diversi metodi che danno sodisfazioni, ..........grazie per la tua disponibilità ............... in bocca al lupo per le future previsioni
 

Marco-elle

Advanced Member
Questo metodo gioca una ambata in posizione su FI-VE calcolata alla 1° e 6° del mese,era inserito già da tempo sul thread di Salvo50 e come si evince continua a funzionare.....utile a chi piace questo gioco con una discreta resa

Codice:
Sub Main() ColoreTesto 1
   Scrivi
   Scrivi "AMBATA SU' FIRENZE-VENEZIA SEMPLICE E 2° E 4° POSIZIONE  ALLA 1° E 6° MENSILE",1
   Scrivi
   Scrivi
   Scrivi " METODO E LIST BY  Marco",1
   Scrivi
   ColoreTesto 0
   Dim ruote(2)
   Dim ambata(2):Dim posta(1):Dim postaa(7):Dim poste(9)
   posta(1) = 1
   postaa(7) = 1
   poste(9) = 1
   klp = 9
   ini = 9600
   fin = EstrazioneFin
   co = 0
   For es = ini To fin
      If IndiceMensile(es) = 1 Or IndiceMensile(es) = 6 Then
         ruote(1) = 3
         ruote(2) = 10
         casi = casi + 1
         co = co + 1
         ColoreTesto 1:Scrivi String(100,"°") & " Caso n° " & casi,1
         ColoreTesto 2:Scrivi DataEstrazione(es) & "---> " & IndiceMensile(es) & "° Estrazione Mensile"
         ColoreTesto 1:Scrivi String(100,"°")
         ColoreTesto 0
         ambata(1) = Fuori90(Estratto(es,2,2) + Estratto(es,6,5) + 9)
         ImpostaGiocata 1,ambata,ruote,posta,klp,1
         ambata(1) = Fuori90(Estratto(es,2,2) + Estratto(es,6,5) + 9)
         ImpostaGiocata 2,ambata,ruote,postaa,klp,7
         ambata(1) = Fuori90(Estratto(es,2,2) + Estratto(es,6,5) + 9)
         ImpostaGiocata 3,ambata,ruote,poste,klp,9
         Gioca es,1
      End If
   Next
   Scrivi:Scrivi:Scrivi:Scrivi:Scrivi "Casi Rilevati " & CInt(co)
   ScriviResoconto
End Sub
 

Marco-elle

Advanced Member
FI alla 1° e 7° mensile gioca con 2 capogiochi e 3 abbinamenti
Codice:
Sub Main() ColoreTesto 1
   Scrivi
   Scrivi "FI alla 1^ e 7^ mensile gioca 2 ambate + 3 abbimamenti ",1
   Scrivi
   Scrivi
   Scrivi " METODO E LIST BY  Marco",1
   Scrivi
   ColoreTesto 0
   Dim ruote(1)
   Dim poste(2)
   Dim ambo(2)
   poste(2) = 1
   klp = 9
   ini = 9650
   fin = EstrazioneFin
   co = 0
   For es = ini To fin
      If IndiceMensile(es) = 1 Or IndiceMensile(es) = 7 Then
         Call AvanzamentoElab(Ini,Fin,es)
         ruote(1) = 3
         casi = casi + 1
         co = co + 1
         ColoreTesto 1:Scrivi String(100,"°") & " Caso n° " & casi,1
         ColoreTesto 1:Scrivi String(100,"°")
         ColoreTesto 2:Scrivi DataEstrazione(es) & "--->" & IndiceMensile(es) & "° Estrazione Mensile"
         ColoreTesto 1:Scrivi String(100,"°")
         ColoreTesto 1:Scrivi String(100,"°")
         ColoreTesto 0
         ambo(1) = Fuori90(Estratto(es,1,1) + Estratto(es,4,3) + 33)
         ambo(2) = Fuori90(90 +(Estratto(es,2,5)) - Estratto(es,7,4) + 64)
         ImpostaGiocata 1,ambo,ruote,poste,klp
         ambo(1) = Fuori90(Estratto(es,1,1) + Estratto(es,4,3) + 33)
         ambo(2) = Fuori90(90 +(Estratto(es,6,5)) - Estratto(es,7,2) + 80)
         ImpostaGiocata 2,ambo,ruote,poste,klp
         ambo(1) = Fuori90(Estratto(es,1,1) + Estratto(es,4,3) + 33)
         ambo(2) = Fuori90(Estratto(es,1,4) + Estratto(es,4,2) + 44)
         ImpostaGiocata 3,ambo,ruote,poste,klp
         ambo(1) = Fuori90(Estratto(es,5,5) + Estratto(es,7,3) + 2)
         ambo(2) = Fuori90(90 +(Estratto(es,2,5)) - Estratto(es,7,4) + 64)
         ImpostaGiocata 4,ambo,ruote,poste,klp
         ambo(1) = Fuori90(Estratto(es,5,5) + Estratto(es,7,3) + 2)
         ambo(2) = Fuori90(90 +(Estratto(es,6,5)) - Estratto(es,7,2) + 80)
         ImpostaGiocata 5,ambo,ruote,poste,klp
         ambo(1) = Fuori90(Estratto(es,5,5) + Estratto(es,7,3) + 2)
         ambo(2) = Fuori90(Estratto(es,1,4) + Estratto(es,4,2) + 44)
         ImpostaGiocata 6,ambo,ruote,poste,klp
         Gioca es,1
      End If
   Next
   Scrivi:Scrivi:Scrivi:Scrivi:Scrivi "Casi Rilevati " & CInt(co)
   ScriviResoconto
End Sub
 

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 25 febbraio 2021
    Bari
    17
    74
    14
    27
    05
    Cagliari
    45
    35
    88
    47
    48
    Firenze
    58
    42
    19
    03
    88
    Genova
    42
    52
    19
    01
    51
    Milano
    31
    54
    70
    34
    61
    Napoli
    48
    47
    77
    17
    40
    Palermo
    26
    30
    23
    69
    03
    Roma
    52
    83
    82
    17
    16
    Torino
    62
    85
    88
    40
    43
    Venezia
    26
    68
    39
    63
    42
    Nazionale
    53
    40
    89
    33
    47
    Estrazione Simbolotto
    Cagliari
    13
    29
    12
    28
    37

Ultimi Messaggi

Alto