Sortere tilfældigt

Tror den eneste løsning er random() funktionen, som du selv nævner, men som du siger udskriver den kun ét tal, og du har ikke mulighed for at sikre dig at alle tal kommer med!

Med en random funktion kan du ikke sikre at et tal ikke dukker flere gange. Der bliver du nød til også at tjekke om tallet har været der før.

på www.bokaj.dk har jeg en lottotals generator liggende, som jeg har lavet i director, og der generere den et tilfældigt tal fra 1-33 (34), men hvis det genererede tal allerede er fundet, prøver den igen, indtil den kommer til et tal den ikke før har fundet.

det er lidt det samme du skal bruge i dette tilfælde. Hvis du er interesseret kan jeg godt sende dig filen!

Her er en løsning i en C-lignende dialekt - og den behøver IKKE at prøve flere gange for at undgå dubletter:

antal = 50;

/* opret array numre med alle de ønskede tal */
for (i = 0; i < antal; i++) {
  numre[i] = i + 1;
}

tilbage = antal;

for (i = 0; i < antal; i++) {
  /* lav et tilfældigt tal i intervallet  [0 < tal < tilbage] */

  /* Returner det fundne tilfældige tal */
  resultat[i] = numre[tal];

  /* Erstat det afleverede tal med det sidste tal i numre, og */
  /* tæl antallet af tilbageværende ned med 1.                */
  tilbage--;
  numre[tal] = numre[tilbage];
}

Ups der skulle have stået

  /* lav et tilfældigt tal i intervallet  [0 <= tal < tilbage] */

list1 = []
list2 = []
repeat while list1.count < 50
  list1.add(list1.count+1)
end repeat
repeat while list1.count > 0
  randomValue = Random(1,list1.count)
  list2.add(list1[randomValue])
  list1.deleteat(randomValue)
end repeat

list1 kan være hvad som helst, i dette tilfælde er det tallene fra 1 til 50.
list2 fyldes ud med indholdet af list1 i tilfældig rækkefølge.

Tak for hjælpen til alle.
Den C-lignende effekt ser helt ok ud, men da jeg helst vil holde mig til Lingo vil jeg benytte mig af sparkl's løsning. Den virker perfekt, og er rimelig simpel. Tak.

Marianne

Damned too late... ;-)
en lettere og hurtigere metode er:

on generateRandomList fromNum, toNum
  randomList =[]
  y = 1
  repeat with x = fromNum to toNum
    addAt(randomList, random(y), x)
    y = y + 1
  end repeat
  return(randomList)
end

så kan du bare lave en:
tilfaeldigListe = generateRandomList(1,50)