-
Data: 2009-05-15 15:23:23
Temat: Re: random delphi w c/c++
Od: "Sarr." <s...@g...pl> szukaj wiadomości tego autora
[ pokaż wszystkie nagłówki ]Sarr. wrote:
> Michoo wrote:
>> Sarr. pisze:
>>> witam,
>>>
>>> jedno pytanie do grupy: jak w c/c++ zasymulowac random number
>>> generator z delphi?
>>>
>>> wikipedia twierdzi, ze jest to Linear congruential generator
>>> [http://en.wikipedia.org/wiki/Linear_congruential_ge
nerator] i nawet
>>> podaje parametry, ale jakos nie udalo mi sie uzyskac zadowalajacych
>>> wynikow.
>> W sensie co było nie tak z funkcją rand()?
>>
>> Jest posixowa funkcja random o sporych możliwościach, ale będziesz jej
>> mógł użyć pewnie tylko na gcc.
>>
> nie chodzi o dobry czy lepszy random - chodzi o dostanie identycznych
> wynikow jak daje random z delphi6.
>
> pisze plugin w c++ do programu, ktory napisany byl w delphi6 wlasnie.
> lwia czesc funkcjonalnosci idzie do pluginu a trzeba zachowac zgodnosc
> wstecz.
>
>
> pozdrawiam,
>
> Sarr.
sam sobie odpowiem. sprawa rozwiazana, problemem bylo uzywanie przez
mnie wartosci signed/unsigned. w kazdym razie, dla zainetersowanych,
ponizej dzialajaca klasa symulujaca random z delphi6:
class DelphiRandom
{
public:
DelphiRandom(unsigned int seed)
{
SetSeed(seed);
}
void SetSeed(unsigned int seed)
{
_seed = seed;
}
int Next(const int max)
{
unsigned long long result = (unsigned long long)GetNext() * max;
return (int)(result >> 32);
}
private:
unsigned int GetNext()
{
// X[n+1] = ( a * X[n] + c ) % m
// m = 232
// a = 134775813 [0x08088405]
// c = 1
_seed = _seed * 0x08088405 + 1; // %m not needed as _seed is 32 bit
return _seed;
}
unsigned int _seed;
};
cheers,
Sarr.
Najnowsze wątki z tej grupy
- Brednie w wiki - hasło Dehomag
- Perfidne ataki krakerów z KRLD na skrypciarzy JS i Pajton
- Instytut IDEAS może zacząć działać: "Ma to być unikalny w europejskiej skali ośrodek badań nad sztuczną inteligencją."
- Instytut IDEAS może zacząć działać: "Ma to być unikalny w europejskiej skali ośrodek badań nad sztuczną inteligencją."
- Instytut IDEAS może zacząć działać: "Ma to być unikalny w europejskiej skali ośrodek badań nad sztuczną inteligencją."
- U nas propagują modę na SI, a w Chinach naukowcy SI po kolei umierają w wieku 40-50lat
- C++. Podróż Po Języku - komentarz
- "Wuj dobra rada" z KDAB rozważa: Choosing the Right Programming Language for Your Embedded Linux Device
- Nowa ustawa o ochronie praw autorskich - opis problemu i szkic ustawy
- Alg. kompresji LZW
- Popr. 14. Nauka i Praca Programisty C++ w III Rzeczy (pospolitej)
- Arch. Prog. Nieuprzywilejowanych w pełnej wer. na nowej s. WWW energokod.pl
- 7. Raport Totaliztyczny: Sprawa Qt Group wer. 424
- TCL - problem z escape ostatniego \ w nawiasach {}
- Nauka i Praca Programisty C++ w III Rzeczy (pospolitej)
Najnowsze wątki
- 2025-05-03 gazowe kuchnie są znacznie bardziej szkodliwe dla zdrowia, niż dotychczas sądzono
- 2025-05-03 Czyli jednak elektryki są TANIE i powszechnie dostępne dla obywateli
- 2025-05-03 Elektryki do Morskiego Oka do utylizacji
- 2025-05-03 Crash testy na publicznej drodze - 4 BMW zderzone
- 2025-05-03 pojebane Google
- 2025-05-03 Brednie w wiki - hasło Dehomag
- 2025-05-03 gazowe kuchnie są znacznie bardziej szkodliwe dla zdrowia, niż dotychczas sądzono
- 2025-05-03 Chiny => Koordynator Produkcji / Przedstawiciel ds. rozwoju produktu <
- 2025-05-03 Gdańsk => Konsultant wdrożeniowy (systemy controlingowe) <=
- 2025-05-03 Warszawa => Frontend Developer (Angular13+) <=
- 2025-05-02 Gliwice => Business Development Manager - Network and Network Security
- 2025-05-02 Warszawa => Senior Frontend Developer (React + React Native) <=
- 2025-05-02 Polska => Senior Key Account Manager <=
- 2025-05-02 Warszawa => Senior Programmer C <=
- 2025-05-02 Gdańsk => Team Lead Data Engineer (Snowflake) <=