AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Notenlängen berechnung

Ein Thema von EWeiss · begonnen am 14. Mai 2011 · letzter Beitrag vom 16. Mai 2011
Antwort Antwort
Seite 3 von 4     123 4      
Benutzerbild von divBy0
divBy0

Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
 
Delphi XE2 Professional
 
#21

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 14:59
Tempo :
Code:
FF 51 03 AA BB CC
Berechnung Tempo: 60 000 000 / AA BB CC


Takt :

Code:
FF 58 04 AA BB CC DD
AA Zähler

BB Nenner (2=4, 3=8, 4=16 usw.)

CC : Anzahl der Midi-Clocks

DD : Anzahl vom Zweiunddreißigstelnoten in einer Viertelnote
Marc
9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! | engbarth.es
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#22

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:20
Moment, kann ich dir raussuchen.
Das wäre nett ..
Danke.

gruss
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#23

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:21
Emil, das hat er schon, schau mal einen Post höher
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#24

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:25
Emil, das hat er schon, schau mal einen Post höher
Jup war schneller als ich schreiben konnte.
Ich denke er spricht vom Block "Zeit Signatur"

kann nur hiermit dienen..
Delphi-Quellcode:
  // Zeit Signatur
  Bytes[30] := 0; // delta Zeit
  Bytes[31] := 255; // FF (Meta Befehl)
  Bytes[32] := 88; // Zeit Signatur Befehl
  Bytes[33] := 4; // 4 bytes
  Bytes[34] := 4; // Zähler
  // Nenner (2 = 1/4, 3 = 1/8, 4 = 1/16, etc.)
  Bytes[35] := SmallNoteData[SmallNDSelected].Nenner;
  Bytes[36] := 24; // ?
  // 8 = 32 Note in 1/4 Note;
  Bytes[37] := SmallNoteData[SmallNDSelected].Value;
Aber das ist mein Schreiber muss mal sehn wo ich die bytes im Reader abrufen kann.
müßten dann die ersten 4 bytes sein.
Werd ich dann in meinem Writer auch noch addieren müssen.
War ja vorher alles fest auf 4/4 ausgelegt.

gruss

Geändert von EWeiss (16. Mai 2011 um 15:29 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von divBy0
divBy0

Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
 
Delphi XE2 Professional
 
#25

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:28
Ich spreche vom MIDI-Event FF51 (Set Tempo) und FF58 (Time Signature).
Marc
9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! | engbarth.es
  Mit Zitat antworten Zitat
Benutzerbild von divBy0
divBy0

Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
 
Delphi XE2 Professional
 
#26

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:30
Delphi-Quellcode:
  // Zeit Signatur
  Bytes[30] := 0; // delta Zeit
  Bytes[31] := 255; // FF (Meta Befehl)
  Bytes[32] := 88; // Zeit Signatur Befehl
  Bytes[33] := 4; // 4 bytes
  Bytes[34] := 4; // Zähler
  // Nenner (2 = 1/4, 3 = 1/8, 4 = 1/16, etc.)
  Bytes[35] := SmallNoteData[SmallNDSelected].Nenner;
  Bytes[36] := 24; // ?
  // 8 = 32 Note in 1/4 Note;
  Bytes[37] := SmallNoteData[SmallNDSelected].Value;
Du hast das ja alles dezimal... Das kann aber ganz schön fies werden, mit der ganzen Umrechnerei.
Marc
9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! | engbarth.es
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#27

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:31
Ich spreche vom MIDI-Event FF51 (Set Tempo) und FF58 (Time Signature).
Jo Danke dann ist es das Bytes[33]..

Delphi-Quellcode:
  Bytes[31] := 255; // FF (Meta Befehl)
  Bytes[32] := 88; // Zeit Signatur Befehl
  Bytes[33] := 4; // 4 bytes
Die werte sind Dezimal

EDIT:
Du warst mal wieder schneller...
Kein problem beim umrechnen der writer ist in HEX ausgelegt.

gruss
  Mit Zitat antworten Zitat
Benutzerbild von divBy0
divBy0

Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
 
Delphi XE2 Professional
 
#28

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:37
Jo Danke dann ist es das Bytes[33]..
Bist du sicher, dass es immer das Byte[33] ist?

Kann man deine Projekt schon mal antesten? Klingt irgendwie interessant.
Marc
9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! | engbarth.es
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#29

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 15:42
Jo Danke dann ist es das Bytes[33]..
Bist du sicher, dass es immer das Byte[33] ist?
Kann man deine Projekt schon mal antesten? Klingt irgendwie interessant.
Beim schreiben ja ..
Beim lesen weiss ich noch nicht wie ich da dran komme da den Reader mein Freund Silhwan geschrieben hat.
Müßte ihn erstmal anschreiben deswegen.



Jo hab es doch hochgeladen Das Virtual Piano..
Bin mittlerweile aber schon ein stück weiter.

gruss
  Mit Zitat antworten Zitat
Blup

Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.477 Beiträge
 
Delphi 12 Athens
 
#30

AW: Notenlängen berechnung

  Alt 16. Mai 2011, 16:19
Vieleicht mal hier schaun: http://www.sonicspot.com/guide/midifiles.html
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 3 von 4     123 4      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:19 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz