Lotto - La passione per il gioco del lotto e superenalotto sul forum di NonSoloLotto.com

Il gioco del lotto su NonSoloLotto.com

Nome utente:

Password:

Salva la password

Hai dimenticato la password?

Tutti i forum

Lotto e altri giochi a pronostico

Script da metodi

Richiesta script

Nuova discussione

Partecipa alla discussione

Versione stampabile

Autore

Discussione

joe6230
Utente Nuovo

1 invio

Spedito - 01 dicembre 2024 : 10:01:22

Buongiorno a tutti.

Vorrei chiedere a qualche programmatore uno script di questo metodo suggeritomi.

Nel quadro estrazionale verificare i numeri pari e dispari nelle posizioni 1-3 , 2-4 , 1-5:
quindi se in tali posizioni alternate si verificano due numeri pari o due numeri dispari la prima condizione è stabilita, altrimenti tutto si ferma.
Una volta trovati due numeri pari o dispari altra condizione da verificare è la distanza tra i due numeri che deve essere maggiore di 8 sennò tutto si ferma.
trovati i due numeri pari o dispari e la distanza 8 si procede alla somma dei due numeri col fuori 90 se necessario,
tale somma va divisa per 2 e il numero a metà va sommato al primo numero a sinistra della condizione:
il risultato di questa somma deve trovarsi nel mezzo in altra ruota......
altra condizione da rispettare è.... "nel quadro estrazionale deve essere presente una sola volta la somma dei due numeri pari o dispari" sennò tutto si ferma.
Rispettate tutte queste condizioni il numero sortito nel mezzo e la somma dei due numeri formano l'ambo principale poi per il terno si sommano entrambi
Estrazione nº 188 del 23/11/2024
Bari 33 80 86 52 25
Cagliari 67 57 59 5 80
Firenze 31 32 58 88 77
Genova 40 39 23 36 81
Milano 28 58 45 25 38
Napoli 20 82 23 44 57
Palermo 76 56 88 62 31
Roma 12 81 59 74 72
Torino 46 53 72 45 23
Venezia 4 12 42 64 20
Nazionale 63 44 78 10 55
In questo quadro Palermo 1° e 3° sono pari;
distanza 12; 12/2=6;
76+6=82 che troviamo nel mezzo a napoli in 2°....quindi a formare una piramide;
76+88=74 tale somma orizzontale è presente una sola volta nel quadro estrazionale; quindi la previsione è 82-74 ambo principale, per terno la somma 82-74-66
Grazie spero di essere stato chiaro.

franca46
Amministratore

Italy
24613 invii

Spedito - 01 dicembre 2024 : 10:52:22

Ciao joe , benvenuto nel forum,
Io non sono molto ferrata a mettere queste condizioni in un listato,
Vediamo se djnomade può aiutarci.

Franca46
Cerca di essere sempre te stesso,
così un giorno potrai dire di essere stato l'unico

DjNomade
Utente Molto Appassionato

338 invii

Spedito - 02 dicembre 2024 : 23:35:17

Se riesci a controllarlo, mi è venuto cosi
Ciauz



'https://forum.lottoced.com/threads/richiesta-script.2220591/
'http://www.nonsololotto.com/topic.asp?TOPIC_ID=46370
ColoreTesto 2 :Scrivi String(17,32)&" Metodo Numeri Pari o Dispari nelle posizioni 1-3 , 2-4 , 1-5  by phil79",1
Scrivi
Scrivi Date &_
Chr (32) &Chr (108)& Chr (105)& Chr (115)&Chr (116)&Chr (46)& Chr (32) & Chr (98)& Chr (121)& Chr (32) & Chr (68) & Chr (106)& Chr (78) & Chr (111) & Chr ( 109) & Chr (97)& Chr ( 100) & Chr (101),1
Scrivi String (2,Chr(11)): ColoreTesto 1
 ColoreTesto 0


Sub main()
Dim nu1(10),nu2(10),nu3(3),nu4(10),am(2),am3(3),am4(5)
Dim ruote(10),ruota(10),ruotee(2),numeri(1)
Dim poste(5),posta(5),poste2(5),poste3(5)
posta(1)=1
poste(2)=1
poste2(2)=1
poste2(3)=1
poste3(2)=1.20
poste3(3)=1.40
poste3(4)=.40
z=CInt(InputBox ("Quante estrazione controllare?","estrazioni",120))
k=CInt(InputBox ("Quanti colpi di Gioco?","colpi di Gioco",13))
fin=EstrazioneFin
ini=fin-z
For es=ini To fin
Messaggio DataEstrazione (es,1)&" Metodo Numeri Pari o Dispari nelle posizioni 1-3 , 2-4 , 1-5  by phil79   "


For r1=1 To 12
If r1=11 Then r1=12
For p1=1 To 4
For p2=p1+1 To 5

n1=Estratto(es,r1,p1)
n2=Estratto(es,r1,p2)
If (p1=1 And p2=3)Or (p1=2 And p2=4)Or (p1=1 And p2=5)Then
If ((Pari(n1)=True And  Pari(n2)=True) Or (Pari(n1)=False And  Pari(n2)=False))And Distanza(n1,n2)>8 Then

nn=Fuori90(n1+n2)'76+88 74 
numeri(1)=nn
ruotee(1)=11
ruotee(2)=12
Freq=SerieFreq(es,es,numeri,ruotee,1)
If Freq=1 Then
nn1=(n1+n2)/2  '76+88  164/2 82
nn2=Fuori90(nn1+nn)'82+74  66

For r2=1 To 12
If r2=11 Then r2=12
For p3=1 To 5
If r1<>r2 Then
n3=Estratto(es,r2,p3)
If (n3=nn1) And Distanza(p3,p1)=Distanza(p3,p2) Then


casi=casi+1:Scrivi String(75,"="),1
Scrivi String(65,"-")&" caso n° "&(casi),1
Scrivi
Scrivi DataEstrazione(es,1)&" < "&siglaRuota(r1)& " "& StringaEstratti(es,r1)& "    "&Format2(n1)& "    "&Format2(n2),1
Scrivi DataEstrazione(es,1)&" < "&siglaRuota(r2)& " "& StringaEstratti(es,r2)& "       "&Format2(n3),1


Scrivi
ruota(1)=r1:ruota(2)=r2:ruota(3)=11
ruote(1)=r1:ruote(2)=r2:co=0


am3(1)=nn
am3(2)=nn1

ImpostaGiocata 1,am3,ruote,poste,k 

am4(1)=nn
am4(2)=nn1
am4(3)=nn2

ImpostaGiocata 2,am4,ruota,poste2,k 
Gioca es
End If
End If
Next
Next
End If
End If
End If
Next
Next
Next
Next
ScriviResoconto
End Sub

franca46
Amministratore

Italy
24613 invii

Spedito - 03 dicembre 2024 : 06:33:11

Buongiorno dj , grazie del tuo tempo,
Joe sicuramente ci dirà se va bene.

Franca46
Cerca di essere sempre te stesso,
così un giorno potrai dire di essere stato l'unico

Discussione

Nuova discussione

Partecipa alla discussione

Versione stampabile

Vai a:

Il gioco del lotto su NonSoloLotto.com

Image Forums 2001

Snitz Forums 2000