Formula 81-81 isotopo

[Marco-elle]

Quando in una estrazione sortisce il nr°81 in forma isotopa,si mettono in gioco 4 ambi e 1 quartina su BA-CA

formula 81-81 isotopo
ambi:
40-13
40-14
40-34
40-84

quartina:
10-20-31-68
[IMG2=JSON]{"data-align":"none","data-size":"full","src":"http:\/\/i66.tinypic.com\/2hgsthi.png"}[/IMG2]

Sub Main()
   Dim ruote(11)
   Dim n1(1)
   Dim n2(2)
   Dim n3(2)
   Dim n4(2)
   Dim n5(2)
   Dim n6(6)
   Dim posta(1)
   Dim poste(10)
   posta(1) = 1
   poste(2) = 1
   ce = InputBox(" Quante estrazioni vuoi controllare? ","estrazioni",1000)
   k = InputBox("per quanti colpi?","colpi di gioco",15)
   ini = EstrazioneFin - ce
   fin = EstrazioneFin
   casi = 0
   ok = 0
   For es = ini To fin
      Messaggio "elab. estr. [" &(es) & "] di " & DataEstrazione(es,1)
      Call AvanzamentoElab(Ini,fin,es)
      For r1 = 1 To 9
         For r2 = r1 + 1 To 10
            If r2 = 11 Then
               r2 = 12
            End If
            For p1 = 1 To 5
               For p2 = 1 To 5
                  a = Estratto(es,r1,p1)
                  b = Estratto(es,r2,p2)
                  If p1 = p2 Then
                     '---------------------------------------------
                     If a = 81 And b = 81 Then
                        ok = 1
                        '-----------------------------------------------
                        If ok = 1 Then
                           casi = casi + 1
                           Scrivi String(100,"°") & " Caso n°" & casi,1
                           ColoreTesto 1
                           Scrivi DataEstrazione(es,1) & " [ " & SiglaRuota(r1) & " - " & StringaEstratti(es,r1) & _
                           " ] * [ " & Format2(a) & " ]" & "  *   Figura : " & " [ " & Figura(a) & " ] ",1
                           Scrivi DataEstrazione(es,1) & " [ " & SiglaRuota(r2) & " - " & StringaEstratti(es,r2) & _
                           " ] * [ " & Format2(b) & " ]" & "  *   Figura : " & " [ " & Figura(b) & " ] ",1
                           ruote(1) = 1
                           ruote(2) = 2
                           n1(1) = 40
                           n2(1) = 40
                           n2(2) = 13
                           n3(1) = 40
                           n3(2) = 14
                           n4(1) = 40
                           n4(2) = 34
                           n5(1) = 40
                           n5(2) = 84
                           n6(1) = 10
                           n6(2) = 20
                           n6(3) = 31
                           n6(4) = 68
                           'n6(5) = 67
                           ColoreTesto 0
                           ImpostaGiocata 1,n1,ruote,posta,k,1
                           EliminaRipetuti n2
                           ImpostaGiocata 2,n2,ruote,poste,k,2
                           ImpostaGiocata 3,n3,ruote,poste,k,2
                           ImpostaGiocata 4,n4,ruote,poste,k,2
                           ImpostaGiocata 5,n5,ruote,poste,k,2
                           ImpostaGiocata 6,n6,ruote,poste,k,2
                           Gioca es,1
                        End If
                     End If
                  End If
               Next
            Next
         Next
      Next
   Next
   Scrivi
   Scrivi String(100,"*")
   ColoreTesto 2
   Scrivi" casi trovati : " & casi,1
   ColoreTesto 0
   Scrivi String(100," * ")
   ColoreTesto 0
   ScriviResoconto
End Sub

 

[montecarlo7]

Buona sera IMS ,esiste una statistica?Ti ringrazio per un eventuale risposta, Felice.

 

[Marco-elle]

Buona sera IMS ,esiste una statistica?Ti ringrazio per un eventuale risposta, Felice.

Le volià!

 

[montecarlo7]

Grazie mille Ims !!

 

[alisia]

11*colpo BA 20-68 ambo in quartina h Complimenti

 

[Marco-elle]

11*colpo BA 20-68 ambo in quartina h Complimenti

Grazie Alisia per essertene accorta

 

[Alien.]

acc......ed io che non ci credevo......mi hai rivoltato la frittata.............

 

[Arciere1]

SCUSA MA NON VEDEVO L'ISO-----TOPO CHE E NA NUOVA RAZZA DE TOPO?? AHAHAHAHAHHAHAA CIAO CARISSIMO

 

[Marco-elle]

SCUSA MA NON VEDEVO L'ISO-----TOPO CHE E NA NUOVA RAZZA DE TOPO?? AHAHAHAHAHHAHAA CIAO CARISSIMO

Estrazione del 27/2 FI-TO 81 isotopo in 3° posizione

 

[Marco-elle]

acc......ed io che non ci credevo......mi hai rivoltato la frittata.............

Ti riferisci alla statistica applicata?

 

[Alien.]

Ma no te lo avevo detto ai numeri fissi..................ma con i numeri isotopi ...che non sono molto frequenti è possibile...è sotto ,sotto vi è uno studio molto sopraffino,,,,,complimenti mi hai fatto cambiare idea e il che non è da poco,,,,,,
Mi hai fatto capire che i tuoi "metodi" li esponi anche in altre "luoghi" sempre con lms?

 

[Marco-elle]

Ma no te lo avevo detto ai numeri fissi..................ma con i numeri isotopi ...che non sono molto frequenti è possibile...è sotto ,sotto vi è uno studio molto sopraffino,,,,,complimenti mi hai fatto cambiare idea e il che non è da poco,,,,,,
Mi hai fatto capire che i tuoi "metodi" li esponi anche in altre "luoghi" sempre con lms?

Marco-elle

 

[Alien.]

è non mi registra puoi vedere il metodo Rafs81

 

[Marco-elle]

è non mi registra puoi vedere il metodo Rafs81

Cioè,preaticamente....non ho capito una cippa!

 

[Alien.]

Allora la cippa è che su quel forum non riesco ad registrarmi ero già registrato alcuni anni fa.

 

[Marco-elle]

Allora la cippa è che su quel forum non riesco ad registrarmi ero già registrato alcuni anni fa.

Ma va la!.....anche le nonne 90enni riescono a iscriversi qui e in altri lidi,fatti una e-mail nuova e registrati!

 

[Alien.]

è guarda che io ho 276 anni mica sono umano

ok .tutto a posto era il pc impallato quando tengo aperte troppe finestre poi passa troppa aria

 

[margot]

Salve, un informazione, ci sono altri metodi ? da seguire?

 

[Marco-elle]

Salve, un informazione, ci sono altri metodi ? da seguire?

Nella sezione delle previsioni ho inserito una nuova previsione derivata da
questa tipologia di statistica

 

[Alien.]

DjNomade chi l'ha visto in giro ?