LottoScript - Procedure

Sintassi

Genera il tabellone analitico dei ritardi corrispondente all’estrazione specificata. Gli elementi del tabellone possono essere poi letti con la funzione TabelloneAnalitico

Esempio

Sub main()

Dim e
Dim riga

e=EstrazioneFin 'estrazione alla quale viene valutato il tabellone

Scrivi "Tabellone analitico calcolato all'estrazione del "+DataEstrazione(e)
Scrivi ""

GeneraAnalitico(e)
Scrivi String(163,"-")

For n= TabelloneAnalitico(0,0,0) To 0 step -1
Messaggio CStr(n)
riga=FormatSpace(n,3)+" "
For r = 1 To 10
For i= 1 To 5
If TabelloneAnalitico(n,r,i)>0 Then
riga=riga +Format2(TabelloneAnalitico(n,r,i))+" "
Else
riga=riga +"-- "
End If
Next
riga=riga+" "
Next