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
 script somma 23
 Nuova discussione  Partecipa alla discussione
 Versione stampabile

Autore Discussione precedente Discussione Discussione successiva

qantonio
Utente Nuovo

21 invii

Spedito - 22 luglio 2019 :  14:42:00  Mostra profilo  Rispondi con citazione
gentilmente script somma 23 ba-ca 1 e 4 pos ruote di guoco ro to colpi 5,ambata 59,abb ,6,25,10,58,grazie

franca46
Amministratore

Italy
22871 invii

Spedito - 09 agosto 2019 :  16:00:53  Mostra profilo  Rispondi con citazione

Sub main()
Dim num(4)
Dim num1(6)
Dim num2(8)
Dim ruote(10)
Dim ruot(1)
Dim posta(2)
Dim poste(3)
Dim post(4)
posta(1)=1
'posta(2)=1
poste(2)=0.5
poste(3)=0.5
post(3)=0.5
post(4)=0.5
tmp=InputBox("Quante estrazioni controllo?",,100)
fin=EstrazioneFin
ini=fin-tmp
ruot(1)=11
For es=ini To fin
Messaggio CStr (EstrazioneFin - es)
For r=1 To 1
r1=r+1
For p= 2 To 2
a=Estratto (es,r,p)
b=Estratto (es,r1,p)
If Fuori90(a+b)= 23 Then
Scrivi DataEstrazione(es),True
Scrivi Left(NomeRuota(r),2)&" "& StringaEstratti(es,r)& " ["&Format2(a)&"]"
Scrivi Left(NomeRuota(r+1),2)&" "& StringaEstratti(es,r+1)& " ["&Format2(b)&"]"



ruote(1)=8
ruote(2)=9

num(1)=59

ImpostaGiocata 1,num,ruote,posta,12

num1(1)=59
num1(2)=6
num1(3)=25
num1(4)=10
num1(5)=58
ImpostaGiocata 2,num1,ruote,poste,12

num2(1)=59
num2(2)=6
num2(3)=25
num2(4)=10
num2(5)=58

ImpostaGiocata 3,num2,ruot,post,12

Gioca es
Scrivi"*****************************************"
End If
Next
Next
Next
ScriviResoconto
End Sub



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