Generatore di numeri personalizzati, chi mi aiuta?

80Sete · 8 Febbraio 2021

Grazie Salvo50 e Mike58 ho appena risolto eliminando il ,1 è vero ho la versione 6,31 perchè, pur mettendo in pausa l'antivirus, non riesco a scaricarlo completamente, allora ho rinunciato da tempo....e resto su questa versione. Anch'io sarei interessato sulla scelta di soli nr Pari o Dispari, ho lasciato il Lotto da tempo, mentre ora faccio ricerche su altre Lotterie, intanto questo script mi è utile. Grazie ancora e buona serata a voi.

Mike58 · 8 Febbraio 2021

Provate cosi, purtroppo senza nessun dato statistico o archivio a cui far riferimento lo script è fine a se stesso.

Codice:

Sub Main()
   Dim Nu
   Scrivi " **** Numeri casuali per il VINCICASA **** ",1,1,3,1,4
   Scrivi
   Classe = InputBox("QUALE CLASSE DI SVILUPPO","Mike58",5)
   comb = InputBox("QUANTE COMBINAZIONI VUOI SVILUPPARE","MIKE58 *** FORUM LOTTOCED **** ",10)
   Nu = Array(0,1,3,6,9,10,12,15,18,20,21,25,26,27,28,30,32,34,36,39,40)' array contenitore Numeri lo zero ci deve essere
   For kk = 1 To UBound(Nu)
   If pari(Nu(kk)) Then rigo = rigo & GetTestoHtml(Nu(kk),1,2,,,3) & " "
   If dispari(Nu(kk)) Then rigo = rigo & GetTestoHtml(Nu(kk),1,1,,,3) & " "
   Next
   'Scrivi "Numeri selezionati... " & StringaNumeri(Nu)
   Scrivi "Numeri selezionati... " & rigo,1
   Scrivi
   Dim k
   col = Array(15,21,33,35,40) ' colonna vincente x verifica
   For k = 1 To comb
      par = 0
      ReDim Num(1)
      Num(1) = Nu
      Call GetColonnaCasuale(Classe,Num,Nu)
      pt = PuntiSuArray(col,Num,1)
      Scrivi "Combinazione casuale...." & Format2(k) & "  :  ",1,0,,1,3
      For p = 1 To Classe
         If pari(Num(p)) Then par = par + 1
         dis = Classe - par
         If pari(Num(p)) Then riga = riga & GetTestoHtml(Format2(Num(p)),1,2,,3) & " "
         If dispari(Num(p)) Then riga = riga & GetTestoHtml(Format2(Num(p)),1,1,,3) & " "
      Next
      Scrivi riga & vbTab & " P/D " & par & "-" & dis,1,0
      'Scrivi StringaNumeri(Num,,True),1,0,,2,3
      Scrivi vbTab & pt & " - Punti su Colonna Vincente : " & StringaNumeri(col,,1),1
      par = 0
      riga = ""
      rigo = ""
   Next
End Sub

80Sete · 8 Febbraio 2021

Grazie terrò in archivio anche questo....e continuerò a cercare e aspettare il momento giusto.

ste20fra · 8 Febbraio 2021

Mi fa piacere rivedere il buon Mike58 proporre le soluzioni script richieste: qualche tempo fa mi aiutò molto nelle varie richieste di script !!!

Per i nuovi, se può esservi di aiuto, nella sezione del Millionday si trovano molti script utili, ovviamente da adeguare al gioco del Vincicasa (il MD estrae la cinquina su 55 numeri, il VC su 40)

Gabrieleno90 · 8 Febbraio 2021

@ste20fra @Mike58 Grazie mille per la mano che state dando hai nuovi, ma se posso ancora chiedere senza disturbarvi, anche perché ho perso una cinquina di vincicasa l'altro giorno, dove trovo dei script buoni, riesci a linkarmeli? (a tempo perso), ma sopratutto conosci qualche guida o un tutorial come usare per bene il programma?

Gabrieleno90 · 8 Febbraio 2021

Mike58 ha scritto:

Provate cosi, purtroppo senza nessun dato statistico o archivio a cui far riferimento lo script è fine a se stesso.

Codice:

Sub Main()
   Dim Nu
   Scrivi " **** Numeri casuali per il VINCICASA **** ",1,1,3,1,4
   Scrivi
   Classe = InputBox("QUALE CLASSE DI SVILUPPO","Mike58",5)
   comb = InputBox("QUANTE COMBINAZIONI VUOI SVILUPPARE","MIKE58 *** FORUM LOTTOCED **** ",10)
   Nu = Array(0,1,3,6,9,10,12,15,18,20,21,25,26,27,28,30,32,34,36,39,40)' array contenitore Numeri lo zero ci deve essere
   For kk = 1 To UBound(Nu)
   If pari(Nu(kk)) Then rigo = rigo & GetTestoHtml(Nu(kk),1,2,,,3) & " "
   If dispari(Nu(kk)) Then rigo = rigo & GetTestoHtml(Nu(kk),1,1,,,3) & " "
   Next
   'Scrivi "Numeri selezionati... " & StringaNumeri(Nu)
   Scrivi "Numeri selezionati... " & rigo,1
   Scrivi
   Dim k
   col = Array(15,21,33,35,40) ' colonna vincente x verifica
   For k = 1 To comb
      par = 0
      ReDim Num(1)
      Num(1) = Nu
      Call GetColonnaCasuale(Classe,Num,Nu)
      pt = PuntiSuArray(col,Num,1)
      Scrivi "Combinazione casuale...." & Format2(k) & "  :  ",1,0,,1,3
      For p = 1 To Classe
         If pari(Num(p)) Then par = par + 1
         dis = Classe - par
         If pari(Num(p)) Then riga = riga & GetTestoHtml(Format2(Num(p)),1,2,,3) & " "
         If dispari(Num(p)) Then riga = riga & GetTestoHtml(Format2(Num(p)),1,1,,3) & " "
      Next
      Scrivi riga & vbTab & " P/D " & par & "-" & dis,1,0
      'Scrivi StringaNumeri(Num,,True),1,0,,2,3
      Scrivi vbTab & pt & " - Punti su Colonna Vincente : " & StringaNumeri(col,,1),1
      par = 0
      riga = ""
      rigo = ""
   Next
End Sub

Come si può far in un modo statistico? Nel senso, devo caricare tutte le estrazioni? Come ho detto su, c'e qualche guida?

Mike58 · 9 Febbraio 2021

Ciao Gabrieleno90.
Guide, tutorial circa spaziometria, vbscript non ne esistono in modo generico, ma esistono tantissime discussioni di vario genere che possono aiutare allo scopo.

Io mi diletto nel fare script con il vbscript che nel programma spaziometria c'è un Help con la spiegazione dei vari codici e con tantissimi script nella cartela Test che spiegano ogni codice e sviluppano la tipologia di codice usato.

Poi l'area DownLoad è piena di script per varie problematiche riguardante lotto e lotterie varie tra cui anche una sezione MillionDay (come dice Ste20Fra) nel quale è possibile adattare script anche per il Vincicasa allacciando un archivio esterno per tale lotteria.

Altro non saprei dirti.

Ciao

Gabrieleno90 · 9 Febbraio 2021

Buongiorno, ti ringrazio molto per quello che fai, come ti ho detto, non voglio disturbarti, rispondi quando puoi ok?
Sto seguendo Nikor su vincicasa, e per pura diffidenza mi sono perso una cinquina, ti volevo chiedere, dove trovo questi calcoli?
Decine Naturali vincicasa etcc

Saluti Gabriele

Mike58 · 9 Febbraio 2021

Ci provo a darti ulteriore aiuto ma è complicato.
1 devi avere un archivio esterno aggiornato in formato TXT
2 mettere archivio nella cartella directory
3 elaborare lo script

fatto questo puoi elaborare script statistici in questo caso Tabellone Analitico Vincicasa.

Codice:

Sub Main
   Dim Nu(5),Cad(5),aN(5),Nu2(1),Nn2,Rsl(5)
   Dim Sfile,T,V
   Sfile = GetDirectoryAppData & "VinciCasa.txt"
   Call ApriBaseDatiFT(Sfile,5,",",40)
   Ini = 1
   fin = EstrazioniArchivioFT
   Scrivi "********* Lotteria VinciCasa ********* Estratti ********************* Caduti ******************* ",1,,,1,2
   T = Array(T,"Data info","Estratti","I","II","III","IV","V","Liv","Rit","RitSncLiv","C1","C2","C3","C4","C5","LivCad","CadProgress","EsitiFin","RsL / Rit","PresTeoF2","Att2")
   Call InitTabella(T)
   For es = fin To Ini Step - 1
      kk = 0
      For p = 1 To 5
         Nu(p) = EstrattoFT(es,p)
         Cad(p) = EstrattoFT(es,p)
         aN(p) = EstrattoFT(es,p)
         If EstrattoFrequenzaFT(Nu(p),es,fin) > 1 Then Nu(p) = "-"
         If EstrattoFrequenzaFT(Cad(p),es,fin) = 1 Then Cad(p) = "-"
         If EstrattoFrequenzaFT(Nu(p),es,fin) = 1 Then k = k + 1
         If Cad(p) <> "-" Then kk = kk + 1
         If EstrattoFrequenzaFT(Nu(p),es,fin) = 1 Then kkk = kkk + 1
      Next
      rit = SerieRitardoFT(Ini,fin,aN,1)
      ess = fin - es
      Call VerificaEsitoFT(aN,fin,1,,,,est)
      '............. Ritado di Livello .............................
      Mem2 = 0
      rslA = es'fin - rit
      Nn2 = Split("0." & StringaEstrattiFT(rslA),".")
      For p1 = 1 To 5
         Nu2(1) = Nn2(p1)
         rit2 = SerieRitardoFT(rsla + 1,fin,Nu2,1)'mio rdl
         spA = SeriePrimaFT(rslA + 1,fin,Nu2,1)
         If Mem2 <= spA Then Mem2 = spA
         If Mem2 = rit2 Then Mem2 = rit2
      Next
      If k < 5 Then RslA = fin - Mem2
      If k = 5 Then RslA = rit
      If k < 5 Then Rit2 = fin - Mem2
      If k = 5 Then Rit2 = rit
      presTeo = Round((5*1) *(10/11) ^ ess,4)
     ' Att2 = Round((k/(k + presteo)),3)
     Att2 = Round((Dividi(k,k + PresTeo)),3)
      '---------------------------------------------------------------
      att = Round(Dividi(RslA,ess),2)
      decd = 55 - kkk
      If k > 0 Then
         V = Array(V,GetInfoEstrazioneFT(es),StringaEstrattiFT(es),Nu(1),Nu(2),Nu(3),Nu(4),Nu(5),k,ess,RslA,Cad(1),Cad(2),Cad(3),Cad(4),Cad(5),kk,kkk,est,att,PresTeo,Att2)
         Call AddRigaTabella(V)
      End If
      For x = 3 To 7
         Call SetColoreCella((x),6,0)
      Next
      Call SetColoreCella(8,4,0)
      For xx = 11 To 15
         Call SetColoreCella((xx),6,0)
      Next
      If V(9) > 0 And V(10) = 0 Then Call SetColoreCella(18,2,4)
      k = 0
      kk = 0
   Next
   Call SetTableWidth("100%")
   CreaTabellaOrdinabile
   Scrivi "Script By Mike58",1,1,,1,3
End Sub

Mike58 · 9 Febbraio 2021

Gabrieleno90 ha scritto:
Buongiorno, ti ringrazio molto per quello che fai, come ti ho detto, non voglio disturbarti, rispondi quando puoi ok?
Sto seguendo Nikor su vincicasa, e per pura diffidenza mi sono perso una cinquina, ti volevo chiedere, dove trovo questi calcoli?
Decine Naturali vincicasa etcc

Saluti Gabriele

Quei dati vanno rielaborati ad oc allacciando l'archivio che ti ho fornito in formato txt e far interagire i vari codici allo scopo.

Gabrieleno90 · 9 Febbraio 2021

Mike58 ha scritto:
Quei dati vanno rielaborati ad oc allacciando l'archivio che ti ho fornito in formato txt e far interagire i vari codici allo scopo.

In che senso?

Gabrieleno90 · 9 Febbraio 2021

Mike58 ha scritto:

Ci provo a darti ulteriore aiuto ma è complicato.
1 devi avere un archivio esterno aggiornato in formato TXT
2 mettere archivio nella cartella directory
3 elaborare lo script

fatto questo puoi elaborare script statistici in questo caso Tabellone Analitico Vincicasa.

Codice:

Sub Main
   Dim Nu(5),Cad(5),aN(5),Nu2(1),Nn2,Rsl(5)
   Dim Sfile,T,V
   Sfile = GetDirectoryAppData & "VinciCasa.txt"
   Call ApriBaseDatiFT(Sfile,5,",",40)
   Ini = 1
   fin = EstrazioniArchivioFT
   Scrivi "********* Lotteria VinciCasa ********* Estratti ********************* Caduti ******************* ",1,,,1,2
   T = Array(T,"Data info","Estratti","I","II","III","IV","V","Liv","Rit","RitSncLiv","C1","C2","C3","C4","C5","LivCad","CadProgress","EsitiFin","RsL / Rit","PresTeoF2","Att2")
   Call InitTabella(T)
   For es = fin To Ini Step - 1
      kk = 0
      For p = 1 To 5
         Nu(p) = EstrattoFT(es,p)
         Cad(p) = EstrattoFT(es,p)
         aN(p) = EstrattoFT(es,p)
         If EstrattoFrequenzaFT(Nu(p),es,fin) > 1 Then Nu(p) = "-"
         If EstrattoFrequenzaFT(Cad(p),es,fin) = 1 Then Cad(p) = "-"
         If EstrattoFrequenzaFT(Nu(p),es,fin) = 1 Then k = k + 1
         If Cad(p) <> "-" Then kk = kk + 1
         If EstrattoFrequenzaFT(Nu(p),es,fin) = 1 Then kkk = kkk + 1
      Next
      rit = SerieRitardoFT(Ini,fin,aN,1)
      ess = fin - es
      Call VerificaEsitoFT(aN,fin,1,,,,est)
      '............. Ritado di Livello .............................
      Mem2 = 0
      rslA = es'fin - rit
      Nn2 = Split("0." & StringaEstrattiFT(rslA),".")
      For p1 = 1 To 5
         Nu2(1) = Nn2(p1)
         rit2 = SerieRitardoFT(rsla + 1,fin,Nu2,1)'mio rdl
         spA = SeriePrimaFT(rslA + 1,fin,Nu2,1)
         If Mem2 <= spA Then Mem2 = spA
         If Mem2 = rit2 Then Mem2 = rit2
      Next
      If k < 5 Then RslA = fin - Mem2
      If k = 5 Then RslA = rit
      If k < 5 Then Rit2 = fin - Mem2
      If k = 5 Then Rit2 = rit
      presTeo = Round((5*1) *(10/11) ^ ess,4)
     ' Att2 = Round((k/(k + presteo)),3)
     Att2 = Round((Dividi(k,k + PresTeo)),3)
      '---------------------------------------------------------------
      att = Round(Dividi(RslA,ess),2)
      decd = 55 - kkk
      If k > 0 Then
         V = Array(V,GetInfoEstrazioneFT(es),StringaEstrattiFT(es),Nu(1),Nu(2),Nu(3),Nu(4),Nu(5),k,ess,RslA,Cad(1),Cad(2),Cad(3),Cad(4),Cad(5),kk,kkk,est,att,PresTeo,Att2)
         Call AddRigaTabella(V)
      End If
      For x = 3 To 7
         Call SetColoreCella((x),6,0)
      Next
      Call SetColoreCella(8,4,0)
      For xx = 11 To 15
         Call SetColoreCella((xx),6,0)
      Next
      If V(9) > 0 And V(10) = 0 Then Call SetColoreCella(18,2,4)
      k = 0
      kk = 0
   Next
   Call SetTableWidth("100%")
   CreaTabellaOrdinabile
   Scrivi "Script By Mike58",1,1,,1,3
End Sub

Ottimo, grazie. Ora dal cellulare mi guardo la sezione download..

Mike58 · 9 Febbraio 2021

Codice:

Sub Main
   Dim Nu(20),aN(5),sFile,T,V
   sFile = GetDirectoryAppData & "vincicasa.txt"
   'sfile = ScegliFile("C:\.....\Desktop\.txt")
   Call ApriBaseDatiFT(sFile,5,",",40)
   'controllo = InputBox("Quante Estrazioni Controllo",,10)
   Ini = 1
   fin = EstrazioniArchivioFT
   Call ScegliRange(ini,fin,Ini,EstrazioniArchivioFT)
   'dett = InputBox("Vuoi vedere il dettaglio","Si No","S")
   ResetTimer
   T = Array(T,"Giocata N","Lunghetta","RIT1","RIT2","RIT3","RIT4","RIT5","Verifica Fin","Fre x 1","Fre x 2","Fre x 3","Fre x 4","Fre x 5")
   Call InitTabella(T)
   pto = 0
   pt1 = 0
   pt2 = 0
   pt3 = 0
   pt4 = 0
   pt5 = 0
   For x = 1 To 4
      '-------inserimento lunghette ----------------------------
      Nu(1) = Array(0,1,2,3,4,5,6,7,8,9,10)
      Nu(2) = Array(0,11,12,13,14,15,16,17,18,19,20)
      Nu(3) = Array(0,21,22,23,24,25,26,27,28,29,30)
      Nu(4) = Array(0,31,32,33,34,35,36,37,38,39,40)
      '--- fine inserimento ------------------------------
      qn = UBound(Nu(x))
      'For es = Ini To fin
      Call Messaggio("Tempo Trascorso : " & TempoTrascorso & "   < decina > " & x)
      Call AvanzamentoElab(Ini,fin,es)
      'For p = 1 To 5
      'aN(p) = EstrattoFT(es,p)
      pt = SerieFreqFT(es,es,Nu(x),1)
      ptt = SerieFreqFT(Ini,fin,Nu(x),1)
      ptt2 = SerieFreqFT(Ini,fin,Nu(x),2)
      ptt3 = SerieFreqFT(Ini,fin,Nu(x),3)
      ptt4 = SerieFreqFT(Ini,fin,Nu(x),4)
      ptt5 = SerieFreqFT(Ini,fin,Nu(x),5)
      'Next
      pto = SerieRitardoFT(Ini,fin,Nu(x),1)
      pt1 = SerieRitardoFT(Ini,fin,Nu(x),2)
      pt2 = SerieRitardoFT(Ini,fin,Nu(x),3)
      pt3 = SerieRitardoFT(Ini,fin,Nu(x),4)
      pt4 = SerieRitardoFT(Ini,fin,Nu(x),5)
      Call VerificaEsitoFT(Nu(x),es,1,1,,,es1)
      'If dett = "S" Then
      'Scrivi GetInfoEstrazioneFT(es) & vbTab & StringaEstrattiFT(es) & vbTab & pt & vbTab & es1
      'End If
      'Next
      Call VerificaEsitoFT(Nu(x),fin,1,1,,,es2)
      'Call Scrivi("......................... " & es1)
      'Scrivi
      V = Array(V,x & " - " & qn,StringaNumeri(Nu(x),,1),pto,pt1,pt2,pt3,pt4,es2,ptt,ptt2,ptt3,ptt4,ptt5)
      Call AddRigaTabella(V)
      If pt2 > 0 Then Call SetColoreCella(5,,2)
      If pt3 > 0 Then Call SetColoreCella(6,,2)
      pto = 0
      pt1 = 0
      pt2 = 0
      pt3 = 0
      pt4 = 0
      pt5 = 0
   Next
   Scrivi "Riepilogo Finale",1,,,,3,,1
   CreaTabella
   Scrivi "Tempo di Elaborazione : " & TempoTrascorso
End Sub

Gabrieleno90 · 9 Febbraio 2021

Mike58 ha scritto:

Codice:

Sub Main
   Dim Nu(20),aN(5),sFile,T,V
   sFile = GetDirectoryAppData & "vincicasa.txt"
   'sfile = ScegliFile("C:\.....\Desktop\.txt")
   Call ApriBaseDatiFT(sFile,5,",",40)
   'controllo = InputBox("Quante Estrazioni Controllo",,10)
   Ini = 1
   fin = EstrazioniArchivioFT
   Call ScegliRange(ini,fin,Ini,EstrazioniArchivioFT)
   'dett = InputBox("Vuoi vedere il dettaglio","Si No","S")
   ResetTimer
   T = Array(T,"Giocata N","Lunghetta","RIT1","RIT2","RIT3","RIT4","RIT5","Verifica Fin","Fre x 1","Fre x 2","Fre x 3","Fre x 4","Fre x 5")
   Call InitTabella(T)
   pto = 0
   pt1 = 0
   pt2 = 0
   pt3 = 0
   pt4 = 0
   pt5 = 0
   For x = 1 To 4
      '-------inserimento lunghette ----------------------------
      Nu(1) = Array(0,1,2,3,4,5,6,7,8,9,10)
      Nu(2) = Array(0,11,12,13,14,15,16,17,18,19,20)
      Nu(3) = Array(0,21,22,23,24,25,26,27,28,29,30)
      Nu(4) = Array(0,31,32,33,34,35,36,37,38,39,40)
      '--- fine inserimento ------------------------------
      qn = UBound(Nu(x))
      'For es = Ini To fin
      Call Messaggio("Tempo Trascorso : " & TempoTrascorso & "   < decina > " & x)
      Call AvanzamentoElab(Ini,fin,es)
      'For p = 1 To 5
      'aN(p) = EstrattoFT(es,p)
      pt = SerieFreqFT(es,es,Nu(x),1)
      ptt = SerieFreqFT(Ini,fin,Nu(x),1)
      ptt2 = SerieFreqFT(Ini,fin,Nu(x),2)
      ptt3 = SerieFreqFT(Ini,fin,Nu(x),3)
      ptt4 = SerieFreqFT(Ini,fin,Nu(x),4)
      ptt5 = SerieFreqFT(Ini,fin,Nu(x),5)
      'Next
      pto = SerieRitardoFT(Ini,fin,Nu(x),1)
      pt1 = SerieRitardoFT(Ini,fin,Nu(x),2)
      pt2 = SerieRitardoFT(Ini,fin,Nu(x),3)
      pt3 = SerieRitardoFT(Ini,fin,Nu(x),4)
      pt4 = SerieRitardoFT(Ini,fin,Nu(x),5)
      Call VerificaEsitoFT(Nu(x),es,1,1,,,es1)
      'If dett = "S" Then
      'Scrivi GetInfoEstrazioneFT(es) & vbTab & StringaEstrattiFT(es) & vbTab & pt & vbTab & es1
      'End If
      'Next
      Call VerificaEsitoFT(Nu(x),fin,1,1,,,es2)
      'Call Scrivi("......................... " & es1)
      'Scrivi
      V = Array(V,x & " - " & qn,StringaNumeri(Nu(x),,1),pto,pt1,pt2,pt3,pt4,es2,ptt,ptt2,ptt3,ptt4,ptt5)
      Call AddRigaTabella(V)
      If pt2 > 0 Then Call SetColoreCella(5,,2)
      If pt3 > 0 Then Call SetColoreCella(6,,2)
      pto = 0
      pt1 = 0
      pt2 = 0
      pt3 = 0
      pt4 = 0
      pt5 = 0
   Next
   Scrivi "Riepilogo Finale",1,,,,3,,1
   CreaTabella
   Scrivi "Tempo di Elaborazione : " & TempoTrascorso
End Sub

Ciao Grazie mille, qua non ho capito, mi sta dando le estrazioni del lotto apposto di VinciCasa, come mai se posso chiedere?

Mike58 · 9 Febbraio 2021

Imposibile ci sono i codici FT (File di testo) e poi devi aver salvato l'archivio Vincicasa in formato txt che ti ho allegato nella directory di spaziometria come ti ho consigliato.
sFile = GetDirectoryAppData & "vincicasa.txt"
senza questo non può funzionare.

Gabrieleno90 · 9 Febbraio 2021

Gabrieleno90 ha scritto:
Buongiorno, ti ringrazio molto per quello che fai, come ti ho detto, non voglio disturbarti, rispondi quando puoi ok?
Sto seguendo Nikor su vincicasa, e per pura diffidenza mi sono perso una cinquina, ti volevo chiedere, dove trovo questi calcoli?
Decine Naturali vincicasa etcc

Saluti Gabriele

Stavo guardando e rileggendo i post e i script che mi hai scritto, ma ho notato una cosa, ma i Decine Naturali che usa Nikor, e uno script?
Perché da quello che ho letto queste Decine sono molto utili per Vincicasa e soprattutto in passato hanno azzeccato anche cinquine, giusto?

Mike58 · 10 Febbraio 2021

Grabriele,no90,circa la videata di Nikor sicuramente sarà meno aggiornata della mia e quindi i dati non sono identici.
Poi per la fonte devi chiedere a lui.
Io ti ho messo a disposizione quello che era la tua richiesta, da adesso devi continuare in proprio.

Io mi cimento in un dato progetto di costrutto scriptico ma il resto poi i miei interessi sono altri.

Ciao

Alien. · 10 Febbraio 2021

Ottimo #34
si potrebbe inserire l'archivio superenalotto e 10elotto?
ed anche negli altri script poi i numeri li inserisco da me? grazie.

Gabrieleno90 · 15 Febbraio 2021

Alien. ha scritto:
Ottimo #34
si potrebbe inserire l'archivio superenalotto e 10elotto?
ed anche negli altri script poi i numeri li inserisco da me? grazie.

Non e il post giusto, devi andare nelle sezioni apposite e chiedere li

Alien. · 16 Febbraio 2021

Ma veramente chiedevo semplicemente di cambiare l'archivio degli script sopra.
Se vado il altre sezione come faccio a specificare che voglio quello che ho detto sopra ?

Generatore di numeri personalizzati, chi mi aiuta?

Advanced Member >PLATINUM PLUS<

Advanced Member >PLATINUM PLUS<

Advanced Member >PLATINUM PLUS<

Senior Member

Member

Member

Advanced Member >PLATINUM PLUS<

Member

Allegati

Advanced Member >PLATINUM PLUS<

Allegati

Advanced Member >PLATINUM PLUS<

Member

Member

Advanced Member >PLATINUM PLUS<

Member

Advanced Member >PLATINUM PLUS<

Member

Allegati

Advanced Member >PLATINUM PLUS<

Advanced Premium Member

Member

Advanced Premium Member