Ciao serve script

[fillotto]

mentre c'è da correggere il fatto che alla richiesta del sommatorio non si può mettere ne 1 ne 90 in quanto
sia il 1° che il 2° ambo da giocare verrebbero uguali chiedo agli esperti come si fa in modo che nel rendiconto vengano fuori solo le giocate positive , in questo modo,con un ciclo for controllerei (proverei) più numeri in una volta solo
ecco lo script modificato con un po di colore e la correzione diui sopra insomma pure l'occhio vuole la sua
parte

Sub Main
'Lo script trova 2 sommativi migliori per la formazione di 2 ambi da giocare su tutte
'il 1° num del 1° ambo così come il 1° num del 2° ambo sono identici e cambiano ogni
' ultima del mese
   Dim Nu(2),aN(2),Ru(1),T,V,Posta(2)
   Posta(2) = 1
   Ini = EstrazioneFin - 200
   fin = EstrazioneFin
   som = InputBox("cambia e trova il sommativo migliore "," scegliere da 2 a 89 ",27) '
  'For som = 68 To 70
   z = InputBox("scegli la ruota  1 per BA ...10 per VE  "," scegli ruota ",1) '

   p = InputBox("scegli la posizione ",,1) '

   For es = Ini To fin
      If IsUltimaDelMese(es) Then
         k = k + 1
         a = Estratto(es,z,1) '        
         b = Fuori90(a + som - p)
         Nu(1) = a
         Nu(2) = b
         aN(1) = a
         aN(2) = Fuori90(b + som)
         Ru(1) = 11
         ImpostaGiocata 1,Nu,Ru,Posta,13,2
         ImpostaGiocata 2,aN,Ru,Posta,13,2
         co = co + 1
         Scrivi"                                     ...........MESE.............." & co,1,,,1,3
         Scrivi " il Primo numero dei due ambi individuato nella " & p & "^" & " posiz. " & "dell'ultima estrazione del mese della ruota di " & SiglaRuota(z) & " è (in questo caso):" & a,1,,,1,3
         Scrivi " il sommativo scelto per il 2° numero del 1° ambo è = al primo +  " & som - 1 & " (" & som & " -1 " & ")",1,,,1,3
         Scrivi " il sommativo Generato per il 2° numero del 2° ambo è = al primo +  " & som*2 - 1 & " (" & som*2 & " -1 " & ") " & " eventualmente se>90 operarà Fuori90",1,,,1,3


         Gioca es,,,1
      End If
   Next
   ScriviResoconto
   'Next
End Sub

 

[Alien.]

replica :


Ciao Mike,filotto joe ecc..puoi provare
Poi con i 6 numeri 1ba+5ve 5ba+1ve ecc.!!!
sono curioso !!

e grazie di tutto.

 

[joe]

Per me è no.

Ci sono 2 strade:

La prima consiste nel demandare allo script ... di cercare "il migliore",

La seconda nel cercare questo migliore in funzione di una serie di scelte personali.

Quindi ognuna delle 2 opzioni è di per sé valida

e dipende da quello che è il desiderio dell' utilizzatore-finale.

Cioè di cosa uno "vuole fare" con le proprie ricerche.

Tuttavia i numeri sono infiniti come sono infinite le possibili scelte di combinazioni.

Mentre il tempo disponibile al programma, al programmatore, al computer ...

... è compreso tra una estrazione e l'altra ed è sicuramente finito e limitato.

La scelta di "un incrocio" ... tra "mille incroci" implica la limitatezza di una scelta,

ponderata ed imponderabile al contempo, giustificabile ed ingiustificabile.

Qualificabile ed inqualificabile perché limitata al cospetto dell' infinito altro.

Dunque per quanto poco possa valere la mia opinione è che

in un tempo finito (piccolo) non si possono compiere ricerche infinite.

Pertanto, di mio posso, solo aggiungere

gli auguri di una Buona Pasqua.

 

[Alien.]

Ciao,Joe , capisco il lavoro che dietro ad uno script, ma la ricerca era per tre ambi ed una quartina su tutte e vedere cosa succedeva,Ok grazie.

 

[joe]

Ciao,Joe , capisco il lavoro che dietro ad uno script, ma la ricerca era per tre ambi ed una quartina su tutte e vedere cosa succedeva,Ok grazie.

[IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/www.zobbio.com\/wp-content\/uploads\/buona-pasqua-2019-Vacanze-a-Marrakech.jpg"}[/IMG2][IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2]​[IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2][IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2]​​[IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2][IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2]​[IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2][IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/forum.lottoced.com\/image\/gif;base64,R0lGODlhAQABAPABAP\/\/\/wAAACH5BAEKAAAALAAAAAABAAEAAAICRAEAOw=="}[/IMG2]​​​

Si ... ma ... pare un tantino esagerato!

Se tu (o chiunque altro) avesse un metodo che assicura anche solo un estratto-secco entro 10 colpi,

ci sarebbe da diventare tutti miliardari (in Euro).

In un tempo ragionevolmente breve e senza nessun rischio.

Cioè con meno di 10 euro ... si diventerebbe, velocemente, miliardari.

Per questo caso, ti assicuro, mi impegnerei, non poco.

Mentre, per perdere quattrini, in tutti i modi possibili ed immaginabili ...

... non c'è di certo bisogno dell' aiuto di chicchessia.

Sono più che sufficienti "gli inventori" dei mille-metodi, con le loro mille proposte,

e chi le prova tutte.

 

[Alien.]

SBAGLIA LA SOMMA DEGLI AMBI VINTI METTE 16 INVECE SONO 9 E DA LE VINCITE IN POSITIVO SI PUO' CORREGGERE,GRAZIE.

 

[Alien.]

QUI DA MENO AMBI SU TUTTE MA INVECE SONO DI PIU'-POSSIBILE CORREGGERE,GRAZIE.