Welcome, Guest. Please login or register.


Author Topic: Zeneprogramozás (Read 410641 times)

Offline Povi

  • EP addict
  • *
  • Posts: 2296
  • Country: hu
    • http://povi.fw.hu
Re: Zeneprogramozás
« Reply #1050 on: 2020.April.15. 22:27:40 »
Jó lett! A második részében mintha néhány helyen hamis lenne pár hang, de lehet, csak én hallom félre.
Hááát, én nem hallom hamisnak :-)
Ez alapján csináltam:
https://www.youtube.com/watch?v=mfJ88PAuH24
*** Speicherplatz zu klein

Offline geco

  • EP addict
  • *
  • Posts: 7082
  • Country: hu
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1051 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1052 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: 7082
  • Country: hu
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1053 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: 7082
  • Country: hu
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1054 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1055 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1056 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1057 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: 3607
  • Country: es
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1058 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1059 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1060 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: 3607
  • Country: es
    • Támogató Támogató
Re: Zeneprogramozás
« Reply #1061 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: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Zeneprogramozás
« Reply #1062 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 Povi

  • EP addict
  • *
  • Posts: 2296
  • Country: hu
    • http://povi.fw.hu
Re: Zeneprogramozás
« Reply #1063 on: 2024.February.12. 10:32:40 »
LaFaSoMi
https://www.youtube.com/watch?v=p5LxWXk2w2c

ezzel a zenével indultam a 7végi LoveByte Tiny Executable Music versenyen, 4. helyezett lett a kategóriában, 11 induló közül.
https://lovebyte.party/
*** Speicherplatz zu klein

Online Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14723
  • Country: hu
    • http://enterprise.iko.hu/
Re: Zeneprogramozás
« Reply #1064 on: 2024.February.12. 11:13:03 »
Ügyes! :smt038