graf_mkstate

function graf_mkstate(

  gr_mkmx: psmallint;

  gr_mkmy: psmallint;

  gr_mkmstate: psmallint;

  gr_mkkstate: psmallint

):SmallInt;

function graf_mkstate(

  out gr_mkmx: SmallInt;

  out gr_mkmy: SmallInt;

  out gr_mkmstate: SmallInt;

  out gr_mkkstate: SmallInt

):SmallInt;