-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0|29|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-

Hotshot

Lotto Number
9th April 2015 Blitz Max, Windows
Shortest Lotto Number
[code]
SeedRnd MilliSecs()
For i=1 To 6
j=Rnd(49)
If j=0 Then j=Rnd(49)
Print j
Next
WaitKey
[/code]

Jayenkai

MoneyDisplay
19th July 2010 Blitz Max
Just needed this, thought others might want it.
[code]
Function MoneyDisplay$(fn,ftxt2$=''$& quot;)
ftxt$=''''
ftxt3$=fn
fx=0
For fn=Len(ftxt3$) To 1 Step -1
ftxt$=Mid$(ftxt3$,fn,1)+ftxt$
fx=fx+1
If fx=3 And fn>1 Then ftxt$=&quot*snip*

JL235

List v.1.2
8th December 2006 Blitz Max
Dynamic Arrays in Blitz Max
More - Older Posts