annuncio

Comprimi
Ancora nessun annuncio.

Formula 81-81 isotopo

Comprimi
X
  • Filtro
  • Ora
  • Visualizza
Elimina tutto
nuovi messaggi

  • Formula 81-81 isotopo

    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



    codice:
    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
    Ultima modifica di lms; 21-03-2019, 16:58.
    My name is Marco.....Marco-elle Lotto

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

    Commenta


    • #3
      Originariamente inviato da montecarlo7 Visualizza il messaggio
      Buona sera IMS ,esiste una statistica?Ti ringrazio per un eventuale risposta, Felice.
      Le volià!


      My name is Marco.....Marco-elle Lotto

      Commenta


      • #4
        Grazie mille Ims !!

        Commenta


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

          Commenta


          • #6
            Originariamente inviato da alisia Visualizza il messaggio
            11*colpo BA 20-68 ambo in quartina h Complimenti
            Grazie Alisia per essertene accorta

            My name is Marco.....Marco-elle Lotto

            Commenta


            • #7
              acc......ed io che non ci credevo......mi hai rivoltato la frittata.............
              che la luce sia con te.

              Commenta


              • #8
                SCUSA MA NON VEDEVO L'ISO-----TOPO CHE E NA NUOVA RAZZA DE TOPO?? AHAHAHAHAHHAHAA CIAO CARISSIMO
                arciere1
                Non discutere mai con un idiota: ti trascina al suo livello e ti batte con l'esperienza -

                Commenta


                • #9
                  Originariamente inviato da Arciere1 Visualizza il messaggio
                  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

                  Clicca sull'immagine per ingrandirla. 

Nome:   Cattura_1.png 
Visite: 666 
Dimensione: 89.0 KB 
ID: 2163678


                  My name is Marco.....Marco-elle Lotto

                  Commenta


                  • #10
                    Originariamente inviato da Alien. Visualizza il messaggio
                    acc......ed io che non ci credevo......mi hai rivoltato la frittata.............
                    Ti riferisci alla statistica applicata?
                    My name is Marco.....Marco-elle Lotto

                    Commenta


                    • #11
                      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?

                      Ultima modifica di Alien.; 29-03-2019, 21:50.
                      che la luce sia con te.

                      Commenta


                      • #12
                        Originariamente inviato da Alien. Visualizza il messaggio
                        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

                        My name is Marco.....Marco-elle Lotto

                        Commenta


                        • #13
                          è non mi registra puoi vedere il metodo Rafs81


                          [IMG]https://uploads.*********.it/avatars/CvS2_Ken.gif[/IMG]
                          che la luce sia con te.

                          Commenta


                          • #14
                            Originariamente inviato da Alien. Visualizza il messaggio
                            è non mi registra puoi vedere il metodo Rafs81


                            [IMG]https://uploads.*********.it/avatars/CvS2_Ken.gif[/IMG]
                            Cioè,preaticamente....non ho capito una cippa!

                            My name is Marco.....Marco-elle Lotto

                            Commenta


                            • #15
                              Allora la cippa è che su quel forum non riesco ad registrarmi ero già registrato alcuni anni fa.
                              che la luce sia con te.

                              Commenta

                              Unconfigured Ad Widget

                              Comprimi

                              Ultima estrazione del lotto

                              Comprimi

                              Estrazione del lotto
                              sabato 15 giugno 2019
                              Bari
                              01
                              29
                              36
                              02
                              47
                              Cagliari
                              52
                              43
                              71
                              80
                              40
                              Firenze
                              74
                              59
                              56
                              49
                              79
                              Genova
                              69
                              19
                              56
                              34
                              32
                              Milano
                              59
                              47
                              55
                              53
                              38
                              Napoli
                              56
                              70
                              49
                              01
                              40
                              Palermo
                              11
                              36
                              55
                              38
                              61
                              Roma
                              23
                              64
                              84
                              30
                              42
                              Torino
                              14
                              51
                              83
                              82
                              79
                              Venezia
                              24
                              20
                              52
                              56
                              05
                              Nazionale
                              78
                              20
                              84
                              52
                              13
                              Sto operando...
                              X