Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   Delphi Midi WINSOUND für emulatoren und tongenerator (https://www.delphipraxis.net/63900-midi-winsound-fuer-emulatoren-und-tongenerator.html)

sharpals 24. Feb 2006 09:22


Midi WINSOUND für emulatoren und tongenerator
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo, ich stelle mal meine midiunit für emulatoren zur verfügung.

Sie ist sozusagen ein 16kanal tongenerator.

InitMIDI setzt die variablen;

SetSound setzt das intrument für einen kanal.

NoteOn(Channel,Note,Level:integer) spielt einen note

NoteOff(Channel:integer) schaltet den ton aus


WinSound(Channel,Freq,Volume:integer) spielt einen TON mit der Frequenz Freq ab.

also z.B winsound(0,1000,200) 1Khz auf dem kanal 0.


-----------------------------------------------------------------

Noch eine Frage: wie kann ich in Midi einen Rechteckton erzeugen, oder aber mindestens den ab und anschlag auf null setzen.

Mommentan klingt der emu etwas unnatürlich.

Gruß

virtualtom 10. Mär 2006 18:44

Re: Midi WINSOUND für emulatoren und tongenerator
 
Du solltest Dir den Unterscheid zwischen MIDI- und Klangdaten klar machen: MIDI-Daten sind Noten bzw notenspezifische Informationen, Klänge bestehen aus Wellenformen. Das Instrument, an das Du die MIDI-Noten sendest, spielt einen Klang in der ihm eigenen(sic) Wellenform. Stellst Du den Klang des Instruments um, bekommst Du einen andren Klang bei gleicher Note. Ergo: Mit MDI kannst Du keinen Rechteck-Ton erzeugen; das macht das Instrument. Gleiches gilt für die Hüllkurven (i.d.F. Anschlag und Abschwellen).

HTH

DP-Maintenance 13. Mär 2006 17:10

DP-Maintenance
 
Dieses Thema wurde von "Chakotay1308" von "Neuen Beitrag zur Code-Library hinzufügen" nach "Open-Source" verschoben.
Kein richtiger Beitrag für die Code-Library.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:42 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz