Modifica script

[Marcorun]

Ciao....c'è qualche volenteroso che riesce a modificare questo script che è x l'ambo inserendo anche la sorte di ambetto?



Sub Main()
Dim ruote(10)
Dim numeri1(10)
Dim posta(5)
posta(2) = 1
posta(3) = 0
posta(4) = 0
posta(1) = 0
Dim g
For g = 1 To 10
ruote(1) = g
For n = EstrazioneFin - 11 To EstrazioneFin

numeri1(1) = Fuori90((Estratto(n,g,1) + 1) +(Estratto(n,g,4) + 1))
numeri1(2) = Fuori90((Estratto(n,g,2) + 1) +(Estratto(n,g,5) + 1))
numeri1(3) = Fuori90((Estratto(n,g,3) + 1) +(Estratto(n,g,1) + 1))
numeri1(4) = Fuori90((Estratto(n,g,4) + 1) +(Estratto(n,g,2) + 1))
numeri1(5) = Fuori90((Estratto(n,g,5) + 1) +(Estratto(n,g,3) + 1))
numeri1(6) = Fuori90((Estratto(n,g,3) + 1) +(Estratto(n,g,4) + 1))

EliminaRipetuti numeri1
ImpostaGiocata 1,numeri1,ruote,posta,10,2

Call Scrivi("--------------------------------------------------------------------------------------",1,1,2,4,3)

Gioca n',False,False,0,0,False

Next
Next ' x analisi automatica delle ruote

'Call ScriviDistribuzioneEsiti(True)
'Call ScriviDistribuzioneCasiInCorso(True,"1,2,3,4,5,6,7,8,9,10")

ScriviResoconto
End Sub

 

[Sakti]

Modificato anche per Ambata e solo i casi positivi, per alleggerire il resoconto.

Sub Main()
   Dim ruote(10)
   Dim numeri1(10)
   Dim posta(5)
   posta(1) = 1  'Ambata
   posta(2) = 1  'Ambo
   posta(3) = 0  'Terno Basta aggiungere al posto dello zero l'importo da giocare.
   posta(4) = 0  'Quaterna Basta aggiungere al posto dello zero l'importo da giocare.
   Dim g
   For g = 1 To 10
      ruote(1) = g
      For n = EstrazioneFin - 11 To EstrazioneFin
         numeri1(1) = Fuori90((Estratto(n,g,1) + 1) +(Estratto(n,g,4) + 1))
         numeri1(2) = Fuori90((Estratto(n,g,2) + 1) +(Estratto(n,g,5) + 1))
         numeri1(3) = Fuori90((Estratto(n,g,3) + 1) +(Estratto(n,g,1) + 1))
         numeri1(4) = Fuori90((Estratto(n,g,4) + 1) +(Estratto(n,g,2) + 1))
         numeri1(5) = Fuori90((Estratto(n,g,5) + 1) +(Estratto(n,g,3) + 1))
         numeri1(6) = Fuori90((Estratto(n,g,3) + 1) +(Estratto(n,g,4) + 1))
         EliminaRipetuti numeri1
         ImpostaGiocata 1,numeri1,ruote,posta,10,2
         Call Scrivi("--------------------------------------------------------------------------------------",1,1,2,4,3)
         Gioca n ,1',False,False,0,0,False
      Next
   Next ' x analisi automatica delle ruote
   'Call ScriviDistribuzioneEsiti(True)
   'Call ScriviDistribuzioneCasiInCorso(True,"1,2,3,4,5,6,7,8,9,10")
   ScriviResoconto
End Sub

 

[Marcorun]

Ciao....grazie...funziona...mi interessava la sorte di AMBETTO...che penso sia la più complicata
GRAZIE x l'impegno....riuscirai a mettere l'AMBETTO?

 

[Sakti]

Per l'ambetto devi chiedere a scripter più ferrati diquanto non sia io, anche perchè se non sbaglio andremmo a lavorare su 18 numeri, troppo per me..

 

[Marcorun]

Ti ringrazio comunque....sei molto gentile!!!

 

[Marcorun]

Visto che non interessa a nessuno,probabilmente nessuno avrà da ridire.....
del mio modo maldestro di adattare gli script,purtroppo non sono un'informatico se no non avrei chiesto una mano
Quindi dopo giorni e giorni di "lavoro"mi è uscito fuori questo......lo posto in caso potesse tornare utile a qualcuno
è x 7 numeri

Sub Main()
Dim ruote(10)
Dim numeri1(10)
Dim posta(5)
Dim n
posta(2) = 1
posta(3) = 0
posta(4) = 0
posta(1) = 0
Dim gg
gg = InputBox("Su quale ruota, ",,1)
ruote(1) = gg
Dim fin,ini
fin = EstrazioneFin
ini = EstrazioneFin - 11
For n = ini To fin
Messaggio n
AvanzamentoElab ini,fin,n

g = Fuori90((Estratto(n,gg,5) + 1))
h = Fuori90((Estratto(n,gg,5) + 5))
i = Fuori90((Estratto(n,gg,5) + 9))
l = Fuori90((Estratto(n,gg,5) + 13))
o = Fuori90((Estratto(n,gg,5) + 17))
p = Fuori90((Estratto(n,gg,5) + 21))
q = Fuori90((Estratto(n,gg,5) + 25))

k = 10'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<COLPI

numeri1(1) = g
numeri1(2) = Fuori90(h - 1)
EliminaRipetuti numeri1
ImpostaGiocata 1,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(h + 1)
EliminaRipetuti numeri1
ImpostaGiocata 2,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(i - 1)
EliminaRipetuti numeri1
ImpostaGiocata 3,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(i + 1)
EliminaRipetuti numeri1
ImpostaGiocata 4,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(l - 1)
EliminaRipetuti numeri1
ImpostaGiocata 5,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(l + 1)
EliminaRipetuti numeri1
ImpostaGiocata 6,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(o - 1)
EliminaRipetuti numeri1
ImpostaGiocata 7,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(o + 1)
EliminaRipetuti numeri1
ImpostaGiocata 8,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(p - 1)
EliminaRipetuti numeri1
ImpostaGiocata 9,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(p + 1)
EliminaRipetuti numeri1
ImpostaGiocata 10,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(q - 1)
EliminaRipetuti numeri1
ImpostaGiocata 11,numeri1,ruote,posta,k,2
numeri1(1) = g
numeri1(2) = Fuori90(q + 1)
EliminaRipetuti numeri1
ImpostaGiocata 12,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(g - 1)
EliminaRipetuti numeri1
ImpostaGiocata 13,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(g + 1)
EliminaRipetuti numeri1
ImpostaGiocata 14,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(i - 1)
EliminaRipetuti numeri1
ImpostaGiocata 15,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(i + 1)
EliminaRipetuti numeri1
ImpostaGiocata 16,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(l - 1)
EliminaRipetuti numeri1
ImpostaGiocata 17,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(l + 1)
EliminaRipetuti numeri1
ImpostaGiocata 18,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(o - 1)
EliminaRipetuti numeri1
ImpostaGiocata 19,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(o + 1)
EliminaRipetuti numeri1
ImpostaGiocata 20,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(p - 1)
EliminaRipetuti numeri1
ImpostaGiocata 21,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(p + 1)
EliminaRipetuti numeri1
ImpostaGiocata 22,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(q - 1)
EliminaRipetuti numeri1
ImpostaGiocata 23,numeri1,ruote,posta,k,2
numeri1(1) = h
numeri1(2) = Fuori90(q + 1)
EliminaRipetuti numeri1
ImpostaGiocata 24,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(g - 1)
EliminaRipetuti numeri1
ImpostaGiocata 25,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(g + 1)
EliminaRipetuti numeri1
ImpostaGiocata 26,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(h - 1)
EliminaRipetuti numeri1
ImpostaGiocata 27,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(h + 1)
EliminaRipetuti numeri1
ImpostaGiocata 28,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(l - 1)
EliminaRipetuti numeri1
ImpostaGiocata 29,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(l + 1)
EliminaRipetuti numeri1
ImpostaGiocata 30,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(o - 1)
EliminaRipetuti numeri1
ImpostaGiocata 31,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(o + 1)
EliminaRipetuti numeri1
ImpostaGiocata 32,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(p - 1)
EliminaRipetuti numeri1
ImpostaGiocata 33,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(p + 1)
EliminaRipetuti numeri1
ImpostaGiocata 34,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(q - 1)
EliminaRipetuti numeri1
ImpostaGiocata 35,numeri1,ruote,posta,k,2
numeri1(1) = i
numeri1(2) = Fuori90(q + 1)
EliminaRipetuti numeri1
ImpostaGiocata 36,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(g - 1)
EliminaRipetuti numeri1
ImpostaGiocata 37,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(g + 1)
EliminaRipetuti numeri1
ImpostaGiocata 38,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(h - 1)
EliminaRipetuti numeri1
ImpostaGiocata 39,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(h + 1)
EliminaRipetuti numeri1
ImpostaGiocata 40,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(i - 1)
EliminaRipetuti numeri1
ImpostaGiocata 41,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(i + 1)
EliminaRipetuti numeri1
ImpostaGiocata 42,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(o - 1)
EliminaRipetuti numeri1
ImpostaGiocata 43,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(o + 1)
EliminaRipetuti numeri1
ImpostaGiocata 44,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(p - 1)
EliminaRipetuti numeri1
ImpostaGiocata 45,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(p + 1)
EliminaRipetuti numeri1
ImpostaGiocata 46,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(q - 1)
EliminaRipetuti numeri1
ImpostaGiocata 47,numeri1,ruote,posta,k,2
numeri1(1) = l
numeri1(2) = Fuori90(q + 1)
EliminaRipetuti numeri1
ImpostaGiocata 48,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(g - 1)
EliminaRipetuti numeri1
ImpostaGiocata 49,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(g + 1)
EliminaRipetuti numeri1
ImpostaGiocata 50,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(h - 1)
EliminaRipetuti numeri1
ImpostaGiocata 51,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(h + 1)
EliminaRipetuti numeri1
ImpostaGiocata 52,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(i - 1)
EliminaRipetuti numeri1
ImpostaGiocata 53,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(i + 1)
EliminaRipetuti numeri1
ImpostaGiocata 54,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(l - 1)
EliminaRipetuti numeri1
ImpostaGiocata 55,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(l + 1)
EliminaRipetuti numeri1
ImpostaGiocata 56,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(p - 1)
EliminaRipetuti numeri1
ImpostaGiocata 57,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(p + 1)
EliminaRipetuti numeri1
ImpostaGiocata 58,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(q - 1)
EliminaRipetuti numeri1
ImpostaGiocata 59,numeri1,ruote,posta,k,2
numeri1(1) = o
numeri1(2) = Fuori90(q + 1)
EliminaRipetuti numeri1
ImpostaGiocata 60,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(g - 1)
EliminaRipetuti numeri1
ImpostaGiocata 61,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(g + 1)
EliminaRipetuti numeri1
ImpostaGiocata 62,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(h - 1)
EliminaRipetuti numeri1
ImpostaGiocata 63,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(h + 1)
EliminaRipetuti numeri1
ImpostaGiocata 64,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(i - 1)
EliminaRipetuti numeri1
ImpostaGiocata 65,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(i + 1)
EliminaRipetuti numeri1
ImpostaGiocata 66,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(l - 1)
EliminaRipetuti numeri1
ImpostaGiocata 67,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(l + 1)
EliminaRipetuti numeri1
ImpostaGiocata 68,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(o - 1)
EliminaRipetuti numeri1
ImpostaGiocata 69,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(o + 1)
EliminaRipetuti numeri1
ImpostaGiocata 70,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(q - 1)
EliminaRipetuti numeri1
ImpostaGiocata 71,numeri1,ruote,posta,k,2
numeri1(1) = p
numeri1(2) = Fuori90(q + 1)
EliminaRipetuti numeri1
ImpostaGiocata 72,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(g - 1)
EliminaRipetuti numeri1
ImpostaGiocata 73,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(g + 1)
EliminaRipetuti numeri1
ImpostaGiocata 74,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(h - 1)
EliminaRipetuti numeri1
ImpostaGiocata 75,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(h + 1)
EliminaRipetuti numeri1
ImpostaGiocata 76,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(i - 1)
EliminaRipetuti numeri1
ImpostaGiocata 77,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(i + 1)
EliminaRipetuti numeri1
ImpostaGiocata 78,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(l - 1)
EliminaRipetuti numeri1
ImpostaGiocata 79,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(l + 1)
EliminaRipetuti numeri1
ImpostaGiocata 80,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(o - 1)
EliminaRipetuti numeri1
ImpostaGiocata 81,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(o + 1)
EliminaRipetuti numeri1
ImpostaGiocata 82,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(p - 1)
EliminaRipetuti numeri1
ImpostaGiocata 83,numeri1,ruote,posta,k,2
numeri1(1) = q
numeri1(2) = Fuori90(p + 1)
EliminaRipetuti numeri1
ImpostaGiocata 84,numeri1,ruote,posta,k,2

For x = 1 To 84
ImpostaInterruzioni x,1,2
ImpostaInterruzioni x,2,2
ImpostaInterruzioni x,3,2
ImpostaInterruzioni x,4,2
ImpostaInterruzioni x,5,2
ImpostaInterruzioni x,6,2
ImpostaInterruzioni x,7,2
ImpostaInterruzioni x,8,2
ImpostaInterruzioni x,9,2
ImpostaInterruzioni x,10,2
ImpostaInterruzioni x,11,2
ImpostaInterruzioni x,12,2
ImpostaInterruzioni x,13,2
ImpostaInterruzioni x,14,2
ImpostaInterruzioni x,15,2
ImpostaInterruzioni x,16,2
ImpostaInterruzioni x,17,2
ImpostaInterruzioni x,18,2
ImpostaInterruzioni x,19,2
ImpostaInterruzioni x,20,2
ImpostaInterruzioni x,21,2
ImpostaInterruzioni x,22,2
ImpostaInterruzioni x,23,2
ImpostaInterruzioni x,24,2
ImpostaInterruzioni x,25,2
ImpostaInterruzioni x,26,2
ImpostaInterruzioni x,27,2
ImpostaInterruzioni x,28,2
ImpostaInterruzioni x,29,2
ImpostaInterruzioni x,30,2
ImpostaInterruzioni x,31,2
ImpostaInterruzioni x,32,2
ImpostaInterruzioni x,33,2
ImpostaInterruzioni x,34,2
ImpostaInterruzioni x,35,2
ImpostaInterruzioni x,36,2
ImpostaInterruzioni x,37,2
ImpostaInterruzioni x,38,2
ImpostaInterruzioni x,39,2
ImpostaInterruzioni x,40,2
ImpostaInterruzioni x,41,2
ImpostaInterruzioni x,42,2
ImpostaInterruzioni x,43,2
ImpostaInterruzioni x,44,2
ImpostaInterruzioni x,45,2
ImpostaInterruzioni x,46,2
ImpostaInterruzioni x,47,2
ImpostaInterruzioni x,48,2
ImpostaInterruzioni x,49,2
ImpostaInterruzioni x,50,2
ImpostaInterruzioni x,51,2
ImpostaInterruzioni x,52,2
ImpostaInterruzioni x,53,2
ImpostaInterruzioni x,54,2
ImpostaInterruzioni x,55,2
ImpostaInterruzioni x,56,2
ImpostaInterruzioni x,57,2
ImpostaInterruzioni x,58,2
ImpostaInterruzioni x,59,2
ImpostaInterruzioni x,60,2
ImpostaInterruzioni x,61,2
ImpostaInterruzioni x,62,2
ImpostaInterruzioni x,63,2
ImpostaInterruzioni x,64,2
ImpostaInterruzioni x,65,2
ImpostaInterruzioni x,66,2
ImpostaInterruzioni x,67,2
ImpostaInterruzioni x,68,2
ImpostaInterruzioni x,69,2
ImpostaInterruzioni x,70,2
ImpostaInterruzioni x,71,2
ImpostaInterruzioni x,72,2
ImpostaInterruzioni x,73,2
ImpostaInterruzioni x,74,2
ImpostaInterruzioni x,75,2
ImpostaInterruzioni x,76,2
ImpostaInterruzioni x,77,2
ImpostaInterruzioni x,78,2
ImpostaInterruzioni x,79,2
ImpostaInterruzioni x,80,2
ImpostaInterruzioni x,81,2
ImpostaInterruzioni x,82,2
ImpostaInterruzioni x,83,2
ImpostaInterruzioni x,84,2

Next

Scrivi "##########################################################################",,,3,8

Scrivi(g)
Scrivi(h)
Scrivi(i)
Scrivi(l)
Scrivi(o)
Scrivi(p)
Scrivi(q)

Gioca n,True
Next

ScriviResoconto
'Call ScriviDistribuzioneCasiInCorso(True,"1,2,3,4,5,6,7,8,9,10")'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
End Sub



SALUTI!!!!!!

 

[Sakti]

Guarda, io sono certamente peggio di Te e ad ogni modo, secondo me tutto è utile e migliorabile, quindi, un Grande grazie..

 

[Marcorun]

CIAO!!!!!!

 

[Membro cancellato 19206]

حذف · إزالة · إلغاء · محو · حذفه · مسح · شطب · قم بحذف.

 

[Sakti]

Ottimo lavoro gcarlo, veramente ottimo...Grazie..

 

[Marcorun]

CASPITA!!! è bellissimo....complimenti GCARLO...GRAZIE!
Ciao,TOON....SALUTI a tutti

 

[Marcorun]

Sarà possibile interrompere le 2 giocate al primo esito positivo ? (ambo o ambetto)

 

[Membro cancellato 19206]

حذف · إزالة · إلغاء · محو · حذفه · مسح · شطب · قم بحذف.

 

[Marcorun]

GRAZIE..!