Roma x sfruttare anche il simbolotto positivo in 10 cicli

[fillotto]

Per Roma 10 cicli di 4 estraz positivo per ambo , undicesimo ciclo rimangono 2 estrazioni
G 0001 Numeri in gioco : 05.16.29.56 su RO per Ambo per estratto 5 e 16
N. [05.16.29.56 ] [RO] [.. .. .. .. ..] C. 1 09990 [123 - 14/10/2021] [34.88.48.06.74]
N. [05.16.29.56 ] [RO] [.. .. .. .. ..] C. 2 09991 [124 - 16/10/2021] [09.54.17.01.19]
Sub Main()
Dim rt(1) 'la ruota dove voglio giocare è una (1) baudo
Dim nr(20) ' i nr in gioco sono max 10
Dim pta(3) ' max tre tipi di puntate
'pta(1) = 1 'la puntata sull'ambata((1) è di 1 euro
pta(2) = 1 'la puntata sul ((2) è di 0.5 euro
start = InputBox("inserire il numero di partenza dei cicli ...",,9949)
dal = start
z = InputBox("inserisci la ruota dove vuoi giocare 1=BA 2=CA ecc ...",,8)

rt(1) = z ' la ruota dove SI GIOCA che è una (1) è "Z" !!!)
k = 4 ' i Kolpi in gioco sono 4
a = InputBox("La PRIMA ruota di ricerca ?",,6)
aa = InputBox("Posizione della PRIMA ruota di ricerca ?",,4)
aaa = InputBox("Digita l' adattaore da abbinare alla PRIMA ruota di ricerca","adattatore 1^ RUOTA ",64) ' x
b = InputBox("La SECONDA ruota di ricerca ?",,7)
bb = InputBox("Posizione della SECONDA ruota di ricerca ?",,2)
bbb = InputBox("Digita l' adattaore da abbinare alla SECONDA ruota di ricerca","adattatore 2^ RUOTA ",3)
c = InputBox("La TERZA ruota di ricerca ?",,12)
cc = InputBox("Posizione della TERZA ruota di ricerca ?",,3)
ccc = InputBox("Digita i 2 adattaori da abbinare alla TERZA ruota di ricerca","adattatore 3^ RUOTA ",30)
d = InputBox("La QUARTA ruota di ricerca ?",,2)
dd = InputBox("Posizione della QUARTA ruota di ricerca ?",,4)
ddd = InputBox("Digita i 2 adattaori da abbinare alla QUARTA ruota di ricerca","adattatore 4^ RUOTA ",85) ' x
'e = InputBox("La QUINTA ruota di ricerca ?",,5)
'ee = InputBox("Posizione della QUINTA ruota di ricerca ?",,5)
'eee = InputBox("Digita i 2 adattaori da abbinare alla QUINTA ruota di ricerca","adattatore 5^ RUOTA ",25)


For n = dal To EstrazioneFin Step 4 'questa riga dice che per fare i calcoli ci avalliamo non degli indici
'mensili ma di un'estrazione ogni 4 a cominciare dalla variabile " dal " ...+ 4.....+ 4 ecc fino alla fine
Scrivi "Ai 5 num MADRE prelevati dall'estr generatrice " & " " & n & " : " & Estratto(n,a,aa) & " " & Estratto(n,b,bb) & " " & Estratto(n,c,cc) & " " & Estratto(n,d,dd) & " " & Estratto(n,e,ee) & " aggiungeremo gli adattatori sottonotati, quindi"
Scrivi " al " & aa & "°" & " di " & SiglaRuota(a) & "( " & Estratto(n,a,aa) & ")" & " aggiungeremo l' adattatore " & " " & aaa & " ottenendo " & Fuori90(Estratto(n,a,aa) + aaa)
Scrivi " al " & bb & "°" & " di " & SiglaRuota(b) & "( " & Estratto(n,b,bb) & ")" & " aggiungeremo l' adattatore " & " " & bbb & " ottenendo " & Fuori90(Estratto(n,b,bb) + bbb)
Scrivi " al " & cc & "°" & " di " & SiglaRuota(c) & "( " & Estratto(n,c,cc) & ")" & " aggiungeremo l' adattatore " & " " & ccc & " ottenendo " & Fuori90(Estratto(n,c,cc) + ccc)
Scrivi " al " & dd & "°" & " di " & SiglaRuota(d) & "( " & Estratto(n,d,dd) & ")" & " aggiungeremo l' adattatore " & " " & ddd & " ottenendo " & Fuori90(Estratto(n,d,dd) + ddd)
'Scrivi " al " & ee & "°" & " di " & SiglaRuota(e) & "( " & Estratto(n,e,ee) & ")" & " aggiungeremo l' adattatore " & " " & eee & " ottenendo " & Fuori90(Estratto(n,e,ee) + eee)
ng = 0
nr(1) = Fuori90(Estratto(n,a,aa) + aaa)
nr(2) = Fuori90(Estratto(n,b,bb) + bbb)
nr(3) = Fuori90(Estratto(n,c,cc) + ccc)
nr(4) = Fuori90(Estratto(n,d,dd) + ddd)
'nr(5) = Fuori90(Estratto(n,e,ee) + eee)



EliminaRipetuti nr
Call ImpostaGiocata(1,nr,rt,pta,k,3) ' imposto la giocata e la stoppo all'uscita del terno = 3
Gioca n,,,1

Next

ScriviResoconto

End Sub

 

[raimea]

ciao

seguo con interesse

 

[fillotto]

Sempre per sfruttare anche il simbolotto proviamo questi 8 num su VE con cicli di 4 estrazioni da 10 cicli ha preso 13 ambi 3 terni e una quaterna siamo all'undicesimo ciclo sono passate 2 estrazioni e rimangono 2 estrazioni per giocare questi 8 num

40

74

27

53

78

10

34

33

come riterrete più opportuno-
OCCHIO èun sommativo , questo è quello nei cicli precedenti