Risultati della ricerca

Ciao a Tutti, anche io ho il programma vl7 licenziato, e se può esservi di aiuto , il programma è stato aggiornato alla versione 7.6.11 per gestire gli indici mensile > 14 , con la versione precedente si avevano problemi.

Ciao Black, ancora non ho ben definito il concetto di come si possono comportare i numeri se fosse una ruota sola con 4 estrazioni per giorno. Per questo scopo già le ruote o la ruota ha un nome esempio VenusNord. Ora mi soffermo sui tuoi esempi e sul mio script il mio script già non esegue...

Ciao Black, non ho capito bene il tutto , ma sai che i listati mi stuzzicano un pochetto. A tal proposito in merito all'ultimo tuo scritto circa il listato dei ritardi estrazionali Venus, prova a vedere poi tutto si può implementare con gli script di spaziometria. Sub Main 'array come...

Per fare sperimentazioni con il tuo numero in esame e la tua ruota di gioco, e ogni volta che ti serve, ecco un semplice script per test ABBINAMENTI. Sub Main Dim abb,k,Nu(2),Ru(1) n = InputBox("Numero in Esame",,59) r = InputBox("Ruota in esame",,5) Ru(1) = r Ini = EstrazioneFin...

Sub Main Dim Nu(2),Ru(2),T,abb1,abb2,abb3,abb4 Ini = EstrazioneFin-160 fin = EstrazioneFin r1 = 1 r2 = 10 p1 = 2 p2 = 5 colpo = 10 T = Array(T,"INFO ES","Ruote","Calcolo Estratti","Numero + Vertibile","Verifica Ambate","Colpo","Abb N1 R1","Abb2 N2 R1", _ "Abb N1...

Batter per gli abbinamenti è possibile farli ma ahimè c'è bisogno di tante righe di codice e fare interagire il tutto. Francamente visto che sono situazioni e studi personali non ho molta voglia di cimentarmi con il costrutto. Tuttavia ti posto lo script che elenca per ogni numero e vertibile...

Ciao Paolo, a volte nel correggere si fanno errori banali. Evidentemente nell'editare le colonne dei numeri hai messo un carattere diverso che poi non splitti nel codice split a(90) = "90-01-02" '-------------------------------------------------------------------- Dim n,nu For n = 01 To...

i parametri sono questi basta modificarli a piacere ritroso = 160 r1 = 1 ' ruota 1 = Ba p1 = 5 r2 = 2 ' ruota 2 = Ca p2 = 5 colpi = 10 per L'input Box puoi benissimo crealo esempio r1 = InputBox("Quale RUOTA 1",,1) r2 = InputBox("Quale RUOTA 2",,2) p1 = InputBox("Quale Posizione...

eccolo, solo che l'indice a tua scelta lo devi attivare tra il primo o indice a scelta e ultima con codice 'If IndiceMensile(es) = 1 Then ' attiva 1 del mese If IsUltimaDelMese(es) Then ' attiva ultima del mese Sub Main Dim Po(2),Ru(2),Posta(1),Nu(2) Posta(1) = 1...

ok vedi Sub Main Dim Po(2),Ru(2),Posta(1),Nu(2) Posta(1) = 1 '---------------------- ritroso = 20 r1 = 1 p1 = 5 r2 = 2 p2 = 5 colpi = 10 '---------------------- Ru(1) = r1 : Ru(2) = r2 Po(1) = p1 : Po(2) = p2 Scrivi "Ruote Analizzate " & StringaRuote(Ru)...

Batter è sempre meglio spiegarsi con specifiche ben definite cosi da non generare confusione negli aiuti. Comunque se ho capito meglio vedi lo script. Ps. senza input box ( quello lo potete fare da voi) Sub Main Dim Po(2),Ru(2) ritroso = 10 r1 = 1 p1 = 5 r2 = 2 p2 = 5 Ru(1) = r1 : Ru(2) = r2...

Ciao batter, visto che hai citato il fuori90 presumo stai parlando di vbscript. In questo caso si può fare la sottrazione con un if then if b5 > c5 then a = b5-c5 if b5 < c5 then a c5-b5 oppure usare il codice Differenza(b5,c5) vedi codice Sub Main b5 = 5 c5 = 75 If b5 > c5 Then a =...

Fatto. Le vincite sono conteggiate. Strano che non sono rimaste settate dopo i successivi aggiornamenti.

Ok Luigi, infatti non sono settati. Appena possibile li setto. Grazie.

x luigi approfitto anche per un saluto. Ho scaricato tutte le ultime versione e il Resoconto (ScriviReseconto) non conteggia nessuna vincita malgrado le vincite vengono elencate in Gioca Es. semplice script Sub Main Dim Nu(1),Ru(1),posta(1) posta(1) = 1 Ini = EstrazioneFin - 20 fin...

Zetrix non posso aiutarti sono in vacanze e con pochi mezzi . Spero che altri possono aiutarti . .

Anche su spaziomeria c'è questa utility. poi però andrebbe modificato anche l'importo premi che mi risulta leggermente cambiato rispetto da quando è stato settato. Altri Menu > Configura > Premi ciao

La nuova estrazione settimanale aggiuntiva per Lotto e Superenalotto è partita da luglio 2023 e proseguirà fino alla fine dell’anno. L’incasso, premi a parte, sarà devoluto alle zone colpite dall’alluvione. (Emilia-Romagna) Purtroppo ce la dobbiamo sorbire......e subire...... ed anche tutte le...

Si Zetrix, dal tuo punto di vista e osservazione delle estrazioni, hai le tue ragioni nel fare queste analisi. Cosa posso dirti , io intervengo dal punto di vista script funzionante e che raggiunga un obiettivo, poi è anche risaputo che le mie osservazioni lottologiche sono principalmente di...

Ciao Zetrix, ho capito poi l'utilizzo dal mio punto di vista è sempre Kaos. Invece io ti dicevo che la condizione If somma = 1 <> 90 Then segnalata non da risultati e quindi rivedila per i tuoi scopi