SetDirectory["d:\\hirota\\allfiles"]

Get["h_kp.m"]