[audacity4blind] Re: Plugin testers wanted

  • From: Jacob Kruger <jacob@xxxxxxxxxxxxx>
  • To: audacity4blind@xxxxxxxxxxxxx
  • Date: Tue, 7 Feb 2017 16:19:44 +0200

Ok, tried different volume levels, and, did the same, but, when I ran it in dummy/debug mode, it brought up the following:

---start---

("plus" "1" "point" "1" "db")
break: filename must be at least one character long - NIL
if continued: return from BREAK
Function: #<Subr-BREAK: #56b3aa0>
Arguments:
  "filename must be at least one character long"
  NIL
Function: #<FSubr-COND: #56b4020>
Arguments:
((= 0 (LENGTH FILENAME)) (BREAK "filename must be at least one character long" FILENAME))
  ((FULL-NAME-P FILENAME))
(T (COND ((AND (< 0 (LENGTH *DEFAULT-SF-DIR*)) (NOT (IS-FILE-SEPARATOR (CHAR *DEFAULT-SF-DIR* (1- (LENGTH *DEFAULT-SF-DIR*)))))) (SETF *DEFAULT-SF-DIR* (STRCAT *DEFAULT-SF-DIR* (STRING *FILE-SEPARATOR*))) (FORMAT T "Warning: appending "~A" to *default-sf-dir*~%" *FILE-SEPARATOR*))) (SETF FILENAME (STRCAT *DEFAULT-SF-DIR* (STRING FILENAME))))
Function: #<Closure-SOUNDFILENAME: #df253d8>
Arguments:
  NIL
Function: #<FSubr-LET: #56b3f20>
Arguments:
  ((SWAP 0))
(COND ((EQ ENDIAN :BIG) (SETF SWAP (IF (BIGENDIANP) 0 1))) ((EQ ENDIAN :LITTLE) (SETF SWAP (IF (BIGENDIANP) 1 0))))
  (IF (MINUSP DUR) (ERROR "s-read :dur is negative" DUR))
(SND-READ (SOUNDFILENAME FILENAME) TIME-OFFSET (LOCAL-TO-GLOBAL 0) FORMAT NCHANS MODE BITS SWAP SRATE DUR)
Function: #<Closure-S-READ: #df279d8>
Arguments:
  NIL
  :TIME-OFFSET
  3.313923000000000
  :DUR
  0.451667000000000
Function: #<FSubr-LET*: #56b3ee0>
Arguments:
((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START)))
  (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH)
Function: #<FSubr-PROGV: #56b2140>
Arguments:
  (QUOTE (*WARP*))
(IF (WARP-FUNCTION *WARP*) (LIST (LIST (SREF-INVERSE (WARP-FUNCTION *WARP*) T0) (WARP-STRETCH *WARP*) (WARP-FUNCTION *WARP*))) (LIST (LIST T0 (WARP-STRETCH *WARP*) NIL)))
(CHECK-T0 (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH)) (QUOTE (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH))))
Function: #<FSubr-PROGV: #56b2140>
Arguments:
(QUOTE (*WARP* *SUSTAIN* *START* *LOUD* *TRANSPOSE* *STOP* *CONTROL-SRATE* *SOUND-SRATE*))
  NYQ%ENVIRONMENT
(AT-ABS T0 (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH)))
Function: #<FSubr-SETF: #56b52b0>
Arguments:
  FIRST%SOUND
(WITH%ENVIRONMENT NYQ%ENVIRONMENT (AT-ABS T0 (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH))))
Function: #<FSubr-COND: #56b4020>
Arguments:
((< I LOOP%COUNT) (SETF FIRST%SOUND (WITH%ENVIRONMENT NYQ%ENVIRONMENT (AT-ABS T0 (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH))))) (IF S%RATE (SETF FIRST%SOUND (FORCE-SRATES S%RATE FIRST%SOUND)) (SETF S%RATE (GET-SRATES FIRST%SOUND))) (SETF I (1+ I)) (COND ((= I LOOP%COUNT) FIRST%SOUND) ((ARRAYP S%RATE) (SND-MULTISEQ (PROG1 FIRST%SOUND (SETF FIRST%SOUND NIL)) SEQREP%CLOSURE)) (T (SND-SEQ (PROG1 FIRST%SOUND (SETF FIRST%SOUND NIL)) SEQREP%CLOSURE))))
  (T (SND-ZERO (WARP-TIME *WARP*) *SOUND-SRATE*))
Function: #<Closure: #14bdd9e0>
Arguments:
  0.000000000000000
Function: #<Subr-FUNCALL: #56b53b0>
Arguments:
  #<Closure: #14bdd9e0>
  0.000000000000000
Function: #<FSubr-COND: #56b4020>
Arguments:
  ((NOT (INTEGERP LOOP%COUNT)) (ERROR "bad argument type" LOOP%COUNT))
(T (SETF SEQREP%CLOSURE (FUNCTION (LAMBDA (T0) (COND ((< I LOOP%COUNT) (SETF FIRST%SOUND (WITH%ENVIRONMENT NYQ%ENVIRONMENT (AT-ABS T0 (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH))))) (IF S%RATE (SETF FIRST%SOUND (FORCE-SRATES S%RATE FIRST%SOUND)) (SETF S%RATE (GET-SRATES FIRST%SOUND))) (SETF I (1+ I)) (COND ((= I LOOP%COUNT) FIRST%SOUND) ((ARRAYP S%RATE) (SND-MULTISEQ (PROG1 FIRST%SOUND (SETF FIRST%SOUND NIL)) SEQREP%CLOSURE)) (T (SND-SEQ (PROG1 FIRST%SOUND (SETF FIRST%SOUND NIL)) SEQREP%CLOSURE)))) (T (SND-ZERO (WARP-TIME *WARP*) *SOUND-SRATE*)))))) (FUNCALL SEQREP%CLOSURE (LOCAL-TO-GLOBAL 0)))
Function: #<FSubr-LET: #56b3f20>
Arguments:
((I 0) (LOOP%COUNT (LENGTH WD-LIST)) (NYQ%ENVIRONMENT (NYQ:THE-ENVIRONMENT)) SEQREP%CLOSURE FIRST%SOUND S%RATE)
(COND ((NOT (INTEGERP LOOP%COUNT)) (ERROR "bad argument type" LOOP%COUNT)) (T (SETF SEQREP%CLOSURE (FUNCTION (LAMBDA (T0) (COND ((< I LOOP%COUNT) (SETF FIRST%SOUND (WITH%ENVIRONMENT NYQ%ENVIRONMENT (AT-ABS T0 (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH))))) (IF S%RATE (SETF FIRST%SOUND (FORCE-SRATES S%RATE FIRST%SOUND)) (SETF S%RATE (GET-SRATES FIRST%SOUND))) (SETF I (1+ I)) (COND ((= I LOOP%COUNT) FIRST%SOUND) ((ARRAYP S%RATE) (SND-MULTISEQ (PROG1 FIRST%SOUND (SETF FIRST%SOUND NIL)) SEQREP%CLOSURE)) (T (SND-SEQ (PROG1 FIRST%SOUND (SETF FIRST%SOUND NIL)) SEQREP%CLOSURE)))) (T (SND-ZERO (WARP-TIME *WARP*) *SOUND-SRATE*)))))) (FUNCALL SEQREP%CLOSURE (LOCAL-TO-GLOBAL 0))))
Function: #<FSubr-SETF: #56b52b0>
Arguments:
  PHRASE
(SEQREP (I (LENGTH WD-LIST)) (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH)))
Function: #<FSubr-LET*: #56b3ee0>
Arguments:
((SND-FILE (DOLIST (CURR (GET (QUOTE *SYSTEM-DIR*) (QUOTE PLUGIN))) (IF (MEMBER "tts-suite.wav" (LISTDIR CURR) :TEST (FUNCTION STRING-EQUAL)) (RETURN (FORMAT NIL "~a~atts-suite.wav" CURR *FILE-SEPARATOR*))))) (WORDS (MAPCAR (FUNCTION (LAMBDA (W) (CONS (FORMAT NIL "~a" (FIRST W)) (REST W)))) (QUOTE ((C 0.012721000000000 0.459444000000000) (D 0.474331000000000 0.808220000000000) (E 0.817120000000000 1.095816000000000) (F 1.110113000000000 1.512937000000000) (G 1.519297000000000 1.934546000000000) (A 1.945669000000000 2.248764000000000) (B 2.256531000000000 2.532324000000000) (FLAT 2.539002000000000 2.916655000000000) (SHARP 2.924467000000000 3.303934000000000) (PLUS 3.313923000000000 3.765590000000000) (MINUS 3.771134000000000 4.262755000000000) (PEAK 4.277415000000000 4.489000000000000) (LEVEL 4.489000000000000 4.793073000000000) (RMS 4.804694000000000 5.369286000000000) (DB 5.381905000000000 5.910079000000000) (CENT 5.916032000000000 6.288288000000000) (CENTS 6.302585000000000 6.727222000000000) (POINT 6.740748000000000 7.162166000000000) (LESS 7.170385000000000 7.570079000000000) (MORE 7.579932000000000 7.926610000000000) (THAN 7.932880000000000 8.342052000000001) (HERTZ 8.351406000000001 8.772641999999999) (DUAL 8.777914000000001 9.094274000000000) (MONO 9.105214999999999 9.547222000000000) (STEREO 9.553991000000000 10.115907000000000) (BIT 10.128254000000000 10.378605000000000) (0 10.392404000000001 10.920261000000000) (1 10.931565000000001 11.325771000000000) (2 11.339886999999999 11.642754999999999) (3 11.652290000000001 12.021825000000000) (4 12.026871000000000 12.386338000000000) (5 12.392880000000000 12.899286000000000) (6 12.906416999999999 13.434025000000000) (7 13.443968000000000 13.893503000000001) (8 13.900499000000000 14.249762000000000) (9 14.263695999999999 14.705793999999999) (10 14.712925000000000 15.056293000000000) (11 15.066599000000000 15.564840999999999) (12 15.575873000000000 16.070986000000001) (13 16.077210999999998 16.644024999999999) (14 16.653559999999999 17.182777999999999) (15 17.196892999999999 17.703434999999999) (16 17.714829999999999 18.295385000000000) (17 18.306735000000000 18.990102000000000) (18 18.998457999999999 19.519511999999999) (19 19.525601000000002 20.102166000000000) (20 20.111383000000000 20.532664000000000) (21 20.544512000000001 21.288786999999999) (22 21.302856999999999 21.968582999999999) (23 21.973946000000002 22.659762000000001) (24 22.670884000000001 23.326497000000000) (25 23.332585000000002 24.060624000000001) (26 24.067211000000000 24.801189999999998) (27 24.809002000000000 25.524750999999998) (28 25.530567000000001 26.178175000000000) (29 26.187075000000000 26.927403999999999) (30 26.934035999999999 27.271463000000001) (31 27.286259000000001 27.910170000000001) (32 27.925056999999999 28.532914000000002) (33 28.543084000000000 29.101552999999999) (34 29.107506000000001 29.703185999999999) (35 29.716984000000000 30.381440000000001) (36 30.394058999999999 31.086406000000000) (37 31.101382999999998 31.743072999999999) (38 31.754194999999999 32.307811999999998) (39 32.316667000000002 32.893776000000003) (40 32.908752999999997 33.285226999999999) (41 33.293264999999998 33.878174999999999) (42 33.884717000000002 34.551076999999999) (43 34.565328999999998 35.191780000000001) (44 35.202176999999999 35.826858999999999) (45 35.833855000000000 36.517811999999999) (46 36.528753000000002 37.230215000000001) (47 37.238298999999998 37.936768999999998) (48 37.949477999999999 38.551394999999999) (49 38.559161000000003 39.180985999999997) (50 39.192743999999998 39.577652999999998) (51 39.585509999999999 40.272778000000002) (52 40.282313000000002 40.935248999999999) (53 40.945737000000001 41.617404000000001) (54 41.625261000000002 42.291122000000001) (55 42.302289999999999 43.016134000000001) (56 43.025033999999998 43.717697999999999) (57 43.727913999999998 44.390011000000001) (58 44.395691999999997 44.995294999999999) (59 45.002336000000000 45.660850000000003) (60 45.669297000000000 46.196337999999997) (61 46.207234000000000 47.021439999999998) (62 47.035102000000002 47.771621000000003) (63 47.783878000000001 48.589149999999997) (64 48.601633000000000 49.390850000000000) (65 49.397618999999999 50.292687000000001) (66 50.306395000000002 51.123435000000001) (67 51.131701000000000 51.924683000000002) (68 51.935668999999997 52.743389999999998) (69 52.758367000000000 53.539422000000002) (70 53.552585000000001 54.046474000000003) (71 54.053196999999997 54.871122000000000) (72 54.880476000000002 55.663480999999997) (73 55.675510000000003 56.476019999999998) (74 56.486066000000001 57.234433000000003) (75 57.244694000000003 58.051552999999998) (76 58.059410000000000 58.950850000000003) (77 58.960068000000000 59.796587000000002) (78 59.809840999999999 60.552166000000000) (79 60.566327000000001 61.307856999999998) (80 61.320112999999999 61.618492000000003) (81 61.628979999999999 62.194887000000001) (82 62.203243000000001 62.736269999999998) (83 62.743039000000003 63.285907000000002) (84 63.297981999999998 63.871462999999999) (85 63.877913999999997 64.497879999999995) (86 64.503741000000005 65.131326999999999) (87 65.138005000000007 65.772301999999996) (89 65.783832000000004 66.322346999999993) (90 66.332834000000005 66.791576000000006) (91 66.802109000000002 67.507744000000002) (92 67.513650999999996 68.186361000000005) (93 68.192448999999996 68.886837000000000) (94 68.895917999999995 69.603140999999994) (95 69.614262999999994 70.391144999999995) (96 70.401587000000006 71.169036000000006) (97 71.178843999999998 71.879580000000004) (98 71.887619000000001 72.531576000000001) (99 72.544694000000007 73.238719000000003) (100 73.250703000000001 73.884410000000003) (200 73.896484999999998 74.483073000000005) (300 74.489069999999998 75.086269999999999) (400 75.097256000000002 75.691779999999994) (500 75.696916000000002 76.395793999999995) (600 76.405963999999997 77.161803000000006) (700 77.169523999999996 77.853684999999999) (800 77.863129000000001 78.462868000000000) (900 78.469545999999994 79.153548999999998) (THOUSAND 79.160408000000004 79.639161000000001))))) (PHRASE NIL) (PEAK (MIN 121.000000000000000 (MAX -121.000000000000000 (/ (ROUND (* 10 (LINEAR-TO-DB (GET (QUOTE *SELECTION*) (QUOTE PEAK-LEVEL))))) 10.000000000000000)))) (INTPEAK (TRUNCATE (ABS PEAK))) (HEKTOPEAK (* 100 (TRUNCATE (/ INTPEAK 100)))) (FLTPEAK (FORMAT NIL "~a" (TRUNCATE (* 10 (- (ABS PEAK) INTPEAK))))) (WD-LIST (QUOTE ("db"))))
(IF (OR (>= INTPEAK 121) (/= PEAK PEAK)) (SETF WD-LIST (IF (PLUSP PEAK) (QUOTE ("more" "than" "plus" "100" "20" "db")) (QUOTE ("less" "than" "minus" "100" "20" "db")))) (PROGN (UNLESS (STRING-EQUAL FLTPEAK "0") (PUSH FLTPEAK WD-LIST) (PUSH "point" WD-LIST)) (IF (OR (ZEROP HEKTOPEAK) (AND (> HEKTOPEAK 0) (/= HEKTOPEAK INTPEAK))) (PUSH (FORMAT NIL "~a" (- INTPEAK HEKTOPEAK)) WD-LIST)) (IF (>= HEKTOPEAK 100) (PUSH (FORMAT NIL "~a" HEKTOPEAK) WD-LIST)) (PUSH (IF (MINUSP PEAK) "minus" "plus") WD-LIST)))
  (PRINT WD-LIST)
(SETF PHRASE (SEQREP (I (LENGTH WD-LIST)) (LET* ((WORD (ASSOC (NTH I WD-LIST) WORDS :TEST (FUNCTION STRING-EQUAL))) (START (SECOND WORD)) (LENGTH (- (THIRD WORD) START))) (S-READ SND-FILE :TIME-OFFSET START :DUR LENGTH))))
(S-SAVE (SCALE-SRATE (SCALE-DB -6 PHRASE) 1.000000000000000) NY:ALL "" :PLAY T)
  NIL
1>

---end---


Seems to have something to do with a file name/path - issue with spaces in path name?

(that's just a guess)


Jacob Kruger
Blind Biker
Skype: BlindZA
"Resistance is futile, but, acceptance is versatile..."

On 2017-02-07 15:21, Robert Hänggi wrote:

2017-02-07 13:01 GMT+01:00, Jacob Kruger <jacob@xxxxxxxxxxxxx>:
Ok, seemed like it might have been an issue with testing both file
locations - disabled it under add-remove plugins, where it seemed to be
showing up under both locations, even though had removed it from one to
the other, and, then restarted audacity again, placed it under
%appData%, re-enabled it, and, it's now showing up under analyze, and,
could also assign a keyboard shortcut to it, but, if I activate it from
either the menu, or using the keystroke, it pops up a form of message
box with the following message in it titled Nyquist:
%1.15f

HTH


Hi Jakob
First, try sounds with different dB levels. It might be that one
causes a problem.

Second:
Enable the dummy control.
- open tts-peak.ny in an editor
- remove one semicolon before "control dummy..."
It's the first line after the usual header
- save
- apply the effect--there might be an error message at the beginning
which you can ignore.
- The plug-in will show up with a dummy control and the usual buttons
- press debug (alt+g)
- post the error message, an excerpt at least.

Thanks for testing
Robert

The audacity4blind web site is at
//www.freelists.org/webpage/audacity4blind

Subscribe and unsubscribe information, message archives,
Audacity keyboard commands, and more...

To unsubscribe from audacity4blind, send an email to
audacity4blind-request@xxxxxxxxxxxxx
with subject line
unsubscribe





The audacity4blind web site is at
//www.freelists.org/webpage/audacity4blind

Subscribe and unsubscribe information, message archives,
Audacity keyboard commands, and more...

To unsubscribe from audacity4blind, send an email to
audacity4blind-request@xxxxxxxxxxxxx
with subject line
unsubscribe

Other related posts: