nadpis3.GIF (8479 bytes)

gravitace:
entropie:
evoluce:
hmota:
vln∞nφ:
elekt°ina
autor:
FRANK.CZ

vln∞nφ:

Nebudu zde popisovat vlastnosti vln∞nφ, nebo Üφ°enφ vln a tak podobn∞. V roce 1998 jsem toti₧ ud∞lal jeden myÜlenkov² pokus na poΦφtaΦi, kde jsem vlastn∞ naprogramoval matici 95x95 bod∙, p°iΦem₧ kad² jednotliv² bod mß kolem sebe dalÜφ Φty°i body.

matice bod∙ vedle sebe

 

 

 

 

 

 

 

 

 

 

Obrßzek tuto situaci naznaΦuje jasn∞. Potom jsem definoval vlastnosti bod∙, vlastn∞ jen jednoho, ten jsem potom mnohokrßt zmno₧il. Tyto vlastnosti byly prostΘ, spoΦφtat rozdφl polohy okolnφch Φty°ech bod∙, srovnat je s polohou poΦφtanΘho bodu a potom p°epsat polohu bodu. Vlastn∞ jsem natßhl mezi bodem a jeho okolφm jakΘsi gumiΦky, kterΘ zp∙sobφ postupnΘ vyrovnßnφ se bodu s jeho okolφm.

Velik²m zmno₧enφm bod∙ jsem dostal zajφmav² model. Jak jej ale rozh²bat ? Pou₧il jsem jednoduch² trik. Jeden z bod∙ jsem "uchopil" a tahßm s nφm pomocφ klßvesnice nahoru nebo dolu.

V²sledek je ohromujφcφ. Vzniklo kompletnφ vln∞nφ, kde lze pozorovat odrß₧enφ od kraj∙, jevy jako je sklßdßnφ vln∞nφ, pr∙chod vln∞nφ r∙zn²ch sm∞r∙ jednφm nosiΦem, vznik novΘho vln∞nφ na Üt∞rbin∞, vznik sekundßrnφho vln∞nφ na pevn²ch bodech, fßzov² posun na pevn²ch bodech atd...

No, vÜak podφvejte se sami p°edklßdßm tento progrßmek k ve°ejnosti na stßhnutφ:
Je v samorozbalitelnΘ form∞ :
     vlneni.exe

P∙vodn∞ byl naprogramovßn v delphi 2.0, ale pro pomalost p°ekreslenφ jsem jej byl nucen pou₧φt p°ekladaΦ Borland Pascal 7.0, kde jsem v°adil rychlΘ assemblerovskΘ rutiny pro p°ekreslenφ bod∙, v₧dy¥ se za jeden okam₧ik pohybu musφ p°epoΦφtat a p°ekreslit 95x95=9025 bod∙, co₧ nenφ maliΦkost pro poΦφtaΦ na n∞m₧ jsem program vytvß°el co₧ bylo Pentium mmx 120 Mhz. Na podstatn∞ rychlejÜφm stroji by tento program bylo mo₧no realizovat i ve Windows, nebo by bylo mo₧nΘ alespo≥ zv²Üit rozliÜenφ obrazovky (320x200 bod∙)  a p°idat  vφcebod∙ ne₧ 95x95, t°eba 200x200,co₧ je ale vφce ne₧ Φty°nßsobnΘ vytφ₧enφ procesoru oproti souΦasnΘmu stavu.

Ovlßdßnφ programu:
blebul3a.gif (310 bytes) nech rozbalit archiv vlneni.exe do n∞kterΘho adresß°e
blebul3a.gif (310 bytes) v tomto adresß°i spus¥   "vln2d2.exe"
blebul3a.gif (310 bytes) ovlßdßnφ bodu je Üipka nahoru / Üipka dolu
blebul3a.gif (310 bytes) zastavenφ pohybu je jekoukoli klßvesou
blebul3a.gif (310 bytes) odchod z programu = ESC