-
.
MI HAI CHIESTO IL POSSIBILE E L'HO FATTO...... MI HAI CHIESTO L'IMPOSSIBILE E LO STO FACENDO..... MI HAI CHIESTO UN MIRACOLO PER QUELLO CI STO ANCORA LAVORANDO.....
- Group
- Member
- Posts
- 68,095
- Location
- Da l'isola che non cè
- Status
- Anonymous
OGNI QUALVOLTA SULLA RUOTA DI MILANO SORTISCE IL NUMERO SPIA 53, METTEREMO IN GIOCO PER AMBATE 18 E 78 SULLA RUOTA IN ESAME. PER TENTARE LE SORTI DI AMBO, ABBINEREMO ALLE DUE AMBATE I NUMERI FISSI 7-26-30-57-90, IL GIOCO Và SEGUITO PER 6 COLPI MASSIMO, 5 PER LE AMBATE E 6 PER GLI AMBI..
------
7 Feb 53 MI ..... a colpo ambata 18 e ambo 18 90 MI
7 marzo 53 Mi ..... 1° 57 30 ambo Mi
........ 2° colpo amabata 78 Mi
......4° colpo ambata 18 + ambo 18 30
.......9° colpo ambata 18 Mi
.....10° colpo ambata 78 Mi
4 Aprile 53 Mi ..... 3° colpo ambata 18 ambi 18 90 e 18 57 piu terno 18 90 57
.......8° colpo ambata 78 e ambo 78 57 Mi
......10° colpo ambata 18 Mi
12 maggio 53 Mi .....4° colpo ambata 18
......11° colpo ambata 18 + ambo 18 57 MI
.....12° ambo 30 57 MI
.......15° colpo ambata 18 Mi + ambo 18 30
25 Giugno 53 MI .......2° colpo ambata 18 Mi
9 Luglio 53 Mi ...... 1° colpo .ambate 18 / 78 + ambo 18 78
19 Luglio 53 MI .....a colpo ambate 18 / 78 + ambo 78 18
...... 4° colpo ambata 18 + ambo 18 57 / 18 30 + terno 18 57 30 Mi
21 Luglio 53 MI ..... 3° colpo ambata 18 + ambo 18 57 MI
.................7° colpo ambata 18 Mi
11 Agosto 53 MI ......a colpo ambata 18 Mi
17 Settembre 53 Mi ......Esito Neg
24 Ottobre 53 Mi .....
27 Ottobre 53 Mi.........2° colpo ambata 18 Mi
........3° colpo ambata 78 Mi
........7° colpo ambata 18 MI
......9° colpo ambo 57 26
21 Novembre 53 MI........ 2° colpo su tutte il terno 57 90 78
12 Marzo 2011 53 MI.....al primo colpo ambate ed ambo 18 78. -
.
bravissimo peccato non averla vista...
ciao. -
.
MI HAI CHIESTO IL POSSIBILE E L'HO FATTO...... MI HAI CHIESTO L'IMPOSSIBILE E LO STO FACENDO..... MI HAI CHIESTO UN MIRACOLO PER QUELLO CI STO ANCORA LAVORANDO.....
- Group
- Member
- Posts
- 68,095
- Location
- Da l'isola che non cè
- Status
- Anonymous
perche l'ho messo solo oggi ma ti sara utile per la prossima volta che esce il 53 :
. -
.
grazie davvero,appena posso ,se riesco,ti faccio un listato del metodo..grazie davvero..sean69!! . -
.
MI HAI CHIESTO IL POSSIBILE E L'HO FATTO...... MI HAI CHIESTO L'IMPOSSIBILE E LO STO FACENDO..... MI HAI CHIESTO UN MIRACOLO PER QUELLO CI STO ANCORA LAVORANDO.....
- Group
- Member
- Posts
- 68,095
- Location
- Da l'isola che non cè
- Status
- Anonymous
grazie a te , poi mi spieghi per favore cosè questo listato. . -
.grazie a te , poi mi spieghi per favore cosè questo listato.
intendevo un listato per il programma L8+... -
.
MI HAI CHIESTO IL POSSIBILE E L'HO FATTO...... MI HAI CHIESTO L'IMPOSSIBILE E LO STO FACENDO..... MI HAI CHIESTO UN MIRACOLO PER QUELLO CI STO ANCORA LAVORANDO.....
- Group
- Member
- Posts
- 68,095
- Location
- Da l'isola che non cè
- Status
- Anonymous
OK . -
.
Come promesso ecco il Listato( o meglio i Listati):il primo gioca le Ambate,gli Ambi e tutti i numeri solo su ruota(Milano),il secondo Listato invece gioca solo gli ambi e tutti i numeri solo su Tutte..
PRIMO LISTATO(Gioca solo su Ruota)SPOILER (click to view)Sub main()
Dim n(4),n1(3),ru(3),ps(4)
Dim ps1(3)
Dim am(2)
Dim ps2(1)
Dim ps3(2)
Dim ambo(2)
Dim ambo1(2)
Dim ambo2(2)
Dim ambo3(2)
Dim ambo4(2)
Dim ambo5(2)
Dim ambo6(2)
Dim ambo7(2)
Dim ambo8(2)
Dim ambo9(2)
Dim qa(7)
ps(2)=2
ps(3)=1
ps1(3)=1
ps2(1)=1
ps3(2)=1
r=5
ru(1)=5
'ru(2)=11
am(1)=18
am(2)=78
ambo(1)=18
ambo(2)=7
ambo1(1)=18
ambo1(2)=26
ambo2(1)=18
ambo2(2)=30
ambo3(1)=18
ambo3(2)=57
ambo4(1)=18
ambo4(2)=90
ambo5(1)=78
ambo5(2)=7
ambo6(1)=78
ambo6(2)=26
ambo7(1)=78
ambo7(2)=30
ambo8(1)=78
ambo8(2)=57
ambo9(1)=78
ambo9(2)=90
qa(1)=18
qa(2)=78
qa(3)=7
qa(4)=26
qa(5)=30
qa(6)=57
qa(7)=90
For es=EstrazioneFin-335 To EstrazioneFin
If Posizione(es,r,53)>0 Then
ImpostaGiocata 1,am,ru,ps2,9
ImpostaGiocata 2,am,ru,ps3,9,2
ImpostaGiocata 3,ambo,ru,ps3,9,2
ImpostaGiocata 4,ambo1,ru,ps3,9,2
ImpostaGiocata 5,ambo2,ru,ps3,9,2
ImpostaGiocata 6,ambo3,ru,ps3,9,2
ImpostaGiocata 7,ambo4,ru,ps3,9,2
ImpostaGiocata 8,ambo5,ru,ps3,9,2
ImpostaGiocata 9,ambo6,ru,ps3,9,2
ImpostaGiocata 10,ambo7,ru,ps3,9,2
ImpostaGiocata 11,ambo8,ru,ps3,9,2
ImpostaGiocata 12,ambo9,ru,ps3,9,2
ImpostaGiocata 13,qa,ru,ps,9,2
'ImpostaGiocata 14,qa,ru2,ps,9,2
Scrivi " @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@",1
Scrivi : ColoreTesto 0 : Scrivi " [ Metodo "" SPIA 53 SU MILANO ""] ",1
Scrivi " [ di LaStella -Script Listato da Sean69 ]",1
ColoreTesto 2 : Scrivi "--------------------------------------------------------------------",1
ColoreTesto 2 : Scrivi DataEstrazione((es),1)&" " & " [" & " "& SiglaRuota(r) &" "& StringaEstratti(es,r)&" "&"] Milano sortito numero spia !!! = "&""& Format2(53) &" ",1
ColoreTesto 2 : Scrivi "--------------------------------------------------------------------",1
Gioca es
End If
Next
ScriviResoconto
End Sub
SECONDO LISTATO(gioca solo gli Ambi e Tutti i Numeri solo su Tutte)SPOILER (click to view)Sub main()
Dim n(4),n1(3),ru(3),ps(4)
Dim ps1(3)
Dim am(2)
Dim ps2(1)
Dim ps3(2)
Dim ambo(2)
Dim ambo1(2)
Dim ambo2(2)
Dim ambo3(2)
Dim ambo4(2)
Dim ambo5(2)
Dim ambo6(2)
Dim ambo7(2)
Dim ambo8(2)
Dim ambo9(2)
Dim qa(7)
ps(2)=2
ps(3)=1
ps1(3)=1
ps2(1)=1
ps3(2)=1
r=5
ru(1)=11
am(1)=18
am(2)=78
ambo(1)=18
ambo(2)=7
ambo1(1)=18
ambo1(2)=26
ambo2(1)=18
ambo2(2)=30
ambo3(1)=18
ambo3(2)=57
ambo4(1)=18
ambo4(2)=90
ambo5(1)=78
ambo5(2)=7
ambo6(1)=78
ambo6(2)=26
ambo7(1)=78
ambo7(2)=30
ambo8(1)=78
ambo8(2)=57
ambo9(1)=78
ambo9(2)=90
qa(1)=18
qa(2)=78
qa(3)=7
qa(4)=26
qa(5)=30
qa(6)=57
qa(7)=90
For es=EstrazioneFin-335 To EstrazioneFin
If Posizione(es,r,53)>0 Then
ImpostaGiocata 1,am,ru,ps3,9,2
ImpostaGiocata 2,ambo,ru,ps3,9,2
ImpostaGiocata 3,ambo1,ru,ps3,9,2
ImpostaGiocata 4,ambo2,ru,ps3,9,2
ImpostaGiocata 5,ambo3,ru,ps3,9,2
ImpostaGiocata 6,ambo4,ru,ps3,9,2
ImpostaGiocata 7,ambo5,ru,ps3,9,2
ImpostaGiocata 8,ambo6,ru,ps3,9,2
ImpostaGiocata 9,ambo7,ru,ps3,9,2
ImpostaGiocata 10,ambo8,ru,ps3,9,2
ImpostaGiocata 11,ambo9,ru,ps3,9,2
ImpostaGiocata 12,qa,ru,ps,9,2
Scrivi " @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@",1
Scrivi : ColoreTesto 0 : Scrivi " [ Metodo "" SPIA 53 SU MILANO ""] ",1
Scrivi " [ di LaStella -Script Listato da Sean69 ]",1
Scrivi " [ Gioco solo su Tutte ]",1
ColoreTesto 2 : Scrivi "--------------------------------------------------------------------",1
ColoreTesto 2 : Scrivi DataEstrazione((es),1)&" " & " [" & " "& SiglaRuota(r) &" "& StringaEstratti(es,r)&" "&"] Milano sortito numero spia !!! = "&""& Format2(53) &" ",1
ColoreTesto 2 : Scrivi "--------------------------------------------------------------------",1
Gioca es
End If
Next
ScriviResoconto
End Sub
spero di aver reso cosa gradita,sean69!!. -
.
MI HAI CHIESTO IL POSSIBILE E L'HO FATTO...... MI HAI CHIESTO L'IMPOSSIBILE E LO STO FACENDO..... MI HAI CHIESTO UN MIRACOLO PER QUELLO CI STO ANCORA LAVORANDO.....
- Group
- Member
- Posts
- 68,095
- Location
- Da l'isola che non cè
- Status
- Anonymous
sean per chi ne capisce qualcosa sono certa di si , mi dispiace ma di questa cosa non capisco niente . -
sargantana.
User deleted
Sean
Tanto per [ri]prendere la mano ho provato a trafficare un pò con i listati, che all'epoca mi divertivano molto e che avevo imparato a gestire abbastanza agevolmente tanto da arrivare a scriverne qualcuno pure io (seppure decisamente elementare).
Noto però che quasi tutti si bloccano per errori nella sigla della/e ruota/e.
Nel caso specifico di questo listato l'esecuzione viene stoppata in partenza e ottengo:
Errore nello script
Errore 13: Tipo non corrispondente:'Sigla Ruota' (riga 95)
che dovrebbe essere
ColoreTesto 2 : Scrivi DataEstrazione((es),1)&" " & " [" & " "& SiglaRuota(r) &" "& StringaEstratti(es,r)&" "&"] Milano sortito numero spia !!! = "&""& Format2(53) &" ",1
Con altri sistemi invece (p.es. 88 spia a NA) il listato parte con la richiesta d'inserimento dei vari parametri proposti di default per poi fermarsi in fase di esecuzione con un
Errore nello script
Errore 9: Indice non incluso nell'intervallo: '[number: 8]' (riga 42)
che dovrebbe essere
Scrivi DataEstrazione (es)&" "& SiglaRuota (rt(8))&" "& StringaEstratti (es,rt(8))&" NUM. Spia "& StringaNumeri (nu)
Con il sistema relativo a 8-80 spia a BA, sempre dopo l'inserimento/conferma dei valori il listato mi restituisce
Errore nello script
Errore 13: Tipo non corrispondente:'Sigla Ruota' (riga 25)
che dovrebbe essere
Scrivi DataEstrazione(es,1)&" [ "&SiglaRuota(r1)&" - "&stringaestratti(es,r1)&_
Come sai la rel. di L8+ che uso è la 6.0.0 e molto probabilmente sono io che, inavvertitamente, sbaglio qualcosa in fase di copia-incolla del listato nell'editor del prgm, ma non riesco a capire cosa.
Ciao, grazie.
Marco
. -
.
Ciao,effettivamente sulla versione 6.0 non funzionano,invece sulla 6.1 vanno egregiamente,bisogna correggere qualcosa su quella riga per poterlo far funzionare..vedo cosa posso fare . -
sargantana.
User deleted
Sean
Io passerei anche alla 6.1 ma leggo di parecchi "falsi" con gli a/v, specie con Avira che è proprio quello che uso io...
Ciao
Marco. -
.
lo so',ho gli stessi problemi anch'io ,ho provato in qualche forum sui virus a capirci qualcosa,ma non ne sono venuto a capo..vedo se riesco a modificare il listato o se qualcuno mi puo' aiutare..appena possibile,posto il listato corretto.. . -
num3r0.
User deleted
A parte che non uso molto lottodesk, perchè non mi piace come programma, è piu adatto per gli script, ad ogni modo c'è l'ho pure io (la versione 6.1)......io uso AVG internet security 2012 con w7...e problemi non nè ho!!
Ma ripeto...lo uso pochissimo!!
Ad ogni modo ho testato entrambi gli script di questo post...e funziona perfettamente.
Edited by num3r0 - 1/9/2011, 10:59. -
.
Ciao num3r0,il problema e' che su l8+ 6.0 non vanno,la versione 6.1 da' un po' di tempo risulta infetta a molti antivirus(avira soprattutto),tranne che a AVG internet security 2012 ,quello che hai tu..vedendo tanti allarmi che Avira( ed altri a/V) manda quando l8+6.1 e' in esecuzione,molti utenti lo tolgono,passando alla 6.0..e i listati non vanno piu'(forse e' qualche bug del programma)..da quello che ho capito io e' un falso positivo,non e' un vero e proprio virus:si potrebbe mettere il programma tra le eccezioni dell'antivirus e continuare ad usarlo,pero' a proprio rischio...bisogna vedere se si riesce ad adattare il listato sopra alla versione 6.0 o se bisogna farne uno nuovo,adatto al programma.. .