Il gioco del lotto su NonSoloLotto.com

Il gioco del lotto su NonSoloLotto.com
Home | Profilo | Registrazione | Discussioni attive | Utenti | Cerca | FAQ | Entra in Chat!
Nome utente:
Password:
Salva la password
Hai dimenticato la password?

 Tutti i forum
 Lotto e altri giochi a pronostico
 Script da metodi
 x djnomade , giorgio60 , un aiuto
 Nuova discussione  Partecipa alla discussione
 Versione stampabile

Autore Discussione precedente Discussione Discussione successiva

franca46
Amministratore

Italy
24291 invii

Spedito - 04 settembre 2023 :  16:13:44  Mostra profilo  Rispondi con citazione
ciao dj mi daresti una mano? l'ho trovato su you tube , chissà se funziona ancora

ESTRAZIONE DEL
01/07/2017

BARI 42 35 70 32 28
CAGLIARI 53 75 56 63 85
FIRENZE 78 27 19 50 11
GENOVA 62 20 37 86 17
MILANO 19 39 49 24 84
NAPOLI 79 41 34 11 59
PALERMO 73 4 45 8 60
ROMA 36 70 73 50 66
TORINO 89 66 47 51 76
VENEZIA 53 23 50 8 3
NAZIONALE 55 13 28 44 21

ESTRAZIONE DEL
04/07/2017

BARI 19 44 89 31 59
CAGLIARI 7 34 85 63 64
FIRENZE 52 44 19 49 77
GENOVA 25 37 32 74 22
MILANO 62 74 30 31 57
NAPOLI 19 48 42 90 32
PALERMO 89 58 65 73 44
ROMA 72 19 38 6 50
TORINO 29 7 89 30 8
VENEZIA 50 24 89 81 53
NAZIONALE 67 27 20 52 34

quando troviamo una condizione come questa data dai colori e non dai numeri io farò

63*3= 9

19*3=57

in gioco 1° ambo 63 - 9 / 2° ambo 19 - 57

ca - fi - naz tutte


Franca46
Cerca di essere sempre te stesso,
così un giorno potrai dire di essere stato l'unico

DjNomade
Utente Molto Appassionato

279 invii

Spedito - 07 ottobre 2023 :  22:22:27  Mostra profilo  Rispondi con citazione
Dici cosi'?
Ciauz



ColoreTesto 1 : Scrivi "NUMERI RIPETUTI ISOTOPI A RUOTE ESTRAZ. CONSECUTIVE x franca46",1 :
Scrivi
Scrivi Date &_
Chr (32) &Chr (108)& Chr (105)& Chr (115)&Chr (116)&Chr (46)& Chr (32) & Chr (98)& Chr (121)& Chr (32) & Chr (68) & Chr (106)& Chr (78) & Chr (111) & Chr ( 109) & Chr (97)& Chr ( 100) & Chr (101),1
Scrivi String (2,Chr(11)): ColoreTesto 1
 ColoreTesto 0
Sub main()
Dim rt1(1),rtt(10),posta(1),pt1(3)
Dim amb(3)
ee=CInt(InputBox("Quante estrazioni vuoi esaminare ?","Estrazioni",90))
k=CInt(InputBox("Per quante estrazioni deve durare il gioco ?","Colpi di gioco",12))
casi=0
fin=EstrazioneFin
ini=fin-ee   '9338' esempio
For es=ini To fin
Messaggio "elab. del "&dataestrazione(es)&" [ List. by DjNomade ]"
   For r=1 To 10

   For r1=r+1 To 12
   If r1=11 Then r1=12
      For p=1 To 5
      For p1=1 To 5
      a1=Estratto(es-1,r,p) : b1=Estratto(es,r,p)
      a=Estratto(es-1,r1,p1) : b=Estratto(es,r1,p1)

         If a=b And a1=b1 Then
aa=Fuori90(a1*3)  '
aa1=Fuori90(a*3) '

         rtt(1)=r:rtt(2)=r1:rtt(3)=11:rtt(4)=12
         posta(1)=1 :pt1(2)=1
casi=casi+1:Scrivi 
Scrivi String(64,"-")&" caso n° "&(casi),1
Scrivi DataEstrazione(es-1)&" [ "&SiglaRuota(r)&" - "&stringaestratti(es-1,r)&_
" ] [ "&Format2(a1)&" in "&p&"^ pos. ]  [ "&SiglaRuota(r1)&" - "&stringaestratti(es-1,r1)&_
" ] [ "&Format2(a)&" in "&p1&"^ pos. ]",1
Scrivi DataEstrazione(es)&" [ "&SiglaRuota(r)&" - "&stringaestratti(es,r)&_
" ] [ "&Format2(b1)&" in "&p&"^ pos. ]  [ "&SiglaRuota(r1)&" - "&stringaestratti(es,r1)&_
" ] [ "&Format2(b)&" in "&p1&"^ pos. ]",1



Scrivi 


amb(1)=a1 
amb(2)=aa
ImpostaGiocata 1,amb,rtt,pt1,k
amb(1)=a 
amb(2)=aa1
ImpostaGiocata 2,amb,rtt,pt1,k

Gioca es
         End If
      Next
   Next
Next
Next
Next
ScriviResoconto
End Sub
Vai ad inizio pagina

franca46
Amministratore

Italy
24291 invii

Spedito - 10 ottobre 2023 :  07:03:13  Mostra profilo  Rispondi con citazione
buongiorno dj , sono stata poco presente , lo provo subito

Franca46
Cerca di essere sempre te stesso,
così un giorno potrai dire di essere stato l'unico
Vai ad inizio pagina

franca46
Amministratore

Italy
24291 invii

Spedito - 10 ottobre 2023 :  07:09:22  Mostra profilo  Rispondi con citazione
grazie!!!!!

Franca46
Cerca di essere sempre te stesso,
così un giorno potrai dire di essere stato l'unico
Vai ad inizio pagina
  Discussione precedente Discussione Discussione successiva
 Nuova discussione  Partecipa alla discussione
 Versione stampabile
Vai a:
Il gioco del lotto su NonSoloLotto.com © NonSoloLotto.com Vai ad inizio pagina
 Image Forums 2001 Snitz Forums 2000