Jump to content

opmo

Administrators
  • Posts

    2,894
  • Joined

  • Last visited

Everything posted by opmo

  1. There are no known issues with OSX 10.11 and Opusmodus.
  2. I will not rush to upgrade to the 10.11. Few software like NI warns about plugins compatibility.
  3. OSC will be added in the future - version 2.0
  4. Fixed an issue that made quicklisp installation not work.Fixed an issue causing memory corruption.
  5. For programmers and developers Install the Quicklisp beta library manager. Evaluate: (load "http://beta.quicklisp.org/quicklisp.lisp") To continue, evaluate: (quicklisp-quickstart:install) Place the attached file 'Quicklisp Start.lisp' file into your ~/Opusmodus/Extensions folder. Edit the file and add the libraries you like to load. Example: (ql:quickload "ieee-floats") (ql:quickload "osc") About Quicklisp Beta Note: Opusmodus has its own init file and is not loading the ccl.init.lisp file at the start. Quicklisp installation and its use is not a part of the Opusmodus support. This post is mainly for programmers and developers that already know how to use the Quicklisp libraries. Additional installation: Post from Bill St. Clair: # In a shell cd mkdir ccl cd ccl svn co http://svn.clozure.com/publicsvn/openmcl//release/1.11/darwin-x86-headers64 Quicklisp Start.lisp
  6. This is known problem with Logic. I use VSL without this problem. Maybe Stephane has some solution for it.
  7. This will be fixed in the next update, possibly today or tomorrow :-)
  8. It is the same with pan. The midi file needs volume value, this is why you have the reset every time you start. I will have a look if it is possible to set the controllers to nil.
  9. The default volume is set to 100. You can control the volume with :volume option in the DEF-SCORE. Example: (def-score example (:key-signature 'chromatic :time-signature tsig :tempo 100) (instrument :omn oml-list :channel 1 :sound 'gm :program 0 :volume 40) )
  10. If you like to eval the list you need a quote at the beginning: '((e.. c5 leg t f5 e f5 leg s e5 leg f5 tr2 (-app s e5 f5)) (s g5 leg c5 = =))For snippet (audition or notation) the quote is not needed.
  11. What about this: (unless (find-package "QUICKLISP") (when (probe-file "~/quicklisp/setup.lisp") (load "~/quicklisp/setup"))) I will need to install Opusmodus on my Mac Mini and see why that is.
  12. The quicklisp folder should be in your home directory. Try this: (let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp" "/Users/your-home-directory-name/"))) (when (probe-file quicklisp-init) (load quicklisp-init))) Even better: (let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp" (user-homedir-pathname)))) (when (probe-file quicklisp-init) (load quicklisp-init)))
  13. Note: How to Search the system To quickly search the system place the cursor anywhere on the function-name or on any word in the Composer panel (no selection needed) and press ctrl-tab ⌃⇥ or cmd-alt-/ ⌥⌘/ or you can find the search command in the Help menu. Midi Playback To Start/Stop playing the Midi press the space bar on your keyboard. To return to the beginning of the Midi display panel press the return key ↩. Alternatively you can use the contextual menu (right mouse click) to control the midi display panel. Some of the midi files (especially from the web) you will not be able to listen to because the file might use the external ports. To change the setup use the contextual menu (right mouse click) in the midi panel and chose 'Ignore Ports'. This will send the midi to the internal GM sound set after which you will be able to listen to the midi file. Snippets - quick audition and notation Place the mouse cursor at the end of each expression and press ⌘1 to hear it (audition) or, press ⌘2 (notation) to display the expression in notation.
  14. The good news is the 'Quick Start' is protected, I thought it wasn't.
  15. Thank you, I will add the protection to the 'Quick Start' workspace, you absolutely right :-)
  16. Not at all. The 'Quick Start' is not protected. Do you think would be better to protect the 'Quick Start' workspace as we do with the System Library documents?
  17. The 4. Pitch.opmo document: ;;;--------------------------------------------------------- ;;; Lesson 2 - Algorithmic ;;; 4. Pitches ;;;--------------------------------------------------------- (setf pitch (vector-to-pitch '(g1 g6) vector)) ;; Here we are converting the vector values to pitch ;; symbols in a range from G1 to G6. Select the ;; expression and see the pitches appear in the LISTENER. (setf pitches (gen-divide 4 pitch)) ;; In the next step of our exercise we'll divide the ;; PITCH list into groups of four pitches. (setf pitch-transp (pitch-transpose -12 pitches)) ;; Now let's transpose those pitches down an octave. ;; Try viewing / playing these expressions as SNIPPETS. ;; Select an expression and go to the TOOLS menu and ;; experiment. If want to go back to the original Quick Start workspace: 1. Close the 'Quick Start' workspace if open. 2. Quit the Opusmodus app. 3. Delete the 'Quick Start' folder from your ~/Opusmodus folder which you will find in your home directory. 4. Start the Opusmodus app. 5. Go to 'Help' menu and select 'Install Quick Start Workspace' 6. Press OK 7. The new 'Quick Start' workspace will open. Every time you wan’t to open the Quick Start workspace, simply select 'Open Quick Start Workspace' from the Help menu.
  18. There is no such a expression in the score: (setf pitch-transp (7 -12 pitches)) This is an errors for sure :-) Here is the Full score: ;;;--------------------------------------------------------- ;;; Lesson 2 - Algorithmic ;;; 2. Full Score ;;;--------------------------------------------------------- (setf size 120) (setf vector (gen-sine size 1 '(0.5 0.4 0.3 0.6) :modulation (gen-sine size 1 0.3 :phase 180))) (list-plot vector) (setf pitch (vector-to-pitch '(g1 g6) vector)) (setf pitches (gen-divide 4 pitch)) (setf pitch-transp (pitch-transpose -12 pitches)) (setf section (rnd-unique 15 (gen-integer 0 27))) (setf variants (pitch-variant pitch-transp :variant '? :section section)) (setf length1 (rnd-sample size '(s e s s))) (setf span (get-span length1)) (setf length2 (length-span span (rnd-sample size '(s e s s)))) (setf dynamic1 (rnd-sample size '(p mp mf f ff))) (setf dynamic2 (rnd-sample size '(p mp mf f ff))) (def-score sine (:key-signature 'atonal :time-signature '((1 1 1 1) 4) :tempo 120 :layout (piano-solo-layout 'rh 'lh :all-accidentals t :ignore-velocity t)) (rh :length length1 :pitch pitches :velocity dynamic1 :sound 'gm :channel 1 :program 'acoustic-grand-piano) (lh :length length2 :pitch variants :velocity dynamic2) )
  19. Please evaluate the score 2. Full score.opmo first. Then there will be no errors. Step by step :-) I will add a line "Please evaluate the score first" in the 2. Full score document and in the 1. Start Here document. Thank you.
  20. Just place the cursor on the function name (no selection need it) or any name and press ctrl-tab or cmd-alt-/ or go to Help menu.
  21. It helps to read the pitches especially the chords.
  22. (setf music1 '((q e3 g3 e3) (h. c3) (h. e3) (q d3 c3 d3) (h. c3) (h. c3) (q e3 g3 a3) (h. g3 tie) (z^e g3 h. e3) (q e3 d3 c3) (h. d3 tie) (h. d3) (q e3 g3 e3) (h. c3) (h. e3) (q d3 c3 d3) (h. c3) (h. c3) (q e3 g3 a3) (h. g3 tie) (z^e g3 h. e3) (q d3 e3 d3) (h. c3 tie) (q. c3))) (gen-retrograde music1) => ((q e3 g3 e3) (h. c3) (h. e3) (q d3 c3 d3) (h. c3) (h. c3) (q a3 g3 e3) (h. g3 tie) (h. e3 z^e g3) (q c3 d3 e3) (h. d3 tie) (h. d3) (q e3 g3 e3) (h. c3) (h. e3) (q d3 c3 d3) (h. c3) (h. c3) (q a3 g3 e3) (h. g3 tie) (h. e3 z^e g3) (q d3 e3 d3) (h. c3 tie) (q. c3)) MERGE-VOICES is the last process you do to a list. Retrograde on piches only would work because the merged lengths will not change the position. (gen-retrograde '(z^e e3 h. g3 q c4) :type :pitch) => (z^e c4 h. g3 q e3)
×
×
  • Create New...

Important Information

Terms of Use Privacy Policy