Random

hmmm.....du kan legge alle bokstaver inn i en array, og deretter generere et random tall innenfor lengden av arrayet, og dermed har du en random bokstav....

/nute

Kan du ikke lave et array med 28 pladser med et bogstav i hver. Så laver du en tal random funktion der tilgår en af felterne i dit array.

11 sek - damn

A er ASCII 65 - Chr(65) - vælg et tal mellem 65-90 og brug Chr-funktionen

eller

    FUNCTION konsonant (sidsteKonsonant)
\'****************************
CONST konsonanter = \"bcdfghjklmnpqrstvwxz\"
DIM  nykonsonant

nykonsonant = sidsteKonsonant

Randomize
DO UNTIL nykonsonant <> sidsteKonsonant
  nykonsonant = MID(konsonanter, fix(Rnd()*LEN(konsonanter) + 1), 1)
LOOP

konsonant = nykonsonant
\'****************************
    END FUNCTION    \' konsonant

bogstaver = Array(\"a\", \"b\", \"c\", \"d\", \"e\", \"f\", \"g\", \"h\", \"i\", \"j\", \"k\", \"l\", \"m\", \"n\", \"o\", \"p\", \"q\", \"r\", \"s\", \"t\", \"u\", \"v\", \"w\", \"x\", \"y\", \"z\")
RANDOMIZE
tal = int((rnd * 26))
randombogstav = bogstaver(tal)

Argh...skulle jo først lige skrive scriptet.

11 sek er ikke lang tid :)

min første ide var noe lik sone sin...men jeg valgte å legge a-zA-Z i array, fordi det er vanskeligere å generere tilfeldige tall ut fra et intervall (fx 65-90 og A-Z (husker ikke ASCII for disse)) enn fra 0-n...

/nute

randomize
tal = Int((upperbound - lowerbound + 1) * Rnd + lowerbound)


Hvis du vil havde øvre og nedre grænse eks.vis mellem a-z:
bogstav = Chr(Int((Ord(z)-Ord(a) + 1) * Rnd + Ord(a)))