DISTANZA SPIA 18 A VENEZIA

[pigi]

Salve a tutti
vorrei proporvi questo metodo sulla distanza spia 18 sulla ruota di Venezia,
il giorno 03/11/14 il primo estratto era il 29 il quinto era il 47 quindi distanza 18,
la statistica è molto buona speriamo bene .
Saluti e in bocca al lupo

pigi


Data di inizio ricerca 09/08/2014 (Estr. n.8884)
Data di fine ricerca 03/11/2014 (Estr. n.8920)

Distanza matematica Spia di Ricerca: 18
Tipo di Ricerca: Uscita della distanza spia su singola ruota
Posizioni di Ricerca: 1^-2^-3^-4^-5^
Estrazioni di ricerca: Tutte
Ruota di Ricerca: Ve
Ruota di Gioco: Ve
Ambate/Capogiochi: 70-42
Abbinamenti per ambo: 4 23 31 57

Previsioni Giocabili: 14
Previsioni Vincenti: 13 (100%)
Previsioni Negative: 0 (0%)
Previsioni in gioco: 1

Ambate vincenti: 23 (60,53%)
Ambi secchi vincenti: 15 (39,47%)


Statistica Colpi:
Previsioni vincenti al colpo n.
1: 4 (30,77%)
2: 2 (15,38%)
3: 1 (7,69%)
4: 0 (0%)
5: 1 (7,69%)
6: 4 (30,77%)
7: 1 (7,69%)
8: 0 (0%)
9: 0 (0%)

 

[pigi]

Buongiorno,
spero fare cosa gradita, allego il listato del metodo.
Controllare sempre,salvo errori.

Sub Main()
    Scrivi " DISTANZA SPIA 18 A VENEZIA di pigi ",1 ' - http://forum.lottoced.com/f8/distanza-spia-18-venezia-116762/ -
    Dim nu1(02),nu2(03),nu3(03),nu4(03),nu5(03),ruota(01),posta1(01),posta2(02)
    posta1(01) = 1
    posta2(02) = 1
    casi = 0
    klp = 9
    ini = 8884
    fin = EstrazioneFin
    For es = ini To fin
        Messaggio es
        AvanzamentoElab Ini,fin,es
        r1 = VE_
        For p1 = 01 To 04
            a = Estratto(es,r1,p1)
            For p2 = p1 + 01 To 05
                b = Estratto(es,r1,p2)
                If Distanza(a,b) = 18 Then
                    casi = casi + 1
                    Scrivi String(95,"=") & " Caso n°" & Format2(casi),1
                    Scrivi GetInfoEstrazione(es) & " - " & SiglaRuota(r1) & " - " & StringaEstratti(es,r1) & " - Estratta Ambo " & Format2(a) & " - " & Format2(b),1
                    Scrivi
                    ruota(01) = r1
                    nu1(01) = 70
                    nu1(02) = 42
                    ImpostaGiocata 1,nu1,ruota,posta1,klp,1
                    nu2(01) = 70
                    nu2(02) = 42
                    nu2(03) = 04
                    ImpostaGiocata 2,nu2,ruota,posta2,klp,2,,1
                    nu3(01) = 70
                    nu3(02) = 42
                    nu3(03) = 23
                    ImpostaGiocata 3,nu3,ruota,posta2,klp,2,,1
                    nu4(01) = 70
                    nu4(02) = 42
                    nu4(03) = 31
                    ImpostaGiocata 4,nu4,ruota,posta2,klp,2,,1
                    nu5(01) = 70
                    nu5(02) = 42
                    nu5(03) = 57
                    ImpostaGiocata 5,nu5,ruota,posta2,klp,2,,1
                    Gioca es,True,,True
                End If
            Next
        Next
    Next
    ScriviResoconto
End Sub

Ciao disaronno
grazie, gentilissimo per il listato andrà a favore di chi ha SPAZIOMETRIA o altri programmi.
Saluti pigi

 

[pigi]

Salve a tutti
con un po di ritardo sui colpi previsti sabato 06/12 è uscita l'ambata 70 e l'ambo secco 70-4
io vista la statistica pregressa ho continuato a giocarla poco ma ho seguitato e sono stato premiato.
saluti e alla prossima.
pigi