serve script.

[Alien.]

Ciao facile,facile.

IL CAPOGIOCO 47

DA LUGLIO 2020 DA UNA BUONA PERCENTUALE DI VINCITA 1A MENSILE...CAPOGIOCO FISSO....47 X AMBO......1NAP + 4VE +65 X AMBO......2GE + 3NAZ +83 IL GIOCO E SU TUTTE LE RUOTE O A PREFRENZA VALIDITA MENSILE

forum.lottoced.com

Grazie.

 

[franca46]

spero giusto

Scrivi
Scrivi "  1° del mese  tt by guerrino74",1
Scrivi
Sub main()

Dim ruota(10)
Dim n1(10)
Dim posta(2)
casi=0
ruota(1)=11
posta(2)=1
k=12

ini=9500
fin=EstrazioneFin

For es=ini To fin

If IndiceMensile (es)=1 Then

a= 47
 
b=Fuori90 (Estratto (es,6,1)+Estratto (es,10,4)+65)' abbinamento   

c=Fuori90 (Estratto (es,4,2)+Estratto (es,12,3)+83)' abbinamento


n1(1)=a
n1(2)=b
ImpostaGiocata 1,n1,ruota,posta,k
n1(1)=a
n1(2)=c
ImpostaGiocata 2,n1,ruota,posta,k
Gioca es
casi=casi+1

End If

Next
Scrivi

ScriviResoconto
Scrivi
Scrivi
End Sub

 

[Alien.]

Ottimo, grazie sembra che in questo anno vada bene sempre con il lato B
(non metto gif animate altrimenti........ )