Welcome, Guest. Please login or register.


Author Topic: Zeneprogramozás (Read 535044 times)

Offline geco

  • EP addict
  • *
  • Posts: 7219
  • Country: hu
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1050 on: 2020.April.16. 08:44:05 »
A tömöríthetőség javítására próbálkoztam a burkológörbe adat differenciálásával, amit ez a rutin konvertál lejátszás előtt:

A fent említett példa file így 9093 helyett 7630 méretű tömörítve, ami még mindig nem igazán jó, de javulás. A konvertáló program egyelőre nem tud közvetlenül ilyen formátumban menteni.
Hááát azt az 1,4 KB-ot én igazán jónak nevezném, igaz, ha jól emlékszem, akkor 7100 byte-ra nyomta a másik, de sztem a 7600 teljesen jó, és a lejátszó rutin is rövidnek tűnik, ha az egészet listázta a github (láttam a codeend-et is :D )

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1051 on: 2020.April.16. 11:56:04 »
Hááát, én nem hallom hamisnak :-)
A második felében mintha el lenne hangolódva egymáshoz képest egy kicsit a két szólam, de lehet, csak én érzem így. Két hangot éreztem feltűnőbben hamisnak, a videón az utolsó hang az például, ami EP-n máshogy hangzik.
Még olyat lehetne, hogy a basszus szólamra alacsony torzítást teszel, kicsit más lesz a hangzás. De lehet, hogy nem minden hangmagasság-értéknél lesz hallható a hang, ha nem változtatod meg kicsit a frekvenciát, de mély hangoknál talán nem annyira jellemző, ezt nem tudom fejből.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline geco

  • EP addict
  • *
  • Posts: 7219
  • Country: hu
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1052 on: 2020.April.16. 15:08:49 »
kúl, tök jó lett a tömörítetlen output mérete is, gyűjtöm is az infókat egy helyre, eddig azért nem is álltam neki szívesen midi beépítésének, mert nem volt meg minden infó egy helyen nálam, és úgy emlékeztem, hogy viszonylag sok időt töltöttem el a Quadrillion, vagy Crillion full verzióba való beépítéssel (már nem emlékszem melyikbe került mod, és melyikbe midi )

Offline geco

  • EP addict
  • *
  • Posts: 7219
  • Country: hu
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1053 on: 2020.April.20. 08:24:23 »
Jól hangzik, nem baj, ha dav2pl1t-nél rosszul tömöríthető az adat, jól jöhet még a miniatűr lejátszó, és beépítésnél úgyis a tömörítetlen méret számíthat.

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1054 on: 2020.June.07. 20:52:31 »
A PI számjegyeiből minden számjegyet egy hangnak megfeleltetve, "lejátssza" ez a program a PI-t 50 tizedesjegyig. A 160-as sorban más számokat is megadhatunk, hogy egy adott számnak milyen hang feleljen meg. Ez most C-dúr, de lehetne más is. A program értelme vitatható.
Volt egy videó, ahol valaki megzenésítette a PI-t, az ihlette ezt.
[ Guests cannot view attachments ]
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1055 on: 2020.June.07. 21:44:39 »
Ez a "nagyon hézagpótló" program pedig tetszőleges számot eldalol. Ezt a számot a 10. sorban kell megadni. Most koszinusz 3 van megadva, de megadható bármi, gyök 2 is, vagy 2*pi, vagy koszinusz 2*gyök 3, akármi. Lehet próbálkozni, hogy milyen szám ad jó zenét. Ez csak úgy eszembe jutott ma este. Kár, hogy az EP nem számol ki 10-nél több számjegyű számokat. Így pl. a gyök pi is "csak" 9 tizedesig számítható ki. :D
[ Guests cannot view attachments ]
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1056 on: 2021.January.14. 15:13:22 »
A fájlba kimentett escape szekvenciát hogyan lehet basic programba beletenni? Például PRINT vagy DATA után. Itt mellékelek két envelope number burkológörbét, amit esc szekvenciaként mentettem ki. Fura karakterek is vannak benne, amiket a basic máshogy kezel, ha csak simán idézőjelbe teszem az egészet és DATA után beteszem.
Egyesével ki lehetne keresgélni mind a 96 bájtnak a decimális karakterkódját és beírni CHR$ mögé, de az kicsit sokáig tart. :D
[ Guests cannot view attachments ]
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline gflorez

  • EP addict
  • *
  • Posts: 3615
  • Country: es
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1057 on: 2021.January.14. 16:27:50 »
Talán ilyesmi, vagy szöveges fájlba írása.

----

Maybe something like this, or writing it to a text file.

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1058 on: 2021.January.14. 17:03:31 »
Maybe something like this, or writing it to a text file.
Ez igen, ez a módszer nagyon jól néz ki! Legközelebb használni fogom. Most viszont úgy oldottam meg, hogy a karakterek kódját kiírtam egy txt fájlba, ott átszerkesztettem, és betöltöttem tokenizálatlan basic programként.

Wow, this method seems to me cool. I will use it next time. However I solved it this time by printing the codes of the bytes (characters) into a txt file then I edited it and loaded it as a basic program.

Wow, me parece genial, este método. Lo usaré la próxima vez. Sin embargo, esta vez lo resolví imprimindo los códigos de los carácteres en un archivo txt, lo edité y lo cargué como un programa de basic.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1059 on: 2021.January.15. 16:03:53 »
Ez volt egyébként a program, mivel az esc szekvenciákba mentett envelope numberek adatait kibányáztam basic programban használható formátumba. Txt fájlba kimentett egy csomó számot, és csak eléjük kellett írni, hogy DATA, elé meg ciklusba READ I, PRINT #103:CHR$(I); vagy valami ilyesmi.

Code: [Select]
   10 OPEN #1:"hang.esc" ACCESS INPUT
   20 OPEN #2:"data.txt" ACCESS OUTPUT
  100 FOR A=1 TO 94
  110   GET #1:A$
  120   PRINT #2:STR$(ORD(A$))&",";
  130 NEXT
  140 CLOSE #1
  150 CLOSE #2
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline gflorez

  • EP addict
  • *
  • Posts: 3615
  • Country: es
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1060 on: 2021.January.15. 16:32:41 »
Lehet, hogy egy idő megtakarítása érdekében az összes értéket közvetlenül egy karakterlánc-változóhoz rendelheti, öt vagy hat Basic sor segítségével:

----------

Maybe, in order to save some time, you could assign all the values to a string variable directly, by means of five or six Basic lines:

----------

Quizás, para ganar algo de tiempo, podrías asignar todos los valores directamente a una variable de texto, por medio de cinco o seis lineas de Basic:

[ Guests cannot view attachments ]
« Last Edit: 2021.January.15. 17:09:33 by gflorez »

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1061 on: 2022.December.26. 23:57:18 »
Ilyen az, amikor karácsony előtt nincs ideje az embernek a sok tennivaló miatt, és utána kénytelen bepótolni a lemaradást. De nem baj, majd jövőre megint elővesszük. A programban háromféle hangzás váltja egymást. (Szerencsére a felüláteresztő szűrőt basicből is könnyedén lehet használni, nem úgy, mint C64-en.)
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1062 on: 2024.July.26. 22:32:39 »
Már másodszor estem neki, de nem találom. Jó pár éve Endi felvetette, István megcsinálta ezt a programot. Egy egyszerű szintetizátor program EP-re, az a lényege, hogy ha több gombot is nyomva tartunk, egyszerre szól 2-3 hang is, de ugyanazon a csatornán, tehát 1/50 Hz-en gyorsan vibráló hangok váltják egymást. Hol lehet ez? Valahol itt a Zeneprogramozás topikban kéne lennie, és feltehetőleg 2017 augusztusa előtt került fel, mert akkor jött a midi, és tuti előtte volt.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline ergoGnomik

  • EP addict
  • *
  • Posts: 1342
  • Country: hu
  • Stray cat from Commodore alley
Re: Zeneprogramozás
« Reply #1063 on: 2024.July.27. 09:16:03 »
Próbáltad István profiljában, a csatolt fájljai között keresni? Ott talán egyszerűbb, mint a fórumot pörgetni.

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10094
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1064 on: 2024.July.27. 11:16:24 »
Próbáltad István profiljában, a csatolt fájljai között keresni?
Ez jó ötlet volt, meg is lett. Ebben a hozzászólásban van. Akár mehetne fel az ep128.hu-ra is, mert a maga nemében egészen egyedülálló program. Ha lehetne benne állítani envelope-ot, gyűrűmodulációt, lehetne több csatorna is, akkor egészen extrém program lehetne. Főleg, ha ilyen 150 és 200 Hz-es hangokkal lennének gyűrűmodulációk és egyebek, annak olyan lenne a hangzása, amiket még nem is hallottunk EP-n. Lehet, nem lenne túl érdekes, de az is lehet, hogy igen. Valaki nem akarja továbbfejleszteni? Ha jól láttam, van hozzá forrás (.s kiterjesztéssel).
Utána még kéne egy dobgép EP-re (ezt basicben is könnyű lenne megírni), és több EP-vel egyszerre jó kis koncerteket lehetne adni élőben.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos