//**********************************************************************
//        SUBCALL                                                     //
//**********************************************************************
                                                                      //
                                                                      //
subcall   MySubcall                                                   //  void MySubcall(DATA8 Par)
{                                                                     //  {
  IO_8    Par                                                         //
                                                                      //
  DATA8   Tmp                                                         //
                                                                      //
  MOVE8_8(Par,Tmp)                                                    //    Tmp  =  Par
                                                                      //
                                                                      //
}                                                                     //  }
                                                                      //
                                                                      //