Create gethist.m