Delfská veštírna trochu jinak (diskuse)

[Václav HFechs Švirga]

Příloha:

• main.c (3243 bytů)

zdrojak

[Václav HFechs Švirga]

Příloha:

• main.c (3207 bytů)

Je tam chyba, hned to spadne. Tohle by mohlo fungovat :).

[Václav HFechs Švirga]

Příloha:

• vestirna.c (3593 bytů)

Tak dalsi bugfix, atof kterou jsem pouzil pro cteni vstupu nebyla schopna nacist unsigned long long int. Napsal jsem si atoull. Tahle verze cte z /dev/urandom.

[Mrkva]

Co takhle jednoduché strings /dev/urandom a hledat smysl v tom? :)

[Václav HFechs Švirga]

Promiň, ale já v tom pořád vidím jenom čaj . Tady vidím občas hezké obrázky. Prostě mozek v těch pixelech je s trochou fantazie schopný cosi vyčíst, k něčemu si to přiřadit. Což u hromady nesourodých ascii znaků moc nejde . Kdyby se na to poštval třeba ještě slovník, bylo by to lepší. Ale to by zas nebyl ono (samozřejmě, v obou případech jde pouze o srandu, ale u toho mého programu myslím že člověk vydrží o pár sekund dýl a to se vyplatí ;P).

[Václav HFechs Švirga]

Příloha:

• vsichni_zemreme.png (10328 bytů)

Teď mi třeba vypadl tenhle obrazek, celkem slusny pixelart (nebo temne proroctvi?) . Urcite tam vidim vic nez v hromade caje :).

[Mrkva]

No nevim, u me to porad vykresluje jen bile okno :)

[Václav HFechs Švirga]

Musis zmacknout mezernik, vzdyt to v blogu pisu .

[Mrkva]

Oprava: tvoje verze mi funguje. Nefungovala mi ta verze, co brala data z urandom.

[Václav HFechs Švirga]

Příloha:

• main-od-FAtbluNT.c (3256 bytů)

Tak ta mi jde, ale musel jsem na zacatku mainu z

  
if(!Init())
{
  SDL_Quit();
  return 1;
}

udelat

Init();

Proc netusim, predtim to slo. Je to nejaky rozbity . Tady jsem to vylepsil na /dev/random (musi se hybat myskou, jinak dojdou nahodna cisla). Viz priloha.

[FAtbluNT]

Příloha:

• main.c (3285 bytů)

Kdo je vetsi prase? Pridal jsem tam to cteni z urandom

[FAtbluNT]

Příloha:

• main.c (3285 bytů)

sorry cetlo to jenom 7 bajtu takhle je to spravne

[Václav HFechs Švirga]

Cool, funguje .

Kdyby to nekdo zkousel a neslo mu to, zrusit testovaci podminku kolem Init() na zacatku mainu. Nevim proc, ale aspon mi neprojde . Pak to jde.

[Michal Wirth]

jen takovej rejp ... ten pocet kombinaci mate spatne, melo by to byt sude cislo to co tam mate, je IMHO cislo "posledni" kombinace s indexaci od nuly, ale jako pocet vsech kombinaci to nazvat nejde

[Václav HFechs Švirga]

Jo, máš pravdu.

[Allah Akbar]

A verzia pre konzolu nebude?

[FAtbluNT]

Příloha:

• main_cli.c (1054 bytů)

tady je

[Václav HFechs Švirga]

Příloha:

• 159728-main_cli-13623.c (1101 bytů)

To aby jsme pomalu zalozili git . Jinak nejak mi to nebezelo, mam divny asi prekladac (na desktopu mam jeste ubuntu, gcc version 4.3.3 (Ubuntu 4.3.3-5ubuntu4) ;)). Kupodivu se size nechovalo jako globalni, musel sem ho udelat staticke (proc fakt netusim). A doplnil jsem nejake hlavickove soubory.

[Jendа]

Příloha:

• vestirna.sh (161 bytů)

Textová implementace v bashi.

[Václav HFechs Švirga]

Pekne, ale chybi tu cislo jako jednoznacky identifikator obrazku. Ale to by asi napsat v bashi nebyla zadna sranda. Jeste cekam implementaci v awk, brainfucku a cobolu ;P.

[Michal Fecko]

ja sa nehram

+--------+
|  |
||
||
||
||
||
||
||
+--------+
10

[xsubway]

pěkné :)

[Dadam]

Dobrý Tak mě napadlo, že rand vrací 32bitové čísla, že? Vygeneruj si čísla dvě a vynásob?

[Jendа]

Nebude pak rozložení nerovnoměrné? (většina takto vygenerovaných čísel bude ve středu intervalu, jako když házíš dvěma platónskými tělesy) A taky přijdeš o prvočísla.

[Václav HFechs Švirga]

Jo, na to jsem tak nejak myslel. Stejne tak kdyz hazes dvemi kostkami a delas soucet, gausova krivka se tomu tusim nadava. Ale cteni z /dev/urandom (/dev/random) to resi (nekde v diskuzi).

[Václav HFechs Švirga]

tohle mam odzkousene

[Kvakor]

Stejne tak kdyz hazes dvemi kostkami a delas soucet, gausova krivka se tomu tusim nadava.

Přesně takto se gaussovské rozdělení dělá. Pokud si to ještě dobře pamatuju, tak na použitelnou verzi stačí posčítat dvanác normalizovaných hodnot (tj. z intervalo 0,1) a odečíst šestku, pro nenormalizované funkce (jako je rand()) je třeba samozřejmě odečíst šestinásobek RAND_MAX a výsledek touto hodnotou ještě podělit (nebo s ním počítat jako s číslem s pevnou řádovou čárkou).

[JVid]

Funkční řešení je vygenerovat dvě čísla, jedno posunout o 32b doleva a pak je vyXORovat. Při sčítání nebo násobení to samozřejmě fungovat nebude, resp. ne tak, jak by člověk chtěl.

[Václav HFechs Švirga]

Jo, to by asi šlo.

[Grunt]

A nebylo by lepší cpát nějakou náhodnou entropii spíš do frekvencí? U toho je spíš šance, že si mozek něco domyslí.

[Václav HFechs Švirga]

Příloha:

• soumernost.png (10154 bytů)

A jak by sis to představoval? Na výstupu zvuk / fraktál?

Mě by se líbilo nechat to takto náhodně generovat obrazce a kdyby mi nějaký něco připomínal (třeba nějaké zborcené písmeno A, to jsem už občas v tom smetí zahlédl), zastavit to a hledat podobné obrazce k tomu nalezenému (nějaké metoda postupného výběru). Jenže jak to realizovat...

Jinak i z toho mého občas vypadne něco trošku zajímavého. Tady je třeba osově souměrný obrazec, který má druhou část barevně invertovanou.

[Vskutečnosti Saýc]

No, mohl bys udelat inverzni diskretni kosinovou transformaci, treba by z toho lezlo neco zajimaveho :)

[Grunt]

Ne. Prostě náhodný šum (jaký třeba vyleze z dd if=/dev/urandom of=/dev/fb0) převést zpět z frekvenční domény do časové. Takže třeba pomocí ImageMagicku (nemám nainstalovanou HDR verzi, takže nemůžu ověřit správnost):convert -size 512x512 rgb:/dev/urandom -size 512x512 rgb:/dev/urandom -ift show:. Jen by se musela nějak normalizovat amplitudová složka aby se výsledek vešel do rozsahu. A klidně by na to šlo použít to pole 8x8. By z toho sice vylezl jen rozmazaný maglajz, ale i tak je větší šance, že v něm mozek uvidí něco víc než v takovém políčku pixelů 8x8.