FARI ACCESI SUL 55 by NANDO MANICCIA

Rispondi
Avatar utente
DjNomade
Messaggi: 564
Iscritto il: 28/10/2011, 20:50
Località: MARCHE

FARI ACCESI SUL 55 by NANDO MANICCIA

Messaggio da DjNomade » 22/07/2014, 23:00

FARI ACCESI SUL 55 by NANDO MANICCIA ,per le spiegazioni andate QUI

Ciauz



Codice: Seleziona tutto

'http://www.pentambo.info/forum/viewtopic.php?f=57&t=4998&sid=1bf3f1bcb706705e07738ad29f5e9fc4#p25388

'22/07/2014
Scrivi "============================= FARI ACCESI SUL 55   by  NANDO MANICCIA",1
Scrivi "============================= SE ESCE SPIA 55 a BARI   by  NANDO MANICCIA",1
Scrivi "================================================ List. DjNomade",1
Scrivi String(70,"="),1
Sub main()
Dim posta(5)
Dim poste(5),postee(5)
Dim ruote(5)

Dim am(10),cinq(10)
posta(1)=1
poste(2)=1
poste(3)=1
postee(2)=1
postee(3)=1
postee(4)=0.5

casi=0
cont=0
k=14
fin=EstrazioneFin
ini=8636
For es=ini To fin



a=55 'numero spia
amb=3
abb1=78 
abb2=81
abb3=51
abb4=21
abb5=23
abb6=68
 If Posizione(es,1,a)>0  Then
cont=cont+1
Scrivi : ColoreTesto 2 : Scrivi String(40,32)&" Pronostico n° " &cont&"",1
ColoreTesto 0 : Scrivi

Scrivi DataEstrazione(es,1) & " < " & SiglaRuota(1) & " " & StringaEstratti(es,1),1


ruote(1)=1
'ruote(2)=6  'si puo'aggiungere altre ruote
  



am(1)=amb
am(2)=abb1
am(3)=abb2
ImpostaGiocata 1,am,ruote,poste,k
am(1)=amb
am(2)=abb3
am(3)=abb2
ImpostaGiocata 2,am,ruote,poste,k

am(1)=abb4
am(2)=abb5
am(3)=abb6
ImpostaGiocata 3,am,ruote,poste,k

cinq(1)=amb
cinq(2)=abb1
cinq(3)=abb2
cinq(4)=abb3
cinq(5)=abb4
cinq(6)=abb5
cinq(7)=abb6
ImpostaGiocata 4,cinq,ruote,postee,k


Gioca es

End If

Next

ScriviResoconto
Scrivi "============================= FARI ACCESI SUL 55   by  NANDO MANICCIA",1
Scrivi "============================= SE ESCE SPIA 55 a BARI   by  NANDO MANICCIA",1
Scrivi "================================================ List. DjNomade",1
Scrivi String(70,"="),1
End Sub

nerisole
Messaggi: 1829
Iscritto il: 27/10/2011, 15:24

Re: FARI ACCESI SUL 55 by NANDO MANICCIA

Messaggio da nerisole » 23/07/2014, 23:44

:abb: :abb: grazie Nando e a d'jnomade dello script

buone Vacanze
vivi e lascia vivere

Immagine

Avatar utente
Tatoo64
Site Admin
Messaggi: 3840
Iscritto il: 22/10/2011, 17:11
Località: PARMA
Contatta:

Re: FARI ACCESI SUL 55 by NANDO MANICCIA

Messaggio da Tatoo64 » 24/07/2014, 21:11

GRAZIE NANDO E GRANDE DJNOMADE............. QUESTO E' DA METTERE NELLA COLLEZIONE SCRIPT

:appl: :su:
Mors ego sum mortis, Vocor Agnus sum Leo fortis

Avatar utente
luca92
Messaggi: 3401
Iscritto il: 14/04/2012, 23:13
Località: Milano

Re: FARI ACCESI SUL 55 by NANDO MANICCIA

Messaggio da luca92 » 26/07/2014, 13:59

Grazie a Nando e a DjNomade! :su:







Ciao
Luca

:abb:
Immagine




Immagine







Immagine

Rispondi

Chi c’è in linea

Visitano il forum: Nessuno e 1 ospite