| Ricevo una email da Scaravetti e la posto per condivisione.
mas
LA MATRICE 6 X 15 VIII (di Adriano Scaravetti)
(titolo dato da mas)
Caro XXX (mas),
vedo che stai bene e che ti dai da fare per capire l'arcano.
Sono contento che ti interessano i Quadrati e le cose che sono annesse.
Vediamo di imbastire una premessa importante.
Io non sono l'inventore dei quadrati ma della Teoria dei Quadrati che e' tutto quello che e' possibile fare con i quadrati (e molto altro ancora).
Altri hanno utilizzato i quadrati, Fabi Gianfranco, Ciro Vitale, Antonio Longo ...
... Antonio Longo e' stato un genio e ha mascherato i quadrati in forma molto velata: vedi la Diagonale Infallibile, per esempio.
Oggi ti faccio un regalo: uno script.
Nella genialita' di Antonio Longo, il quadrato e' stato inserito anche in quel capolavoro della Figura Pentagona.
Forse Egli ha subito una mia influenza sui quadrati (io gli inviavo tutte le mie scoperte del tempo) ed in questa Figura Pentagona egli pone la metodologia in quel ambiente di cabala antica di cui Egli era fortemente convinto.
La Figura Pentagona la trovi in rete ed e' molto semplice.
La genialita' di Nino (Antonio Longo) viene espressa nella Figura Pentagona con grande maestria e permette di avere delle previsioni a Ruota secca ed anche a Tutte (inclusa la Nazionale) volendo.
Egli, con la Figura Pentagona, si svincola da quel vincolo imposto non solo dal Fabarri ma, successivamente, anche da vari studiosi e si pone in una ruota sola.
Ecco lo script della Figura Pentagona (come lo vedo io e sulla base degli scritti di A. Longo):
Scrivi "La Figura Pentagona di A. Longo-Semplice",1
Scrivi "========================================= by ScaraLab"
Scrivi
Sub main()
Dim ru(1), rrtt(2), n(5)
Dim poste(2), posta(1)
Dim xx(6), zz(1), yy1(2),yy2(2),yy3(2),yy4(2)
ini = EstrazioneFin - 20
fin = EstrazioneFin - 13
eg = 12 'estrazioni di gioco
rrtt(1)=11 : rrtt(2)=12 : poste(1)=0 : poste(2)=1 : posta(1)=1
For est = ini To fin
AvanzamentoElab ini, fin, est
For rt= 1 To 11
ru(1)=rt
If rt=11 Then rt=12 : ru(1)=12
For p=1 To 5
n(p)= Estratto(est,rt,p)
Next
'calcolo delle incognite
x=Fuori90(n(5)+n(3)) : y=Fuori90(n(2)+n(4))
xi=Fuori90(x+n(1)) : yi=Fuori90(y+n(1))
xx(1)=Fuori90(x+y) : xx(2)=Fuori90(xi+yi)
xx(3)=Fuori90(x+xi) : xx(4)=Fuori90(y+yi)
xx(5)=Fuori90(x+yi) : xx(6)=Fuori90(y+xi)
'calcolo della ambata:
If xx(3)=xx(4) Then zz(1)=xx(3)
If xx(5)=xx(6) Then zz(1)=xx(5)
EliminaRipetuti xx
Scrivi "["+Format2(est)&"] "&DataEstrazione(est)&" Ruota di "&_
NomeRuota(rt)&" estratti: "&Stringaestratti(est,rt)
Scrivi "Elementi del Trapezio Isoscele: "&format2(x)&"."&_
format2(y)&"."&format2(xi)&"."&format2(yi)
Scrivi
ImpostaGiocata 1, zz, ru, posta, eg', 1
ImpostaGiocata 2, xx, ru, poste, eg', 2
ImpostaGiocata 3, xx, rrtt, poste, eg', 2
Gioca est
ColoreTesto 0
Scrivi String(72,"*")
Next
Next
ScriviResoconto
End Sub
Questo procedimento rispecchia la parte iniziale della Figura Pentagona e poi io ci metto la giocata anche a Tutte con la cinquina: cose di oggi con l'era delle Venus.
Dentro c'e' il quadrato e la quadratura.
Ora, Tu non devi prendere le previsioni cosi' come arrivano ma devi utilizzare la tua conoscenza che la Statistica ti ha fornito ed adattare il tutto; scoprirai molte cose interessanti e proporrai delle previsioni molto affidabili.
Fammi sapere i tuoi commenti che ci lavoriamo su' alle condizioni di secondo livello.
Passa una buona domenica.
Scaravetti Adriano, Italia 19 Aprile 2015
|
