Lottoamicinews :: Leggi Argomento - BARI NAPOLI VENEZIA NAZIONALE


Nuovo Argomento   Rispondi    Indice del Forum -> METODI
BARI NAPOLI VENEZIA NAZIONALE -
  Precedente :: Successivo
mariano.manciocchi MessaggioInviato: Mer 03 Feb, 2021 20:24

BARI NAPOLI VENEZIA NAZIONALE

BARI NAPOLI VENEZIA NAZIONALE
COLPI DI GIOCO MENSILE
4° ESTRATTO TRASFORMAZIONE IN FIGURA
ESEMPIO NAPOLI XXX45X = FIGURA DEL 45= 9
RICAVO PRIMA AMBATA
9 - 1 = 8 AMBATA
RICAVO SECONDA AMBATA
9+1 = 10 AMBATA
RICAVO ABBINAMENTO AMBO
ESEMPIO NAPOLI XXX45X BASTA RIPETERE
IL NUMERO E AGGIUNGERE IL SUO VERTIBILE
OVVERO 45 E 54 SARANNO ABBINAMENTO
DA GIOCARE CON 8 E 10 , QUESTI ULTIMI CAPOGIOCO
GIOCO A TUTTE
SOLO PER AMBO SECCO
Esperto

Esperto



Registrato: 11/02/16 02:38
Messaggi: 692
Residenza: ITALIA

_________________
MANCIOCCHI MARIANO
ProfiloInvia Messaggio PrivatoHomePage Rispondi Citando
DjNomade MessaggioInviato: Dom 07 Feb, 2021 11:26

Codice:
'http://www.lottoamicinews.net/forum/viewtopic.php?t=62887
'07/02/2021

Sub main()
Dim ruote1(10),ruote2(10),ruote3(10)
Dim numeri(5),numeri1(5),numeri2(7)
Dim posta(2),poste(2),postee(5)
posta(1)=1:poste(2)=1

ColoreTesto 2
Scrivi " BARI NAPOLI VENEZIA NAZIONALE  by M.Manciocchi",1
Scrivi
Scrivi "                  List. DjNomade "
Scrivi
ColoreTesto 0
es=InputBox("Quante estrazioni vuoi analizzare?","",156)
im=InputBox("Pronostico dall'estrazione mensile numero? (0=ultima estrazione in archivio)","",1)
cp=InputBox("Per quanti colpi vuoi giocare?"," ",12)

ruote1(1)=1
ruote1(2)=6
ruote1(3)=10
ruote1(4)=12
ruote2(1)=1
ruote2(2)=6
ruote2(3)=10
ruote2(4)=12
ruote2(5)=11
ini=EstrazioneFin-eval(es)
fin=EstrazioneFin
For n=ini To fin
If(((eval(im)=0)And(n=fin))Or((IndiceMensile(n)=eval(im)And(eval(im)>0))Or((IndiceMensile(n+1)=1)And(eval(im)=0))))Then


Messaggio DataEstrazione (n)

a1=Figura(Estratto(n,6,4))
a2=Fuori90(90+a1-1)'ambata
a3=a1+1'ambata
a4=Estratto(n,6,4)'abb
a5=Vert(a4)'abb



Scrivi
Scrivi
 ColoreTesto 9
If im>0 Then Scrivi " ***********************Previsione ricavata alla "&(im)&"°estrazione del mese ************************* ",1
If im=0 Then Scrivi " ***********************Previsione ricavata all'ultima estrazione in archivio ************************* ",1
Scrivi
ColoreTesto 9

numeri(1)=a2
numeri(2)=a3
ImpostaGiocata 1,numeri,ruote1,posta,eval(cp)
numeri(1)=a2
numeri(2)=a4
ImpostaGiocata 2,numeri,ruote2,poste,eval(cp)
numeri(1)=a2
numeri(2)=a5
ImpostaGiocata 3,numeri,ruote2,poste,eval(cp)
numeri(1)=a3
numeri(2)=a4
ImpostaGiocata 4,numeri,ruote2,poste,eval(cp)
numeri(1)=a3
numeri(2)=a5
ImpostaGiocata 5,numeri,ruote2,poste,eval(cp)

Gioca n

End If
Next
Scrivi


ColoreTesto 2
Scrivi "  BARI NAPOLI VENEZIA NAZIONALE  by M.Manciocchi",1
ColoreTesto 0

ScriviResoconto
End Sub
Esperto

Esperto



Registrato: 11/05/14 00:02
Messaggi: 1967

ProfiloInvia Messaggio Privato Rispondi Citando
Mostra prima i Messaggi di:   
Nuovo Argomento   Rispondi    Indice del Forum -> METODI Tutti i fusi orari sono GMT + 1 ora
Pagina 1 di 1

 
Vai a:  
Non puoi inserire nuovi Argomenti
Non puoi rispondere a nessun Argomento
Non puoi modificare i tuoi Messaggi
Non puoi cancellare i tuoi Messaggi
Non puoi votare nei Sondaggi
Non puoi allegare files
Non puoi downloadare gli allegati

Page generation time: 0.0853s (PHP: 100% - SQL: 0%) - SQL queries: 23 - GZIP enabled - Debug on


Jasidogdotcom template v.1.0.4 © jasidog.com
Powered by phpBB 2.0.16 © 2001, 2004 phpBB Group
Traduzione Italiana V-0.16 phpBB.it
Template by Jasidog Template by Jasidog