NetStumbler.org Forums - View Single Post

goldfndr · 10-06-2005

Does the unnamed software you're using support tracks? Additional track or crumb output could be written dynamically and imported later, assuming there's a specification.

In other news, I found out last night that the WavFolder bad setting code was horribly broken: it'll find the WAV files in the scripts' folder but it doesn't change WavFolder. What one needs to do to correct this:

Change const WavFolder = to dim WavFolder : WavFolder = in ns04settings.vbs

Change a few lines in the "Get list of WAVs" code in ns04thread.vbs, it should be:

Code:

'Get list of WAVs - this should perhaps be done with Scripting.Dictionary
Dim fl
if len(WavFolder) then
	if FSO.FolderExists(WavFolder) then
		set f = FSO.GetFolder(WavFolder)
	else
		MsgBox "WavFolder (" & WavFolder & ") not found, reverting to script folder!" _
			, vbExclamation, nameScript
		WavFolder = nameDir
		set f = FSO.GetFolder(WavFolder)
	end if
else
	WavFolder = nameDir
	set f = FSO.GetFolder(WavFolder)
end if

For good measure, make similar change in ns04speech.vbs (bad oversight, oops)

My apologies for not testing this better (or, apparently, at all).

10-06-2005	#68 (permalink)
goldfndr Knight Tooth Puller Join Date: Aug 2004 Location: Bellevue, WA, USA Posts: 182	Does the unnamed software you're using support tracks? Additional track or crumb output could be written dynamically and imported later, assuming there's a specification. In other news, I found out last night that the WavFolder bad setting code was horribly broken: it'll find the WAV files in the scripts' folder but it doesn't change WavFolder. What one needs to do to correct this: Change const WavFolder = to dim WavFolder : WavFolder = in ns04settings.vbs Change a few lines in the "Get list of WAVs" code in ns04thread.vbs, it should be: Code: 'Get list of WAVs - this should perhaps be done with Scripting.Dictionary Dim fl if len(WavFolder) then if FSO.FolderExists(WavFolder) then set f = FSO.GetFolder(WavFolder) else MsgBox "WavFolder (" & WavFolder & ") not found, reverting to script folder!" _ , vbExclamation, nameScript WavFolder = nameDir set f = FSO.GetFolder(WavFolder) end if else WavFolder = nameDir set f = FSO.GetFolder(WavFolder) end if For good measure, make similar change in ns04speech.vbs (bad oversight, oops) My apologies for not testing this better (or, apparently, at all). Last edited by goldfndr : 10-06-2005 at 07:54 PM.