4.5. Ereignisse

Eine Midinote ist in Common Music ein Objekt, das der allgemeinen Klasse von Ereignissen (englisch events) angehört.

Um ein Objekt zu erzeugen, verwendet Common Music die Funktion new ⁸: Die Funktion erhält als Argument den Namen der Klasse, von der eine Instanz erzeugt werden soll. Im Falle einer Midinote ist der Name der Klasse midi:

(new midi) ;; -> #i(midi keynum 60 duration 0.5 amplitude 0.5 channel 0)

Am Ergebnis des Beispiels kann man erkennen, dass durch die Evaluation des new Ausdrucks die Instanz einer Midinote (ausgedrückt durch die Zeichenfolge '#i' vor der Klammer) mit der keynum 60, der duration 0.5, der amplitude 0.5 und dem channel 0 erzeugt wurde. Die einzelnen Parameter der Midinote bezeichnet man als Instanzvariablen (bzw. englisch slots).

In der Klassendefinition sind Anzahl, Namen und oft auch die Standardwerte (englisch default values) dieser Instanzvariablen festgelegt ⁹: Bei Erzeugung einer Instanz können von den Defaultwerten abweichende Werte für die Instanzvariablen mit Hilfe von Keywords¹⁰ übergeben werden.

(new midi :keynum 62 :duration 2)
;; -> #i(midi keynum 62 duration 2 amplitude 0.5 channel 0)

Die Werte der Instanzvariablen lassen sich mit der Funktion sv (slot-value) ermitteln.

(defparameter *testevent* (new midi))

;;; Lesen der Instanzvariablen/Slots mit Hilfe der sv Funktion:

(sv *testevent* :keynum) ;; -> 60
(sv *testevent* :duration) ;; -> 0.5
(sv *testevent* :amplitude) ;; -> 0.5
(sv *testevent* :channel) ;; -> 0

Alternativ kann der Slotname auch als Symbol ohne Doppelpunkt verwendet werden.

(sv *testevent* keynum) ;; -> 62
(sv *testevent* duration) ;; -> 2
(sv *testevent* amplitude) ;; -> 0.5
(sv *testevent* channel) ;; -> 0

Darüber hinaus sind in Common Music auch noch folgende Funktionen zum Adressieren der Instanzvariablen definiert:

(midi-keynum *testevent*) ;; -> 62
(midi-duration *testevent*) ;; -> 2
(midi-amplitude *testevent*) ;; -> 0.5
(midi-channel *testevent*) ;; -> 0

Wenn man den Wert von Instanzvariablen verändern möchte, verwendet man die special form setf in Verbindung mit sv:

;;; Verändern der Instanzvariablen/Slots mit Hilfe von setf und der sv
;;; Funktion:

(setf (sv *testevent* :keynum) 62) ;; -> 62
(setf (sv *testevent* :duration) 2) ;; -> 2

*testevent* ;; -> #i(midi keynum 62 duration 2 amplitude 0.5 channel 0)

Zur Veränderung der Instanzvariablen mit setf können alle Formen der Adressierung von Slots verwendet werden, wie das folgende Beispiel zeigt:

(setf (midi-keynum *testevent*) 65) ;; -> 65
(setf (sv *testevent* channel) 3) ;; -> 3
(setf (midi-amplitude *testevent*) 0.3) ;; -> 3

*testevent* ;; -> #i(midi keynum 65 duration 2 amplitude 0.3 channel 3)

⁸: In der Fachsprache nennt man diesen Vorgang instantiieren und das erzeugte Objekt eine Instanz. ↩

⁹: Das Beispiel zeigt, dass bei einer Midinote die Defaultwerte für keynum 60, für duration 0.5, für amplitude 0.5 und für channel 0 sind. ↩

¹⁰: Keywords sind in Common Lisp Symbole, die mit einem Doppelpunkt beginnen, also beispielsweise :keynum, :amplitude oder :duration. ↩