Create laser.m

works on MATLAB 2012a