Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
quote:Originally posted by keeper
caro prof. claudio8 io non sono all'altezza di poterti dare un'ambata, devo studiare ancora tanto e poi le mie di sicuro non sortirebbero nemmeno se il bambino distinguesse quelle calde da quelle fredde.
ColoreTesto 2
co2 = 20
lis2 = 2
Scrivi "__________________________________________________________________________________________________________"
Scrivi " VERIFICA SE ambo GIA' USCITo NEI PRECEDENTI CONCORSI "
ctz = 0
For ccc = ini - co2 To ini per 20 concorsi, da Ini-20(co2) a Ini
n(1) = EstrattoFT(ccc,1) 'estrattoFT( concorso, posiz)
n(2) = EstrattoFT(ccc,2)'estrattoFT( concorso, posiz)
n(3) = EstrattoFT(ccc,3)'estrattoFT( concorso, posiz)
n(4) = EstrattoFT(ccc,4)'estrattoFT( concorso, posiz)
n(5) = EstrattoFT(ccc,5)'estrattoFT( concorso, posiz)
n(6) = EstrattoFT(ccc,6)'estrattoFT( concorso, posiz)
snconc = GetInfoEstrazioneFT(ccc)'Torna una stringa composta da idEstrazione - IndiceAnnuale - Data relativi ad una data estrazione
puntia = 0
puntib = 0
puntic = 0
puntid = 0
For q = 1 To 6
If Format2(n(q)) = Format2(tna(1)) Then puntia = puntia + 1 'se (n(q)) = tna(1) Then punti a = puntia+1 ' sembra un contatore di punti
If Format2(n(q)) = Format2(tna(2)) Then puntia = puntia + 1
If Format2(n(q)) = Format2(tnb(1)) Then puntib = puntib + 1
If Format2(n(q)) = Format2(tnb(2)) Then puntib = puntib + 1
If Format2(n(q)) = Format2(tnc(1)) Then puntic = puntic + 1
If Format2(n(q)) = Format2(tnc(2)) Then puntic = puntic + 1
If Format2(n(q)) = Format2(tnd(1)) Then puntid = puntid + 1
If Format2(n(q)) = Format2(tnd(2)) Then puntid = puntid + 1
Next
If puntia = 2 Or puntib = 2 Or puntic = 2 Or puntid = 2 Then ' qualsiasi di questi puntix = 2 scrivi ecc.ecc.
Scrivi " -------> Ambo già uscito nel concorso " & snconc & "...Estratti......" & Format2(EstrattoFT(ccc,1)) & " " & Format2(EstrattoFT(ccc,2)) & " " & Format2(EstrattoFT(ccc,3)) & " " & Format2(EstrattoFT(ccc,4)) & " " & Format2(EstrattoFT(ccc,5)) & " " & Format2(EstrattoFT(ccc,6))
ctz = ctz + 1
End If
Next
If ctz = 0 Then Scrivi " -------> NESSUN Ambo E' USCITO NEI PRECEDENTI CONCORSI "
ColoreTesto 0
''''-----------------------------------------------------------------------------------
Bene allora i pazzi siete 2quote:Originally posted by keeper
si claudio8 è un pezzo di script che mi ha fatto rubino ma mi serve come esmpio per capire la funzione in quanto in altri script per il 10elotto che sempre rubino ha realizzato e per evitare di soffocarlo di richieste volevo provare ad applicarla con un mio amico teo che conosce qualcosina in più di me si vbscript
quote:Originally posted by keeper
bravo senti non ho capito dove sono stato nominato[}][}][}][}][}][}][}][}][}][}][}]
quote:Originally posted by keeper
BUONGIORNO claudio8 mi ero perso a legge un articolo di cronaca locale
Inviato - 08/06/2011 : 12:42:24
--------------------------------------------------------------------------------
CHI MI AMA MI SEGUA
era lo slogan di una vecchia pubblicità di jeans, ed ancora una volta voglio provocare la vs. curiosità.
Ho pulito di alcune inutili righe lo script sopra postato e ve lo ripropongo completo di tutte le potenzialità che il nostro Luigi ha incrementato in spaziometria per darci la possibilità di esaminare
i numeri e le loro particolarità nascoste.
Ho bisogno di un aiuto (keeper in primis che studia, studia e studia come stupire tutti noi) per scoprire tra le righe quali sono i possibili fissi per il futuro caso.
quote:Originally posted by antonino
Buonasera, avrei bisogno di un vostro aiuto per realizzare il sotto elencato script, da inserire in spaziometria.
In una serie di estrazioni: da 1 a 8000, per es.
in una ruota o a tutte
cercare un ambo uguale
trovato questo fare l'elenco delle estrazioni in cui questo appare.
dopo rilevare nelle 3 o 5 estrazioni precedenti l'uscita dell'ambo, uno,due o tre numeri indici che possono ESSERE COSTITUITI DA: UN NUMERETTO DA 1 A 9; DA UNO ZERATO; O DA UN GEMELLO.
Realizzata la tabella vedere quali sono i numeri più frequenti
usciti con l'ambo cercato.
E' possibile realizzare quanto sopra?
Ho seguito con interesse le videate di Claudio8, ma non sono riuscito a interpretarle per poter realizzare uno scrpt coerente.
Vi ringrazio ,
nino
nino
17.02.1878 BA 02.64.23.18.87 1_2
24.03.1878 BA 11.03.71.57.27 1_2
07.04.1878 BA 73.59.04.09.18 1_2
14.04.1878 BA 46.06.14.01.39 1_2
19.05.1878 BA 34.19.56.02.61 1_2
02.06.1878 BA 48.32.60.27.07 1_2
30.06.1878 BA 67.68.05.25.51 1_2
07.07.1878 BA 30.76.84.85.06 1_2
14.07.1878 BA 29.16.79.54.03 1_2
09.04.2011 BA 04.05.49.73.62 1_2
12.04.2011 BA 06.74.01.09.03 1_2
14.04.2011 BA 11.01.79.61.67 1_2
21.04.2011 BA 46.27.26.13.06 1_2
23.04.2011 BA 05.59.17.34.41 1_2
26.04.2011 BA 79.72.05.30.73 1_2
28.04.2011 BA 03.40.48.30.77 1_2
Analisi dal 10.02.1878 al 30.04.2011
Numeri SPIA 1 2 . ... 9 Su Ruota Unica ( sono considerati tutti i numeretti)
Bari
N° casi: 3315
Frequenti nei 10 colpi successivi
Nu.Ruota |Ambi a Ruota|Ambi Tutte| Nu. Tutte
N° Fr | Ambo Freq | Ambo Fr | N°. Fr
48...2075 | 66-78...161 | 44-81...862 | 81...17837
12...2072 | 47-74...152 | 74-89...855 | 89...17583
66...2039 | 60-78...149 | 20-89...849 | 83...17491
60...2021 | 44-69...148 | 19-26...845 | 30...17416
22...2014 | 66-69...145 | 52-81...844 | 85...17409
78...1982 | 42-74...144 | 43-88...837 | 19...17375
05...1982 | 03-47...143 | 27-84...831 | 12...17372
88...1982 | 12-61...142 | 18-19...830 | 20...17339
37...1970 | 18-70...141 | 37-42...829 | 84...17325
30...1970 | 04-16...140 | 38-64...827 | 86...17316
*****************************************************************
SELEZIONE RUOTA di Bari
Nu.Ruota | Ambi a Ruota
N° Fr | Ambo Freq
48...2075 | 66-78...161
12...2072 | 47-74...152
66...2039 | 60-78...149
60...2021 | 44-69...148
22...2014 | 66-69...145
78...1982 | 42-74...144
05...1982 | 03-47...143
88...1982 | 12-61...142
37...1970 | 18-70...141
30...1970 | 04-16...140
*****************************************************************