per Metus Esselotto Jackman Thauk

[Roby]

salve a tutti sono in cerca di un'aiuto
volevo sapere se ce qualcuno di buona volontà che possa realizzare per me lo script da usare con lottodesk del seguente metodo:

all'uscita di 2 numeri uguali isotopi su 2 ruote consecutive tipo venezia nazionale
nazionale bari
bari cagliari ecc

fare il seguente calcolo :
numero estratto isotopo come ambata

abbinamenti per ambo :
primo estratto prima ruota +88
seondo estratto prima ruota +23
terzo estratto prima ruota +20

totale previsione una quartina per ambo da giocare su tutte le ruote.

esempio pratico

nazionale 67-43-55-78-87
bari 66-65-55-90-43

calcoli
55 ambata
67+88 1 abbinamento eventuale fuori novanta
43+23 2 abbinamento evntuale fuori novanta
55+20 3 abbinamento eventuale fuori novanta
.
progressioni per il gioco del solo ambo su tutte :
colpi di gioco 13

colpo - puntata
1-1.00
2-1.00
3-1.00
4-1.5
5-2.00
6-3.00
7-4.00
8-5.5
9-7.5
10-10.5
11-14.5
12-20
13-28

sospendere il gioco al primo esito positivo di ambo su tutte

un grazie a tutti di cuore spero qualcuno possa aiutarmi a presto grazie mille

 

[Thauk]

Ciao, microchipper. Vedi un po' se così va bene:

Sub main()
Dim rt(2),rtt(1),pte(1),pta(2),am(1),nr(4)
Dim prog(5,100)
prog(2,1)=1
prog(2,2)=1
prog(2,3)=1
prog(2,4)=1.5
prog(2,5)=2
prog(2,6)=3
prog(2,7)=4
prog(2,8)=5.5
prog(2,9)=7.5
prog(2,10)=10.5
prog(2,11)=14.5
prog(2,12)=20
prog(2,13)=28
pte(1)=1
pta(2)=1

ex=InputBox("Quante estrazioni controllo?",,200)

ini=EstrazioneFin-ex
fin=EstrazioneFin
For es=ini To fin
Messaggio(es)

For r1=1 To 12
For p1=1 To 5
a=Estratto(es,r1,p1)
r2=r1+1
b=Estratto(es,r2,p1)
If r1=10 Then r2=12
If r1=12 Then r2=1
If a=b Then

rt(1)=r1
rt(2)=r2
rtt(1)=11
k=13

'ambata su 2 ruote
am(1)=a
ImpostaGiocata 1,am,rt,pte,k,1

'quartina x ambo a Tutte
nr(1)=a
nr(2)=Fuori90(Estratto(es,r1,1)+88)
nr(3)=Fuori90(Estratto(es,r1,2)+23)
nr(4)=Fuori90(Estratto(es,r1,3)+20)
ImpostaGiocata 2,nr,rtt,pta,k,2
ImpostaProgressione 2,prog

casi=casi+1
Scrivi String(70,"=")&" Caso n° "&casi,1
Scrivi DataEstrazione(es)&"	" & SiglaRuota(r1)&" "& Format2(a)&" ("&p1&"° estr.)",1
Scrivi DataEstrazione(es)&"	" & SiglaRuota(r2)&" "& Format2(b)&" ("&p1&"° estr.)",1
Scrivi

Gioca es
End If
Next
Next
Next
ScriviResoconto
ScriviResoconto 1
ScriviResoconto 2
End Sub

Ho messo anche il gioco d'ambata sulle 2 ruote di ricerca. Vedi un po' tu se lasciarlo o meno.
ciauz


Fortuna non omnibus aeque.

 

[microchipper]

Thauk ottimo lavoro !!!!1
complimenti con il tuo listato sto cercabdo di scoprire qualche terminologia che ignoro .
se ce da fare qualche modifica le faccio e vedo cosa sucede di conseguenza imparo .
spero tra breve tempo di farti concorrenza

 

[Thauk]

quote:Originally posted by microchipper

Thauk ottimo lavoro !!!!1
complimenti con il tuo listato sto cercabdo di scoprire qualche terminologia che ignoro .
se ce da fare qualche modifica le faccio e vedo cosa sucede di conseguenza imparo .
spero tra breve tempo di farti concorrenza

Grazie.
Studia, studia, che uno scripter in più serve sempre!

Fortuna non omnibus aeque.

 

[esselotto]

ciao microchipper ho visto che il nostro amico thauk ha già risposto
alla tua richiesta.




Rifrazione. La velocità di propagazione di un'onda dipende dalle caratteristiche
fisiche e chimiche del mezzo.
°°°esselotto°°°

 

[Roby]

Dai chipper, con un pò di buona volontà, scopiazzando a dx e sx e 4 parole chiave che sono quasi sempre quelle si fa questo ed altro.
L'importante è capire cosa significano tutte quelle parolette strane, poi viene tutto da solo, basta solo un pò di fantasia e ragionare come un imbecille elettronico!!

Ciao

metus

Non stare davanti a me, potrei non seguirti; non stare dietro di me, potrei non esserti di guida; ma, sta al mio fianco e sii semplicemente mio amico.
Albert Camus

 

[esselotto]

quote:Originally posted by metus

Dai chipper, con un pò di buona volontà, scopiazzando a dx e sx e 4 parole chiave che sono quasi sempre quelle si fa questo ed altro.
L'importante è capire cosa significano tutte quelle parolette strane, poi viene tutto da solo, basta solo un pò di fantasia e ragionare come un imbecille elettronico!!

Ciao

metus

Non stare davanti a me, potrei non seguirti; non stare dietro di me, potrei non esserti di guida; ma, sta al mio fianco e sii semplicemente mio amico.
Albert Camus

imbecille agg. Affetto da imbecillità.
Detto di persona che si rivela poco intelligente;
Chi è affetto da imbecillità.
Persona che si comporta scioccamente o commette 
stupodaggini sin Cretino.


scusa metus leggiti questo topic ho inserito solo una piccolissima parte.
Poi mi dici se corrisponde ad un imbecille?

 [url]http://forum.lottoced.com/topic.asp?TOPIC_ID=121328[/url]


Archimede, afferma che un oggetto immerso parzialmente o totalmente in un 
fluido è sottoposto a una spinta dal basso verso l'alto, di intensità pari al peso 
del volume di fluido spostato.
°°°esselotto°°°

 

[JackMan]

..arrivo sempre per ultimo! meglio ahahha
ciao

 

[esselotto]

quote:Originally posted by JackMan

..arrivo sempre per ultimo! meglio ahahha
ciao

scusa a cosa arrivi per ultimo?


Archimede, afferma che un oggetto immerso parzialmente o totalmente in un
fluido è sottoposto a una spinta dal basso verso l'alto, di intensità pari al peso
del volume di fluido spostato.
°°°esselotto°°°

 

[Roby]

Che hai capito?
Guarda che l'imbecille elettronico è riferito al pc, ovvero computer.
Difatti fa tutte quelle cose che hai scritto.
Ciao

metus

Non stare davanti a me, potrei non seguirti; non stare dietro di me, potrei non esserti di guida; ma, sta al mio fianco e sii semplicemente mio amico.
Albert Camus

 

[LuigiB]

ahah ragazzi i litigi lasciateli a chi va a presso a strane e fantasiose nonche presumibilmente magiche tavole ... confermo (non che ce ne fosse bisogno ) che il caro Metus anche in altre circostanze si riferisce al pc con quella locuzione ...

 

[esselotto]

quote:Originally posted by metus

Che hai capito?
Guarda che l'imbecille elettronico è riferito al pc, ovvero computer.
Difatti fa tutte quelle cose che hai scritto.
Ciao

metus

Non stare davanti a me, potrei non seguirti; non stare dietro di me, potrei non esserti di guida; ma, sta al mio fianco e sii semplicemente mio amico.
Albert Camus

Guarda che non mi sono offeso. Poi non c'era nessuna ragione. (D'altronde su una risposta che non era

indirizzata a me, ma a microchipper (rimaniamo sempre in tema elettonico)).

Io ho difeso solo la Categoria
Leggendo a me è parso tutt'altro. Comunque o computer o persona, ho solo dato la definizione di
imbecille. Lo trovi sui vocabolari.
Niente di grave spero?
Il parlato è una cosa, lo scritto e tutt'altro.


Il secondo principio della dinamica afferma che una forza, applicata ad un corpo, determina
in questo un'accelerazione.
°°°esselotto°°°