Holding Shift or pressing R currently just causes your player to swim excruciatingly slow.

How about changing this to make your character swim under water for a short time.
Not dive, but maybe move submerged for 15 + (Fortitude / 10) seconds at a depth of around 3 feet.