GLBasic forum

Other languages => GLBasic - de => Topic started by: Husten on 2008-Jan-14

Title: array mischen?
Post by: Husten on 2008-Jan-14
hi,

gibt es eine möglichkeit den inhalt eines arrays per zufall zu mischen also aus

dim[3]
dim[0]=1
dim[1]=2
dim[2]=3

zb einfach

dim[0]=3
dim[1]=1
dim[2]=2

machen, halt per zufall :)
Title: array mischen?
Post by: Kitty Hello on 2008-Jan-14
Code (glbasic) Select
DIMDATA f[], 1,2,3
Permute(a[])

FUNCTION Permute: arr[]
LOCAL i, j, k, s, nper
nper = LEN(arr[]) * 3 + 20
FOR i=0 TO nper
j = RND(LEN(arr[])-1)
k = RND(LEN(arr[])-1)
IF j<>k
s = arr[j]
arr[j]=arr[k]
arr[k]=s
ENDIF
NEXT
ENDFUNCTION
Title: array mischen?
Post by: Husten on 2008-Jan-14
danke :) lustige lösung, einfach zufällig paare raussuchen und vertauschen, darauf muss man erstmal kommen :)