OldComp.cz

Komunitní diskuzní fórum pro fanoušky historických počítačů


Právě je 28.03.2024, 17:35

Všechny časy jsou v UTC + 1 hodina [ Letní čas ]




Odeslat nové téma Odpovědět na téma  [ Příspěvků: 14 ] 
Autor Zpráva
 Předmět příspěvku: Biorytmus
PříspěvekNapsal: 08.02.2022, 00:36 
Online
Kecálek
Uživatelský avatar

Registrován: 30.05.2020, 01:05
Příspěvky: 185
Bydliště: Olomouc
Has thanked: 539 times
Been thanked: 100 times
Našel jsem na kazetě starý program Biorytmus ještě z dob Františka Koudelky... Jenže autor nepočítal s tím, že by se mohl používat i v 21. století, takže jsem jej narychlo předělal, původní algorytmy počítaly správně i roky po roce 2000, ale nešlo to tam jen zadávat.
Pokud program budete chtít uložit do ESXDOSU, stačí Break nebo STOP in input a ukládací příkazy jsou na řádku 1450.


Přílohy:
Biorytmus.tap [6.68 KiB]
211 krát

_________________
ZX Spectrum+ 48 kB s D40 nebo divIDE 57c, MB03+, popřípadě Fuse a teď nově LNX


Naposledy upravil Hroudik dne 08.02.2022, 01:25, celkově upraveno 1
Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 00:55 
Offline
Pan Štábní

Registrován: 12.05.2013, 22:24
Příspěvky: 1508
Bydliště: u Prahy
Has thanked: 44 times
Been thanked: 380 times
Kdysi jsem viděl biorytmus, a nedokázal jsem jej doposud najít.
V úvodu byla animovaná mluvící hlava (vytvořená grafickými znaky a flashem), černá na bílém pozadí, k tomu mluvený zvukový výstup (klasicky přes program HLAS).
Když byly na obrazovce texty, byly černě na bílém pozadí, nahoře na obrazovce byl proužek barev 5 a 4 ("cyan" a zelená).
V programu bylo věnování nějaké holce.


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 01:11 
Online
Kecálek
Uživatelský avatar

Registrován: 30.05.2020, 01:05
Příspěvky: 185
Bydliště: Olomouc
Has thanked: 539 times
Been thanked: 100 times
Kdyby se někdo sháněl po původním programu před úpravou, tak je zde:


Přílohy:
Biorytmuspuvodni.tap [7.07 KiB]
208 krát

_________________
ZX Spectrum+ 48 kB s D40 nebo divIDE 57c, MB03+, popřípadě Fuse a teď nově LNX
Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 01:23 
Online
Kecálek
Uživatelský avatar

Registrován: 30.05.2020, 01:05
Příspěvky: 185
Bydliště: Olomouc
Has thanked: 539 times
Been thanked: 100 times
dex píše:
V úvodu byla animovaná mluvící hlava .

Když něco najdu, tak to sem určitě dám. Vím že existoval program Partshoda, ale už nevím jak to vypadalo.

_________________
ZX Spectrum+ 48 kB s D40 nebo divIDE 57c, MB03+, popřípadě Fuse a teď nově LNX


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 08:04 
Offline
Pan Štábní
Uživatelský avatar

Registrován: 12.05.2013, 19:23
Příspěvky: 1910
Bydliště: Vsetín
Has thanked: 517 times
Been thanked: 812 times
Zajímavé je, že na cs.speccy.cz je trošku jiná verze Biorytmusu.

_________________
cs.speccy.cz, ondraspo186.8u.cz, zx-spectrum.cz


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 10:42 
Offline
Óm Nejvyšší

Registrován: 22.05.2013, 21:14
Příspěvky: 3642
Bydliště: Bratislava
Has thanked: 371 times
Been thanked: 788 times
Hroudik píše:
Našel jsem na kazetě starý program Biorytmus ještě z dob Františka Koudelky... Jenže autor nepočítal s tím, že by se mohl používat i v 21. století, takže jsem jej narychlo předělal, původní algorytmy počítaly správně i roky po roce 2000, ale nešlo to tam jen zadávat.
Vdaka, ked si ho uz upravoval, mozno by nebolo zle ucesat aj nejake vypisy, napriklad kondiciogram je nejaky divny:
Příloha:
Kondiciogram.png
Kondiciogram.png [ 8.13 KiB | Zobrazeno 7063 krát ]


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 10:48 
Offline
Óm Nejvyšší

Registrován: 22.05.2013, 21:14
Příspěvky: 3642
Bydliště: Bratislava
Has thanked: 371 times
Been thanked: 788 times
Ked uz o tom pisem, ja som kedysi davno (1987 ?) jeden program na biorytmy upravoval - dorobil som mu menu a doplnil do neho kecala aby vedel diktovat tabulky hodnot. Nasi ho potom pouzivali a opisovali si z neho svoje biorytmy :)
Tu je: bs-bio.zip


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 11:50 
Online
Kecálek
Uživatelský avatar

Registrován: 30.05.2020, 01:05
Příspěvky: 185
Bydliště: Olomouc
Has thanked: 539 times
Been thanked: 100 times
Citace:
Vdaka, ked si ho uz upravoval, mozno by nebolo zle ucesat aj nejake vypisy, napriklad kondiciogram je nejaky divny:

Jak jsi to z toho dostal? To mi nedělalo a i když to teď zkouším, tak to nedělá..
To vypadá jako kdyby se špatně nahrála UDG tabulka znaků.

_________________
ZX Spectrum+ 48 kB s D40 nebo divIDE 57c, MB03+, popřípadě Fuse a teď nově LNX


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 12:50 
Offline
Óm Nejvyšší

Registrován: 22.05.2013, 21:14
Příspěvky: 3642
Bydliště: Bratislava
Has thanked: 371 times
Been thanked: 788 times
Hroudik píše:
Jak jsi to z toho dostal? To mi nedělalo a i když to teď zkouším, tak to nedělá..
To vypadá jako kdyby se špatně nahrála UDG tabulka znaků.
Tam je UDG ? Tak to by mohlo byt kvoli tomu, ze ZX 128k namiesto poslednych dvoch UDG znakov T,U ma nove prikazy PLAY a SPECTRUM. Pre korektne zobrazenie UDG znakov staci niekam na zaciatok programu doplnit POKE 23611,204.


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 21:28 
Online
Kecálek
Uživatelský avatar

Registrován: 30.05.2020, 01:05
Příspěvky: 185
Bydliště: Olomouc
Has thanked: 539 times
Been thanked: 100 times
Tak jsem upravil Biorytmus aby fungoval i pro Spectrum 128k a přidal jsem tam Busyho POKE 23611,204.
Funguje to jak na ZX Spectru 48, tak na 128k.
Co ale přesně ten poke Busy dělá ???

V systémových proměnných ZX Spectra 48 je to popsáno jako
FLAGS 23611 5C3B .....různé příznaky pro práci Basicu, blíže nespecifikovatelné


Přílohy:
Biorytmus.tap [6.7 KiB]
204 krát

_________________
ZX Spectrum+ 48 kB s D40 nebo divIDE 57c, MB03+, popřípadě Fuse a teď nově LNX
Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 22:01 
Offline
Pan Štábní

Registrován: 12.05.2013, 22:24
Příspěvky: 1508
Bydliště: u Prahy
Has thanked: 44 times
Been thanked: 380 times
Na ZX 48 nese systémová preměnná 23611 příznaky o režimu klávesnice (bit 3), stištěné klávese (bit 5) a podobně.
Bit 4 je na ZX 48 nepoužitý a jeho nastavením si ZX 128 označuje 128 režim.


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 08.02.2022, 22:24 
Offline
Óm Nejvyšší

Registrován: 22.05.2013, 21:14
Příspěvky: 3642
Bydliště: Bratislava
Has thanked: 371 times
Been thanked: 788 times
Presne ako pise dex, bit 4 (okrem ineho) urcuje aj to, ci sa posledne dva UDG znaky vypisu ako UDG znaky alebo ako tie nove prikazy.


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 19.05.2023, 17:35 
Offline
Pan Štábní
Uživatelský avatar

Registrován: 12.05.2013, 19:23
Příspěvky: 1910
Bydliště: Vsetín
Has thanked: 517 times
Been thanked: 812 times
Zajímavý článek na toto téma
https://vtm.zive.cz/clanky/koudelkuv-ko ... fault.aspx

_________________
cs.speccy.cz, ondraspo186.8u.cz, zx-spectrum.cz


Nahoru
 Profil  
 
 Předmět příspěvku: Re: Biorytmus
PříspěvekNapsal: 21.05.2023, 17:42 
Offline
Pan Štábní
Uživatelský avatar

Registrován: 12.05.2013, 19:40
Příspěvky: 1920
Bydliště: Olomouc
Has thanked: 895 times
Been thanked: 693 times
A neni to skoda. Vis kolik jsem jich tisknul? Nejdriv na SM52/12 a pak jsem ten program portoval na 8bit Atari :-) Mohl bych tu nekde mit ATR.

_________________
www.krupkaj.cz ~ www.atariportal.cz ~ jaysoft.atari.org
:busybee:


Nahoru
 Profil  
 
Zobrazit příspěvky za předchozí:  Seřadit podle  
Odeslat nové téma Odpovědět na téma  [ Příspěvků: 14 ] 

Všechny časy jsou v UTC + 1 hodina [ Letní čas ]


Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé a 4 návštevníků


Nemůžete zakládat nová témata v tomto fóru
Nemůžete odpovídat v tomto fóru
Nemůžete upravovat své příspěvky v tomto fóru
Nemůžete mazat své příspěvky v tomto fóru
Nemůžete přikládat soubory v tomto fóru

Hledat:
Přejít na:  
Založeno na phpBB® Forum Software © phpBB Group
Český překlad – phpBB.cz