| commit | author | age | ||
| 92c40d | 1 | ; OM File Header - Saved 2013/11/09 15:39:52 |
| AN | 2 | ; (6.070005 :patc (om-make-point 25 39) (om-make-point 564 196) (om-make-point 760 540) "" 183 0 "2013/04/08 15:48:01" "2013/11/09 15:39:38") |
| 3 | ; End File Header | |
| 4 | ; External resources | |
| 5 | ; (list (list (quote :picture) "#P\"../../../../resources/pict/omsox\"") (list (quote :sound) "#P\"../../../../../../../../Research/OM-SoX/OM-SoX 1.0/resources/sounds/amen-break.wav\"") (list (quote :abstraction) "#P\"../../support/gen-IR.omp\"")) | |
| 6 | (in-package :om)(load-lib-for (quote ("OM-SoX")))(setf *om-current-persistent* (om-load-patch1 "1-convolution-filtering" (quote ((om-load-boxcall (quote patch-box) "gen-ir 2" (quote ("elements" "om-sox-tutorials" "support" "gen-IR")) (quote ((om-load-inputfun (quote input-funbox) "" "input" nil))) (om-make-point 416 139) nil (list (let ((newobj (when (find-class (quote bpf) nil) (let ((newbpf (simple-bpf-from-list (quote (-78.53982 -78.18363 -77.82743 -77.471245 -77.11506 -76.75887 -76.40268 -76.046486 -75.6903 -75.334114 -74.97792 -74.62173 -74.26554 -73.90935 -73.55316 -73.196976 -72.84078 -72.48459 -72.1284 -71.77222 -71.41602 -71.05983 -70.70364 -70.34746 -69.991265 -69.63507 -69.278885 -68.9227 -68.566506 -68.21031 -67.854126 -67.49794 -67.14175 -66.78555 -66.42937 -66.07318 -65.71699 -65.3608 -65.00461 -64.64842 -64.29223 -63.936043 -63.57985 -63.22366 -62.867474 -62.511284 -62.15509 -61.7989 -61.442715 -61.086525 -60.730336 -60.37414 -60.017956 -59.661766 -59.305577 -58.949383 -58.593193 -58.237008 -57.880818 -57.52463 -57.168435 -56.81225 -56.45606 -56.099873 -55.743676 -55.38749 -55.0313 -54.67511 -54.31892 -53.962735 -53.60654 -53.25035 -52.89416 -52.53797 -52.18178 -51.825592 -51.469403 -51.113213 -50.757027 -50.400834 -50.044648 -49.688454 -49.332268 -48.976075 -48.61989 -48.263695 -47.90751 -47.551316 -47.19513 -46.83894 -46.48275 -46.12656 -45.77037 -45.41418 -45.057988 -44.7018 -44.345608 -43.98942 -43.63323 -43.277043 -42.920853 -42.564663 -42.208474 -41.852284 -41.496094 -41.139904 -40.783715 -40.427525 -40.071335 -39.715146 -39.358956 -39.002766 -38.646576 -38.290387 -37.934197 -37.578007 -37.221817 -36.865628 -36.509438 -36.153248 -35.79706 -35.44087 -35.084683 -34.72849 -34.372303 -34.01611 -33.659924 -33.30373 -32.947545 -32.59135 -32.235165 -31.878975 -31.522784 -31.166596 -30.810404 -30.454216 -30.098025 -29.741837 -29.385645 -29.029458 -28.673266 -28.317078 -27.960888 -27.604697 -27.248507 -26.892317 -26.536128 -26.17994 -25.82375 -25.46756 -25.11137 -24.75518 -24.39899 -24.0428 -23.686612 -23.330422 -22.974232 -22.618042 -22.261855 -21.905665 -21.549475 -21.193284 -20.837094 -20.480904 -20.124714 -19.768525 -19.412335 -19.056145 -18.699957 -18.343768 -17.987578 -17.631388 -17.275198 -16.919009 -16.562819 -16.206629 -15.850439 -15.494248 -15.138059 -14.781871 -14.425681 -14.069491 -13.713302 -13.357112 -13.000922 -12.644732 -12.288543 -11.932353 -11.576163 -11.219974 -10.863784 -10.507594 -10.151405 -9.795216 -9.439026 -9.082836 -8.726646 -8.370457 -8.014267 -7.6580773 -7.3018875 -6.945698 -6.5895085 -6.233319 -5.877129 -5.5209394 -5.16475 -4.8085604 -4.4523707 -4.096181 -3.7399912 -3.3838017 -3.027612 -2.6714223 -2.3152328 -1.959043 -1.6028534 -1.2466638 -0.8904741 -0.5342844 -0.17809482 0.17809482 0.5342844 0.8904741 1.2466638 1.6028534 1.959043 2.3152328 2.6714223 3.027612 3.3838017 3.7399912 4.096181 4.4523707 4.8085604 5.16475 5.5209394 5.877129 6.233319 6.5895085 6.945698 7.3018875 7.6580773 8.014267 8.370457 8.726646 9.082836 9.439026 9.795216 10.151405 10.507594 10.863784 11.219974 11.576163 11.932353 12.288543 12.644732 13.000922 13.357112 13.713302 14.069491 14.425681 14.781871 15.138059 15.494248 15.850439 16.206629 16.562819 16.919009 17.275198 17.631388 17.987578 18.343768 18.699957 19.056145 19.412335 19.768525 20.124714 20.480904 20.837094 21.193284 21.549475 21.905665 22.261855 22.618042 22.974232 23.330422 23.686612 24.0428 24.39899 24.75518 25.11137 25.46756 25.82375 26.17994 26.536128 26.892317 27.248507 27.604697 27.960888 28.317078 28.673266 29.029458 29.385645 29.741837 30.098025 30.454216 30.810404 31.166596 31.522784 31.878975 32.235165 32.59135 32.947545 33.30373 33.659924 34.01611 34.372303 34.72849 35.084683 35.44087 35.79706 36.153248 36.509438 36.865628 37.221817 37.578007 37.934197 38.290387 38.646576 39.002766 39.358956 39.715146 40.071335 40.427525 40.783715 41.139904 41.496094 41.852284 42.208474 42.564663 42.920853 43.277043 43.63323 43.98942 44.345608 44.7018 45.057988 45.41418 45.77037 46.12656 46.48275 46.83894 47.19513 47.551316 47.90751 48.263695 48.61989 48.976075 49.332268 49.688454 50.044648 50.400834 50.757027 51.113213 51.469403 51.825592 52.18178 52.53797 52.89416 53.25035 53.60654 53.962735 54.31892 54.67511 55.0313 55.38749 55.743676 56.099873 56.45606 56.81225 57.168435 57.52463 57.880818 58.237008 58.593193 58.949383 59.305577 59.661766 60.017956 60.37414 60.730336 61.086525 61.442715 61.7989 62.15509 62.511284 62.867474 63.22366 63.57985 63.936043 64.29223 64.64842 65.00461 65.3608 65.71699 66.07318 66.42937 66.78555 67.14175 67.49794 67.854126 68.21031 68.566506 68.9227 69.278885 69.63507 69.991265 70.34746 70.70364 71.05983 71.41602 71.77222 72.1284 72.48459 72.84078 73.196976 73.55316 73.90935 74.26554 74.62173 74.97792 75.334114 75.6903 76.046486 76.40268 76.75887 77.11506 77.471245 77.82743 78.18363)) (quote (0.0 0.0031800198 0.006007416 0.008118795 0.009235684 0.009201104 0.008001345 0.005769949 0.0027731164 -6.218896E-4 -0.0039916383 -0.006909231 -0.008998268 -0.009981279 -0.009716391 -0.008217421 -0.0056545865 -0.0023354285 0.0013319271 0.0048888284 0.007883333 0.009927503 0.010747507 0.010220085 0.0083905365 0.0054696654 0.0018097478 -0.002137788 -0.005877902 -0.008933879 -0.010907945 -0.011532863 -0.010707832 -0.008513928 -0.00520676 -0.0011869497 0.0030482237 0.006966177 0.010065838 0.011941551 0.012335958 0.0111749675 0.008580113 0.0048563774 4.566019E-4 -0.004073386 -0.008162302 -0.011285265 -0.013030971 -0.013155609 -0.011616474 -0.008580712 -0.0044076573 3.934249E-4 0.0052252654 0.009476683 0.012599679 0.014179821 0.01399094 0.012026919 0.0085062 0.0038479625 -0.0013774866 -0.006518282 -0.010922076 -0.014018557 -0.015393021 -0.014841527 -0.012400344 -0.008345558 -0.003162316 0.0025128932 0.007970097 0.012514372 0.015554024 0.016677279 0.015707579 0.012730128 0.0080857985 0.0023326145 -0.003820922 -0.00960274 -0.014273717 -0.017221792 -0.01804173 -0.016590203 -0.013008769 -0.0077112606 -0.0013365102 0.0053282553 0.01144421 0.01622608 0.019042509 0.019498868 0.017491732 0.013227568 0.007202627 1.457989E-4 -0.0070690513 -0.013530785 -0.018405529 -0.0210437 -0.02106588 -0.018416243 -0.013376156 -0.006535436 0.0012759632 0.009088016 0.015910447 0.020857593 0.023262648 0.02276662 0.019370284 0.013441768 0.005677849 -0.0029770688 -0.011445054 -0.018648085 -0.02364443 -0.025750818 -0.024634652 -0.020364006 -0.013408107 -0.004587166 0.0050232965 0.014222563 0.021833683 0.026852915 0.028580822 0.026718064 0.021412924 0.013253516 0.0032041984 -0.007507036 -0.01753728 -0.025595664 -0.03060793 -0.03185791 -0.029087408 -0.022540883 -0.012947889 -0.0014438168 0.010562692 0.021560384 0.030123646 0.035095144 0.03573974 0.03184948 0.02378515 0.012447266 -8.217612E-4 -0.01439407 -0.026553432 -0.035709415 -0.04060226 -0.040472448 -0.0351726 -0.025205875 -0.011683704 0.0037943612 0.0193262 0.03293693 0.042825688 0.047599 0.0464612 0.039336458 0.02690486 0.010544941 -0.007813544 -0.025911507 -0.04143221 -0.05229076 -0.056906086 -0.05442084 -0.04483983 -0.029066612 -0.008829336 0.013499373 0.035170876 0.053387855 0.06565275 0.070095286 0.06573788 0.05266339 0.032060057 0.0061322698 -0.022118643 -0.049223308 -0.07164861 -0.08623237 -0.09059754 -0.08349506 -0.06503036 -0.03674003 -0.0015010132 0.036726687 0.07330335 0.10342072 0.12266849 0.12759449 0.11619462 0.08827368 0.04562864 -0.007975374 -0.06704595 -0.12480696 -0.17380828 -0.20664564 -0.21672082 -0.19896482 -0.15044824 -0.07081171 0.03753454 0.16947036 0.31748772 0.47225153 0.6233515 0.76017565 0.87282545 0.95298344 0.99465174 0.9946878 0.9530873 0.87298394 0.76036895 0.6235553 0.47244027 0.31763765 0.16956271 0.03755772 -0.0708606 -0.15056305 -0.19913112 -0.21691774 -0.20684846 -0.17399152 -0.12494762 -0.0671264 -0.007985525 0.045690038 0.0883989 0.11636792 0.12779409 0.12286935 0.10359762 0.07343408 0.03679487 -0.0015039096 -0.036813613 -0.065165356 -0.0836745 -0.09079888 -0.086430326 -0.07181834 -0.04934352 -0.022174284 0.006148145 0.03214541 0.052807466 0.06592256 0.07029736 0.065846846 0.05354963 0.03528004 0.0135422675 -0.008858044 -0.029163264 -0.044992246 -0.054609843 -0.057107937 -0.05248011 -0.041585304 -0.026009174 -0.007843576 0.010586253 0.027012267 0.039496418 0.04665359 0.047799647 0.043009404 0.03308069 0.019411995 0.0038114889 -0.011737318 -0.025323427 -0.03533927 -0.040667266 -0.04080075 -0.03588667 -0.026687237 -0.014467686 -8.260259E-4 0.012512802 0.023912179 0.03202199 0.03593602 0.035290543 0.03029365 0.021683699 0.010623909 -0.0014522943 -0.0130249 -0.022676669 -0.02926485 -0.032054693 -0.030799332 -0.025757682 -0.017649638 -0.0075557074 0.0032252192 0.013341484 0.021556702 0.026899524 0.028777143 0.027039445 0.021987038 0.014323563 0.005059359 -0.0046204543 -0.013506453 -0.02051496 -0.024819188 -0.02594573 -0.02382525 -0.018792158 -0.011534377 -0.0030005377 0.005723056 0.013549851 0.019527572 0.022953285 0.023455225 0.021031917 0.016044688 0.009165417 0.0012869323 -0.0065921415 -0.013493286 -0.018578984 -0.021253726 -0.02123304 -0.018572614 -0.013654712 -0.0071343673 1.471578E-4 0.007270345 0.013353005 0.01765903 0.019686955 0.019227747 0.016385252 0.0115574105 0.005381397 -0.0013499501 -0.007789441 -0.013141731 -0.016761145 -0.018229124 -0.0174021 -0.014424347 -0.009704879 -0.0038618825 0.0023578152 0.008173833 0.012869799 0.01588124 0.016863067 0.015728616 0.012655904 0.008060913 0.0025417402 -0.003198888 -0.008442788 -0.012545875 -0.0150169805 -0.015576322 -0.014186698 -0.01105402 -0.006597591 -0.0013943663 0.00389545 0.008611916 0.012177443 0.014167271 0.014359776 0.012760689 0.009598621 0.0052929614 3.985568E-4 -0.004465543 -0.008694167 -0.011771106 -0.013331906 -0.013206767 -0.011438524 -0.008273886 -0.00412944 4.629266E-4 0.004924088 0.008700523 0.011332813 0.012511332 0.0121124135 0.010210788 0.0070671346 0.003092682 -0.0012043715 -0.005283668 -0.008640479 -0.010867995 -0.011706448 -0.011073152 -0.009070029 -0.0059680348 -0.0021707723 0.0018378426 0.0055550984 0.008522395 0.010381676 0.010918469 0.010086379 0.008010258 0.004968015 0.0013536306 -0.0023737117 -0.005747832 -0.008353736 -0.009878528 -0.010148822 -0.009150203 -0.007026579 -0.0040598316 -6.325762E-4 0.002821048 0.0058702594 0.008141257 0.009362927 0.009399053 0.008263235 0.0061149076 0.0032372466)) (quote bpf) 10))) (setf (bpfcolor newbpf) (om-make-color 0 0 0)) (set-name newbpf nil) newbpf)))) (when newobj) newobj)) nil nil 1) (om-load-boxcomment "comment" (om-make-point 547 34) (quote "Use SoX's FFT convolution engine with given FIR filter coefficients: \"sox-fir\"") "" (om-make-point 125 25) nil (om-make-color 0.0 0.0 0.0) (om-make-font "Verdana" 14.0 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcomment "comment" (om-make-point 195 24) (quote "calculate sinc function") "" (om-make-point 459 152) nil (om-make-color 0.0 0.0 1.0) (om-make-font "Verdana" 10.0 :family "Verdana" :style (quote (:italic)) :mode (quote nil))) (om-load-boxcomment "comment" (om-make-point 160 24) (quote "write the coefficients to disk") "" (om-make-point 476 360) nil (om-make-color 0.0 0.0 1.0) (om-make-font "Verdana" 10.0 :family "Verdana" :style (quote (:italic)) :mode (quote nil))) (om-load-editor-box1 "amen-break.wav" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "tracknum" 0) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "markers" nil))) (om-make-point 138 243) (om-make-point 80 50) (let ((newobj (let ((thesound (load-sound (om-make-pathname :directory (quote (:absolute "Users" "Marlon_MBPro3" "Research" "OM-SoX" "OM-SoX 1.0" "resources" "sounds")) :device nil :host nil :name "amen-break" :type "wav") 0 100 0))) (when thesound (setf (markers thesound) (quote nil))) thesound))) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "amen-break.wav") (set-tonalite newobj nil) newobj) "x" nil (pairlis (quote (palette-mode scale show-stems obj-mode score-mode winpos winsize mode grillestep notechancolor? zoom player inport outport deltapict cmnpref staff fontsize approx)) (list 0 nil (quote t) 1 0 (om-make-point 400 22) (om-make-point 558 345) 0 1000 nil 1 (quote :soxplayer) 0 nil (om-make-point 0 0) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (quote g) 24 2)) t nil nil nil) (om-load-editor-box1 "BPF" (quote bpf) (quote ((om-load-inputfun (quote input-funbox) "object" "self" nil) (om-load-inputfun (quote input-funbox) "X coordinates (list)" "x-points" (list 0 100)) (om-load-inputfun (quote input-funbox) "Y coordinates (list)" "y-points" (list 1 -1)) (om-load-inputfun (quote input-funbox) "precision (integer) [0 - 10]" "decimals" 10))) (om-make-point 399 237) (om-make-point 178 91) (let ((newobj (when (find-class (quote bpf) nil) (let ((newbpf (simple-bpf-from-list (quote (-78.53982 -78.18363 -77.82743 -77.471245 -77.11506 -76.75887 -76.40268 -76.046486 -75.6903 -75.334114 -74.97792 -74.62173 -74.26554 -73.90935 -73.55316 -73.196976 -72.84078 -72.48459 -72.1284 -71.77222 -71.41602 -71.05983 -70.70364 -70.34746 -69.991265 -69.63507 -69.278885 -68.9227 -68.566506 -68.21031 -67.854126 -67.49794 -67.14175 -66.78555 -66.42937 -66.07318 -65.71699 -65.3608 -65.00461 -64.64842 -64.29223 -63.936043 -63.57985 -63.22366 -62.867474 -62.511284 -62.15509 -61.7989 -61.442715 -61.086525 -60.730336 -60.37414 -60.017956 -59.661766 -59.305577 -58.949383 -58.593193 -58.237008 -57.880818 -57.52463 -57.168435 -56.81225 -56.45606 -56.099873 -55.743676 -55.38749 -55.0313 -54.67511 -54.31892 -53.962735 -53.60654 -53.25035 -52.89416 -52.53797 -52.18178 -51.825592 -51.469403 -51.113213 -50.757027 -50.400834 -50.044648 -49.688454 -49.332268 -48.976075 -48.61989 -48.263695 -47.90751 -47.551316 -47.19513 -46.83894 -46.48275 -46.12656 -45.77037 -45.41418 -45.057988 -44.7018 -44.345608 -43.98942 -43.63323 -43.277043 -42.920853 -42.564663 -42.208474 -41.852284 -41.496094 -41.139904 -40.783715 -40.427525 -40.071335 -39.715146 -39.358956 -39.002766 -38.646576 -38.290387 -37.934197 -37.578007 -37.221817 -36.865628 -36.509438 -36.153248 -35.79706 -35.44087 -35.084683 -34.72849 -34.372303 -34.01611 -33.659924 -33.30373 -32.947545 -32.59135 -32.235165 -31.878975 -31.522784 -31.166596 -30.810404 -30.454216 -30.098025 -29.741837 -29.385645 -29.029458 -28.673266 -28.317078 -27.960888 -27.604697 -27.248507 -26.892317 -26.536128 -26.17994 -25.82375 -25.46756 -25.11137 -24.75518 -24.39899 -24.0428 -23.686612 -23.330422 -22.974232 -22.618042 -22.261855 -21.905665 -21.549475 -21.193284 -20.837094 -20.480904 -20.124714 -19.768525 -19.412335 -19.056145 -18.699957 -18.343768 -17.987578 -17.631388 -17.275198 -16.919009 -16.562819 -16.206629 -15.850439 -15.494248 -15.138059 -14.781871 -14.425681 -14.069491 -13.713302 -13.357112 -13.000922 -12.644732 -12.288543 -11.932353 -11.576163 -11.219974 -10.863784 -10.507594 -10.151405 -9.795216 -9.439026 -9.082836 -8.726646 -8.370457 -8.014267 -7.6580773 -7.3018875 -6.945698 -6.5895085 -6.233319 -5.877129 -5.5209394 -5.16475 -4.8085604 -4.4523707 -4.096181 -3.7399912 -3.3838017 -3.027612 -2.6714223 -2.3152328 -1.959043 -1.6028534 -1.2466638 -0.8904741 -0.5342844 -0.17809482 0.17809482 0.5342844 0.8904741 1.2466638 1.6028534 1.959043 2.3152328 2.6714223 3.027612 3.3838017 3.7399912 4.096181 4.4523707 4.8085604 5.16475 5.5209394 5.877129 6.233319 6.5895085 6.945698 7.3018875 7.6580773 8.014267 8.370457 8.726646 9.082836 9.439026 9.795216 10.151405 10.507594 10.863784 11.219974 11.576163 11.932353 12.288543 12.644732 13.000922 13.357112 13.713302 14.069491 14.425681 14.781871 15.138059 15.494248 15.850439 16.206629 16.562819 16.919009 17.275198 17.631388 17.987578 18.343768 18.699957 19.056145 19.412335 19.768525 20.124714 20.480904 20.837094 21.193284 21.549475 21.905665 22.261855 22.618042 22.974232 23.330422 23.686612 24.0428 24.39899 24.75518 25.11137 25.46756 25.82375 26.17994 26.536128 26.892317 27.248507 27.604697 27.960888 28.317078 28.673266 29.029458 29.385645 29.741837 30.098025 30.454216 30.810404 31.166596 31.522784 31.878975 32.235165 32.59135 32.947545 33.30373 33.659924 34.01611 34.372303 34.72849 35.084683 35.44087 35.79706 36.153248 36.509438 36.865628 37.221817 37.578007 37.934197 38.290387 38.646576 39.002766 39.358956 39.715146 40.071335 40.427525 40.783715 41.139904 41.496094 41.852284 42.208474 42.564663 42.920853 43.277043 43.63323 43.98942 44.345608 44.7018 45.057988 45.41418 45.77037 46.12656 46.48275 46.83894 47.19513 47.551316 47.90751 48.263695 48.61989 48.976075 49.332268 49.688454 50.044648 50.400834 50.757027 51.113213 51.469403 51.825592 52.18178 52.53797 52.89416 53.25035 53.60654 53.962735 54.31892 54.67511 55.0313 55.38749 55.743676 56.099873 56.45606 56.81225 57.168435 57.52463 57.880818 58.237008 58.593193 58.949383 59.305577 59.661766 60.017956 60.37414 60.730336 61.086525 61.442715 61.7989 62.15509 62.511284 62.867474 63.22366 63.57985 63.936043 64.29223 64.64842 65.00461 65.3608 65.71699 66.07318 66.42937 66.78555 67.14175 67.49794 67.854126 68.21031 68.566506 68.9227 69.278885 69.63507 69.991265 70.34746 70.70364 71.05983 71.41602 71.77222 72.1284 72.48459 72.84078 73.196976 73.55316 73.90935 74.26554 74.62173 74.97792 75.334114 75.6903 76.046486 76.40268 76.75887 77.11506 77.471245 77.82743 78.18363)) (quote (0.0 0.0031800198 0.006007416 0.008118795 0.009235684 0.009201104 0.008001345 0.005769949 0.0027731164 -6.218896E-4 -0.0039916383 -0.006909231 -0.008998268 -0.009981279 -0.009716391 -0.008217421 -0.0056545865 -0.0023354285 0.0013319271 0.0048888284 0.007883333 0.009927503 0.010747507 0.010220085 0.0083905365 0.0054696654 0.0018097478 -0.002137788 -0.005877902 -0.008933879 -0.010907945 -0.011532863 -0.010707832 -0.008513928 -0.00520676 -0.0011869497 0.0030482237 0.006966177 0.010065838 0.011941551 0.012335958 0.0111749675 0.008580113 0.0048563774 4.566019E-4 -0.004073386 -0.008162302 -0.011285265 -0.013030971 -0.013155609 -0.011616474 -0.008580712 -0.0044076573 3.934249E-4 0.0052252654 0.009476683 0.012599679 0.014179821 0.01399094 0.012026919 0.0085062 0.0038479625 -0.0013774866 -0.006518282 -0.010922076 -0.014018557 -0.015393021 -0.014841527 -0.012400344 -0.008345558 -0.003162316 0.0025128932 0.007970097 0.012514372 0.015554024 0.016677279 0.015707579 0.012730128 0.0080857985 0.0023326145 -0.003820922 -0.00960274 -0.014273717 -0.017221792 -0.01804173 -0.016590203 -0.013008769 -0.0077112606 -0.0013365102 0.0053282553 0.01144421 0.01622608 0.019042509 0.019498868 0.017491732 0.013227568 0.007202627 1.457989E-4 -0.0070690513 -0.013530785 -0.018405529 -0.0210437 -0.02106588 -0.018416243 -0.013376156 -0.006535436 0.0012759632 0.009088016 0.015910447 0.020857593 0.023262648 0.02276662 0.019370284 0.013441768 0.005677849 -0.0029770688 -0.011445054 -0.018648085 -0.02364443 -0.025750818 -0.024634652 -0.020364006 -0.013408107 -0.004587166 0.0050232965 0.014222563 0.021833683 0.026852915 0.028580822 0.026718064 0.021412924 0.013253516 0.0032041984 -0.007507036 -0.01753728 -0.025595664 -0.03060793 -0.03185791 -0.029087408 -0.022540883 -0.012947889 -0.0014438168 0.010562692 0.021560384 0.030123646 0.035095144 0.03573974 0.03184948 0.02378515 0.012447266 -8.217612E-4 -0.01439407 -0.026553432 -0.035709415 -0.04060226 -0.040472448 -0.0351726 -0.025205875 -0.011683704 0.0037943612 0.0193262 0.03293693 0.042825688 0.047599 0.0464612 0.039336458 0.02690486 0.010544941 -0.007813544 -0.025911507 -0.04143221 -0.05229076 -0.056906086 -0.05442084 -0.04483983 -0.029066612 -0.008829336 0.013499373 0.035170876 0.053387855 0.06565275 0.070095286 0.06573788 0.05266339 0.032060057 0.0061322698 -0.022118643 -0.049223308 -0.07164861 -0.08623237 -0.09059754 -0.08349506 -0.06503036 -0.03674003 -0.0015010132 0.036726687 0.07330335 0.10342072 0.12266849 0.12759449 0.11619462 0.08827368 0.04562864 -0.007975374 -0.06704595 -0.12480696 -0.17380828 -0.20664564 -0.21672082 -0.19896482 -0.15044824 -0.07081171 0.03753454 0.16947036 0.31748772 0.47225153 0.6233515 0.76017565 0.87282545 0.95298344 0.99465174 0.9946878 0.9530873 0.87298394 0.76036895 0.6235553 0.47244027 0.31763765 0.16956271 0.03755772 -0.0708606 -0.15056305 -0.19913112 -0.21691774 -0.20684846 -0.17399152 -0.12494762 -0.0671264 -0.007985525 0.045690038 0.0883989 0.11636792 0.12779409 0.12286935 0.10359762 0.07343408 0.03679487 -0.0015039096 -0.036813613 -0.065165356 -0.0836745 -0.09079888 -0.086430326 -0.07181834 -0.04934352 -0.022174284 0.006148145 0.03214541 0.052807466 0.06592256 0.07029736 0.065846846 0.05354963 0.03528004 0.0135422675 -0.008858044 -0.029163264 -0.044992246 -0.054609843 -0.057107937 -0.05248011 -0.041585304 -0.026009174 -0.007843576 0.010586253 0.027012267 0.039496418 0.04665359 0.047799647 0.043009404 0.03308069 0.019411995 0.0038114889 -0.011737318 -0.025323427 -0.03533927 -0.040667266 -0.04080075 -0.03588667 -0.026687237 -0.014467686 -8.260259E-4 0.012512802 0.023912179 0.03202199 0.03593602 0.035290543 0.03029365 0.021683699 0.010623909 -0.0014522943 -0.0130249 -0.022676669 -0.02926485 -0.032054693 -0.030799332 -0.025757682 -0.017649638 -0.0075557074 0.0032252192 0.013341484 0.021556702 0.026899524 0.028777143 0.027039445 0.021987038 0.014323563 0.005059359 -0.0046204543 -0.013506453 -0.02051496 -0.024819188 -0.02594573 -0.02382525 -0.018792158 -0.011534377 -0.0030005377 0.005723056 0.013549851 0.019527572 0.022953285 0.023455225 0.021031917 0.016044688 0.009165417 0.0012869323 -0.0065921415 -0.013493286 -0.018578984 -0.021253726 -0.02123304 -0.018572614 -0.013654712 -0.0071343673 1.471578E-4 0.007270345 0.013353005 0.01765903 0.019686955 0.019227747 0.016385252 0.0115574105 0.005381397 -0.0013499501 -0.007789441 -0.013141731 -0.016761145 -0.018229124 -0.0174021 -0.014424347 -0.009704879 -0.0038618825 0.0023578152 0.008173833 0.012869799 0.01588124 0.016863067 0.015728616 0.012655904 0.008060913 0.0025417402 -0.003198888 -0.008442788 -0.012545875 -0.0150169805 -0.015576322 -0.014186698 -0.01105402 -0.006597591 -0.0013943663 0.00389545 0.008611916 0.012177443 0.014167271 0.014359776 0.012760689 0.009598621 0.0052929614 3.985568E-4 -0.004465543 -0.008694167 -0.011771106 -0.013331906 -0.013206767 -0.011438524 -0.008273886 -0.00412944 4.629266E-4 0.004924088 0.008700523 0.011332813 0.012511332 0.0121124135 0.010210788 0.0070671346 0.003092682 -0.0012043715 -0.005283668 -0.008640479 -0.010867995 -0.011706448 -0.011073152 -0.009070029 -0.0059680348 -0.0021707723 0.0018378426 0.0055550984 0.008522395 0.010381676 0.010918469 0.010086379 0.008010258 0.004968015 0.0013536306 -0.0023737117 -0.005747832 -0.008353736 -0.009878528 -0.010148822 -0.009150203 -0.007026579 -0.0040598316 -6.325762E-4 0.002821048 0.0058702594 0.008141257 0.009362927 0.009399053 0.008263235 0.0061149076 0.0032372466)) (quote bpf) 10))) (setf (bpfcolor newbpf) (om-make-color 0 0 0)) (set-name newbpf nil) newbpf)))) (when newobj) newobj) nil nil (pairlis (quote (picture winpos winsize)) (list nil (om-make-point 168 88) (om-make-point 1133 578))) t nil nil nil) (om-load-boxcall (quote bastype) "list" (quote list) (quote nil) (om-make-point 415 102) (om-make-point 48 30) 2500 "2500" nil) (om-load-boxcall (quote genfun) "SOX-LEVEL" (quote sox-level) (quote ((om-load-inputfun (quote input-funbox) "gain (dB)" "GAIN" -24) (om-load-inputkeyword (quote input-keyword) "options (applied before gain)" "options" (quote :options) "normalize" (list (list "normalize" "normalize") (list "limit" "limit") (list "headroom" "headroom") (list "reclaim" "reclaim"))) (om-load-inputkeyword (quote input-keyword) "balance channels in a multichannel-file using peak or rms detection" "balance-mode" (quote :balance-mode) "peak" (list (list "peak" "peak") (list "rms" "rms"))) (om-load-inputkeyword (quote input-keyword) "connect sox-effects to append to the processing chain" "sox-append" (quote :sox-append) nil nil))) (om-make-point 263 254) nil nil nil nil 1) (om-load-boxcomment "comment 2" (om-make-point 129 30) (quote "Convolution Kernel") "" (om-make-point 463 210) nil (om-make-color 0.0 0.19194556 1.0) (om-make-font "Verdana" 12 :family "Verdana" :style (quote (:plain)) :mode (quote nil))) (om-load-boxcall (quote genfun) "SOX-PROCESS" (quote sox-process) (quote ((om-load-inputfun (quote input-funbox) "" "INPUT" nil) (om-load-inputfun (quote input-funbox) "" "COMMANDS" "") (om-load-inputkeyword (quote input-keyword) "Output type (new file, replace file, pipe, or realtime) [string]. Also accepts directory, filename, filepath [path]" "output" (quote :output) "realtime" (list (list "new file" nil) (list "replace file" "replace file") (list "pipe" "pipe") (list "realtime" "realtime"))))) (om-make-point 209 341) nil nil nil nil 1) (om-load-boxcall (quote genfun) "SOX-FIR" (quote sox-fir) (quote ((om-load-inputfun (quote input-funbox) "Path to coefficients-file or list of coefficients" "COEFFICIENTS" nil))) (om-make-point 291 172) nil nil nil nil 1) (om-load-editor-box1 "" (quote sound) (quote ((om-load-inputfun (quote input-funbox) "object" "SELF" nil) (om-load-inputfun (quote input-funbox) "a track index for multichannel mixing" "TRACKNUM" 1) (om-load-inputfun (quote input-funbox) "a list of markers (s)" "MARKERS" nil))) (om-make-point 225 424) (om-make-point 80 50) (let ((newobj nil)) (load-port-info newobj (quote nil)) (init-mus-color newobj (quote nil)) (set-extra-pairs newobj (quote nil)) (set-patch-pairs newobj (quote nil)) (set-name newobj "") (set-tonalite newobj nil) newobj) nil nil (pairlis (quote (approx fontsize staff cmnpref deltapict outport inport player zoom notechancolor? grillestep mode winsize winpos score-mode obj-mode show-stems scale palette-mode)) (list 2 24 (quote g) (let ((newobj (make-instance (quote edition-values)))) (setf (paper-size newobj) (om-make-point 600 800)) (setf (top-margin newobj) 2) (setf (left-margin newobj) 1) (setf (right-margin newobj) 1) (setf (bottom-margin newobj) 1) (setf (orientation newobj) nil) (setf (scale newobj) nil) (setf (system-space newobj) (quote (1))) (setf (system-color newobj) (quote nil)) (setf (line-space newobj) 1) (setf (title newobj) nil) (setf (show-title? newobj) nil) (setf (show-page? newobj) nil) (setf (sheet-id newobj) nil) (setf (page-mode newobj) nil) newobj) (om-make-point 0 0) nil 0 (quote :soxplayer) 1 nil 1000 0 (om-make-point 562 337) (om-make-point 4 180) 0 1 (quote t) nil 0)) t nil nil nil) (om-load-boxcall (quote genfun) "COEFFS->TEXTFILE" (quote coeffs->textfile) (quote ((om-load-inputfun (quote input-funbox) "" "COEFFS" nil))) (om-make-point 385 345) nil nil nil nil 1))) (quote ((6 0 0 0 nil 0) (0 0 5 0 nil 0) (10 0 7 3 nil 0) (4 0 9 0 nil 0) (7 0 9 1 nil 0) (12 0 10 0 nil 0) (9 0 11 0 nil 0) (5 0 12 0 nil 0))) (list (let ((newpict (make-instance (quote patch-picture) :name "omsox" :source (quote user) :pict-pathname (restore-pict-path (restore-path nil)) :thepict (om-get-picture "omsox" (quote user)) :storemode :external :draw-params (quote (p 0 0 100 100)) :extraobjs nil))) (setf (pict-pos newpict) (om-make-point 57 10)) (setf (pict-size newpict) (om-make-point 63 53)) newpict)) 6.070005)) | |
