OTTIMO METODO PER AMBO SECCO+AGGIORNAMENTO

Roby · 5 Settembre 2010

QUALCHE SETTIMANA FA AVEVO GIA' POSTATO QUESTO METODO E VE LO RIPROPONGO ANCORA PERCHE' SECONDO ME NELLA SUA SEMPLICITA' E' UN OTTIMO METODO!!-LA DIFFICOLTA' PIU' GRANDE E' QUELLA DI RIUSCIRE A TROVARE LA "CONDIZIONE" PERCHE' SENZA UN ADEGUATO PROGRAMMA IL COMPITO E' ARDUO!!

AGGIORNAMENTO-->INSERITO IL 14-SETT-2010

ES.IL 7-9-2010 SU MI+NA ESCE L'AMBO RIPETUTO ISOTOPO 11-2

NEL CASO SI RINTRACCIASSE UN AMBO IL CUI NUMERO PIU' GRANDE E' UN GEMELLO ES.11 FATE IL VERTIBILE OTTENENDO IL 19 ABBINANDOCI COME DA METODO,I NUMERI 1-2-3 QUINDI DOVRETE FARE LA STESSA COSA CON IL NUMERO PIU' PICCOLO IN QUESTO CASO IL 2 DIVENTA 20 E GLI ABBINAMENTI SARANNO I NUMERI 10-11-12

LA PREVISIONE SARA' COSI' COMPOSTA

19--->1-2-3
20--->10-11-12

UN OTTIMO ESPEDIENTE PER RIDURRE AL MAX LA PREVISIONE E' DI GIOCARE SOLO GLI AMBI COMPOSTI DA 1 NUMERO PARI E UN NUMERO DISPARI IN QUESTO CASO LA PREVISIONE DA 6 AMBI SI RIDUCE A SOLI 2 AMBI SECCHI,E CIOE'

19-2
20-11

AL 1° COLPO E' SORTITO L'AMBO-SECCO 20-11-->SARA' UN CASO??-VI GARANTISCO DI NO!!-PROVARE X CREDERE!!
---------------------------------------------------------------------
---------------------------------------------------------------------
METODO 2 AMBI A "TUTTE"

RINTRACCIARE SU DUE RUOTE UN AMBO RIPETUTO ISOTOPO,FARE POI IL VERTIBILE DEL NUMERO PIU' GRANDE CHE SARA' IL CAPOGIOCO POI DELL'ALTRO NUMERO DELL'AMBO RINTRACCIATO SI CONSIDERA IL NUMERO PRECEDENTE,LO STESSO E IL SUCCESSIVO!!

ESEMPIO=[VEDI ANCHE LE 2 IMMAGINI]

AMBO RINTRACCIATO
52-12

-IL VERTIBILE DEL 52 E' IL 25 CHE SARA' IL CAPOGIOCO!!

-PER GLI ACCOPPIAMENTI OTTERREMO IL NUM.11 E IL NUM.13 CHE SONO APPUNTO I DUE NUMERI PIU' VICINI AL 12!!-IN SOSTANZA (COME DETTO IN PRECEDENZA) BISOGNA CONSIDERARE IL NUMERO PRECEDENTE,LO STESSO E IL SUCCESSIVO!!

QUINDI LA PREVISIONE E'=

25-11 <------SORTITO AL 3° COLPO
25-12
25-13

NOTA IMPORTANTE

NELLA PREVISIONE L'AMBO 25-12 ESSENDO ANCHE L'AMBO CHE ABBIAMO RINTRACCIATO PER ELABORARE I TRE AMBI DA GIOCARE,LO POSSIAMO ELIMINARE ALLO SCOPO DI RIDURRE AL MASSIMO LA PREVISIONE DA 3 A 2 AMBI ANCHE SE A VOLTE POTRA' SORTIRE NUOVAMENTE MA LE PROBABILITA' CHE CIO' ACCADA SONO MOLTO MOLTO BASSE!!

AMBO-RIPETUTO-ISOTOPO

ESITO-PREVISIONE

Zagor · 5 Settembre 2010

Ciao Rob , ottimo metodo , grazie per averlo pubblicato.

Buona serata.

Mauro

"V'é una marea nelle vicende umane Che presa al culmine conduce alla fortuna. Se mancata , tutto il viaggio della vita si arena nei bassifondi e nelle miserie."
Shakespeare dal GIULIO CESARE

oruam · 5 Settembre 2010

sempre se la procedura è ok, divertitevi con
spaziometria

Codice:

Sub main() 
Dim nu(5),nn(5),n1(5) ,n2(5) 
Dim ru(1),rt(3) 
Dim post(5),pt(5),ptt(5) 

pt(1)=1 : pt(2)=1 : pt(3)=1 
ru(1)=11 
clp=9 ' colpi di gioco 

ep=CInt (InputBox ("Quante Estrazioni pregresse conteggiamo max ?","ESTR. INDIETRO",200)) 
ca=0 
ini=EstrazioneFin -ep
fin=EstrazioneFin 
For es=ini To fin 
Messaggio ("Sto Elaborando.."& es) 

   For r=1 To 10
      
      For p=1 To 4 
         For pp=p+1 To 5 
            n1(1)=Estratto (es,r,p) 
            n1(2)=Estratto (es,r,pp) 
           a=Massimo( n1(1), n1(2)) 
           b=Minimo( n1(1), n1(2))

               For r1=r+1 To 12 
                  If r1=11 Then r1=12 
                   n2(1)=Estratto (es,r1,p) 
                   n2(2)=Estratto (es,r1,pp) 
                  If (n1(1)= n2(1) And n1(2)=n2(2)) Or (n1(2)= n2(1) And n1(1)=n2(2))  Then  
ca=ca+1    
 

rt(1)=r : rt(2)=r1  : rt(3)=11
nu(1)=Vert(a)
nu(2)=b+1
nu(3)=b-1
ImpostaGiocata 1,nu,rt,pt,clp

ColoreTesto 1 : Scrivi String (80,"=") : ColoreTesto 0 
Scrivi DataEstrazione (es)&"  "& SiglaRuota (r)&"  "& StringaEstratti (es,r)&"  ["& n1(1)&" . "& n1(2)&"]" 
Scrivi DataEstrazione (es)&"  "& SiglaRuota (r1)&"  "& StringaEstratti (es,r1)&"  ["& n2(1)&" . "& n2(2)&"]" 
Scrivi "Trovato Ambo Ripetuto nell'estrazione numero "& es 
Scrivi "Rilevamento ISOTOPO...e ORDINATO " 
Scrivi "SCHEMA   " & n1(1)&" . "& n1(2)
Scrivi "SCHEMA   " & nu(1) &" . "&nu(2)&" . " & nu(3)


Scrivi String (35,"_") 
Scrivi "-----------------Giochiamo"
Gioca es 

                  End If                    
               Next 
            Next              
         Next 
      Next 
   Next              

Scrivi : Scrivi "Casi  Trovati Compatibili  "& CInt (ca),1 
ScriviResoconto 
End Sub

oruam · 5 Settembre 2010

ho nnotato di aver saltato un numero della giocata
nu(4)=b
ma vedo io una stranezza nel tuo metodo,nelle immagini oltre all'ambo su genova(terno) ,ci sono sono altri ambi
ma il metodo continua??

oruam · 5 Settembre 2010

quote:Originally posted by oruam

ho nnotato di aver saltato un numero della giocata
nu(4)=b
ma vedo io una stranezza nel tuo metodo,nelle immagini oltre all'ambo su genova(terno) ,ci sono sono altri ambi
ma il metodo continua??

per caso si gioca la decina dell'ambata

imported_n/a · 5 Settembre 2010

quote:Originally posted by oruam

sempre se la procedura è ok, divertitevi con
spaziometria

Codice:

Sub main() 
Dim nu(5),nn(5),n1(5) ,n2(5) 
Dim ru(1),rt(3) 
Dim post(5),pt(5),ptt(5) 

pt(1)=1 : pt(2)=1 : pt(3)=1 
ru(1)=11 
clp=9 ' colpi di gioco 

ep=CInt (InputBox ("Quante Estrazioni pregresse conteggiamo max ?","ESTR. INDIETRO",200)) 
ca=0 
ini=EstrazioneFin -ep
fin=EstrazioneFin 
For es=ini To fin 
Messaggio ("Sto Elaborando.."& es) 

   For r=1 To 10
      
      For p=1 To 4 
         For pp=p+1 To 5 
            n1(1)=Estratto (es,r,p) 
            n1(2)=Estratto (es,r,pp) 
           a=Massimo( n1(1), n1(2)) 
           b=Minimo( n1(1), n1(2))

               For r1=r+1 To 12 
                  If r1=11 Then r1=12 
                   n2(1)=Estratto (es,r1,p) 
                   n2(2)=Estratto (es,r1,pp) 
                  If (n1(1)= n2(1) And n1(2)=n2(2)) Or (n1(2)= n2(1) And n1(1)=n2(2))  Then  
ca=ca+1    
 

rt(1)=r : rt(2)=r1  : rt(3)=11
nu(1)=Vert(a)
nu(2)=b+1
nu(3)=b-1
ImpostaGiocata 1,nu,rt,pt,clp

ColoreTesto 1 : Scrivi String (80,"=") : ColoreTesto 0 
Scrivi DataEstrazione (es)&"  "& SiglaRuota (r)&"  "& StringaEstratti (es,r)&"  ["& n1(1)&" . "& n1(2)&"]" 
Scrivi DataEstrazione (es)&"  "& SiglaRuota (r1)&"  "& StringaEstratti (es,r1)&"  ["& n2(1)&" . "& n2(2)&"]" 
Scrivi "Trovato Ambo Ripetuto nell'estrazione numero "& es 
Scrivi "Rilevamento ISOTOPO...e ORDINATO " 
Scrivi "SCHEMA   " & n1(1)&" . "& n1(2)
Scrivi "SCHEMA   " & nu(1) &" . "?(2)&" . " & nu(3)


Scrivi String (35,"_") 
Scrivi "-----------------Giochiamo"
Gioca es 

                  End If                    
               Next 
            Next              
         Next 
      Next 
   Next              

Scrivi : Scrivi "Casi  Trovati Compatibili  "& CInt (ca),1 
ScriviResoconto 
End Sub

NON GIRA SU SPAZIOMETRIA MI BLOCCA QUI:

Scrivi "SCHEMA " & nu(1) &" . "?(2)&" . " & nu(3)

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

imported_n/a · 5 Settembre 2010

quote:Originally posted by Erasmus

quote:Originally posted by oruam

sempre se la procedura è ok, divertitevi con
spaziometria

Codice:

Sub main() 
Dim nu(5),nn(5),n1(5) ,n2(5) 
Dim ru(1),rt(3) 
Dim post(5),pt(5),ptt(5) 

pt(1)=1 : pt(2)=1 : pt(3)=1 
ru(1)=11 
clp=9 ' colpi di gioco 

ep=CInt (InputBox ("Quante Estrazioni pregresse conteggiamo max ?","ESTR. INDIETRO",200)) 
ca=0 
ini=EstrazioneFin -ep
fin=EstrazioneFin 
For es=ini To fin 
Messaggio ("Sto Elaborando.."& es) 

   For r=1 To 10
      
      For p=1 To 4 
         For pp=p+1 To 5 
            n1(1)=Estratto (es,r,p) 
            n1(2)=Estratto (es,r,pp) 
           a=Massimo( n1(1), n1(2)) 
           b=Minimo( n1(1), n1(2))

               For r1=r+1 To 12 
                  If r1=11 Then r1=12 
                   n2(1)=Estratto (es,r1,p) 
                   n2(2)=Estratto (es,r1,pp) 
                  If (n1(1)= n2(1) And n1(2)=n2(2)) Or (n1(2)= n2(1) And n1(1)=n2(2))  Then  
ca=ca+1    
 

rt(1)=r : rt(2)=r1  : rt(3)=11
nu(1)=Vert(a)
nu(2)=b+1
nu(3)=b-1
ImpostaGiocata 1,nu,rt,pt,clp

ColoreTesto 1 : Scrivi String (80,"=") : ColoreTesto 0 
Scrivi DataEstrazione (es)&"  "& SiglaRuota (r)&"  "& StringaEstratti (es,r)&"  ["& n1(1)&" . "& n1(2)&"]" 
Scrivi DataEstrazione (es)&"  "& SiglaRuota (r1)&"  "& StringaEstratti (es,r1)&"  ["& n2(1)&" . "& n2(2)&"]" 
Scrivi "Trovato Ambo Ripetuto nell'estrazione numero "& es 
Scrivi "Rilevamento ISOTOPO...e ORDINATO " 
Scrivi "SCHEMA   " & n1(1)&" . "& n1(2)
Scrivi "SCHEMA   " & nu(1) &" . "?(2)&" . " & nu(3)


Scrivi String (35,"_") 
Scrivi "-----------------Giochiamo"
Gioca es 

                  End If                    
               Next 
            Next              
         Next 
      Next 
   Next              

Scrivi : Scrivi "Casi  Trovati Compatibili  "& CInt (ca),1 
ScriviResoconto 
End Sub

NON GIRA SU SPAZIOMETRIA MI BLOCCA QUI:

Scrivi "SCHEMA " & nu(1) &" . "?(2)&" . " & nu(3)

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

Probabilmente è: Scrivi "SCHEMA " & nu(1) &" . " & nu(2) &" . " & nu(3)

645-554-463-372-281

rob · 5 Settembre 2010

SCUSATE,PERCHE' SIETE VENUTI QUI' SU QUESTO MIO POST PER PARLARE DI COSE CHE NON C'ENTRANO NIENTE CON IL METODO CHE IO HO PROPOSTO??-NON POTETE APRIRVENE UNO PER FATTI VOSTRI PER PARLARE DI SPAZIOMETRIA??-GRAZIE ROB

imported_n/a · 5 Settembre 2010

Ok scusami rob

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

stella cadente · 6 Settembre 2010

Grazie Rob x avere postato questo metodo...

STELLA CADENTE

oruam · 6 Settembre 2010

quote:Originally posted by rob

SCUSATE,PERCHE' SIETE VENUTI QUI' SU QUESTO MIO POST PER PARLARE DI COSE CHE NON C'ENTRANO NIENTE CON IL METODO CHE IO HO PROPOSTO??-NON POTETE APRIRVENE UNO PER FATTI VOSTRI PER PARLARE DI SPAZIOMETRIA??-GRAZIE ROB

non tutti possiedono il programma postato,ho
pensato di fare uno script .punto.....,poi se il tutto ti ha dato fastidio,dimmi come fare che cancello i post , o dillo a lottoced
li cancella lui ,direttamente.

olivers · 12 Settembre 2010

Ciao Rob, c'è un ambo ripetuto isotopo 11-2 nell ' estrazione di martedi 7 settembre. I miei calcoli sono giusti ? Grassie
19-1
19-2
19-3

rob · 14 Settembre 2010

CIAO OLIVERS,LEGGITI QUESTO AGGIORNAMENTO DEL METODO IN QUESTIONE!!CIAO ROB

AGGIORNAMENTO-->INSERITO IL 14-SETT-2010

ES.IL 7-9-2010 SU MI+NA ESCE L'AMBO RIPETUTO ISOTOPO 11-2

NEL CASO SI RINTRACCIASSE UN AMBO IL CUI NUMERO PIU' GRANDE E' UN GEMELLO ES.11 FATE IL VERTIBILE OTTENENDO IL 19 ABBINANDOCI COME DA METODO,I NUMERI 1-2-3 QUINDI DOVRETE FARE LA STESSA COSA CON IL NUMERO PIU' PICCOLO IN QUESTO CASO IL 2 DIVENTA 20 E GLI ABBINAMENTI SARANNO I NUMERI 10-11-12

LA PREVISIONE SARA' COSI' COMPOSTA

19--->1-2-3
20--->10-11-12

UN OTTIMO ESPEDIENTE PER RIDURRE AL MAX LA PREVISIONE E' DI GIOCARE SOLO GLI AMBI COMPOSTI DA 1 NUMERO PARI E UN NUMERO DISPARI IN QUESTO CASO LA PREVISIONE DA 6 AMBI SI RIDUCE A SOLI 2 AMBI SECCHI,E CIOE'

19-2
20-11

AL 1° COLPO E' SORTITO L'AMBO-SECCO 20-11-->SARA' UN CASO??-VI GARANTISCO DI NO!!-PROVARE X CREDERE!!

imported_n/a · 14 Settembre 2010

CIAO ROB,
PERDONAMI MA MI SONO PERSA UN ATTIMO,PERCHE' VENGONO A POSTARE ROBA CHE SOVRASTA IL METODO.
DUNQUE RICAPITOLANDO LA GIOCATA CONTINUA CON 19-2 AMBO SECCO SU CHE RUOTA?
THANKS
ROMINA

CREDERE PER VIVERE,NON VIVERE PER CREDERE.

rob · 14 Settembre 2010

CIAO ROMY,FORSE NON HAI LETTO BENE IL METODO CHE RICORDO E' PER "TUTTE" LE RUOTE!!-AGGIUNGO POI CHE NON HO DETTO CHE BISOGNA CONTINUARE CON L'AMBO 19-2 ANZI GENERALMENTE,QUANDO UNA PREVISIONE SI SFALDA POI SI DEVE INTERROMPERE IL GIOCO,ANCHE SE I NUMERI A VOLTE FANNO BRUTTI SCHERZI PERCHE' POSSONO USCIRE ALTRE VOLTE!!!-QUINDI IO TI CONSIGLIO DI INTERROMPERE IL GIOCO POI FAI COME MEGLIO CREDI!!-ROB

imported_n/a · 14 Settembre 2010

GRAZIE ROB.
ORA CERCO DI RILEGGERMI CON CALMA IL METODO...IL FATTO E' CHE QUANDO SI INTROMETTONO IN UN FORM MI DECONCENTRO E PERDO IL FILO LOGICO....CERCAVO DI CAPIRE COSA C'ENTRAVANO I POST SUCCESSIVI ALLA TUA SPIEGAZIONE...E SONO ANDATA IN CRISI ISTERICA

CMQ ORA MI ESTRAPOLO IL TUO BEL METODINO E ME LO STUDIACCHIO!!!
THANKS THANKS
GOOD NIGHT

CREDERE PER VIVERE,NON VIVERE PER CREDERE.

Evelyn2009 · 14 Settembre 2010

E di, senza un programma non e' affatto semplice.

Cerca

Cerca

OTTIMO METODO PER AMBO SECCO+AGGIORNAMENTO

Roby

Guest

Zagor

Advanced Member >PLATINUM<

oruam

Super Member >PLATINUM<

oruam

Super Member >PLATINUM<

oruam

Super Member >PLATINUM<

imported_n/a

Advanced Premium Member

imported_n/a

Advanced Premium Member

rob

Advanced Member >PLATINUM<

imported_n/a

Advanced Premium Member

stella cadente

Advanced Member >PLATINUM<

oruam

Super Member >PLATINUM<

olivers

Member

rob

Advanced Member >PLATINUM<

imported_n/a

Advanced Premium Member

rob

Advanced Member >PLATINUM<

imported_n/a

Advanced Premium Member

Evelyn2009

Super member

Ultima estrazione Lotto

Ultimi Messaggi