Create eventmap.pas