Determining the Effects of Cooling Rate on Magma Crystallisation Using a High Temperature Heating Stage