function [HPBandDist] = HPDist(HPBand, HPdisttype, HPdistgain, HPmix)
HPdistmix = HPmix / 100; %converting percentage to value between 0 and 1
if HPdisttype == 1
    HPBandDist = HPBand;
elseif HPdisttype == 2
    HPBandDist = od(HPBand, HPdistgain, HPdistmix);
elseif HPdisttype == 3
    HPBandDist = invtan2(HPBand, HPdistgain, HPdistmix);
elseif HPdisttype == 4
    HPBandDist = fuzz(HPBand, HPdistgain, HPdistmix);
elseif HPdisttype == 5
    HPBandDist = distort(HPBand,HPdistgain,HPdistmix);
elseif HPdisttype == 6
    HPBandDist = cubic(HPBand,HPdistgain,HPdistmix);
elseif HPdisttype == 7
    HPBandDist = cosinee(HPBand,HPdistgain,HPdistmix);
else errordlg('Something Went Wrong', 'High Pass Distortion')
end
