procedure PositionEntity=('_PositionEntity@16')(pointer Entity; single x,y,z); stdcall;

PositionEntity(ogrehead,0,0,-150);

myProc(0.0, 0.0, -150.0);

debugMB_Single(0, 2.6);

double dbVar = 2.6;
debugMB_Double(0, dbVar);

extended extVar = 2.6;
debugMB_Extended(0, extVar);

procedure myProc(double* mydw) {
  //do something
}

double d = 5.0;
myProc(@d);

inline procedure Dpl(extended x )
{
   divide x into X1 and X2
   push X2
   push X1
} 

then later

procedure myProc(double* mydw) {
  //do something
}

double d = 5.0;
myProc(Dpl(5.0));