rand ?

[Snail Instruments]

>> az se vsechny ostatni vystridaji. Funkce Randomize nedela nic jineho, nez
>> ze sejme tento balicek karet v miste urcenem jinymi promennymi (jako
>> datem), ale poradi karet se nezmeni.
>> 
>Teraz ste sa netrafil. Generovanie "nahodnych" cisel v Pascale pouzivam uz 
>dlhsiu dobu, ale postupnost nahodnych znakov sa v ziadnom pripade neopakuje, 
>dokonca system generuje niekedy dve rovnake cisla za sebou, pripadne
vzdialene 
>od seba 1-2 byte. Takze to robi nejak premyslenejsie, ale nad tym som velmi 
>nebadal. 

Jenze ze 16 bitoveho cisla berete jenom 7-8 bitu, ty se pak mohou opakovat.
Zrovnatak v tom nasem balicku mohou byt dvakrat za sebou piky. S tim
promyslenim to nebude az tak slavne.

J. Hanzal