Novità

Aiuto per script spia 11 su milano

santo1610

Junior Member
Messaggi
5
Punti reazione
0
Punti
1
Vorrei provare un metodo su Milano Quando in 4 posizione esce il numero 11
si devono mettere in gioco il 42 e il 64
2 ambate che vengono ricavate dalla somma dei fissi 31 e 53, per abbinamento avrei pensato alle frequenze
 

magia

Super Member >PLATINUM<
Messaggi
292
Punti reazione
10
Punti
18
Buongiorno,
Salutando gli intervenuri ,
Codice:
Option Explicit
'Spia sommativa 11 Milano di santo1610
'https://forum.lottoced.com/forum/lottoced/metodi/2188643-spia-sommativa-11-milano
Sub Main()
   Dim R,Spia,Colpi : R = MI_ : Spia = 11 : Colpi = 09
   Dim Ruota(01) : Ruota(01) = R
   Dim Ini,FIn,Es,Casi : Ini = 8478 : FIn = EstrazioneFin : Casi = 00
   For Es = Ini To FIn : Call Messaggio(Es) : Call AvanzamentoElab(Ini,FIn,Es)
      If Posizione(Es,R,Spia) = 04 Then
         Casi = Casi + 01 : Call Scrivi(String(125,"-") & " Caso n° " & Format2(Casi),True)
         ReDim Numeri1(02) : Numeri1(01) = Fuori90(Spia + 31) : Numeri1(02) = Fuori90(Spia + 53)
         Dim Posta,Poste: Posta = Array(00,01,00,00,00,00) : Poste = Array(00,00,01,00,00,00)
         Dim aRetAbb,k
         Call Abbinamenti(Numeri1(01),aRetAbb,EstrazioneIni,FIn,R,00)
         For k = 01 To 04
            ReDim Preserve abb1(k) : abb1(k) = aRetAbb(k,01)
         Next
         Call Abbinamenti(Numeri1(02),aRetAbb,EstrazioneIni,FIn,R,00)
         For k = 01 To 04
            ReDim Preserve abb2(k) : abb2(k) = aRetAbb(k,01)
         Next
         Dim Numeri2 : Numeri2 = Array(Numeri1(01),abb1(01),abb1(02),abb1(03),abb1(04),Numeri1(02),abb2(01),abb2(02),abb2(03),abb2(04))
         Call ImpostaGiocata(01,Numeri1,Ruota,Posta,Colpi,AMBATA_,,01)
         Call ImpostaGiocata(02,Numeri2,Ruota,Poste,Colpi,AMBO_,,01)
         Call Scrivi(DataEstrazione(Es) & " " & " [" & " " & SiglaRuota(R) & " " & StringaEstratti(Es,R) & " " & "] ",True)
         Call Gioca(Es,True,,01)
      End If
   Next
   Call ScriviResoconto()
End Sub
Controllare Sempre .
Salvo Errori ed Omissis .
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 30 giugno 2020
    Bari
    24
    74
    68
    69
    45
    Cagliari
    74
    32
    58
    01
    84
    Firenze
    50
    63
    60
    11
    69
    Genova
    86
    82
    34
    68
    29
    Milano
    20
    63
    71
    75
    11
    Napoli
    17
    27
    76
    15
    57
    Palermo
    37
    61
    25
    68
    10
    Roma
    85
    61
    54
    07
    43
    Torino
    51
    53
    01
    44
    41
    Venezia
    77
    22
    85
    32
    69
    Nazionale
    13
    75
    44
    72
    10

Ultimi Messaggi

Alto