// Save CPU-Registers

      L     DBNO                        // Save: - DB1-Register

      T     #TI_Save_DBNo               // *

      TAR1  #TDWSave_AR1                //       - AR1-Register

      TAR2  #TDWSave_AR2                //       - AR2-Register

// Load Pointer to the Input UDT

      TAR2                              // Input UDT

      AD    DW#16#FFFFFF                //  Change "area-Part" of Pointer from DBX to DIX !

      OD    DW#16#85000000              //   *

      LAR1                              //   *

      L     P##XS_Status                //  *

      +AR1                              //  *

      L     W [AR1,P#0.0]               //  *

      T     #TS_DBPointer.DBNo          //  *

      OPN   DB [#TS_DBPointer.DBNo]     //  *

      L     D [AR1,P#2.0]               //  *

      T     #TS_DBPointer.PArea         //  *

      LAR1                              //  *

      LAR2  P##TS_Status                // Temporary UDT

// Load Input Variable to the Temporary Variable

      L     D [AR1,P#0.0]               // Save Input to Temp, Bytes 0 - 3

      T     LD [AR2,P#0.0]

      L     D [AR1,P#4.0]               // Save Input to Temp, Bytes 4 - 7

      T     LD [AR2,P#4.0]

      L     W [AR1,P#8.0]               // Save Input to Temp, Bytes 8 - 9

      T     LW [AR2,P#8.0]

      LAR2  #TDWSave_AR2

这程序是什么意思 能详细解释每一句吗？？谢谢了