From: "Pavlos" Newsgroups: comp.os.msdos.djgpp Subject: Re: how about "more" random ? Date: Thu, 29 Jul 1999 19:47:57 +0300 Organization: An OTEnet S.A. customer Lines: 127 Message-ID: <7nq0m4$n1b$1@newssrv.otenet.gr> References: NNTP-Posting-Host: dram-a10.otenet.gr X-Trace: newssrv.otenet.gr 933266948 23595 195.167.113.233 (29 Jul 1999 16:49:08 GMT) X-Complaints-To: abuse AT otenet DOT gr NNTP-Posting-Date: 29 Jul 1999 16:49:08 GMT X-Newsreader: Microsoft Outlook Express 4.72.3110.1 X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3 To: djgpp AT delorie DOT com DJ-Gateway: from newsgroup comp.os.msdos.djgpp Reply-To: djgpp AT delorie DOT com Sorry for posting a zip file, but I think it can help If you want even more random results, try this code. I DIDN'T write the code. It hasn't been tested with DJGPP, but it should work. I've tested it some years ago with Borland C 3.1 and it worked fine. It claims that it is a *very* good random number generator. I think it doesn't return just a random number, it fills an array with as many as you want. Pavlos Eli Zaretskii wrote in message ... > >On Thu, 29 Jul 1999, Simon De Deyne wrote: > >> Thanks for the answer! I did consider this way, but then, >> i also noticed that the seeding with the time function (srand) isn't >> as random as when i used the other random function. > >Seed has nothing to do with randomness. > >> > So to produce a random number between 0 and 99 >> > x = rand() % 100; > >The low bits of the random numbers are known to be not very random. If >you want more random results, try this (untested!): > > x = ((double) rand ()) * 100 / RAND_MAX; begin 666 Random.zip M4$L#!!0``@`(`%63O!1!&_E5'P@``$X2```(````4D%.1$]-+D.]5_MO(LD1 M_AE+_A]*1([ "W@&,!C;K,3NV;?>\]J1'XF4E4]JA AT 8:>AZ9GC%V[O9_SU?= M,X!W[41Y* B;GNZJZGI\]9B#_=V=CW0W5X92$4WBD*(\',N49C*2JJ95H) 2Z-43>FO(A11RPHXU[AQ(N AT V$YDLA:OLF6YD$J?9,9W?WC=O M/]Y<-(_ZS4./:O[@J%]G3OZ[R&@E#&GPIA3&$S55T!=WG[?HLPBEL7GKEI AT JE9?=?;JX)7SO/IW1A[/;._KEZOHO M5W0SNOKI^@M=W7_Y<'9#/Y]=G=V,[JYO:/3GT<7EZ,/E68N9W:?V*5Y)6-B M(R DOT Y AT I,GR AT 0Q=J!<)H-YI/Z62PI$1,]*Z AT EM6 DLB4Q5/&'%?>_7GN>UZ$.> M4387&2&D)E-:LXG97-($U^@X"664X4#,9(N=5O AT L$<; -Z/+2Y;%Y)DTF:$I M`/ &,)PGYW#V6 AT VG&P2T?_6[W0:K$,1AHF4F81A'3XRUI-H,,34T5E!R`G54 M`.RDTN0:-\81`6N%J% $LJV!MQ\ Z$[(9 AT L[5.(Y$$"@R M$G&(`FAO==%B9IADT'>WL"\ZG8;]C1/V$,NHFGRW9^1M-L9Q# A%`$S&C(9!$=!C#-W2$+Z/:@PP>!*I? 0V]LHO5+!-0>VQ5RXJO)6DP'Z5G&ZM+F;8:=S-&BW/"*_VVY[[;9=]]O]0Z_7 M;WG?4?O]=KMC*8XZA]WNX(B7,+?7Z<#33,Y>H,(-O1->;]M:F$H5_GOAGE[I M'*I4$G AT _F]:J>WZ[Y4^IVJ"N-^BUO/WBQ\)$/;"D;UO(=!C*OPZ.`+<`WPG^ MPI/UN074H-^@Q:"_V2U1;N$S=%EP\A;>+2)V=S;0/+'P/=A,!OB^`JLTSC-. MJ1*K;X46]>#+Z*9F._35]=W9L2V\C'-ZA ;<$8SM;W/QB,(C=,Z]068K*:-C MCI!'IT.Z^,S_.WZG??0R?O_&QPKZY=(*\KPCOVP"+S4ORRZ42J4HRA<,-$C' M55PD**8@+F(FGTY5H&31; "%&7I#%J_;'E=V[G IMW =Y-KYCEM(B\[A'?DD MF!*5`-)0`HLI"G/+%",`Y,[@Y\1=6&8(!&S.$Y%FIFS:!A/.]D4-EB711)T8 MJ.4RAM#NU2SB^8>95Q'[ERUKN8BO+!TPA(ALV%F8;7[P'FI%,(\5NZD$@)%! MC)Y0BG$C"'QAA,WES8BY2>(MF# "G,-I`.$A)A?UPE!TOTUHFDVGR=J^K5,& M$KM)E/'@3IZ AT K#RI4-A)!+-2QVN5<\ ](@OS76&E/S)"7%UEY6T*_1-XLZ62 MI4"!,B,'ZM_JV+7RD*+0=CDTIT,>9R M.;$UY;\INB_OLM;]/VNM:Y.H::A&:"7(#7[ 4WBR;JL&FA9M#)F#*G;JT>^_ MHX*]MS6"UTOM]I;ZO4WW.G%7KB1Y9FI5SONI2A'<[[/?NA3[MAP)5Y#*>H02 M8@<]OJ)5=1UN(V\K`?ZU"-:H%"&?5%;S[?I;81,@"*,._'Z_OH=_](YLS^?^ MKQ;;.TNF7.H#OS=@RB/L^[S/P\%2[V&[<)-K3:XWH3FA7^ 7[6:[%@KL4"';_+OVNN2LBWUVIJ?\&7#^K[RSKM$5:6V9JQ<$O6?.F6 MK'+HEJQE[;"SKUEMR]HK61'5FMX/ZWN]+KU'Q6[7R="[H0L[*[F_T9*]5LF_ M*O4`>6;+CP&>.[UVMX,>2P>0WN_WVW[/&1I,<-KO'78[;?^U8S:NV.J\.'-W,5_2"7XK2P.LWU2"/%);A8#=/AS:B>=% MOG_DE\IRBEG/+L4,5$=R`NBV=6HNAT60ZB\2M+U.4)=*T,(F$WY/A^Q\NUSG M!O1"_ '*0?^!FE@`(/8EP.K)IZ><<74V@''M%]E7< Q+PQADS>::$4_#(;BV MH'O#5@KZ/9^N5Y.%O_"__7] M73193CLD\H3VPC8;&RES2E7NL/"@W)X>IMTY'NDI[$.CJ-<3?C[\X5FE5?F. M[E1LM-5;1]-FHYY[&O5[$=$LIT3S)';=&9';5#B,=VB&1P4;3E.\1T22X'>J MG$MELX';0ENK-JG\A51.6Q$[>)JFI+?>U),P2F"4. M#M+PY()CPKL-PLR:#<"GJ\VJB=%+NM(ZD;4-SIRRP&53AB0 AT 8 DOT Q?* 3*OLH? M,L8(SQ/-AG5XUQ6ISB451N^,R#Q&^L" /^N2L85IM7V&"\)Y/Y""!!'D9;:1 MIMG8R5P:X;0A9>F AT S7=>&FMC9.S2YT #6#*U&X9::OOV3;.1:""<:T>V+ IM M'%(!QR>+U>R8%';0:?=<2-NA3.78,&3=4B:>:0.\C?QOJ8Q,VLC ;WM0L8HV MZ7C'JPC)[G69)HQ3D8IG/[355=!(O=@Z."E0`3R*'%H)"$2*WUCG"0+X%S-P+!8T13+D3E8OKQ[7\YOEI]GZRV0Z MB:YFZ\7-^M?I_7)Q,Y]/H^EL'54/TI^E-BCR.V&LV*5*_,U2F2NN>=#R MK*9S5.Q>/$F8B:5QH EFI*6T MGNNJ0W\$M?].E)46DB;QYPXL^WT_T#\?4XL+^45I,^JWFXWTN*#23N,5N\>N M]<_&;'Y&*,Z:*()LJG9[EI!,)VI;B:(7N:.N)C*$4Q6^#0&X AT X:TO8WNL%?Q MGC;"*JZ<*LAW;@Q[N"*ZAQCF*@;R4KC2,!9UG=0.X-;O*P6,HE58["_SV!=H MR(,E6\@XN+T)&@.W*/AEN5LBPE3F DOT Z AT C%HD"1?I#96 13"..NG0O29#,B02.,R-$/V:",9-U9@[(E7V+96KD)JR$H#*/C54R/B>G:PQ]-2R7AY@+SV40B#NW`YFI55ZD5G.4X*2O*N&+P=;I1P=TLO;FPTJBVG7-AQEV0&6 MDQMD(-(KBUQFOH_C%)2'E.$ULH53`&>%#P'L:_>M2C8;Z&FEG0[9R&@V'OK#OJG0[0 MSBYZH_;9:-3M]_J]GRJ/4Q $E/E TM EU2ZD@]D-!@!^('>RU@=AD)6DH^45P2Y+G+2';'Y]W3 M'K7Z%^/S-J_D_YGS_0\ 8 U0.F''H35GK'IHQ*$ZD%(H,&JRJK,$VZ2Z\"=85,M DOT 1 AT Q:A5G!I+,T MF<_K&N)S?1"&CWI=_;GPXD;P#08&O_='HPZ[P$?#5'HUY DOT SY AT WJ+=0HZA^)6 M"9=9S-U/VC)U_MN&A228RJ!S.+K;,$-LX04_!ITYU[DU+#@^E#5Z6J>;[D[9?@>P& M,R?">R.!R7''$VJ%KZM7QMI1E;M[P$7?Q _J]_]^/NYU0G_[J):91FA028DX M1#VLZLVI/\2!G+_ AT J@-RZ_V739>^7 AT 4$__F3+MCZ/U!+`0(4`!0``@`(`%63 MO!1!&_E5'P@``$X2```(``````````$`( "V AT 0````!204Y$3TTN0U!+`0(4 M`!0``@`(`,R2O!3!.4%O50<``.4.```,``````````$`( "V AT 44(``!204Y$ >3TTM0RY$3T-02P4&``````(``@!P````Q \````` ` end