METODO AMBO REALE

CAPILLARO DOMENICO

Posted on 29/12/2010, 10:27

CIAOOOOOOOO A TUTTI.. QUELLO CHE VI PRESENTO E' LA SPIEGAZIONE DI UNA TECNICA CHE GIA' MOLTI DI VOI CE L'HANNO IN FORMATO COMPUTERIZZATO REGALATA DA ME.

AMBO REALE
VI SPIEGO L'ITER OPERATIVO:
AD OGNI ESTRAZIONE E IN QUALSIASI RUOTA BISOGNA RILEVARE DUE AMBI DI SOMMA 90 SE ISOTOPI MOLTO MEGLIO ALTRIMENTI ANCHE NON ISOTOPI POSSONO ANDAR BENE, QUINDI ES: SE IO TROVO SU DI UNA RUOTA 57-33, E SU DI UN ALTRA RUOTA 29-61? ANDREMO A QUADRARE QUESTI 4 ELEMENTI FACENDO LA SOTTRAZIONE DEGLI STESSI IN QUESTO MODO:
61-57=04
33-29=04
61-33=28
57-29=28
COME BEN VEDETE LE DUE SOTTRAZIONI CI HANNO DATO DUE ELEMENTI UGUALI I QUALI SARANNO SIA L'AMBATA CHE IL NOSTRO AMBO SECCO, L'AMBATA E' E RIMANE SEMPRE IL NUMERO PIU' PICCOLO IN QEUSTO CASO L'AMBATA E' IL NUMERO 04 E L'AMBO E' 04-28

P.S. TRATTASI DI UN SOLO AMBO SECCO DA PORRE IN GIOCO SULLE RUOTE DI CALCOLO E SU TUTTE E TRATTANDOSI DI UN SOLO AMBO SECCO E' FACILE CHE CI DIA FILO DA TORCERE.

CIAO

gary_62

Posted on 29/12/2010, 16:30

Ciao interessa a qualcumo lo script di questo metodo che mi ha regalato max?
Ciao,
gary

lino63

Posted on 29/12/2010, 17:01

Si grazie gary, postalo pure perchè il metodo è molto interessante
Ciao

gary_62

Posted on 29/12/2010, 17:27

Ecco qui:

CODICE

Sub main()
Dim num(2)
Dim nu1(5),nu2(8),ruota(1)
Dim ruote(3),posta(5),poste(5)

posta(1)=3:poste(2)=2

sm=CInt(InputBox("somma? ","somma",90))
ce=InputBox("da quale estrazione vuoi controllare? ","estrazione",8280)
k=CInt(InputBox ("per quanti colpi?","colpi di gioco",14))
ini=ce
fin=EstrazioneFin
Scrivi "ambo reale di capillaro_d (script by maxma62)",1:Scrivi String(72,"="),1
Scrivi "Resoconto da "&DataEstrazione(ini,1)&" a "& DataEstrazione(fin,1)&" ("&(fin-ce)&" estr.)"
For es=ini To EstrazioneFin
Messaggio "elab. estr. ["&(es)&"] di " & DataEstrazione (es,1)

For r1=1 To 10
For p1=1 To 4
For p2=p1+1 To 5
a=Estratto (es,r1,p1)
b=Estratto (es,r1,p2)
sm1=Fuori90(a+b)
For r2=r1+1 To 12
If r2=11 Then r2=12
For p3=1 To 4
For p4=p3+1 To 5
If p3=p1 And p4=p2 Then 'iso
c=Estratto(es,r2,p3)
d=Estratto(es,r2,p4)
sm2=Fuori90(c+d)
If sm1=sm2 And sm2=sm Then
casi=casi+1:Scrivi String(54,"=")&" script by maxma62",1
Scrivi DataEstrazione(es,1)&" [ "&siglaRuota(r1)& " - "& StringaEstratti(es,r1)&_
" ] [ "&Format2(a)&"."&Format2(b)&" ] in "&(p1)&"^/"&(p2)&"^ pos."
Scrivi DataEstrazione(es,1)&" [ "&siglaRuota(r2)& " - "& StringaEstratti(es,r2)&_
" ] [ "&format2(c)&"."&Format2(d)&" ] in "&(p3)&"^/"&(p4)&"^ pos."
Scrivi String(58,"-")&" caso n° "&(casi)
ruote(1)=r1:ruote(2)=r2:ruota(1)=11:cg=0

num1=Abs((a-d))
num2=Abs((b-c))
num3=Abs((a-c))
num4=Abs((b-d))

nu1(1)=num2:nu1(2)=num3
cg=cg+1
ImpostaGiocata cg,nu1,ruote,posta,k,1
nu2(1)=num2:nu2(2)=num3
cg=cg+1
ImpostaGiocata cg,nu2,ruote,poste,k
cg=cg+1
ImpostaGiocata cg,nu2,ruota,poste,k

Gioca es
End If
End If 'iso
Next:Next:Next
Next:Next:Next:Next
Scrivi String(54,"=")&" script by maxma62",1
ScriviResoconto
Scrivi "ambo reale di capillaro_d (script by maxma62)",1
End Sub

ciao,
gary

CAPILLARO DOMENICO

Posted on 29/12/2010, 19:27

VE LA METTO IO

1° STATISTICA CON LE SOLE AMBATE PRENDENDO SOLO I CASI ISOTOPI E INIZIANDO DAL 200

"Estrazione di Inizio statistica: n° 6879 del 8/1/2000
Estrazione di fine statistica: n° 8318 del 28/12/2010

Previsioni Giocabili: 76
Previsioni Non Giocabili: 0
Previsioni Vincenti: 42 (55,3%)
Previsioni Negative: 34 (44,7%)
Previsioni in gioco: 0

Ambate vincenti: 44 (100%)

Previsioni vincenti al
1° colpo: 3 (7,1%)
2° colpo: 10 (23,8%)
3° colpo: 1 (2,4%)
4° colpo: 5 (11,9%)
5° colpo: 4 (9,5%)
6° colpo: 5 (11,9%)
7° colpo: 3 (7,1%)
8° colpo: 3 (7,1%)
9° colpo: 3 (7,1%)
10° colpo: 5 (11,9%)"

SEMPRE DALLO SETSSO ANNO SOLO AMBATE PRENDENDO ANCHE I CASI NON ISOTOPI
Estrazione di Inizio statistica: n° 6879 del 8/1/2000
Estrazione di fine statistica: n° 8318 del 28/12/2010

Previsioni Giocabili: 777
Previsioni Non Giocabili: 0
Previsioni Vincenti: 499 (64,4%)
Previsioni Negative: 276 (35,6%)
Previsioni in gioco: 2

Ambate vincenti: 512 (100%)

Previsioni vincenti al
1° colpo: 74 (14,8%)
2° colpo: 83 (16,6%)
3° colpo: 73 (14,6%)
4° colpo: 55 (11%)
5° colpo: 43 (8,6%)
6° colpo: 44 (8,8%)
7° colpo: 30 (6%)
8° colpo: 29 (5,8%)
9° colpo: 37 (7,4%)
10° colpo: 31 (6,2%)

ADESSO LE AMBATE E GLI AMBI SEMPRE DAL 2000 E SOLO I CASI ISOTOPI
Estrazione di Inizio statistica: n° 6879 del 8/1/2000
Estrazione di fine statistica: n° 8318 del 28/12/2010

Previsioni Giocabili: 76
Previsioni Non Giocabili: 0
Previsioni Vincenti: 48 (63,2%)
Previsioni Negative: 28 (36,8%)
Previsioni in gioco: 0

Ambate vincenti: 42 (76,4%)
Ambi secchi vincenti: 3 (5,5%)
Ambi secchi vincenti a tutte: 10 (18,2%)

Previsioni vincenti al
1° colpo: 4 (8,3%)
2° colpo: 11 (22,9%)
3° colpo: 1 (2,1%)
4° colpo: 6 (12,5%)
5° colpo: 6 (12,5%)
6° colpo: 5 (10,4%)
7° colpo: 4 (8,3%)
8° colpo: 4 (8,3%)
9° colpo: 3 (6,2%)
10° colpo: 4 (8,3%)

ADESSO I PRENDENDO ANCHE I CASI NON ISOTOPI SEMPRE DAL 2000
Estrazione di Inizio statistica: n° 6879 del 8/1/2000
Estrazione di fine statistica: n° 8318 del 28/12/2010

Previsioni Giocabili: 777
Previsioni Non Giocabili: 0
Previsioni Vincenti: 545 (70,3%)
Previsioni Negative: 230 (29,7%)
Previsioni in gioco: 2

Ambate vincenti: 476 (76,4%)
Ambi secchi vincenti: 27 (4,3%)
Ambi secchi vincenti a tutte: 120 (19,3%)

Previsioni vincenti al
1° colpo: 91 (16,7%)
2° colpo: 91 (16,7%)
3° colpo: 87 (16%)
4° colpo: 59 (10,8%)
5° colpo: 47 (8,6%)
6° colpo: 44 (8,1%)
7° colpo: 31 (5,7%)
8° colpo: 35 (6,4%)
9° colpo: 36 (6,6%)
10° colpo: 24 (4,4%)

CMQ VADA E' SEMPRE UN SOLO AMBO SECCO

Hitman

Posted on 7/1/2011, 21:24

Condizone da stasera ro-naz-tt 7-79

arianna22

Posted on 9/1/2011, 02:09

si può giocare anche se c'è già il 7 79 ?
grazie x la risposta

6 replies since 29/12/2010, 10:27 5980 views