i need some help

[Agamemnus]

That looks like the first clumsy solution........................

[LinkMaster Sab]

I used that swap technique to shuffle the cards in my blackjack game, thanks .

[relsoft]

why not.....



Untested.

Code:

defint a-z

Dim A(1 to 50)

for i=1 to 50
      A(i)=i
Next i

for I=1 to 50
    Rand%=1+int(rnd*50)
    Swap A(i), A(rand%)
Next i

[Agamemnus]

*Aims his Gauss rifle at relsoft.....*