Caro Giorgio ciao ti rispondo seguendo le tue domande....
Perchè importanti questi 5 estratti...Ricordiamo gli estratti del 17 gennaio 1987 a
bari
--55--88--80--34--11--
Come detto da questi numeri,meglio serie di numeri...non vengono prese in considerazione nulla....perckè x il gioco che dobbiamo fare noi ,e cioè AMBO dobbiamo prendere in considerazione le cadenze medio-alte che mancano in estrazione ed usarne quattro.
Il criterio ne scaturisce appunto da quelle che mancano e nel caso della ns. estrazione mancano le cadenze:
cad.--9--7--6--3--2--1--e di queste se ne usano come detto quattro e le più alte quindi si usano
cad--9--7--6--3--ed da qui x abbinarli al capogioco-chi (terzina simmetrica )estrapolata dall'ultimo estratto il numero --11--
Dalla tabella dove si ricavano le terzine simmetriche abbinate al gioco dell'ambo,il numero 11 non compare come tutti i numeri gemelli tra l'altro....ed alcuni altri numeri.....tra cui il 47---90-- e alquantaltri pochi.(terzine giocabili 73 anche se ripetibili )
Mi sembra ,riguardando le tue domande ,di aver risposto comunque alle prime due,tranne al fatto cioè allora da dove prendo la terzina se il numero --11--(gemello) non ricava alcuna terzina senonche' è GEMELLO il numero --11--e di conseguenza non ricava terzina ?
Or bene...
Per abbinare al gioco in ambo ...resta l'estrazione di data in considerazione del 17 gennaio 1987---
L abbinamento x la terzina ,quale capogioco la prendiamo dalla estrazione precedente che deve ricavare una terzina simmetrica valida...giocabile...altrimenti ...ancora si prende la precedente ancora...finchè appunto ne troviamo una valida come detto...
Nel nostro caso valido da tabella....aspetta....la penultima estrazione di dicembre 1986....dava estratto in 5° estratto il numero 80....e la tabella riporta la terzina simmetrica valida giocabile in abbinamento
--8--38--68-----
Ovvio che come tutti o quasi i metodi le giocate le prendono dall ultima estrazione del mese....qui data l operatività...visto il gemello non giocabile ,mi ripeto si parte dalla penultima...poi....piccole regolette....non presente la terzina in estrazione o altro...
Mi sembra di essere stato esauriente....semmai chiedi-te...
Ma non chiedete la tabella ...
poi x quanto riguarda gli ambi delle cadenze essendo 4 cadenze da 9-10 numeri con qualche accorgimento si diminuiscono.....
.... senza far con carta e penna....
Riprendo la tua descrizione ed introduco un paio di considerazioni.
1° Non ti potrò fare uno script completo perchè la descrizione non è completa.
2° Fine-mese è una complicazione difficilmente risolvibile.
Quindi si andrà per approssimazione anche se si sarà parecchio precisi.
3° Non possiamo usare la "funzione" IsUltimaDelMese scritta da Luigi,
perchè essa implicitamente richiede 3 estrazioni settimanali,
mentre andando, così indietro, esse .... potrebbero non essere presenti.
.... Quindi terminate tutte ste premesse ... Occorre individuare l' ultima estrazione (del mese).
IndiceMensile è l' istruzione che useremo.
Ho già scritto che "nell' ambiente" Spaziometria è noto il numero (e l' "id") di Estrazioni in archivio.
Proviamo dunque il semplicissimo script che avevo già proposto (ripartendo da zero)
Codice:
Sub Main
Scrivi [B]EstrazioniArchivio[/B]
End Sub
Eseguito, adesso 09/02/2013 ... scrive 8649.
8649 sono le estrazioni in Archivio,
L'ultima "
Fin" è lo mnemonico, scelto, che la identifica / contiene / ricorda.
Si inzia con
Fin = EstrazioniArchivio
e, sapendo che, in un anno, ci sono 52 settiman, ed ogni settimana 3 estrazioni ...
si suppone che in un anno ci siano circa 52 * 3 = 156 estrazioni.
Calcoleremo il valore
Ini in cui memorizzare ... ove iniziare l'anno
Assumendo ... di voler trovare Le ultime estrazioni dell' ultimo anno ... gli "Id" saranno
Fin abbiamo detto essere l'ultima,
Ini = Fin - 156 .
Fatto questo ...
INI ...contiene il numero di estrazione con cui inizia l'ultimo Anno-estrazionale.
Es ... è lo mnemonico o
indice per spazzolare i numeri di estrazione ...
Ed il Ciclo
For-Next per scorrere TUTTE le 156 estrazioni
DataEstrazione per visualizzare la data delle estrazioni.
MA non devono essere tutte,
SOLO LE ULTIME DEL MESE ... è la parte difficile del problema!
Quella che richiede approsimazione.
L'ultima di un mese è quella prima ... della prima del mese successivo.
Quindi SE IndiceMensile (Es) = 1 .... l'estrazione precedente (Es-1) è nel mese precedente.
IF IndiceMensile (Es) = 1 Then allora Scrivi ...
naturalmente ... DataEstrazione (Es-1)
Next
End Sub
Per completare il For-Next e la Sub(Routine)
Codice:
Sub Main
Fin = EstrazioniArchivio
Ini = Fin - 156
For Es = Ini To Fin 'Ultimo anno
If IndiceMensile (Es) = 1 Then Scrivi DataEstrazione(Es-1)
Next
End Sub
Eseguito con Spaziometria (oggi) restituisce :
Codice:
28.02.2012
31.03.2012
28.04.2012
31.05.2012
30.06.2012
31.07.2012
30.08.2012
29.09.2012
30.10.2012
29.11.2012
29.12.2012
31.01.2013
Una dozzina di date di Estrazioni alla fine di ogni mese ... nell'ultimo anno.
Siamo a cavallo!
