AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Zufallszahlen allgemeine Frage

Ein Thema von derseitzer · begonnen am 5. Mär 2018 · letzter Beitrag vom 7. Mär 2018
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#11

AW: Zufallszahlen allgemeine Frage

  Alt 5. Mär 2018, 17:44
Es gibt Vieles.

Angefangen von Bewegungen der Maus (nutzen einige Programme, um einen Verschlüsselungskey zu generieren) oder eben Soundkartenrauschen
bis zu https://www.idquantique.com/random-n...ber-generator/ oder https://www.google.de/search?q=rando...&tbm=isch&sa=X
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu ( 5. Mär 2018 um 17:47 Uhr)
  Mit Zitat antworten Zitat
Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
 
Delphi 12 Athens
 
#12

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 10:55
Time Stamp Counter reicht schon für schöne Zufallszahlen, da braucht man keine zusätzliche Hardware.

https://en.wikipedia.org/wiki/Time_Stamp_Counter
http://www.delphipraxis.net/1170302-post182.html
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#13

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 11:04
Time Stamp Counter reicht schon für schöne Zufallszahlen, da braucht man keine zusätzliche Hardware.

https://en.wikipedia.org/wiki/Time_Stamp_Counter
http://www.delphipraxis.net/1170302-post182.html
Achso?

Früher (vor über 10 Jahren, oder so) arbeitete Randomize mit GetTickCount, was unglücklich war, da viele Idioten/Unwissende ständig wiuederholt das aufriefen und sich in Schleifen wunderten, wenn sich Zufallszahlen auffallend häufig wiederholen.
Inzwischen wird QueryPerformanceCounter verwendet, was für normale Delphiprogramme wie RDTSC (TSC) aussieht.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat
Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
 
Delphi 12 Athens
 
#14

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 11:32
GetTickCount liefert Millisekunden.
Time Stamp Counter liefert CPU-Cyclen.
Da immer mehrere unterschiedliche Prozesse laufen, ändert sich der Wert dieses Registers zwischen zwei Abfragen nicht um einen festen Betrag.

Beispiel Pseudocode:
Delphi-Quellcode:
function MyRandom(AValue: Integer): Integer;
begin
  RandSeed := RandSeed xor RTDSC;
  Result := Random(AValue);
end;
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#15

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 12:22
Time Stamp Counter liefert CPU-Cyclen.
Nicht mehr. Das ist auch nur noch ein Pseudocounter.

Eigentlich hatte bei vielen CPUs jeder Kern seinen eigenen Counter.
Teilweise können die Kerne unterschiedlich getaktet werden.
Fazit: Die Counter liefen auseinander und bei der zeitmessung musstest du höllisch aufpassen, dass die beiden Messpunkte auf dem selben Kern liegen.

Da kamen Hersteller auf die Idee einen nebenläufigen "unabhäniggen" Counter zu nutzen und alle Kerne zeigen den gleichen Wert.
Und es kommt sogar vor, dass dieser externe Counter nicht synchron mit den Kernen läuft, also das dynamische Hoch-/Runtertakten der Kerne/CPU keine Auswirkung auf diesen Counter hat.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu ( 7. Mär 2018 um 13:08 Uhr)
  Mit Zitat antworten Zitat
Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
 
Delphi 12 Athens
 
#16

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 12:43
Besonderheiten einzelner CPUs sind natürlich ein Punkt, der in kritischen Bereichen gegen diese Lösung spricht.
Spielbanken können sich sicher auch die Zusatzhardware für Zufallszahlen leisten.
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.016 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#17

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 14:37
The Lava Lamps That Help Keep The Internet Secure
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#18

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 15:32
Das sind 100 Lampen á 40 Watt

Uhhh ein zufallsgenerator mit 4 Kilowatt (17.4 Ampere)
10.000 € im Jahr, bei 28.5 ct/kWh

Aber bei 8 Stunden maximaler Betriebsdauer pro Lampe sind wohl auch nur maximal ein Drittel der Lampen gleichzeitig aktiv und spart so ein bissl Strom.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu ( 7. Mär 2018 um 15:37 Uhr)
  Mit Zitat antworten Zitat
bernhard_LA

Registriert seit: 8. Jun 2009
Ort: Bayern
1.138 Beiträge
 
Delphi 11 Alexandria
 
#19

AW: Zufallszahlen allgemeine Frage

  Alt 7. Mär 2018, 21:35
True Random Number Generator (TRNG) als Hardware Lösung :

https://en.wikipedia.org/wiki/Hardwa...mber_generator

hier die Hardware Implementierung :

http://ipcores.com/True_Random_Gener...IaAteCEALw_wcB

die Qualität der Zufallszahlen kann man auch noch bewerten

https://arxiv.org/abs/1008.2223

http://www.weblearn.hs-bremen.de/ris...Eng11/RNGs.pdf

Geändert von bernhard_LA ( 7. Mär 2018 um 21:46 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:19 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz