![]() |
Re: Random ist kein reiner Zufall
Aber warum immer bei so ähnlichen Zahlen?
|
Re: Random ist kein reiner Zufall
ich nehme an, dass der randseed nur einmal festgelegt wird und nciht immer wieder neu
und wenn ich irgendwann weiss, was dieser code bedeutet, so kann ich mir bestimmt auch vortellen, dass er sich bis zur erzwungenen gleichverteilung langsam nähert, wodurch eine gleichverteilung immer wahrscheinlicher wird |
Re: Random ist kein reiner Zufall
Delphi-Quellcode:
Naja in etwa so...
Result := RandSeed * 134775813;
RandSeed := Result + 1; Result := DWORD(Result) mod Range; |
Re: Random ist kein reiner Zufall
ist das, was du da geschrieben hast das da unten?(oder zumindest ein Teil davon?
wenn ja, was davon?
Delphi-Quellcode:
procedure _RandInt;
asm { ->EAX Range } { <-EAX Result } PUSH EBX {$IFDEF PIC} PUSH EAX CALL GetGOT MOV EBX,EAX POP EAX MOV ECX,[EBX].OFFSET RandSeed IMUL EDX,[ECX],08088405H INC EDX MOV [ECX],EDX {$ELSE} XOR EBX, EBX IMUL EDX,[EBX].RandSeed,08088405H INC EDX MOV [EBX].RandSeed,EDX {$ENDIF} MUL EDX MOV EAX,EDX POP EBX end; |
Re: Random ist kein reiner Zufall
Da hatte ich mal das in Pascal überstetze Function Random(Range: LongInt): LongInt; aus D7 und 'ne etwas erweiterte Version von mir. (dim mit der "Zufall" noch ein bissl zufälliger wird)
![]() [add] ach ja, da nochmal das koplette von D7 ![]() |
Re: Random ist kein reiner Zufall
Zitat:
|
Re: Random ist kein reiner Zufall
Zitat:
Zitat:
Zu dem Photon im Doppelspalt: Wenn ich es richtig verstehe, ist der einzige Grund, warum man nicht vorher bestimmen könne, durch welchen Spalt das Photon geht, eine Interferenz der Photonen mit sich selbst. Kann man diese Interferenz nicht auch (zumindest theoretisch) berechnen? Sie wird doch wohl kaum "einfach so da sein", sondern auch ihre Ursachen haben. Zitat:
Zitat:
|
Re: Random ist kein reiner Zufall
Zitat:
|
Re: Random ist kein reiner Zufall
[OT]
Hi, ich bin dem Wunsch des Moderators (sorry, weiß gerade nicht mehr wer es war, änder ich nachher ggf. nochmal ab) von MrSpock und Matze gefolgt und habe einen eigenen Thread für die Fortführung (der OT Diskussion!) eröffnet. Ich denke die Forderung ist durchaus gerechtfertigt und deshalb auch gleich die Bitte einfach ![]() weiter zu machen. Danke! Gruß Der Unwissende [/OT] [edit] OT rangehangen und hinzugefügt, dass es um die OT-Diskussion (Gibt es Zufall) geht! [/edit] |
Re: Random ist kein reiner Zufall
Na ja, 's is zumindestens nich mehr ganz so schlimm, wie die einfache mathematische Berechnug.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:02 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz