Importing Wave
I created a funazione "highpass" to apply a filter to my data.
I created a simple GUI, but I can not load and set the best parameters.
I wish every time I load a wave, this has an automatic renaming, and that this name be scelato for example chosen by the operator, as in the box that I created. so every time you load a new wave, the first will have to remain still in memory and plotted, without being overwritten.
This is my procedure:
#pragma rtGlobals=3 // Use modern global access method and strict wave access.
Menu "Vibration Filter"
"FTT", VRB(); VF()
EndMacro
Function VRB()
variable/G win
string/G waveoutname
string/g wm
wave wavein = wm
end
Window VF() : Panel
PauseUpdate; Silent 1 // building window...
NewPanel /W=(10,60,260,540)
SetVariable setvar_hf title="win", pos={23,112}, size={133, 20}, value=win; DelayUpdate
SetVariable setvar_hf limits={-inf,inf,0}
SetDrawEnv fsize= 12; DelayUpdate
SetDrawEnv fname="Calibri"
SetVariable setvar_waven title="wave in", pos={23, 88}, size={130, 20}, value=wm; DelayUpdate
SetDrawEnv fname= "Calibri"
SetDrawEnv fsize= 10;DelayUpdate
Button button_HFF, pos={64,212}, size={99,41}, proc=VFB, title="High PSS"
SetDrawEnv fname= "Calibri"
Button button_HFF, fSize=14, fStyle=1
SetVariable setvar_WOUT title="waveout name",pos={10, 140},size={174,16}, value=waveoutname; DelayUpdate
SetDrawEnv fname= "Calibri"
Button button_loadwave, pos={18,28}, size={88,28}, proc=ButtonLWin, title="LOAD Wavein"
end
Function VFB(ctrlName) : ButtonControl
string ctrlName
NVAR win
SVAR waveoutname
SVAR wm
wave/z wavein
highpass(wavein, win, waveoutname)
end
Function/WAVE highpass(wavein, win, waveoutname)
wave wavein
variable win
String waveoutname
make/O/N=(numpnts(wavein)-win+1) wavetmp, waveout, waveout2
wavetmp= wavein[win/2+p-1]
waveout=sum(wavein, pnt2x(wavein, p), pnt2x(wavein, p+win-1))/win // moving average 1 Hz
waveout2=wavetmp-waveout
duplicate/O waveout2, $waveoutname
Wave wOut=$waveoutname
wOut=waveout2
end
// LOAD WAVE
Function loadewavein()
loadwave/G/N/O/L={0,0,0,1,1}
end
Function ButtonLWin(ctrlName) : ButtonControl
string ctrlName
loadewavein()
end
February 19, 2016 at 07:44 pm - Permalink
February 20, 2016 at 01:06 am - Permalink
If I understand your question... one method is to add a Set Variable control to the panel and use to get the value entered in the control. The output variable "S_value" will hold this. You will have to be careful in entering wave names or providing error checking to be sure the string will be a legal name.
February 20, 2016 at 10:21 am - Permalink
commands? They're not doing anything, because there are no DrawText, etc commands that would be affected by them.
If you want to set the controls font and size use the Control dialogs to set them.
Also, this in this code:
The wave wavein = wm part isn't useful: once the function ends the wavein wave reference disappears (it is local to the function.)
If that is just an unfinished part of the code and you intend to use the wavein reference, it should probably be something more like
--Jim Prouty
Software Engineer, WaveMetrics, Inc.
February 20, 2016 at 10:47 am - Permalink
Yes, in fact those lines come from another part of the code which I then deleted .
I took your advice inserting $ wm in that function , but whenever I try to avvire " highpass " from the window that I created me always comes out the same mistake :
"Whilw excuting Make, the following error occurred: the numeber of points in a wave must be between 0 and 2147 milion.
February 20, 2016 at 11:13 am - Permalink
February 22, 2016 at 09:21 am - Permalink