(17/07/2020) a DLL version minimidi_chungDLL allows to launch the application in another thread to minimize overhead on multicore cpu .

(24/05/2020) display opengl piano keyboard added , + TTS speak functions

you are youngsters , i am 60 !

heres another video , with fog

=> https://www.youtube.com/watch?v=2KmwHyfoe98


follow the whale => https://www.youtube.com/watch?v=7VDbxLkfWsU

in the forest => https://www.youtube.com/watch?v=71iSxVH3J-k

(25/04/2020) fourier anticlick added

(20/04/2020) auto sliders update scan added

(28/03/2020) algorythmic voice cloning trial added

(23/03/2020) moving idle view , explode animation changed , enhanced background spheres (moving, color)

that is the problem in fact , that "folder\*.mid" seems to work like "folder\*.mid*"

dir("folder\*.mid") does include *.midilist files when calling dir() , is it normal ?

midiplay chung is a small free open source midi folder player with effects using midipiano_dll dll (folder, pause, loop, drum, noteonly, delay, resonance, volume) written in freebasic . link => https://chungswebsite.blogspot.com/2020/03/midiplaychung-ismall-midi-folder-player.html

this should be generated automaticaly , or tell the newbies that it will work only 256 times ...

you could modify the return string process to return a string from a custom stack you do manage in the compiler something like Dim Shared As String mystring(256) Dim Shared As Integer myistring Function getmidiparamtest Cdecl Alias "getmidiparamtest" ()As String Ptr Export myistring+=1:If ...

for now , untill the problem is fixed , i return a "double" from the dll (as there are all numbers) and convert it as a string in the calling main program to keep the same syntax .

i have a problem to export a function(param as string)as string export in a dll it works 256 times but after returns "" (or null) heres the source #Inclib "midipiano_dll" Declare Function getmidiparamtest Cdecl Alias "getmidiparamtest" (ByRef param As String)As String '...