#This script will take pitch measurements from a selected pitch file
#The results will be shown in the info window.
#The pitch file needs to be selected in the objects window.
#2/11/2023 Riikka Ullakonoja

clearinfo

filename$ = selected$ ("Pitch")
totaldur = Get total duration
minST = Get minimum: 0, 0, "semitones re 100 Hz", "none"
maxST = Get maximum: 0, 0, "semitones re 100 Hz", "none"
meanST = Get mean: 0, 0, "semitones re 100 Hz"
medianST = Get quantile: 0, 0, 0.5, "semitones re 100 Hz"
stdST = Get standard deviation: 0, 0, "semitones"
slopeST = Get mean absolute slope: "semitones"

printline 'filename$' 	'totaldur'	'minST'	'maxST'	'meanST'	'medianST'	 'stdST'	 'slopeST'