applescript to set minimum input volume

minimum-input-volume.scpt

property min_volume : 30

repeat
	try
		set volumeDialog to display dialog "Minimum volume" default answer 30
	on error number -128
		-- user canceled
		return
	end try
	
	try
		set min_volume to text returned of volumeDialog as integer
		exit repeat
	on error number -1700
		display alert "input has to be a number" giving up after 3
	end try
	
end repeat

display alert "Maintaining minimum input volume to " & min_volume & "%" giving up after 3

on idle
	-- main loop
	set inputVolume to (input volume of (get volume settings))
	if inputVolume < min_volume then
		set volume input volume min_volume
		display notification "Input volume at " & inputVolume & ", resetting to " & min_volume subtitle "min volume"
	end if
	return 1
end idle