estoy buscando algun módulo de synthedit para crear 'musica poco comun'.
seria como un conversor de txt a midi o incluso de fotos a midi para despues generar sonido.
existe algo por el estilo? y si no existe, se podría crear?
Ninguna frase logra atrapar nuestros cuestionamientos.
"a" (pluck c4)
"e" (pluck d4)
"i" (pluck e4)
"o" (pluck f4)
"u" (pluck g4)
Feadur escribió:Yo hace tiempo hice algo parecido, pero no era un VST
En cualquier caso, lo hice con visual basic...era un conversor de "datos"(de cualquier tipo) a midi, audio(sintetizado), o secuencias opengl para crear graficos.
Si te interesa en visual basic de todos modos, comentalo, y te mando algunas fuentes
maldita escribió:
me aparece esta ventana que adjunto; en que carpeta tengo que copiar el 'texto' y el 'reglas'?
error: bad argument type - NIL
Function: #
Arguments:
NIL
Function: #
Arguments:
((A 1) (ARCHIVO (OPEN ARCHIVO :DIRECTION :INPUT)) (RESULTADO NIL))
(WHILE (NOT (NULL A)) (SETF A (READ-CHAR ARCHIVO)) (PUSH (ELT-A-SEQ A) RESULTADO))
(CLOSE ARCHIVO)
(REVERSE (REST RESULTADO))
Function: #
Arguments:
"texto.txt"
Function: #
Arguments:
((TEXTO (LEE-ARCHIVO-TEXTO ARCHIVO)) (REGLAS (LEE-ARCHIVO-REGLAS ARCHIVO-REGLAS)) (SECUENCIA NIL) (CONTADOR 0))
(DOLIST (N TEXTO (QUOTE SECUENCIADO)) (LET ((A (ASOCIA N REGLAS))) (IF (NOT (NULL A)) (PUSH (LIST (QUOTE AT-ABS) (* CONTADOR (/ 60 TEMPO)) A) SECUENCIA) (PUSH (LIST (QUOTE AT-ABS) (* CONTADOR (/ 60 TEMPO)) (QUOTE (CONST 0))) SECUENCIA))) (SETF CONTADOR (+ 1 CONTADOR)))
(APPEND (QUOTE (SIM)) (REVERSE SECUENCIA))
Function: #
Arguments:
"texto.txt"
"reglas.txt"
:TEMPO
300
Function: #
Arguments:
"texto.txt"
"reglas.txt"
:TEMPO
300
1> [ gc: total 18640, 3662 free; samples 1KB, 0KB free ]
`
Regístrate o identifícate para poder postear en este hilo